{VERSION 2 3 "IBM INTEL NT" "2.3" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 } {PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Text Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 2 6 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 2 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Warni ng" 2 7 1 {CSTYLE "" -1 -1 "" 0 1 0 0 255 1 0 0 0 0 0 0 1 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Error" 7 8 1 {CSTYLE "" -1 -1 "" 0 1 255 0 255 1 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "Maple Output" 0 11 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 11 12 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Plot" 0 13 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "plot(sin(1/x)*exp(-x ), x=.15..1.5);" }}{PARA 13 "" 1 "" {INLPLOT "6%-%'CURVESG6$7eo7$$\"1+ ++++++:!#;$\"1+!>a[\\.A$F*7$$\"1]il(p#yO:F*$\"1&y&RCuF*7$$\"1+DJ&Rl Nd\"F*$\"1wa3[@8Ih!#<7$$\"1](oH4[.h\"F*$!1Bj,D]AQiF77$$\"1+]i!zIrk\"F* $!1eiF=Yz%y\"F*7$$\"1]7G)[8Ro\"F*$!1>$Q&31'\\&GF*7$$\"1+v$f='p?F*$!1'\\#)z4#>\" G(F*7$$\"1D\"yD:)G')>F*$!1/v#)y@%ox(F*7$$\"1+vo4qH]?F*$!1HgbgYlN!)F*7$ $\"1Qf$oL*G'3#F*$!131a)>v/4)F*7$$\"1vV)Rm\"GA@F*$!1E)*[s/!y3)F*7$$\"17 G8\"*RFe@F*$!1ai&[PtN.)F*7$$\"1]7G=jE%>#F*$!15+Jy]XLzF*7$$\"1D\"yD(4Dm AF*$!10NRPac;wF*7$$\"1+](oiN#QBF*$!1D8h*\\'ovrF*7$$\"1++]d#fJ[#F*$!1I8 Rz%e+/'F*7$$\"1+]7))G3GEF*$!1d-X;D>NZF*7$$\"1]7.AxJsFF*$!1TZSK7(=S$F*7 $$\"1+v$fb_l\"HF*$!1@'y1)>Y:@F*7$$\"1*\\7.rw-0$F*$!1CA8=L?05F*7$$\"1+v ok3+%=$F*$\"1tMT[J*HZ'!#>7$$\"1+v$4[kCK$F*$\"16U!)Gl:)f@*)>8$F*7$$\"1+DJlm1!*QF*$\"1_J*)QPiiOF*7$$\"1+vV$p1G.%F*$\"1P#[] cjl5%F*7$$\"1++D@!ekK%F*$\"1:,,$QZ')y%F*7$$\"1+]iqi5&e%F*$\"1@Z-#fq8=& F*7$$\"1+vo/YpIZF*$\"1W>&pmZWL&F*7$$\"1,+vQHGw[F*$\"1%)\\G!4@qW&F*7$$ \"1++]s!pC-&F*$\"17b<\"3-^_&F*7$$\"1++D1_lo^F*$\"1Q&)3d(RKd&F*7$$\"1++ vLE`4`F*$\"1*p(ovJW&f&F*7$$\"1,+Dh+T]aF*$\"1vM>.[S(f&F*7$$\"1+v=i/F1dF *$\"1V)**G_4(ebF*7$$\"1,+DEK^5gF*$\"1Z1QC6oeaF*7$$\"1+++bnCoiF*$\"1\\v )=#pCT`F*7$$\"1,vo>@0olF*$\"1iXhI9,z^F*7$$\"1++]n1VLoF*$\"1OA8bs;?]F*7 $$\"1,vo%*HfCrF*$\"1n)*HGl'f$[F*7$$\"1+D1%Q[=S(F*$\"18!ohN3bl%F*7$$\"1 ,](oHN6p(F*$\"1Qw&)RDglWF*7$$\"1,vV))4zczF*$\"1qA.*p(3#H%F*7$$\"1+]iSl LV#)F*$\"16_*)*o5x5%F*7$$\"1,v=Po(4a)F*$\"1))o'QG.2#RF*7$$\"1+DJ!ft+!) )F*$\"1MU#[q)[iPF*7$$\"1,](==0*z!*F*$\"13(z,7xpf$F*7$$\"1++](f)**o$*F* $\"1e'eO.JAV$F*7$$\"1+]P/,#=l*F*$\"1Sx,F;UxKF*7$$\"1+voaWYD**F*$\"1is# *f\"3P8$F*7$$\"1+D1&)*HH-\"!#:$\"1_IDoD7\")HF*7$$\"1++vY4B]5Fj\\l$\"1K s!)pI?]GF*7$$\"1+]i]0Qz5Fj\\l$\"1=s)3JQnr#F*7$$\"1](=UU%z06Fj\\l$\"1M< el8G,EF*7$$\"1+]([wrY8\"Fj\\l$\"19\"o!pW#3[#F*7$$\"1](o>4V=;\"Fj\\l$\" 1tG*)R%)ysBF*7$$\"1]P%y&\\C!>\"Fj\\l$\"1Z!>s6R^E#F*7$$\"1+]7tH,=7Fj\\l $\"1fCmrA*[;#F*7$$\"1](=<^$3Z7Fj\\l$\"1a8CMV+l?F*7$$\"1++]&*=3v7Fj\\l$ \"1p,B!=qM(>F*7$$\"1+D\"oG9PI\"Fj\\l$\"1PRedlP%)=F*7$$\"1](oue4@L\"Fj \\l$\"1T_at/J+=F*7$$\"1++v>>?e8Fj\\l$\"1w_q$3[ms\"F*7$$\"1+D1xm5)Q\"Fj \\l$\"1Uoy0zBY;F*7$$\"1++][Q&[T\"Fj\\l$\"1hM(R.uxd\"F*7$$\"1](o>\">PV9 Fj\\l$\"1vEIi+>3:F*7$$\"1]7`Ptmq9Fj\\l$\"1N_&*ybsW9F*7$$F)Fj\\l$\"1M!* *=`p(z8F*-%'COLOURG6&%$RGBG$\"#5!\"\"\"\"!Fhbl-%+AXESLABELSG6$%\"xG%!G -%%VIEWG6$;$\"#:!\"#$FcclFgbl%(DEFAULTG" 2 493 493 493 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0 0 0 0 0 1 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "p lot((1/(sqrt(2*pi)))*exp(x*x/2), x=0.0..10);" }}{PARA 8 "" 1 "" {TEXT -1 26 "Plotting error, empty plot" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "pi;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%#piG" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "Pi;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%#PiG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "1/s qrt(2*pi);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&\"\"##\"\"\"F%%#piG# !\"\"F%F&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "plot(exp(x*x/2 ), x=-1..1);" }}{PARA 13 "" 1 "" {INLPLOT "6%-%'CURVESG6$7W7$$!\"\"\" \"!$\"1G,qq7s[;!#:7$$!1MLLe%G?y*!#;$\"1NN4Vfb8;F-7$$!1nmm;p0k&*F1$\"1R Fg/6*)z:F-7$$!1++vV5Su$*F1$\"1XPm8F-7$$!1nm;/R=0vF1$\"1/Vt.,ID8F-7$$!1++]P8#\\4(F 1$\"1nvsnm>'G\"F-7$$!1nm;/siqmF1$\"1V7O^(y\"\\7F-7$$!1++](y$pZiF1$\"10 f)yk:b@\"F-7$$!1LLL$yaE\"eF1$\"1@w$4\"H/%=\"F-7$$!1nmm\">s%HaF1$\"11#[ #yD\")e6F-7$$!1+++]$*4)*\\F1$\"16&=FzSI8\"F-7$$!1+++]_&\\c%F1$\"1+?[He \")46F-7$$!1+++]1aZTF1$\"1pTgNx\")*3\"F-7$$!1nm;/#)[oPF1$\"1AKr&H*et5F -7$$!1MLL$=exJ$F1$\"1_Y)zL!ec5F-7$$!1MLLL2$f$HF1$\"1s(*yr1/W5F-7$$!1++ ]PYx\"\\#F1$\"1\"esmhJ:.\"F-7$$!1MLLL7i)4#F1$\"19RX3`EA5F-7$$!1++]P'ps m\"F1$\"1\\.bzf*R,\"F-7$$!1++]74_c7F1$\"1.$fbYDz+\"F-7$$!1JLL$3x%z#)!# <$\"1c*)enLV.5F-7$$!1MLL3s$QM%F_s$\"1u)p7*Q%4+\"F-7$$!1^omm;zr)*!#>$\" 1s9E([+++\"F-7$$\"1bw:\"F-7$$\"1mmm;WTAeF1$\"1iu\"fO:Z=\" F-7$$\"1****\\i!*3`iF1$\"1gED?c#f@\"F-7$$\"1MLLL*zym'F1$\"1'HEZ*)\\*[7 F-7$$\"1LLL3N1#4(F1$\"1%>+l&f$fG\"F-7$$\"1mm;HYt7vF1$\"1ZNfO<0E8F-7$$ \"1*******p(G**yF1$\"1w'4%Gh9m8F-7$$\"1mmmT6KU$)F1$\"1gXpV?>;9F-7$$\"1 LLLLbdQ()F1$\"1&>&yl)Q\\Y\"F-7$$\"1++]i`1h\"*F1$\"1Bt.H=R@:F-7$$\"1+++ +PDj$*F1$\"1A;H$R^,b\"F-7$$\"1++]P?Wl&*F1$\"1F]rF/5!e\"F-7$$\"1++v=5s# y*F1$\"1!okLElOh\"F-7$$\"\"\"F*F+-%'COLOURG6&%$RGBG$\"#5F)F*F*-%+AXESL ABELSG6$%\"xG%!G-%%VIEWG6$;F(F[\\l%(DEFAULTG" 2 493 493 493 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0 0 0 0 0 1 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "c:=1/sqrt(2*pi):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 2 "c;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&\"\"##\"\"\"F%%#piG#!\"\"F%F&" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "plot((1/sqrt(2*3.1416))*ex p(x*x/2), x=-1..1);" }}{PARA 13 "" 1 "" {INLPLOT "6%-%'CURVESG6$7W7$$! \"\"\"\"!$\"1U\\8X&Qud'!#;7$$!1MLLe%G?y*F-$\"1c@G\\$\\rV'F-7$$!1nmm;p0 k&*F-$\"1.o#>BYGI'F-7$$!1++vV5Su$*F-$\"1AwT!4k1>'F-7$$!1LL$3!GaeF-7$$!1mmm\"4m(G$)F-$\"1Grx PHR5X&F-7$$!1nm;/R=0vF-$\"1::yui<(G&F-7$ $!1++]P8#\\4(F-$\"12*RyJw68&F-7$$!1nm;/siqmF-$\"1\"4$yqj\\$)\\F-7$$!1+ +](y$pZiF-$\"1\"))H^<+#\\[F-7$$!1LLL$yaE\"eF-$\"1\\HVnAkBZF-7$$!1nmm\" >s%HaF-$\"1jN_?z)Hi%F-7$$!1+++]$*4)*\\F-$\"147$=\\t,_%F-7$$!1+++]_&\\c %F-$\"1OY>-%>vU%F-7$$!1+++]1aZTF-$\"1(*HrV'QxM%F-7$$!1nm;/#)[oPF-$\"1a \"G7h'*HG%F-7$$!1MLL$=exJ$F-$\"1.Lsm29:UF-7$$!1MLLL2$f$HF-$\"1/f$\\z9^ ;%F-7$$!1++]PYx\"\\#F-$\"1?r`V4@:TF-7$$!1MLLL7i)4#F-$\"1R(QawV#ySF-7$$ !1++]P'psm\"F-$\"1J_qaRDXSF-7$$!1++]74_c7F-$\"1H-2Oh.@SF-7$$!1JLL$3x%z #)!#<$\"1q1%*y_6.SF-7$$!1MLL3s$QM%F^s$\"1BU&pr$=$*RF-7$$!1^omm;zr)*!#> $\"1c(*)Q3?%*)RF-7$$\"1SF-7$$\"1*******pvxl\"F- $\"1jt!o]:Y/%F-7$$\"1)****\\_qn2#F-$\"1W\\S\"z$QwSF-7$$\"1)***\\i&p@[# F-$\"14.sP!GU6%F-7$$\"1)****\\2'HKHF-$\"1ES'*H1nkTF-7$$\"1lmmmZvOLF-$ \"1DM/_e!y@%F-7$$\"1+++]2goPF-$\"141\"px9IG%F-7$$\"1KL$eR<*fTF-$\"1uP] vV(*\\VF-7$$\"1+++])Hxe%F-$\"1Y\\-ij8KWF-7$$\"1lm;H!o-*\\F-$\"19c(*\\f S=XF-7$$\"1****\\7k.6aF-$\"1adoK1P=YF-7$$\"1mmm;WTAeF-$\"1iy_r\\KEZF-7 $$\"1****\\i!*3`iF-$\"18nKEd$3&[F-7$$\"1MLLL*zym'F-$\"1u@(fO$e#)\\F-7$ $\"1LLL3N1#4(F-$\"1B,uJi8I^F-7$$\"1mm;HYt7vF-$\"1*zWD&[ " 0 "" {MPLTEXT 1 0 25 "plot (exp(x*x/2), x=0..1);" }}{PARA 13 "" 1 "" {INLPLOT "6%-%'CURVESG6$7S7$ \"\"!$\"\"\"F(7$$\"1nmm;arz@!#<$\"15S='eP-+\"!#:7$$\"1LL$e9ui2%F.$\"1m fvX6$3+\"F17$$\"1nmm\"z_\"4iF.$\"1cp3Q&H>+\"F17$$\"1mmmT&phN)F.$\"1v=3 !Q(\\.5F17$$\"1LLe*=)H\\5!#;$\"1zca9._05F17$$\"1nm\"z/3uC\"FD$\"1mh2y/ \"y+\"F17$$\"1++DJ$RDX\"FD$\"1*p^J>01,\"F17$$\"1nm\"zR'ok;FD$\"1D>&>M_ R,\"F17$$\"1++D1J:w=FD$\"1-ajSbv<5F17$$\"1LLL3En$4#FD$\"1vC\"RFf@-\"F1 7$$\"1nm;/RE&G#FD$\"145xkgXE5F17$$\"1+++D.&4]#FD$\"1q\"QZ#zwJ5F17$$\"1 +++vB_TXQuV5F17$$\"1nm\"z*ev: JFD$\"1%[T$=qt\\5F17$$\"1LLL347TLFD$\"1()[S;DSd5F17$$\"1LLLLY.KNFD$\"1 .m8NGOk5F17$$\"1++D\"o7Tv$FD$\"1k')zb*3I2\"F17$$\"1LLL$Q*o]RFD$\"1\\%* y:c;\"3\"F17$$\"1++D\"=lj;%FD$\"1%=g5)3n!4\"F17$$\"1++vV&RY2aFD$\"1yvoz8Vd6F17$$\"1mm;zXu9cFD$\"1pGlx\"H2<\"F17$$ \"1+++]y))GeFD$\"1%y2'HA;&=\"F17$$\"1****\\i_QQgFD$\"1'4\"R6n)**>\"F17 $$\"1***\\7y%3TiFD$\"1EJqNNx-^:F17$$\"1++D\"oK0e*FD$\"1( fS0t%Q#e\"F17$$\"1++v=5s#y*FD$\"1!okLElOh\"F17$F)$\"1G,qq7s[;F1-%'COLO URG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLABELSG6$%\"xG%!G-%%VIEWG6$;F(F)%(DEFA ULTG" 2 493 493 493 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0 0 0 0 0 1 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "eval(c);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&\"\"##\"\"\"F%%#piG#!\"\"F%F&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "plot(2*exp(x*x/2), x=-1..1);" }}{PARA 13 "" 1 "" {INLPLOT "6%-%'CURVESG6$7W7$$!\"\"\"\"!$\"1c-STDW(H$!#:7$$!1MLLe% G?y*!#;$\"1qq=')=6FKF-7$$!1nmm;p0k&*F1$\"1xa?4AyfJF-7$$!1++vV5Su$*F1$ \"1ME*yNUN5$F-7$$!1LL$3s%HaF1$\"17k\\c^iAF-7$$!1+++]1aZTF1$\"1R$ 37ZN'z@F-7$$!1nm;/#)[oPF1$\"1XkU\"fyr9#F-7$$!1MLL$=exJ$F1$\"10$pfngJ6# F-7$$!1MLLL2$f$HF1$\"1X&zNM\"3)3#F-7$$!1++]PYx\"\\#F1$\"1i^MLK1j?F-7$$ !1MLLL7i)4#F1$\"1Fy!phIX/#F-7$$!1++]P'psm\"F1$\"1)p+\"f>*z-#F-7$$!1++] 74_c7F1$\"11'=6$4&e,#F-7$$!1JLL$3x%z#)!#<$\"17z$\"1XH_u4++?F-7$$\"1dY?l1?F-7$$\"1KLLe\"*[H7F1$ \"1=3w1P<:?F-7$$\"1*******pvxl\"F1$\"1qfT))=nF?F-7$$\"1)****\\_qn2#F1$ \"1iq6j\")fV?F-7$$\"1)***\\i&p@[#F1$\"1Rn'oZqD1#F-7$$\"1)****\\2'HKHF1 $\"1*zB?ney3#F-7$$\"1lmmmZvOLF1$\"1][<`n\\9@F-7$$\"1+++]2goPF1$\"1Y(f$ )p(=Z@F-7$$\"1KL$eR<*fTF1$\"1ZHA-jv!=#F-7$$\"1+++])Hxe%F1$\"1)o!3ii%>A #F-7$$\"1lm;H!o-*\\F1$\"1/FKqa>lAF-7$$\"1****\\7k.6aF1$\"1d4%*)Q5`J#F- 7$$\"1mmm;WTAeF1$\"1D\\$=tI%pBF-7$$\"1****\\i!*3`iF1$\"1?`]S7&=V#F-7$$ \"1MLLL*zym'F1$\"1\"f_%*y**y\\#F-7$$\"1LLL3N1#4(F1$\"1(Q+I\">(=d#F-7$$ \"1mm;HYt7vF1$\"1%4(=tM5_EF-7$$\"1*******p(G**yF1$\"1`$>oD#HKFF-7$$\"1 mmmT6KU$)F1$\"1>\"*Q(3%QKGF-7$$\"1LLLLbdQ()F1$\"1\"Rq:tx)HHF-7$$\"1++] i`1h\"*F1$\"1XY2eOyUIF-7$$\"1++++PDj$*F1$\"1WKe'y-.5$F-7$$\"1++]P?Wl&* F1$\"1a+Vb3?gJF-7$$\"1++v=5s#y*F1$\"1f$Hn_ItA$F-7$$\"\"\"F*F+-%'COLOUR G6&%$RGBG$\"#5F)F*F*-%+AXESLABELSG6$%\"xG%!G-%%VIEWG6$;F(F[\\l%(DEFAUL TG" 2 493 493 493 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 10030 10061 10056 10074 0 0 0 20030 0 12020 0 0 0 0 0 0 0 1 1 0 0 0 10 0 0 0 0 0 0 1 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "plot(\{e xp(-x/0.5)*2, exp(-x), exp(-x/2)*0.5\}, x=0..5);" }}{PARA 13 "" 1 "" {INLPLOT "6'-%'CURVESG6$7U7$\"\"!$\"\"\"F(7$$\"1mmmT&)G\\a!#<$\"1d,(4Y _'p%*!#;7$$\"1LLL3x&)*3\"F1$\"1L)[e'F17$$\"1nm\"z%4\\Y_F1$\"1g()\\1)Hw\" fF17$$\"1MLeR-/PiF1$\"1E$3?kb&f`F17$$\"1***\\il'pisF1$\"1sb6*G+r$[F17$ $\"1MLe*)>VB$)F1$\"1LjNAtG]VF17$$\"1++DJbw!Q*F1$\"1N'RI5*z8RF17$$\"1nm ;/j$o/\"!#:$\"11n;))fY5NF17$$\"1LL3_>jU6Fao$\"14,D-Qy*=$F17$$\"1++]i^Z ]7Fao$\"11(H'GpojGF17$$\"1++](=h(e8Fao$\"1$4nbG*ypDF17$$\"1++]P[6j9Fao $\"1PT1>-9:BF17$$\"1L$e*[z(yb\"Fao$\"1CLOTY#e5#F17$$\"1nm;a/cq;Fao$\"1 6'fM\"fT\")=F17$$\"1nmm;t,mFao$\"13I<1\\8(Q\"F17$$\"1+]i!f#=$3#Fao$\"1+ a2DCLX7F17$$\"1+](=xpe=#Fao$\"1\"Rv@Y*zB6F17$$\"1nm\"H28IH#Fao$\"1cCQy zh45F17$$\"1n;zpSS\"R#Fao$\"1tBSo>6]\"*F.7$$\"1LL3_?`(\\#Fao$\"1Q78JIy G#)F.7$$\"1M$e*)>pxg#Fao$\"1-it!yw)ptF.7$$\"1+]Pf4t.FFao$\"18vI()Q_&p' F.7$$\"1MLe*Gst!GFao$\"1u!y8>IFao$\"1rf.&[jS)[F.7$$\"1+]i!RU07$Fao$\"1z'ezWALT%F.7$$\"1++ v=S2LKFao$\"1R_^+&3O%RF.7$$\"1mmm\"p)=MLFao$\"1*=EYB\\Vc$F.7$$\"1++](= ]@W$Fao$\"1!3h6V\"e*>$F.7$$\"1L$e*[$z*RNFao$\"1;5QCER,HF.7$$\"1,+]iC$p k$Fao$\"1\")p:&*z42EF.7$$\"1m;H2qcZPFao$\"1ozF-M]dBF.7$$\"1+]7.\"fF&QF ao$\"1-AUP/6A@F.7$$\"1mm;/OgbRFao$\"1U#*oy2r9>F.7$$\"1+]ilAFjSFao$\"1- O7*zm#>#[Z%Fao$\"1!\\ #*=1D#R6F.7$$\"1nmT&G!e&e%Fao$\"1pz\"=/$y>5F.7$$\"1MLL$)Qk%o%Fao$\"1&* )=%GJ-O#*!#=7$$\"1+]iSjE!z%Fao$\"1=VjJPC5$)Fcz7$$\"1,]P40O\"*[Fao$\"1u )pqY'>6vFcz7$$\"\"&F($\"1na3**p%zt'Fcz-%'COLOURG6&%$RGBG$\"#5!\"\"F(F( -F$6$7Z7$F($\"\"#F(7$$\"1LL$3FWYs#F.$\"1JS>#\\IR*=Fao7$F,$\"1j6jaj[$z \"Fao7$$\"1++]7G$R<)F.$\"1R\\=Z#p$)p\"Fao7$F3$\"1!4C@l'H3;Fao7$F8$\"1) p\\x6$zi9Fao7$F=$\"1ZQ$GP`/L\"Fao7$$\"1+]PMnNrDF1$\"1f')*yCse>\"Fao7$F B$\"1vT.(e/\\2\"Fao7$$\"1MLL$eI8k$F1$\"1i3Qxd!\\l*F17$FG$\"1wYSmw8s')F 17$$\"1,]PfyG7ZF1$\"1C8\"3O!Q$z(F17$FL$\"18DN0&oO+(F17$FQ$\"1dm&fLn\\u &F17$FV$\"1!R#RTy]zYF17$Fen$\"1[3Td***\\y$F17$Fjn$\"1r2z$okN1$F17$F_o$ \"1]]\"3HuYY#F17$Feo$\"1L%>59W\\.#F17$Fjo$\"1F4/l09S;F17$F_p$\"1'3VWRj 2K\"F17$Fdp$\"1ocyY[(>2\"F17$Fip$\"1PfMS[**o))F.7$F^q$\"1@\"Q)y;XzqF.7 $Fcq$\"1qg!\\Mq!\\eF.7$Fhq$\"1@C]'pWUo%F.7$F]r$\"1*>Ze\\'G[QF.7$Fbr$\" 1c$))yp0<5$F.7$Fgr$\"1)RrBY]e_#F.7$F\\s$\"1bhaCplQ?F.7$Fas$\"12go!)4\\ u;F.7$Ffs$\"1p'oMSdUN\"F.7$F[t$\"1#pk_n,j3\"F.7$F`t$\"1,65D!3g'*)Fcz7$ Fet$\"1O&=H`![(G(Fcz7$Fjt$\"1bMYgFp#)eFcz7$F_u$\"1WBJf+$[&*QFcz7$Fiu$\"16s1,'4/6$Fcz7$F^v$\"1ggF$4<4a#Fcz7$Fcv$\"1eh# pEku/#Fcz7$Fhv$\"17D;Keh$o\"Fcz7$F]w$\"15.F\"*>Rf8Fcz7$Fbw$\"1R/NeWc66 Fcz7$Fgw$\"1,DB7$F\\x$\"1Iv0KZBKtF^el7$Fax$\"1Gu8`mv6fF^el7$F fx$\"1*[Y+4uW![F^el7$F[y$\"1o?r*>$H')QF^el7$F`y$\"1)\\U&[66\\JF^el7$Fe y$\"1&*yG$[ncf#F^el7$Fjy$\"1>!fZ!\\\"*z?F^el7$F_z$\"1vPdkC31F17$F]r$\"1P];-I@i=F17$Fbr$\" 11yF#RjWw\"F17$Fgr$\"1?y?;f:w;F17$F\\s$\"19$>SJC()e\"F17$Fas$\"18,5+wX 7:F17$Ffs$\"1EsosFHM9F17$F[t$\"1*f-*[ePd8F17$F`t$\"1+_-?by$H\"F17$Fet$ \"1V\\aD#[%G7F17$Fjt$\"1[`!Rm6W;\"F17$F_u$\"1S-Mpe*\\5\"F17$Fdu$\"1()* \\]X&R]5F17$Fiu$\"1?RC@/EH**F.7$F^v$\"1H@T(4U(R%*F.7$Fcv$\"1!QLJ#poV*) F.7$Fhv$\"1AbK2)F.7$Fbw$\"1l211=3xwF.7$Fgw$\"1 Bv$QiKPG(F.7$F\\x$\"1EGGKPl=pF.7$Fax$\"1+]DC2/clF.7$Ffx$\"1t$Q4YzZA'F. 7$F[y$\"1J>ae4K.fF.7$F`y$\"1hkZ=<#4g&F.7$Fey$\"1I3YFVsO`F.7$Fjy$\"1rD4 *Q:#\\]F.7$F_z$\"1*y!>F:@0[F.7$Fez$\"1$3V=\"p-eXF.7$Fjz$\"1lXJ*\\U5%F.-Fd[l6&Ff[lFg[lFg[lF(-%+AXESLABELSG6$%\"xG%!G-%% VIEWG6$;F(F_[l%(DEFAULTG" 2 493 493 493 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 10030 10061 10056 10074 0 0 0 20030 0 12020 0 0 0 0 0 0 0 1 1 0 0 0 36 33 0 0 0 0 0 1 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "npdf := (1/sqrt(2*Pi*sigma))*exp(-(x-mu)*(x-mu)/(2*si gma));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%npdfG,$*(\"\"##\"\"\"F'*& %#PiGF)%&sigmaGF)#!\"\"F'-%$expG6#,$*&,&%\"xGF)%#muGF.F'F,F.F-F)F(" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "plot(npdf, x=-10..10, sigma =1, mu=0);" }}{PARA 8 "" 1 "" {TEXT -1 61 "Error, (in plot/options2d) \+ unknown or bad argument, sigma = 1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "sigma=1;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/%&sigmaG \"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "mu=0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/%#muG\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "plot(ndpf, x=-10..10);" }}{PARA 8 "" 1 "" {TEXT -1 26 "Plotting error, empty plot" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "x=10;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/%\"xG\"#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 42 "plot(1/sqrt(2*Pi)*exp(-x*x/2), x=-1 0..10);" }}{PARA 13 "" 1 "" {INLPLOT "6%-%'CURVESG6$7io7$$!#5\"\"!$\"1 AkqE')f%p(!#Q7$$!1nmm;p0k&*!#:$\"1)QS%yAhsa!#O7$$!1LL$3j\">!#M7$$!1mmmT%p\"e()F1$\"1g2o]Qm+))!#L7$$!1nmm\"4m(G$)F1$\"1+KBrO d\\M!#J7$$!1LL$3i.9!zF1$\"1BvmxrX16!#H7$$!1nm;/R=0vF1$\"1)f(y#og9M#!#G 7$$!1,+]P8#\\4(F1$\"1-RgU[?zY!#F7$$!1mm;/siqmF1$\"1T3*Rs$=!#B7$$! 1mmm\">s%HaF1$\"1*>/Xp(R$e\"!#A7$$!1******\\$*4)*\\F1$\"1OuD=G\"4]\"!# @7$$!1+++]_&\\c%F1$\"1#fovYW2>\"!#?7$$!1+++]1aZTF1$\"1<*3,iuqL(Ffp7$$! 1mm;/#)[oPF1$\"194r^!>#*G$!#>7$$!1LLL$=exJ$F1$\"154!QpnUi\"!#=7$$!1LLL eW%o7$F1$\"1g&e4%H)[+$Fgq7$$!1LLLL2$f$HF1$\"1Kc+0O/g`Fgq7$$!1mmT&o_Qr# F1$\"1Q9tJ/u.5!#<7$$!1++]PYx\"\\#F1$\"1]#\\#Go=*y\"Fgr7$$!1nmTNz>&H#F1 $\"1*[*Gl18kGFgr7$$!1MLLL7i)4#F1$\"1V&fS\"*36T%Fgr7$$!1mmTNa%H)=F1$\"1 Q;%4b(pwnFgr7$$!1****\\P'psm\"F1$\"1@'*RD,sP**Fgr7$$!1***\\iX#ek:F1$\" 1O4OAT9t6!#;7$$!1*****\\F&*=Y\"F1$\"16%=Dtl.P\"Fft7$$!1***\\P43#f8F1$ \"1!)H8%R_Re\"Fft7$$!1****\\74_c7F1$\"1`/&\\'[i6=Fft7$$!1K$e9hx$\\6F1$ \"1hY(zzO31#Fft7$$!1lmT5VBU5F1$\"1>Nc$osvJ#Fft7$$!1%)*\\P454N*Fft$\"19 !3#*)RawDFft7$$!1:LL$3x%z#)Fft$\"1+VK%Qe<$GFft7$$!1>Le9rc&H(Fft$\"1#R* >sHEdIFft7$$!1BL$e9d;J'Fft$\"1K:)e'f#*oKFft7$$!1EL3xruF`Fft$\"1Lz'y`p: Y$Fft7$$!1ILL3s$QM%Fft$\"1\"Q*yy:DIOFft7$$!1****\\ivF@AFft$\"1FdR!Q1A* QFft7$$!1^omm;zr)*Fgq$\"1IYf>%G#*)RFft7$$\"1QL$3-Dg5#Fft$\"1)RwMMC>!RF ft7$$\"1WLLezw5VFft$\"1]6=6-XNOFft7$$\"13+]ibQq_Fft$\"1q+7Ou5sMFft7$$ \"1tmmmJ+IiFft$\"1U$*zUqq&G$Fft7$$\"1QL$3x?'*=(Fft$\"1!R*R\"R733$Fft7$ $\"1.++v$Q#\\\")Fft$\"1$Hs3%f@iGFft7$$\"1SL3x;l&=*Fft$\"1g&Gap6jh#Fft7 $$\"1om\"z\\1A-\"F1$\"1KI2/G)fO#Fft7$$\"1,]7Gy%e7\"F1$\"13B$pwXn6#Fft7 $$\"1NLLe\"*[H7F1$\"1pv1t2`t=Fft7$$\"1,+v$zglL\"F1$\"1t/(=f\\Ij\"Fft7$ $\"1om;HCjV9F1$\"1Po1V.@29Fft7$$\"1MLekSq]:F1$\"1'\\`ew!y)>\"Fft7$$\"1 ++++dxd;F1$\"1cohS?e45Fft7$$\"1++]7JFn=F1$\"1,mm?;!)ypFgr7$$\"1,++D0xw ?F1$\"1)Hmxa$*ph%Fgr7$$\"1,+vV+ZzAF1$\"1O0n(RV!pHFgr7$$\"1,+]i&p@[#F1$ \"14i-#oSC$=Fgr7$$\"1,+v=GB2FF1$\"1)3fe`8>-\"Fgr7$$\"1+++vgHKHF1$\"1%* y2y;^p\"y2c\"F `p7$$\"1,+]7k.6aF1$\"1o+xjmz\\\\`QiW5!#K7$$\"1++]i`1h\"*F1$\"1rh'*\\UB\"Q#F:7$$\"1-+]P ?Wl&*F1$\"1DdSUue+aF47$$\"#5F*F+-%'COLOURG6&%$RGBG$Fddl!\"\"F*F*-%+AXE SLABELSG6$%\"xG%!G-%%VIEWG6$;F(Fcdl%(DEFAULTG" 2 493 493 493 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 10030 10061 10056 10074 0 0 0 20030 0 12020 0 0 0 0 0 0 0 1 1 0 0 0 259 189 0 0 0 0 0 1 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 65 "plot(1/sqrt(2*Pi*0.95)*exp(-(x-1)*( x-1)/(2*0.95*0.95)), x=0..10);" }}{PARA 13 "" 1 "" {INLPLOT "6%-%'CURV ESG6$7^o7$\"\"!$\"1'f&=H[-_B!#;7$$\"1LLL3x&)*3\"F+$\"1-*z*=&4lj#F+7$$ \"1nmm;arz@F+$\"1Q,lu>w;HF+7$$\"1++D\"y%*z7$F+$\"1Ry!4G<3:$F+7$$\"1LL$ e9ui2%F+$\"1x)4lO4*pLF+7$$\"1++voMrU^F+$\"1x$=!*4Y:f$F+7$$\"1nmm\"z_\" 4iF+$\"1Ar6bl#)zPF+7$$\"1nmmm6m#G(F+$\"1#)4Gc-+HRF+7$$\"1ommT&phN)F+$ \"1S3+kDCKSF+7$$\"1M$3-js.*))F+$\"1E'Gx!eBlSF+7$$\"1,+v=ddC%*F+$\"14%F+7$$\"1LLe*=)H\\5Feo$\"1aSO5Tb( 3%F+7$$\"1++v=JN[6Feo$\"1ZbSErXVSF+7$$\"1nm\"z/3uC\"Feo$\"1#>n&HcecRF+ 7$$\"1LLe*ot*\\8Feo$\"1taZAI`CQF+7$$\"1++DJ$RDX\"Feo$\"1gQApi/aOF+7$$ \"1LLekGhe:Feo$\"1#RwbATKW$F+7$$\"1nm\"zR'ok;Feo$\"1Qm8dzR/KF+7$$\"1LL 3_(>/x\"Feo$\"1gz&43Ig%HF+7$$\"1++D1J:w=Feo$\"1sW1#>]^n#F+7$$\"1n;HdG \"\\)>Feo$\"1#*)=.ms8R#F+7$$\"1MLL3En$4#Feo$\"1SfM1H')4@F+7$$\"1,+Dc#o %*=#Feo$\"1t!3O>*3p=F+7$$\"1nm;/RE&G#Feo$\"1v-H65/R;F+7$$\"1MLe9r5$R#F eo$\"1sB,rWm'R\"F+7$$\"1+++D.&4]#Feo$\"1!)4tB:*[<\"F+7$$\"1+++]jB4EFeo $\"1C.LB&)3\\(*!#<7$$\"1+++vB_Fht7$$\"1MLLLY.KNFeo$\"1I)3)yCZt6Fht7$$\"1++D\"o7Tv$Feo$\"1= Yx%QJP7'!#=7$$\"1LLL$Q*o]RFeo$\"1uS\"RXv**G$Fgv7$$\"1,+D\"=lj;%Feo$\"1 ISZU&>Se\"Fgv7$$\"1++vV&R7$$\"1ML$e9Ege%Feo$\" 1GK(esAdH$Fgw7$$\"1MLeR\"3Gy%Feo$\"1)ofqB0fZ\"Fgw7$$\"1nm;/T1&*\\Feo$ \"1x]L&edM\"f!#?7$$\"1nm\"zRQb@&Feo$\"1a8C/\"\\\"p@Fgx7$$\"1++v=>Y2aFe o$\"1\"*=8i=ar')!#@7$$\"1nm;zXu9cFeo$\"1$!#A7$$\"1,+D\"y%3TiFeo$ \"1k7WJ%fl+\"Fbz7$$\"1++]P![hY'Feo$\"1?!e.8`'[E!#B7$$\"1LLL$Qx$omFeo$ \"1cdV;Ub2w!#C7$$\"1+++v.I%)oFeo$\"1.Ic1g45>Fc[l7$$\"1mm\"zpe*zqFeo$\" 1GU_5Xx@_!#D7$$\"1,++D\\'QH(Feo$\"1.)37Xe\\?\"F^\\l7$$\"1LLe9S8&\\(Feo $\"1y()H1)p\\*G!#E7$$\"1,+D1#=bq(Feo$\"1:BHB1%[@'!#F7$$\"1LLL3s?6zFeo$ \"1Vri/D&oJ\"F_]l7$$\"1++DJXaE\")Feo$\"1ksQ7uGnC!#G7$$\"1ommm*RRL)Feo$ \"12Yd!4jTo%!#H7$$\"1om;a<.Y&)Feo$\"1%\\3E/GE:)!#I7$$\"1NLe9tOc()Feo$ \"1g+y^*z/P\"Ff^l7$$\"1,++]Qk\\*)Feo$\"1u\"z'**))o\\D!#J7$$\"1NL$3dg6< *Feo$\"1RP:JB%f_$!#K7$$\"1ommmxGp$*Feo$\"1QV!R,r#Qd!#L7$$\"1++D\"oK0e* Feo$\"1t1TIIf$*y!#M7$$\"1,+v=5s#y*Feo$\"17$3^ZJ(G6Fc`l7$$\"#5F($\"1$o< !>(*=F8!#N-%'COLOURG6&%$RGBG$F[al!\"\"F(F(-%+AXESLABELSG6$%\"xG%!G-%%V IEWG6$;F(Fj`l%(DEFAULTG" 2 385 385 385 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 262 -22504 0 0 0 0 0 1 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "expr1: =1/sqrt(2*Pi*0.95)*exp(-(x-1)*(x-1)/(2*0.95*0.95));" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%&expr1G,$*&%#PiG#!\"\"\"\"#-%$expG6#,$*$,&%\"xG\"\" \"F)F2F*$!+0i;Sb!#5F2$\"+-DwasF5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "expr2:=binomial(10,x)*0.1^x*0.9^(10-x);" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#>%&expr2G*(-%)binomialG6$\"#5%\"xG\"\"\")$F+!\" \"F*F+)$\"\"*F.,&F)F+F*F.F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "plot(\{expr1, expr2\}, x=0..10);" }}{PARA 13 "" 1 "" {INLPLOT "6&- %'CURVESG6$7jn7$\"\"!$\"1,++,Wy'[$!#;7$$\"+3x&)*3\"!#5$\"+q(=#RPF/7$$ \"+;arz@F/$\"+#**3$QRF/7$$\"+\"y%*z7$F/$\"+K1#o1%F/7$$\"+XTFwSF/$\"+re u`TF/7$$\"+3Q\\4YF/$\"+*=(p%=%F/7$$\"+pMrU^F/$\"+UY4.UF/7$$\"+,LK4aF/$ \"+**yp2UF/7$$\"+JJ$fn&F/$\"+seI4UF/7$$\"+iHaUfF/$\"+EZ(z?%F/7$$\"+\"z _\"4iF/$\"+DUw.UF/7$$\"+m6m#G(F/$\"+XE+fTF/7$$\"+S&phN)F/$\"+x0AtSF/7$ $\"+*=)H\\5!\"*$\"+@*o5!QF/7$$\"+[!3uC\"Ffo$\"+CTufMF/7$$\"+!pt*\\8Ffo $\"+v62hKF/7$$\"+J$RDX\"Ffo$\"+Y![K0$F/7$$\"+lGhe:Ffo$\"+]>)H$GF/7$$\" +)R'ok;Ffo$\"+&=\\7h#F/7$$\"+_(>/x\"Ffo$\"+G#\\AR#F/7$$\"+1J:w=Ffo$\"+ (pA#y@F/7$$\"+dG\"\\)>Ffo$\"+&[Ae'>F/7$$\"+3En$4#Ffo$\"+'3lLw\"F/7$$\" +c#o%*=#Ffo$\"+*)fa%f\"F/7$$\"+/RE&G#Ffo$\"+SlWN9F/7$$\"+D.&4]#Ffo$\"+ eY3:6F/7$$\"+vB_Y2aFfo$\"+vp1)*eFhw7$$\"+yXu9cFfo$\"+:s&*)f $Fhw7$$\"+\\y))GeFfo$\"+$=L\\7#Fhw7$$\"+i_QQgFfo$\"+EdK[7Fhw7$$\"+!y%3 TiFfo$\"+=S\"\\M(!#97$$\"+O![hY'Ffo$\"+D+o,SFby7$$\"+#Qx$omFfo$\"+@(Q+ G#Fby7$$\"+u.I%)oFfo$\"+4A@G7Fby7$$\"+(pe*zqFfo$\"+*\\zo*o!#:7$$\"+C\\ 'QH(Ffo$\"+&e/Eg$Fgz7$$\"+8S8&\\(Ffo$\"+WY,?>Fgz7$$\"+0#=bq(Ffo$\"+yX2 ^(*F+7$$\"+2s?6zFfo$\"+MRHE\\F+7$$\"+IXaE\")Ffo$\"+Dr=cBF+7$$\"+l*RRL) Ffo$\"+P-NJ6F+7$$\"+`<.Y&)Ffo$\"+Q&*[4_!#<7$$\"+8tOc()Ffo$\"+/RU\\BF[] l7$$\"+\\Qk\\*)Ffo$\"+$zV75\"F[]l7$$\"+p0;r\"*Ffo$\"+()4@nW!#=7$$\"+lx Gp$*Ffo$\"+Ni7E>F[^l7$$\"+!oK0e*Ffo$\"+%[1/a(!#>7$$\"+<5s#y*Ffo$\"+9+& Q$HFf^l7$$\"#5F($\"1,++++++5!#D-%'COLOURG6&%$RGBG$F^_l!\"\"F(F(-F$6$7^ o7$F($\"1'f&=H[-_BF+7$$\"1LLL3x&)*3\"F+$\"1-*z*=&4lj#F+7$$\"1nmm;arz@F +$\"1Q,lu>w;HF+7$$\"1++D\"y%*z7$F+$\"1Ry!4G<3:$F+7$$\"1LL$e9ui2%F+$\"1 x)4lO4*pLF+7$$\"1++voMrU^F+$\"1x$=!*4Y:f$F+7$$\"1nmm\"z_\"4iF+$\"1Ar6b l#)zPF+7$$\"1nmmm6m#G(F+$\"1#)4Gc-+HRF+7$$\"1ommT&phN)F+$\"1S3+kDCKSF+ 7$$\"1M$3-js.*))F+$\"1E'Gx!eBlSF+7$$\"1,+v=ddC%*F+$\"14%F+7$$\"1LLe*=)H\\5Fgz$\"1aSO5Tb(3%F+7$$\"1++v =JN[6Fgz$\"1ZbSErXVSF+7$$\"1nm\"z/3uC\"Fgz$\"1#>n&HcecRF+7$$\"1LLe*ot* \\8Fgz$\"1taZAI`CQF+7$$\"1++DJ$RDX\"Fgz$\"1gQApi/aOF+7$$\"1LLekGhe:Fgz $\"1#RwbATKW$F+7$$\"1nm\"zR'ok;Fgz$\"1Qm8dzR/KF+7$$\"1LL3_(>/x\"Fgz$\" 1gz&43Ig%HF+7$$\"1++D1J:w=Fgz$\"1sW1#>]^n#F+7$$\"1n;HdG\"\\)>Fgz$\"1#* )=.ms8R#F+7$$\"1MLL3En$4#Fgz$\"1SfM1H')4@F+7$$\"1,+Dc#o%*=#Fgz$\"1t!3O >*3p=F+7$$\"1nm;/RE&G#Fgz$\"1v-H65/R;F+7$$\"1MLe9r5$R#Fgz$\"1sB,rWm'R \"F+7$$\"1+++D.&4]#Fgz$\"1!)4tB:*[<\"F+7$$\"1+++]jB4EFgz$\"1C.LB&)3\\( *F[]l7$$\"1+++vB_ F[]l7$$\"1MLLLY.KNFgz$\"1I)3)yCZt6F[]l7$$\"1++D\"o7Tv$Fgz$\"1=Yx%QJP7' F[^l7$$\"1LLL$Q*o]RFgz$\"1uS\"RXv**G$F[^l7$$\"1,+D\"=lj;%Fgz$\"1ISZU&> Se\"F[^l7$$\"1++vV&RY2aFgz$ \"1\"*=8i=ar')!#@7$$\"1nm;zXu9cFgz$\"1$!#A7$$\"1,+D\"y%3TiFgz$ \"1k7WJ%fl+\"Ff^m7$$\"1++]P![hY'Fgz$\"1?!e.8`'[E!#B7$$\"1LLL$Qx$omFgz$ \"1cdV;Ub2w!#C7$$\"1+++v.I%)oFgz$\"1.Ic1g45>Fg_m7$$\"1mm\"zpe*zqFgz$\" 1GU_5Xx@_Fa_l7$$\"1,++D\\'QH(Fgz$\"1.)37Xe\\?\"Fa_l7$$\"1LLe9S8&\\(Fgz $\"1y()H1)p\\*G!#E7$$\"1,+D1#=bq(Fgz$\"1:BHB1%[@'!#F7$$\"1LLL3s?6zFgz$ \"1Vri/D&oJ\"Fbam7$$\"1++DJXaE\")Fgz$\"1ksQ7uGnC!#G7$$\"1ommm*RRL)Fgz$ \"12Yd!4jTo%!#H7$$\"1om;a<.Y&)Fgz$\"1%\\3E/GE:)!#I7$$\"1NLe9tOc()Fgz$ \"1g+y^*z/P\"Fibm7$$\"1,++]Qk\\*)Fgz$\"1u\"z'**))o\\D!#J7$$\"1NL$3dg6< *Fgz$\"1RP:JB%f_$!#K7$$\"1ommmxGp$*Fgz$\"1QV!R,r#Qd!#L7$$\"1++D\"oK0e* Fgz$\"1t1TIIf$*y!#M7$$\"1,+v=5s#y*Fgz$\"17$3^ZJ(G6Ffdm7$F]_l$\"1$o( *=F8!#N-Fc_l6&Fe_lF(Ff_lF(-%+AXESLABELSG6$%\"xG%!G-%%VIEWG6$;F(F]_l%(D EFAULTG" 2 383 383 383 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0 0 0 0 0 1 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "plot(expr1, x=0..10);" }}{PARA 13 " " 1 "" {INLPLOT "6%-%'CURVESG6$7^o7$\"\"!$\"1'f&=H[-_B!#;7$$\"1LLL3x&) *3\"F+$\"1-*z*=&4lj#F+7$$\"1nmm;arz@F+$\"1Q,lu>w;HF+7$$\"1++D\"y%*z7$F +$\"1Ry!4G<3:$F+7$$\"1LL$e9ui2%F+$\"1x)4lO4*pLF+7$$\"1++voMrU^F+$\"1x$ =!*4Y:f$F+7$$\"1nmm\"z_\"4iF+$\"1Ar6bl#)zPF+7$$\"1nmmm6m#G(F+$\"1#)4Gc -+HRF+7$$\"1ommT&phN)F+$\"1S3+kDCKSF+7$$\"1M$3-js.*))F+$\"1E'Gx!eBlSF+ 7$$\"1,+v=ddC%*F+$\"14%F+7$$\"1 LLe*=)H\\5Feo$\"1aSO5Tb(3%F+7$$\"1++v=JN[6Feo$\"1ZbSErXVSF+7$$\"1nm\"z /3uC\"Feo$\"1#>n&HcecRF+7$$\"1LLe*ot*\\8Feo$\"1taZAI`CQF+7$$\"1++DJ$RD X\"Feo$\"1gQApi/aOF+7$$\"1LLekGhe:Feo$\"1#RwbATKW$F+7$$\"1nm\"zR'ok;Fe o$\"1Qm8dzR/KF+7$$\"1LL3_(>/x\"Feo$\"1gz&43Ig%HF+7$$\"1++D1J:w=Feo$\"1 sW1#>]^n#F+7$$\"1n;HdG\"\\)>Feo$\"1#*)=.ms8R#F+7$$\"1MLL3En$4#Feo$\"1S fM1H')4@F+7$$\"1,+Dc#o%*=#Feo$\"1t!3O>*3p=F+7$$\"1nm;/RE&G#Feo$\"1v-H6 5/R;F+7$$\"1MLe9r5$R#Feo$\"1sB,rWm'R\"F+7$$\"1+++D.&4]#Feo$\"1!)4tB:*[ <\"F+7$$\"1+++]jB4EFeo$\"1C.LB&)3\\(*!#<7$$\"1+++vB_Fht7$$\"1MLLLY.KNFeo$\"1I)3)yCZt6Fht7$ $\"1++D\"o7Tv$Feo$\"1=Yx%QJP7'!#=7$$\"1LLL$Q*o]RFeo$\"1uS\"RXv**G$Fgv7 $$\"1,+D\"=lj;%Feo$\"1ISZU&>Se\"Fgv7$$\"1++vV&R7$$\"1ML$e9Ege%Feo$\"1GK(esAdH$Fgw7$$\"1MLeR\"3Gy%Feo$\"1)ofqB0fZ\"Fg w7$$\"1nm;/T1&*\\Feo$\"1x]L&edM\"f!#?7$$\"1nm\"zRQb@&Feo$\"1a8C/\"\\\" p@Fgx7$$\"1++v=>Y2aFeo$\"1\"*=8i=ar')!#@7$$\"1nm;zXu9cFeo$\"1$!# A7$$\"1,+D\"y%3TiFeo$\"1k7WJ%fl+\"Fbz7$$\"1++]P![hY'Feo$\"1?!e.8`'[E!# B7$$\"1LLL$Qx$omFeo$\"1cdV;Ub2w!#C7$$\"1+++v.I%)oFeo$\"1.Ic1g45>Fc[l7$ $\"1mm\"zpe*zqFeo$\"1GU_5Xx@_!#D7$$\"1,++D\\'QH(Feo$\"1.)37Xe\\?\"F^\\ l7$$\"1LLe9S8&\\(Feo$\"1y()H1)p\\*G!#E7$$\"1,+D1#=bq(Feo$\"1:BHB1%[@'! #F7$$\"1LLL3s?6zFeo$\"1Vri/D&oJ\"F_]l7$$\"1++DJXaE\")Feo$\"1ksQ7uGnC!# G7$$\"1ommm*RRL)Feo$\"12Yd!4jTo%!#H7$$\"1om;a<.Y&)Feo$\"1%\\3E/GE:)!#I 7$$\"1NLe9tOc()Feo$\"1g+y^*z/P\"Ff^l7$$\"1,++]Qk\\*)Feo$\"1u\"z'**))o \\D!#J7$$\"1NL$3dg6<*Feo$\"1RP:JB%f_$!#K7$$\"1ommmxGp$*Feo$\"1QV!R,r#Q d!#L7$$\"1++D\"oK0e*Feo$\"1t1TIIf$*y!#M7$$\"1,+v=5s#y*Feo$\"17$3^ZJ(G6 Fc`l7$$\"#5F($\"1$o(*=F8!#N-%'COLOURG6&%$RGBG$F[al!\"\"F(F(-%+AXESL ABELSG6$%\"xG%!G-%%VIEWG6$;F(Fj`l%(DEFAULTG" 2 385 385 385 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 2 20 0 0 0 0 0 1 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "numcomb(10,1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%(numcombG6$\"# 5\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "eval(numcomb(10, 1));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%(numcombG6$\"#5\"\"\"" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "with(combinat, numbcomb);" } }{PARA 11 "" 1 "" {XPPMATH 20 "6#7#%)numbcombG" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 15 "numbcomb(10,1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "numbcomb(3,2) ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"$" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 16 "binomial(10, 3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #\"$?\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "binomial(10,2); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"#X" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "for x from 0 to 7do " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "lprint(x, expr2);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 6 "" 1 "" {TEXT -1 130 "0 \+ .3486784401\n1 .3874204890\n2 .1937102445\n3 .573956280e-1\n4 \+ .111602610e-1\n5 .14880348e-2\n6 .1377810e-3\n7 .87480e-5" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "y:=0;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "for x from 0 to 7 do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "lprint(x, expr2, 1-y);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "y:= y+expr2;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"yG\"\"!" }} {PARA 6 "" 1 "" {TEXT -1 19 "0 .3486784401 1" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"yG$\"+,Wy'[$!#5" }}{PARA 6 "" 1 "" {TEXT -1 29 "1 \+ .3874204890 .6513215599" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"yG$ \"+\"H*)4O(!#5" }}{PARA 6 "" 1 "" {TEXT -1 29 "2 .1937102445 .2639 010709" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"yG$\"+O<4)H*!#5" }} {PARA 6 "" 1 "" {TEXT -1 33 "3 .573956280e-1 .701908264e-1" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"yG$\"+;![?()*!#5" }}{PARA 6 "" 1 " " {TEXT -1 33 "4 .111602610e-1 .127951984e-1" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"yG$\"+E1l$)**!#5" }}{PARA 6 "" 1 "" {TEXT -1 31 "5 \+ .14880348e-2 .16349374e-2" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"y G$\"+u4`)***!#5" }}{PARA 6 "" 1 "" {TEXT -1 29 "6 .1377810e-3 .146 9026e-3" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"yG$\"+%y3*****!#5" }} {PARA 6 "" 1 "" {TEXT -1 25 "7 .87480e-5 .91216e-5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"yG$\"+ki******!#5" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 14 "bpdf:= proc(x)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "binomial(10,x)*0.1^x*0.9^(10-x);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%bpdfG:6#%\"xG6\"F(F(*( -%)binomialG6$\"#59$\"\"\")$F/!\"\"F.F/)$\"\"*F2,&F-F/F.F2F/F(F(" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "bpdf(0);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+,Wy'[$!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "accbd:= proc(x)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "local y, i ; y:= 0; " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "for i from 0 to x-1 do " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "y:= y+bpdf(i);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "1-y;" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%&accbdG:6#%\"xG6$%\"yG%\"iG6\"F+C%>8$\"\"!?(8%F/\"\"\",&9$F2! \"\"F2%%trueG>F.,&F.F2-%%bpdfG6#F1F2,&F2F2F.F5F+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "accbd(0);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "accbd(1);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+*f:K^'!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "accbd(0);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+ ,Wy'[$!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "for i from 0 t o 7 do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "printf(`%f %8.6f %8.6f \\n`, i, bpdf(i), accbd(i));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od; " }}{PARA 6 "" 1 "" {TEXT -1 175 "0 .348678 1.000000\n1 .387420 \+ .651321\n2 .193710 .263901\n3 .057395 .070190\n4 .011160 \+ .012795\n5 .001488 .001634\n6 .000137 .000146\n7 .000008 . 000009" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "npdf := proc(x)1/ sqrt(2*Pi)*exp(-x*x/2);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%%npdfG:6#%\"xG6\"F(F(*&-%%sqrtG6#,$% #PiG\"\"#!\"\"-%$expG6#,$*$9$F/#F0F/\"\"\"F(F(" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 27 "printf(`%8.6f`, npdf(0.0));" }}{PARA 8 "" 1 " " {TEXT -1 55 "Error, (in fprintf) number expected for floating format " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "npdf := proc(z)" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "1/sqrt(2*3.1416)*exp(-z*z/2);" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%npdfG:6#%\"zG6\"F(F(*&-%%sqrtG6#$\"&KG'!\"%!\"\"-%$expG6#,$*$ 9$\"\"##F0F7\"\"\"F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "p rintf(`%8.6f`, npdf(0.0));" }}{PARA 6 "" 1 "" {TEXT -1 8 " .398941" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "npdf(0);" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#$\"+S\"=%*)R!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "npdf(0.25);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+[m nmQ!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "int((1/sqrt(2*3.1 416))*exp(-z*z/2), z=0..0.25);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+ F5iq)*!#6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "for z from 0 t o 4 by 0.25 do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "printf(`%04.2f \+ %08.6f %08.6f\\n`, z, " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "npdf(z) , int((1/sqrt(2*3.1416))*exp(-w*w/2), w=0..z));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 6 "" 1 "" {TEXT -1 458 "0.00 0.398941 \+ 0.000000\n0.25 0.386667 0.098706\n0.50 0.352064 0.191462\n0.7 5 0.301137 0.273372\n1.00 0.241970 0.341344\n1.25 0.182648 \+ 0.394349\n1.50 0.129517 0.433192\n1.75 0.086277 0.459940\n2.0 0 0.053990 0.477249\n2.25 0.031739 0.487774\n2.50 0.017528 \+ 0.493789\n2.75 0.009093 0.497019\n3.00 0.004431 0.498649\n3.2 5 0.002029 0.499422\n3.50 0.000872 0.499766\n3.75 0.000352 \+ 0.499910\n4.00 0.000133 0.499967" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "bpdfa := proc(x)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "binomial(10,x)*0.5^x*0.5^(10-x);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&bpdfaG:6#%\"xG6\"F(F(* (-%)binomialG6$\"#59$\"\"\")$\"\"&!\"\"F.F/)F1,&F-F/F.F3F/F(F(" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "accbda:= proc(x)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "local y, i; y:= 0; " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "for i from 0 to x-1 do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "y:= y+bpdfa(i);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "1-y;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%'accbdaG:6#%\"xG6$%\" yG%\"iG6\"F+C%>8$\"\"!?(8%F/\"\"\",&9$F2!\"\"F2%%trueG>F.,&F.F2-%&bpdf aG6#F1F2,&F2F2F.F5F+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "f or i from 0 to 10 do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 56 "printf(`%2d %08.6f %08.6f\\n`, i, bpdfa(i), accbda(i));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 6 "" 1 "" {TEXT -1 252 " 0 0.000976 1.0 00000\n 1 0.009765 0.999023\n 2 0.043945 0.989257\n 3 0.117187 0 .945312\n 4 0.205078 0.828125\n 5 0.246093 0.623046\n 6 0.205078 \+ 0.376953\n 7 0.117187 0.171875\n 8 0.043945 0.054687\n 9 0.00976 5 0.010742\n10 0.000976 0.000976" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "for i from 0 to 10 do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 56 "printf(`%2d %08.6f %08.6f\\n`, i, bpdfa(i), accbda(i));" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 6 "" 1 "" {TEXT -1 252 " 0 0.000976 1.000000\n 1 0.0 09765 0.999023\n 2 0.043945 0.989257\n 3 0.117187 0.945312\n 4 0 .205078 0.828125\n 5 0.246093 0.623046\n 6 0.205078 0.376953\n 7 \+ 0.117187 0.171875\n 8 0.043945 0.054687\n 9 0.009765 0.010742\n1 0 0.000976 0.000976" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "bm f := proc (e, m)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "sum(e^k/k!, k=0 ..m);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$bmfG:6$%\"eG%\"mG6\"F)F)-%$sumG6$*&)9$%\"kG\"\"\"-%* factorialG6#F0!\"\"/F0;\"\"!9%F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "B := proc (e,m)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "e^m/(m!*bmf(e,m));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"BG:6$%\"eG%\"mG6\"F)F)*()9$9%\"\" \"-%*factorialG6#F-!\"\"-%$bmfG6$F,F-F2F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "U := proc(e,m)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "e*(1- B(e,m))/m;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"UG:6$%\"eG%\"mG6\"F)F)*(9$\"\"\",& F,F,-%\"BG6$F+9%!\"\"F,F1F2F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 148 "B(12.5, 21);printf(`%8.6f, %8.6f\\n`,U(9,10), U(90,100));\npr intf(`%8.6f, %8.6f\\n`,B(9,10), B(90,100));\nbmf(0.5, 1); 1/bmf(0.5,1) ;U(0.5, 1); B(0.5,1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+3@Q$)z!#7 " }}{PARA 6 "" 1 "" {TEXT -1 37 " .748833, .875738\n .167963, .02695 7" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+++++:!\"*" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#$\"+nmmmm!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+M LLLL!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+LLLLL!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "0.5*(1-B(0.5,2))/2;U(0.5,2);B(2,1); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+3Bp2B!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+3Bp2B!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\"\"# \"\"$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "B(2,2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\"\"#\"\"&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "B(2,3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\"\"%\"#> " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "B(0.5, 0);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+++++5!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "B(0.5,1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+LLLLL !#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "B(0.5, 2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+#p2Bp(!#6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "B(0.5, 3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+&yA eE\"!#6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "printf(`%12.10f` , 1/79);" }}{PARA 6 "" 1 "" {TEXT -1 12 " .0126582278" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "plot(\{B(e, 1), B(e, 2), B(e, 5), B (e, 10)\}, e=0.5..10);" }}{PARA 13 "" 1 "" {INLPLOT "6(-%'CURVESG6$7S7 $$\"1+++++++]!#;$\"1c#p>ihAj\"!#D7$$\"1ML$ekH22(F*$\"1y2(=LaUC%!#C7$$ \"1n;aQ/Ys))F*$\"1eGL!=a/V$!#B7$$\"1L$3_^p)*3\"!#:$\"1$frAOx5>#!#A7$$ \"1L$ek5OQH\"F=$\"1&3:<1#*R$**F@7$$\"1nT5!GLo\\\"F=$\"1`Q!=&=h#[$!#@7$ $\"1L3_Xw.&o\"F=$\"1a5H(3C/V*FK7$$\"1+vokB\"*z=F=$\"1#R[-b_$=B!#?7$$\" 1L3-y?X\"3#F=$\"1/zRG!)QZ_FV7$$\"1+v$4XXBG#F=$\"1yrqw2ey5!#>7$$\"1nm\" z(*))*)[#F=$\"1mXgUg2(3#F[o7$$\"1L$e*32+rEF=$\"1astM1!R_$F[o7$$\"1++v3 G!f(GF=$\"1'4P(zt$G,'F[o7$$\"1++Dcik\"3$F=$\"1mNy)y/(p(*F[o7$$\"1++D\" >=*zKF=$\"1J3f=`8&\\\"!#=7$$\"1L3-.\"o*fMF=$\"1$yxS&plJ@Fep7$$\"1nm\"H '[1uOF=$\"1Si*[nH&QJFep7$$\"1nmm,HVbQF=$\"12HwH9UTUFep7$$\"1+v=ZqSmSF= $\"1*)z\"p3[w&eFep7$$\"1mm;9\\:`UF=$\"1Z;@MItBwFep7$$\"1+v=Ap/eWF=$\"1 _%3#f'z3'**Fep7$$\"1+DcmD:`YF=$\"1d7)fS.0E\"!#<7$$\"1n;aQ[sc[F=$\"1u%4 ()>>De\"Fir7$$\"1nTgKxmV]F=$\"1&[JrLl8#>Fir7$$\"1L$e*)*3JX_F=$\"1GeO5l BMBFir7$$\"1L3-y9waaF=$\"1OSc:GFir7$$\"1*\\7G#))3PcF=$\"1(pCo)))zxK Fir7$$\"1L$3-N2S$eF=$\"1)Rna#RL@QFir7$$\"1****\\dMWPgF=$\"1)[F&H'='HWF ir7$$\"1+]P**fYOiF=$\"1A\"Hur1'o]Fir7$$\"1*\\(=U0.HkF=$\"1hw%4)3%es&Fi r7$$\"1**\\iN1%Gk'F=$\"1%3xN1vt\\'Fir7$$\"1mm;9&e\\$oF=$\"1lsGUL7DsFir 7$$\"1++Dc`3SqF=$\"1?r0,%*zM!)Fir7$$\"1L3-j2'fA(F=$\"1!)**\\)pWYz)Fir7 $$\"1++vy;Gbk!o\"F*7$$\"1m;HUDg7#*F=$\"1kWm%z)HzX6'>F*7$$\"1+D\"y'\\e$z*F=$\" 1$e**p=Q/0#F*7$$\"#5\"\"!$\"1tM2JM#e9#F*-%'COLOURG6&%$RGBG$F^[l!\"\"F_ [lF_[l-F$6$7S7$F($\"1?&o-IH&z:F[o7$F/$\"1Ams[qyisF[o7$F5$\"1UBHMeM()=F ep7$F;$\"1*pGm)z)GJ%Fep7$FB$\"1;_1tAT.$)Fep7$FG$\"1(yOo\\&z29Fir7$FM$ \"1mc!f())\\:@Fir7$FR$\"1.f0@G+CIFir7$FX$\"1(\\DqGw(p\"F*7$Faq$\"1^hR&Q[5'=F*7$Ffq$\"1Oam=K$*\\?F*7$F [r$\"1[d%=%eJ:AF*7$F`r$\"1n#4K_HSR#F*7$Fer$\"14VB1/(4c#F*7$F[s$\"1Jq$) 3CKJFF*7$F`s$\"1sDU&o6S)GF*7$Fes$\"1l&Q5GfW/$F*7$Fjs$\"1\\&Rq&)*G1KF*7 $F_t$\"1&QJ*[T3VLF*7$Fdt$\"1\"y\">wY`'[$F*7$Fit$\"1;&3*>&o+j$F*7$F^u$ \"1c+l%=]fw$F*7$Fcu$\"19&)3A6A$*QF*7$Fhu$\"1q@A=zzHSF*7$F]v$\"1s)zi^v$ [TF*7$Fbv$\"1h_mT+yqUF*7$Fgv$\"1y3\"QOi!yVF*7$F\\w$\"1i]*yuE:\\%F*7$Fa w$\"15GhNVw%f%F*7$Ffw$\"1F!od)o:*p%F*7$F[x$\"1pVbz\"oyz%F*7$F`x$\"1mX \"4M&z(*[F*7$Fex$\"1'*RdrN'3*\\F*7$Fjx$\"1?])*\\q%H3&F*7$F_y$\"14B_7KI r^F*7$Fdy$\"18G7)y#**\\_F*7$Fiy$\"1/&\\%GGNP`F*7$F^z$\"1L'*=\"eJIT&F*7 $Fcz$\"1/Iku#p7\\&F*7$Fhz$\"16TLfk(Qc&F*7$F][l$\"1FSbo<_RcF*-Fc[l6&Fe[ lF_[lFf[lF_[l-F$6$7U7$F($\"1LLLLLLLLF*7$$\"1nm\"H#[ONgF*$\"1&eRt\"RyjP F*7$F/$\"1L`>\"e>?9%F*7$$\"1+v=U]frzF*$\"1*=dbijcV%F*7$F5$\"1jK&4$QF,Z F*7$F;$\"1gO0kA,:_F*7$FB$\"1!Q;(H1\\ScF*7$FG$\"1DK.Ao#\\*fF*7$FM$\"1o6 '>VdcF'F*7$FR$\"1\\Gc=@nFlF*7$FX$\"1eZUEnxanF*7$Fgn$\"1y%fc1)R`pF*7$F] o$\"1*=)*f=SQ8(F*7$Fbo$\"14OjMr%fF(F*7$Fgo$\"1%4k[%f&*>uF*7$F\\p$\"1\\ oGl\"3+b(F*7$Fap$\"19RoTn]jwF*7$Fgp$\"1Yh6)\\Jyv(F*7$F\\q$\"1dB.6Y`gyF *7$Faq$\"1_G@29XSzF*7$Ffq$\"1lqN^Y@E!)F*7$F[r$\"1:)*)F*7$Fdy$\"1nC.>h@+!* F*7$Fiy$\"1B4Plw\"3-*F*7$F^z$\"1B/Rew`Q!*F*7$Fcz$\"1(32AzPn0*F*7$Fhz$ \"1BUehP_t!*F*7$F][l$\"1\"4444444*F*-Fc[l6&Fe[lFf[lFf[lF_[l-F$6$7S7$F( $\"1$p2Bp2Bp(Fir7$F/$\"1\"HH\"38Jx7F*7$F5$\"1d4%H\\&oDd-QF*7$FX$\"1aaPp_'z7%F*7$Fgn$\"1k30#y=VU%F*7$F]o$\"1T\")RZc$Gq% F*7$Fbo$\"1w:ZHACG\\F*7$Fgo$\"1_HAY?'>;&F*7$F\\p$\"1&GiO<\"[x`F*7$Fap$ \"1tyw#H:*obF*7$Fgp$\"1W.hoPJIdF*7$F\\q$\"1^%)R;lN3fF*7$Faq$\"1'G3'oX^ [gF*7$Ffq$\"10,?OJX+iF*7$F[r$\"1%*=@XX!fK'F*7$F`r$\"1$GUoS%pakF*7$Fer$ \"1K=bbZ\\plF*7$F[s$\"1rXaFv&=o'F*7$F`s$\"1C^R7p$*ynF*7$Fes$\"1?&)o@' \\w(oF*7$Fjs$\"1C&*f#fPT(pF*7$F_t$\"1\"\\B))o=N0(F*7$Fdt$\"1NeeXx![8(F *7$Fit$\"1IVV3kI9sF*7$F^u$\"1.(eps3!)G(F*7$Fcu$\"1q$\\cmpdN(F*7$Fhu$\" 1wu(Rh;sU(F*7$F]v$\"1-kHd\\D)[(F*7$Fbv$\"1N7p[\"f.b(F*7$Fgv$\"1z\\$p&3 3/wF*7$F\\w$\"1U3bh'=-m(F*7$Faw$\"1r0\\(oA2r(F*7$Ffw$\"1f\"*4N`EhxF*7$ F[x$\"1>jl[]f3yF*7$F`x$\"1M*\\+ssg&yF*7$Fex$\"1*4Nuc;***yF*7$Fjx$\"1] \"y4'p&H%zF*7$F_y$\"1V*e([;&R)zF*7$Fdy$\"1\"ejpY@--)F*7$Fiy$\"1x%39xL- 1)F*7$F^z$\"1@eP1#)o%4)F*7$Fcz$\"1H(*3'y7,8)F*7$Fhz$\"1vtKLr\"G;)F*7$F ][l$\"15aZ68s'>)F*-Fc[l6&Fe[lF_[lF_[lFf[l-%+AXESLABELSG6$%\"eG%!G-%%VI EWG6$;$\"\"&Fg[lF][l%(DEFAULTG" 2 384 384 384 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 10030 10061 10056 10074 0 0 0 20030 0 12020 0 0 0 0 0 0 0 1 1 0 0 0 25460 104 0 0 0 0 0 1 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 138 "printf(`Erlang-B Loss\\n`); \nprintf(` erl m=1 m=2 m=3 m=4 m=5 m=6 m=7 m=8 m=9 m=10\\n`);\nfo r e from 0.5 to 10.0 by 0.5 do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 128 " printf(`%4.1f %5.3f %5.3f %5.3f %5.3f %5.3f %5.3f %5.3f %5.3f %5.3f %5 .3f\\n`, e,\n B(e,1), B(e,2), B(e,3), B(e,4), B(e,5), " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 48 " B(e,6), B(e,7), B(e,8), B(e,9), B( e,10));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 6 "" 1 "" {TEXT -1 1378 "Erlang-B Loss\n erl m=1 m=2 m=3 m=4 m=5 m=6 m=7 m=8 m=9 m=10\n .5 .3 33 .076 .012 .001 .000 .000 .000 .000 .000 .000\n 1.0 .500 \+ .200 .062 .015 .003 .000 .000 .000 .000 .000\n 1.5 .600 .310 .134 .047 .014 .003 .000 .000 .000 .000\n 2.0 .666 .400 .2 10 .095 .036 .012 .003 .000 .000 .000\n 2.5 .714 .471 .282 \+ .149 .069 .028 .009 .003 .000 .000\n 3.0 .750 .529 .346 .206 .110 .052 .021 .008 .002 .000\n 3.5 .777 .576 .402 .260 .1 54 .082 .039 .017 .006 .002\n 4.0 .800 .615 .450 .310 .199 \+ .117 .062 .030 .013 .005\n 4.5 .818 .648 .492 .356 .243 .154 .090 .048 .023 .010\n 5.0 .833 .675 .529 .398 .284 .191 .1 20 .070 .037 .018\n 5.5 .846 .699 .561 .435 .324 .229 .152 \+ .094 .054 .029\n 6.0 .857 .720 .590 .469 .360 .264 .185 .121 .075 .043\n 6.5 .866 .737 .615 .499 .393 .299 .217 .150 .0 97 .059\n 7.0 .875 .753 .637 .527 .424 .331 .248 .178 .122 \+ .078\n 7.5 .882 .767 .657 .552 .453 .361 .279 .207 .147 .099 \n 8.0 .888 .780 .675 .574 .479 .389 .308 .235 .173 .121\n 8 .5 .894 .791 .691 .595 .502 .416 .335 .262 .198 .144\n 9.0 \+ .900 .801 .706 .613 .524 .440 .361 .289 .224 .167\n 9.5 .904 .811 .719 .630 .545 .463 .386 .314 .249 .191\n10.0 .909 .8 19 .732 .646 .563 .484 .409 .338 .273 .214" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 106 "printf(` erl m=10 m=20 m=30 m=40 m=50 m=60 m=70 m=80 m=90 m=100\\n`);\nfor e from 5 to 100 by 5 do" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 131 "printf(`%4d %5.3f %5.3f %5.3f %5.3 f %5.3f %5.3f %5.3f %5.3f %5.3f %5.3f\\n`, e,\n B(e,10), B(e,20) , B(e,30), B(e,40), B(e,50), " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 53 " \+ B(e,60), B(e,70), B(e,80), B(e,90), B(e,100));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 6 "" 1 "" {TEXT -1 1365 " erl m=10 m =20 m=30 m=40 m=50 m=60 m=70 m=80 m=90 m=100\n 5 .018 .000 .000 .000 .000 .000 .000 .000 .000 .000\n 10 .214 .001 .0 00 .000 .000 .000 .000 .000 .000 .000\n 15 .410 .045 .000 \+ .000 .000 .000 .000 .000 .000 .000\n 20 .537 .158 .008 .000 .000 .000 .000 .000 .000 .000\n 25 .622 .279 .052 .001 .0 00 .000 .000 .000 .000 .000\n 30 .681 .380 .132 .014 .000 \+ .000 .000 .000 .000 .000\n 35 .724 .458 .219 .054 .003 .000 .000 .000 .000 .000\n 40 .757 .521 .299 .116 .018 .000 .0 00 .000 .000 .000\n 45 .783 .571 .367 .184 .054 .005 .000 \+ .000 .000 .000\n 50 .804 .612 .424 .249 .104 .021 .001 .000 .000 .000\n 55 .822 .645 .473 .308 .160 .053 .007 .000 .0 00 .000\n 60 .836 .674 .514 .360 .216 .096 .023 .002 .000 \+ .000\n 65 .848 .698 .550 .405 .267 .143 .052 .009 .000 .000 \n 70 .859 .719 .581 .445 .313 .191 .089 .025 .003 .000\n \+ 75 .868 .737 .608 .480 .355 .236 .130 .051 .010 .000\n 80 \+ .876 .753 .632 .511 .393 .278 .172 .084 .026 .003\n 85 .883 .768 .653 .539 .426 .317 .213 .120 .049 .011\n 90 .890 .7 80 .671 .563 .457 .352 .251 .158 .079 .026\n 95 .895 .792 \+ .688 .586 .484 .384 .286 .194 .112 .048\n 100 .901 .802 .704 .606 .509 .413 .319 .229 .146 .075" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 141 "printf(`Line Utilization\\n`); \nprintf(` erl m=1 m=2 m=3 m=4 m=5 m=6 m=7 m=8 m=9 m=10\\n`);\nfor e f rom 0.5 to 10.0 by 0.5 do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 128 "print f(`%4.1f %5.3f %5.3f %5.3f %5.3f %5.3f %5.3f %5.3f %5.3f %5.3f %5.3f\\ n`, e,\n U(e,1), U(e,2), U(e,3), U(e,4), U(e,5), " }}{PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 48 " U(e,6), U(e,7), U(e,8), U(e,9), U(e,10) );" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 6 "" 1 "" {TEXT -1 1381 "Line Utilization\n erl m=1 m=2 m=3 m=4 m=5 m=6 m =7 m=8 m=9 m=10\n .5 .333 .230 .164 .124 .099 .083 .071 \+ .062 .055 .049\n 1.0 .500 .400 .312 .246 .199 .166 .142 .12 4 .111 .099\n 1.5 .600 .517 .432 .357 .295 .249 .214 .187 . 166 .149\n 2.0 .666 .600 .526 .452 .385 .329 .284 .249 .222 \+ .199\n 2.5 .714 .660 .598 .531 .465 .404 .353 .311 .277 .24 9\n 3.0 .750 .705 .653 .595 .533 .473 .419 .371 .332 .299\n \+ 3.5 .777 .741 .697 .647 .592 .535 .480 .430 .386 .349\n 4.0 \+ .800 .769 .732 .689 .640 .588 .535 .484 .438 .397\n 4.5 .81 8 .792 .760 .723 .681 .634 .584 .535 .488 .445\n 5.0 .833 . 810 .783 .752 .715 .673 .628 .581 .534 .490\n 5.5 .846 .826 \+ .803 .775 .743 .706 .665 .622 .577 .533\n 6.0 .857 .840 .81 9 .795 .767 .735 .698 .658 .616 .574\n 6.5 .866 .851 .833 . 812 .787 .759 .726 .690 .651 .611\n 7.0 .875 .861 .845 .827 \+ .805 .780 .751 .718 .682 .644\n 7.5 .882 .870 .856 .839 .82 0 .798 .772 .743 .710 .675\n 8.0 .888 .878 .865 .850 .833 . 813 .790 .764 .734 .702\n 8.5 .894 .884 .873 .860 .845 .827 \+ .806 .783 .756 .727\n 9.0 .900 .891 .880 .868 .855 .839 .82 0 .799 .775 .748\n 9.5 .904 .896 .887 .876 .864 .849 .833 . 814 .792 .768\n10.0 .909 .901 .893 .883 .872 .859 .844 .827 \+ .807 .785" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 106 "printf(` er l m=10 m=20 m=30 m=40 m=50 m=60 m=70 m=80 m=90 m=100\\n`);\n for e from 5 to 100 by 5 do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 131 "pri ntf(`%4d %5.3f %5.3f %5.3f %5.3f %5.3f %5.3f %5.3f %5.3f %5.3f %5.3f\\ n`, e,\n U(e,10), U(e,20), U(e,30), U(e,40), U(e,50), " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 53 " U(e,60), U(e,70), U(e,80), U(e,90) , U(e,100));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 6 "" 1 "" {TEXT -1 1365 " erl m=10 m=20 m=30 m=40 m=50 m=60 m=70 m=80 m=90 m=100\n 5 .490 .249 .166 .125 .100 .083 .071 .062 . 055 .050\n 10 .785 .499 .333 .250 .200 .166 .142 .125 .111 \+ .100\n 15 .884 .715 .499 .374 .300 .250 .214 .187 .166 .15 0\n 20 .924 .841 .661 .499 .399 .333 .285 .250 .222 .200\n \+ 25 .944 .900 .789 .624 .499 .416 .357 .312 .277 .250\n 30 \+ .955 .929 .867 .739 .599 .499 .428 .375 .333 .300\n 35 .96 3 .946 .910 .827 .697 .583 .499 .437 .388 .350\n 40 .969 . 957 .934 .883 .785 .666 .571 .499 .444 .400\n 45 .973 .964 \+ .948 .917 .851 .745 .642 .562 .499 .450\n 50 .976 .969 .95 8 .937 .895 .815 .713 .624 .555 .499\n 55 .978 .973 .965 . 950 .922 .867 .779 .687 .611 .549\n 60 .980 .976 .970 .959 \+ .940 .903 .836 .748 .666 .599\n 65 .982 .979 .973 .966 .95 2 .927 .880 .805 .721 .649\n 70 .983 .981 .976 .970 .960 . 943 .910 .852 .775 .699\n 75 .985 .982 .979 .974 .966 .953 \+ .931 .889 .824 .749\n 80 .986 .984 .981 .977 .971 .961 .94 5 .915 .865 .796\n 85 .987 .985 .982 .979 .974 .967 .955 . 934 .897 .839\n 90 .987 .986 .984 .981 .977 .971 .962 .947 \+ .920 .875\n 95 .988 .987 .985 .982 .979 .974 .967 .956 .93 6 .903\n 100 .989 .987 .986 .984 .981 .977 .971 .963 .948 . 924" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "pmmmq0 := proc(u, m, q)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "local s, t, k;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "s:=0;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "fo r k from 0 to m do " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 " s:=s+u^k /k!;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "t:=0;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "for k from 1 to q do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 " t:=t+u^k/m^k;" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "t:=t*u^m/m!;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "s:=s+t;" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "1/s;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%'pmmmq0G:6%%\"uG%\"mG %\"qG6%%\"sG%\"tG%\"kG6\"F.C)>8$\"\"!?(8&F2\"\"\"9%%%trueG>F1,&F1F5*&) 9$F4F5-%*factorialG6#F4!\"\"F5>8%F2?(F4F5F59&F7>FB,&FBF5*&F;F5)F6F4F@F 5>FB*(FBF5)F6#F6F@>F1,&F1F5FBF5*$F1F@F.F." }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 16 "pmmmq0(1, 2, 2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\"\")\"#B" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "printf(`%10.8f\\n`, 8/23);" }}{PARA 6 "" 1 "" {TEXT -1 10 " .34782 608" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "pmmmqk := proc(u, m, q, k)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "(u^m/m!)*(u^k*pmmmq0(u, m , q)/m^k);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'pmmmqkG:6&%\"uG%\"mG%\"qG%\"kG6\"F+F+*,)9$9%\"\" \"-%*factorialG6#F/!\"\")F.9'F0-%'pmmmq0G6%F.F/9&F0)F/F6F4F+F+" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "pwmmmq:=proc(u,m,q)" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "sum(pmmmqk(u,m,q,k), k=0..q-1);" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'pwmmmqG:6%%\"uG%\"mG%\"qG6\"F*F*-%$sumG6$-%'pmmmqkG6&9$9%9&% \"kG/F4;\"\"!,&F3\"\"\"!\"\"F9F*F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "printf(`%8.4f`, pmmmqk(1,2,2,2));" }}{PARA 6 "" 1 "" {TEXT -1 8 " .0434" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "qmm mq:=proc(u,m,q) if q=0 then 0 else" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "sum(k*pmmmqk(u,m,q,k), k=1..q);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "fi;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%&qmmmqG:6%%\"uG%\"mG%\"qG6\"F*F*@%/9&\"\"!F.-%$sumG6$ *&%\"kG\"\"\"-%'pmmmqkG6&9$9%F-F3F4/F3;F4F-F*F*" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 32 "printf(`%8.4f`, qmmmq(1, 2, 2));" }}{PARA 6 " " 1 "" {TEXT -1 8 " .1739" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "wtmmmq:=proc(u,m,q,a)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "qmmmq( u,m,q)/a;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%'wtmmmqG:6&%\"uG%\"mG%\"qG%\"aG6\"F+F+*&-%&qmmmqG6% 9$9%9&\"\"\"9'!\"\"F+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 " wtmmmq(1,2,2,1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\"\"%\"#B" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "ttmmmq:=proc(a, d, m, q)" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "local u;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "u := a/d;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "qmmmq( u, m, q)/a + 1/d;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'ttmmmqG:6&%\"aG%\"dG%\"mG%\"qG6#%\"uG6\"F -C$>8$*&9$\"\"\"9%!\"\",&*&-%&qmmmqG6%F09&9'F3F2F5F3*$F4F5F3F-F-" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "ttmmmq(1,1,2,2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\"#F\"#B" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 358 "printf(`M/M/m/q statistics\\n`);\nprintf(`Arrival ra te = 3.000, departure rate = 1.000\\n`);\nprintf(`(a) Queue Size\\n`); \nprintf(` m=1 m=2 m=3 m=4 m=5\\n`);\nfor q in [0, 1,2,3,4,5,6,7,8,9,10,15,20,25,30,35,40,45,50] do\n printf(`q=%2d: \+ %6.3f %6.3f %6.3f %6.3f %6.3f\\n`,\nq, qmmmq(3,1,q), qmmmq(3,2,q),qmm mq(3,3,q),qmmmq(3,4,q),qmmmq(3,5,q));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 6 "" 1 "" {TEXT -1 936 "M/M/m/q statistics\nArrival \+ rate = 3.000, departure rate = 1.000\n(a) Queue Size\n m=1 \+ m=2 m=3 m=4 m=5\nq= 0: 0.000 0.000 0.000 0.000 0.000\n q= 1: .692 .442 .257 .133 .061\nq= 2: 1.575 1.064 .6 13 .304 .131\nq= 3: 2.528 1.788 1.018 .476 .191\nq= 4: \+ 3.510 2.584 1.451 .638 .239\nq= 5: 4.504 3.430 1.901 .78 3 .274\nq= 6: 5.501 4.315 2.362 .910 .300\nq= 7: 6.500 \+ 5.230 2.831 1.019 .317\nq= 8: 7.500 6.167 3.306 1.111 .330 \nq= 9: 8.500 7.120 3.785 1.189 .338\nq=10: 9.500 8.086 4 .267 1.254 .343\nq=15: 14.500 13.015 6.708 1.438 .353\nq=20: \+ 19.500 18.002 9.174 1.501 .354\nq=25: 24.500 23.000 11.653 1. 520 .354\nq=30: 29.500 28.000 14.138 1.526 .354\nq=35: 34.500 33.000 16.627 1.527 .354\nq=40: 39.500 38.000 19.119 1.528 .3 54\nq=45: 44.500 43.000 21.612 1.528 .354\nq=50: 49.500 48.000 \+ 24.107 1.528 .354" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 293 "pr intf(`(b) Total Time in System\\n`);\nprintf(` m=1 m=2 m =3 m=4 m=5\\n`);\nfor q in [0,1,2,3,4,5,6,7,8,9,10,15,20,25,30,3 5,40,45,50] do\n printf(`q=%2d: %6.3f %6.3f %6.3f %6.3f %6.3f\\n` ,\nq, ttmmmq(3,1,1,q), ttmmmq(3,1,2,q),ttmmmq(3,1,3,q),ttmmmq(3,1,4,q) ,ttmmmq(3,1,5,q));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 6 "" 1 "" {TEXT -1 882 "(b) Total Time in System\n m=1 m=2 \+ m=3 m=4 m=5\nq= 0: 1.000 1.000 1.000 1.000 1.000\nq= 1 : 1.230 1.147 1.085 1.044 1.020\nq= 2: 1.525 1.354 1.204 \+ 1.101 1.043\nq= 3: 1.842 1.596 1.339 1.158 1.063\nq= 4: 2.1 70 1.861 1.483 1.212 1.079\nq= 5: 2.501 2.143 1.633 1.261 1 .091\nq= 6: 2.833 2.438 1.787 1.303 1.100\nq= 7: 3.166 2.74 3 1.943 1.339 1.105\nq= 8: 3.500 3.055 2.102 1.370 1.110\nq= 9: 3.833 3.373 2.261 1.396 1.112\nq=10: 4.166 3.695 2.422 1.418 1.114\nq=15: 5.833 5.338 3.236 1.479 1.117\nq=20: 7 .500 7.000 4.058 1.500 1.118\nq=25: 9.166 8.666 4.884 1.506 \+ 1.118\nq=30: 10.833 10.333 5.712 1.508 1.118\nq=35: 12.500 12. 000 6.542 1.509 1.118\nq=40: 14.166 13.666 7.373 1.509 1.118\n q=45: 15.833 15.333 8.204 1.509 1.118\nq=50: 17.500 17.000 9.0 35 1.509 1.118" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 289 "printf (`(c) Probability of Waiting\\n`);\nprintf(` m=1 m=2 m=3 m=4 m=5\\n`);\nfor q in [0,1,2,3,4,5,6,7,8,9,10,15,20,25,30,35, 40,45,50] do\n printf(`q=%2d: %6.3f %6.3f %6.3f %6.3f %6.3f\\n`, \nq, pwmmmq(3,1,q), pwmmmq(3,2,q),pwmmmq(3,3,q),pwmmmq(3,4,q),pwmmmq(3 ,5,q)); od;" }}{PARA 6 "" 1 "" {TEXT -1 884 "(c) Probability of Waitin g\n m=1 m=2 m=3 m=4 m=5\nq= 0: 0.000 0.000 0. 000 0.000 0.000\nq= 1: .230 .295 .257 .178 .103\nq= 2: \+ .300 .443 .409 .283 .159\nq= 3: .322 .526 .509 .3 51 .190\nq= 4: .329 .577 .580 .396 .209\nq= 5: .332 \+ .608 .633 .427 .220\nq= 6: .332 .628 .675 .449 .22 6\nq= 7: .333 .641 .707 .465 .230\nq= 8: .333 .650 \+ .734 .476 .232\nq= 9: .333 .655 .757 .485 .234\nq=10: .333 .659 .775 .491 .234\nq=15: .333 .665 .838 \+ .505 .236\nq=20: .333 .666 .873 .508 .236\nq=25: .33 3 .666 .896 .509 .236\nq=30: .333 .666 .912 .509 . 236\nq=35: .333 .666 .923 .509 .236\nq=40: .333 .666 .932 .509 .236\nq=45: .333 .666 .939 .509 .236\nq=5 0: .333 .666 .945 .509 .236" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 297 "printf(`(d) Probability of Loss\\n`);\nprintf(` \+ m=1 m=2 m=3 m=4 m=5\\n`);\nfor q in [0,1,2,3,4,5,6,7, 8,9,10,15,20,25,30,35,40,45,50] do\n printf(`q=%2d: %6.3f %6.3f % 6.3f %6.3f %6.3f\\n`,\nq, pmmmqk(3,1,q,q), pmmmqk(3,2,q,q),pmmmqk(3,3, q,q),pmmmqk(3,4,q,q),pmmmqk(3,5,q,q)); od;" }}{PARA 6 "" 1 "" {TEXT -1 882 "(d) Probability of Loss\n m=1 m=2 m=3 m=4 \+ m=5\nq= 0: .750 .529 .346 .206 .110\nq= 1: .692 .44 2 .257 .133 .061\nq= 2: .675 .399 .204 .091 .035\nq= 3: .669 .374 .169 .064 .021\nq= 4: .667 .359 .145 .045 .012\nq= 5: .666 .350 .126 .033 .007\nq= 6: \+ .666 .344 .112 .024 .004\nq= 7: .666 .340 .101 .017 \+ .002\nq= 8: .666 .338 .091 .013 .001\nq= 9: .666 . 336 .084 .009 .000\nq=10: .666 .335 .077 .007 .000\n q=15: .666 .333 .055 .001 .000\nq=20: .666 .333 .0 43 .000 .000\nq=25: .666 .333 .035 .000 .000\nq=30: \+ .666 .333 .030 .000 .000\nq=35: .666 .333 .026 .00 0 .000\nq=40: .666 .333 .023 .000 .000\nq=45: .666 \+ .333 .020 .000 .000\nq=50: .666 .333 .018 .000 .000 " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "ErlangC:=proc(u,m)" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "local s;s:=u^m/(m!*(1-u/m));" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "s:=s/(sum(u^k/k!, k=0..m-1)+s);" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%(ErlangCG:6$%\"uG%\"mG6#%\"sG6\"F+C$>8$*()9$9%\"\"\"-%*factori alG6#F2!\"\",&F3F3*&F1F3F2F7F7F7>F.*&F.F3,&-%$sumG6$*&)F1%\"kGF3-F56#F BF7/FB;\"\"!,&F2F3F7F3F3F.F3F7F+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 8 "" 1 "" {TEXT -1 37 "Syntax error, missing operator or `;`" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "printf( `%8.5f`,ErlangC(10,11));" }}{PARA 6 "" 1 "" {TEXT -1 8 " .68211" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "ErlangC(10,10);" }}{PARA 8 " " 1 "" {TEXT -1 36 "Error, (in ErlangC) division by zero" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "Poisson := proc(u,m)" }}{PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 39 "1-evalf(sum(exp(-u)*u^k/k!, k=0..m-1));" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%(PoissonG:6$%\"uG%\"mG6\"F)F),&\"\"\"F+-%&evalfG6#-%$sumG6$*(- %$expG6#,$9$!\"\"F+)F7%\"kGF+-%*factorialG6#F:F8/F:;\"\"!,&9%F+F8F+F8F )F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "printf(`%8.6f`,Poiss on(2,3));" }}{PARA 6 "" 1 "" {TEXT -1 8 " .323323" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 35 "printf(`%8.6f`, evalf(1-exp(-10)));" }} {PARA 6 "" 1 "" {TEXT -1 8 " .999954" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "EEBP := proc(e,m,p,d)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "local i, a, erlk, erlkm1, b, r, delta;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "erlk:=e; b:=B(erlk,m); a:=erlk*b; k:=0;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 195 "erlkm1:= erlk; r:=p*a; erlk:=e+r;\ndelta:=(e rlk-erlkm1)/erlkm1; \nprintf(`E%d=%8.6f, B%d=%8.6f, A%d=%8.6f, R%d=%8. 6f, E%d=%8.6f, D%d=%8.6f\\n`,\n k, erlkm1, k, b, k, a, k, r, k+1, e rlk, k, delta);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 258 "while d <= delt a and k<100 do \nb:=B(erlk,m); a:=erlk*b; k:=k+1; erlkm1:= erlk; r:=p* a; erlk:=e+r;\ndelta:=(erlk-erlkm1)/erlkm1;\nprintf(`E%d=%8.6f, B%d=%8 .6f, A%d=%8.6f, R%d=%8.6f, E%d=%8.6f, D%d=%8.6f\\n`,\n k, erlkm1, k , b, k, a, k, r, k+1, erlk, k, delta);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 7 "" 1 " " {TEXT -1 41 "Warning, `k` is implicitly declared local" }}{PARA 12 " " 1 "" {XPPMATH 20 "6#>%%EEBPG:6&%\"eG%\"mG%\"pG%\"dG6*%\"iG%\"aG%%erl kG%'erlkm1G%\"bG%\"rG%&deltaG%\"kG6\"F4C,>8&9$>8(-%\"BG6$F79%>8%*&F7\" \"\"F:FB>8+\"\"!>8'F7>8)*&9&FBF@FB>F7,&F8FBFIFB>8**&,&F7FBFG!\"\"FBFGF R-%'printfG6/%\\oE%d=%8.6f,~B%d=%8.6f,~A%d=%8.6f,~R%d=%8.6f,~E%d=%8.6f ,~D%d=%8.6f|+GFDFGFDF:FDF@FDFI,&FDFBFBFBF7FDFO?(F4FBFBF4319'FO2FD\"$+ \"C*>F:F;>F@FA>FDFW>FGF7>FIFJ>F7FM>FOFPFSF4F4" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "EEBP(0.2, 1, 0.5, 0.01);" }}{PARA 6 "" 1 "" {TEXT -1 230 "E0= .200000, B0= .166666, A0= .033333, R0= .016666, E1= \+ .216666, D0= .083333\nE1= .216666, B1= .178082, A1= .038584, R1= .0192 92, E2= .219292, D1= .012118\nE2= .219292, B2= .179852, A2= .039440, R 2= .019720, E3= .219720, D2= .001951" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "EEB := proc(e,m,p,d)\nlocal i, a, erlk, erlkm1, b, r, delta;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "erlk:=e; b:=B(erlk,m); a :=erlk*b; k:=0;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 63 "erlkm1:= erlk; r :=p*a; erlk:=e+r;\ndelta:=(erlk-erlkm1)/erlkm1; " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 126 "while d <= delta and k<100 do \nb:=B(erlk,m); a:=erl k*b; k:=k+1; erlkm1:= erlk; r:=p*a; erlk:=e+r;\ndelta:=(erlk-erlkm1)/e rlkm1;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "od;\nb;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 7 "" 1 "" {TEXT -1 41 "War ning, `k` is implicitly declared local" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$EEBG:6&%\"eG%\"mG%\"pG%\"dG6*%\"iG%\"aG%%erlkG%'erlkm1G%\"bG% \"rG%&deltaG%\"kG6\"F4C,>8&9$>8(-%\"BG6$F79%>8%*&F7\"\"\"F:FB>8+\"\"!> 8'F7>8)*&9&FBF@FB>F7,&F8FBFIFB>8**&,&F7FBFG!\"\"FBFGFR?(F4FBFBF4319'FO 2FD\"$+\"C)>F:F;>F@FA>FD,&FDFBFBFB>FGF7>FIFJ>F7FM>FOFPF:F4F4" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 443 "printf(`Comparison of block ing based on retry behavior\\n`);\nprintf(`Offer load = 10 Erlangs\\n` );\nprintf(`m Erlang-B Erlong-C Poisson EEB-50 EEB-100\\n`);\npr intf(`10 %8.6f ------- %8.6f %8.6f -------\\n`,\n B(10,1 0), Poisson(10,10), EEB(10,10,0.5,0.0001));\nfor m from 11 to 23 do\np rintf(`%2d %8.6f %8.6f %8.6f %8.6f %8.6f\\n`,\n m, B(10,m), Erl angC(10,m), Poisson(10,m), EEB(10,m,0.5,0.0001),\n EEB(10,m,1.0, 0.0001));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 6 " " 1 "" {TEXT -1 805 "Comparison of blocking based on retry behavior\nO ffer load = 10 Erlangs\nm Erlang-B Erlong-C Poisson EEB-50 EEB-1 00\n10 .214582 ------- .542070 .289075 -------\n11 .163232 .6 82118 .416960 .214622 .458640\n12 .119739 .449388 .303223 .151 797 .249803\n13 .084338 .285270 .208443 .102376 .142326\n14 . 056819 .174131 .135535 .065967 .081883\n15 .036496 .102042 .08 3458 .040677 .046765\n16 .022301 .057340 .048740 .024016 .0262 32\n17 .012948 .030876 .027041 .013589 .014337\n18 .007142 .0 15928 .014277 .007357 .007591\n19 .003745 .007873 .007186 .003 808 .003878\n20 .001869 .003731 .003454 .001886 .001904\n21 . 000889 .001696 .001588 .000893 .000897\n22 .000404 .000740 .00 0699 .000405 .000405\n23 .000175 .000310 .000295 .000175 .0001 76" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "EEB(10,11,1.0,0.0001) ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+2OS'e%!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "EEB(10,11,0.5,0.0001);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+*))Gi9#!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "B(10,10);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\"(+Dc\"\"((e\"G(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "Poisson(10,10);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+dGq?a!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "EEB(10,10,0.5,0.01);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+$ffI&G!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "B(10,11) ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\")+]i:\")dCs&*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "ErlangC(10,11);" }}{PARA 11 "" 1 " " {XPPMATH 20 "6##\")+]i:\")(e1H#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "Poisson(10,11);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$ \"++DgpT!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "Eeqv := proc (E, v)\nv+3*(v/E)*(v/E-1);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%EeqvG:6$%\"EG%\"vG6\"F)F),&9%\"\" \"*(F+F,9$!\"\",&*&F+F,F.F/F,F/F,F,\"\"$F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "meqv := proc(E,v)\nEeqv(E,v)*(E+v/E)/(E+v/E-1) - E - 1;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%meqvG:6$%\"EG%\"vG6\"F)F),(*(-%%EeqvG6$9$9%\"\"\",&F /F1*&F0F1F/!\"\"F1F1,(F/F1F3F1F4F1F4F1F/F4F4F1F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "meqvadj := proc(E,v)\nfloor(meqv(E,v));" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%(meqvadjG:6$%\"EG%\"vG6\"F)F)-%&floorG6#-%%meqvG6$9$9%F)F)" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 58 "Eeqvadj := proc(E,v)\n(meqv adj(E,v)+E+1)*(v/E+E-1)/(v/E+E);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 " end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%(EeqvadjG:6$%\"EG%\"vG6\"F)F )*(,(-%(meqvadjG6$9$9%\"\"\"F/F1F1F1F1,(F/F1*&F0F1F/!\"\"F1F4F1F1,&F/F 1F3F1F4F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "Eeqv(8.17, 1 1.29);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+ " 0 "" {MPLTEXT 1 0 18 "meqv(8.17, 11.29);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"*Vk%3_!\")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "meqvadj(8.17, 11.29);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "Eeqvadj(8.17 , 11.29);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+ " 0 "" {MPLTEXT 1 0 13 "floor(5.208);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "0.1 4/12.88;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+Al&p3\"!#6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "B(12.69, 20);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+2&=f^\"!#6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "B(12.60, 21);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+()R[Y&)!#7 " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "printf(`%8.5f`,Eo(9,4)) ;" }}{PARA 6 "" 1 "" {TEXT -1 8 " 5.52427" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 24 "printf(`%8.5f`,Eo(5,3));" }}{PARA 6 "" 1 "" {TEXT -1 8 " 2.64830" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "Eo := pro c(E,m)\nE*B(E,m):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#EoG:6$%\"EG%\"mG6\"F)F)*&9$\"\"\"-%\"BG6$ F+9%F,F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "Vo := proc(E, m)\nEo(E,m)*(1-Eo(E,m)+E/(m+1+Eo(E,m)-E));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#VoG:6$%\"EG %\"mG6\"F)F)*&-%#EoG6$9$9%\"\"\",(F0F0F+!\"\"*&F.F0,*F/F0F0F0F+F0F.F2F 2F0F0F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "printf(`%8.5f` , Vo(5,3));" }}{PARA 6 "" 1 "" {TEXT -1 8 " 3.66820" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "printf(`%8.5f`, Vo(9,4));" }}{PARA 6 "" 1 "" {TEXT -1 8 " 7.62438" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "0.14/8.17;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+\"H'e8 " 0 "" {MPLTEXT 1 0 11 "B(8.17,14);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+^5Gc>!#6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "B(8.17,15);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+Cu Ga5!#6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "printf(`B(5,11)=% 8.5f, B(5,10)=%8.5f`,B(5,11), B(5,10));" }}{PARA 6 "" 1 "" {TEXT -1 37 "B(5,11)= .00828, B(5,10)= .01838" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "printf(`B(9,16)=%8.5f, B(9,17)=%8.5f`,B(9,16) , B(9,17));" }}{PARA 6 "" 1 "" {TEXT -1 37 "B(9,16)= .01105, B(9,1 7)= .00581" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "printf(`%8.6 f`,B(2,6));" }}{PARA 6 "" 1 "" {TEXT -1 8 " .012084" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "57 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }