{VERSION 5 0 "IBM INTEL NT" "5.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 
0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 }
{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 
2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Text Output" -1 2 
1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 0 }1 0 
0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Warning" 2 7 1 {CSTYLE "" -1 -1 
"" 0 1 0 0 255 1 0 0 0 0 0 0 1 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 
}{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 
2 2 2 2 2 2 1 1 1 1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }}
{SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 2 "Q1" }{MPLTEXT 1 0 0 "" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "L:=5.36*Pi*x^2:" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "F:=1-(1+L)*exp(-L):" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "mu:=int(x*diff(F,x),x=0..infinity);
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#muG$\"+'f1&RK!#5" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 44 "sqrt(int((x-mu)^2*diff(F,x),x=0..in
finity));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+$fQf<\"!#5" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 69 "with(plots):  implicitplot(x
^2-6*x+y^2+10*y+30, x=-10..10,y=-10..10):" }}{PARA 7 "" 1 "" {TEXT -1 
50 "Warning, the name changecoords has been redefined\n" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "L:=evalf(5.36*Pi*2^2):" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "add(L^i/i!,i=0..59)*exp(-L);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+YbN&p\"!#5" }}}{EXCHG {PARA 0 "" 
0 "" {TEXT -1 2 "Q2" }{MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 8 "restart:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 
"35/60*10.8*.8*2*30;sqrt(35/60*10.8*.8*(2*30^2+2^2*30^2));" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#$\"++++CI!\"(" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#$\"+]ss\\;!\"(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "p:=
.8:q:=.2:   p*(p^4+5*p^4*q);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"'g`
l!\"'" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 2 "Q3" }{MPLTEXT 1 0 0 "" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "restart:  t:=11/60:" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 56 "G:=1+int(2*s*exp(-s^2),s):  \+
p:=evalf(int(1-G,s=0..t)/t):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 31 "Lx:=12.3*t*p: Ly:=12.3*t*(1-p):" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 46 "sum(Lx^i*Ly^i/i!^2,i=0..infinity)*exp(-Lx-Ly);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+N+036!#5" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 42 "mu:=evalf(int(s*diff(G,s),s=0..infinity)):" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "V:=evalf(int((s-mu)^2*diff(G
,s),s=0..infinity)):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "12.
3*mu; sqrt(12.3*mu+12.3^2*V);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+=
\"f+4\"!\")" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+NfT&e'!\"*" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 2 "Q4" }{MPLTEXT 1 0 0 "" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart:" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 47 "lambda:=piecewise(t<4,1.2+t/10,t<6,1.6-t/10,1):" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "L:=int(lambda,t=0..s):" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 42 "F:=1-simplify(add(L^i/i!,i=0
..6))*exp(-L):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "mu:=int(s*diff(F,
s),s=0..infinity);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#muG$\"+gAaQa!
\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 44 "sqrt(int((s-mu)^2*di
ff(F,s),s=0..infinity));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+,dg&R#
!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "L1:=int(lambda,t=0.
.1): L2:=int(lambda,t=1..2):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 56 "L1*exp(-L1)*(1-exp(-L2))+1-add(L1^i/i!,i=0..1)*exp(-L2);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+mV)*>o!#5" }}}{EXCHG {PARA 0 "" 0 
"" {TEXT -1 2 "Q5" }{MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 8 "restart:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 
"Px:=(1+2*z+3*z^2)/6.:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "P
:=Px/(3-2*Px)^4:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "mu:=eva
l(diff(P,z),z=1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#muG$\"+++++7!
\")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "sqrt(eval(diff(P,z,z
),z=1)+mu-mu^2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+h]5/p!\"*" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "aux:=mtaylor(P,z,21):" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "1-eval(aux,z=1);" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#$\"+@(=Y9\"!#5" }}}}{MARK "36" 0 }{VIEWOPTS 
1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }