read `ParkingStatistics.txt`: L1:=120: L2:=130: K:=6: gu:=[seq(Pnx(i,1,1,x),i=1..L2)]: mu:=[]: for i from L1+1 to L2 do mu1:=evalf(AlphaSeq(gu[i],x,K)): mu:=[op(mu),mu1]: od: print(`the sequence of [ave, variance, ScaledMoments] from `, L1+1, `to `, L2, `are : `): print(``): lprint(mu): print(`-----------------------------------------`): print(`This took`, time(), `seconds. `): quit: