{VERSION 6 0 "IBM INTEL NT" "6.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 "Heading 1" -1 3 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 1 1 1 1 }1 1 0 0 8 4 1 0 1 0 2 2 0 1 }{PSTYLE "Warning" -1 7 1 {CSTYLE "" -1 -1 "Courier " 1 10 0 0 255 1 2 2 2 2 2 1 1 1 3 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 } {PSTYLE "Error" -1 8 1 {CSTYLE "" -1 -1 "Courier" 1 10 255 0 255 1 2 2 2 2 2 1 1 1 3 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{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 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 2 2 0 1 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "restart;with(RandomT ools);\nGenerate(polynom(integer, x));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7(%*AddFlavorG%)GenerateG%*GetFlavorG%+GetFlavorsG%*HasFlavorG%- RemoveFlavorG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,.\",84L!es!\"\"*&\"- CnI*))y\"\"\"\"%\"xGF(F%*&\"-(HEpOc\"F()F)\"\"#F(F%*&\",Jk&QuDF()F)\" \"$F(F%*&\",#)*=(e%eF()F)\"\"%F(F(*&\"-W0$QvY#F()F)\"\"&F(F(" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "Generate(polynom(positive(de nominator=3), x, degree=10));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,8#\" \"#\"\"$\"\"\"*&#F'F&F'%\"xGF'F'*&F$F'*$)F*F%F'F'F'*&F$F'*$)F*F&F'F'F' *&F$F'*$)F*\"\"%F'F'F'*&F$F'*$)F*\"\"&F'F'F'*&F$F'*$)F*\"\"'F'F'F'*&F) F'*$)F*\"\"(F'F'F'*&F)F'*$)F*\"\")F'F'F'*&F$F'*$)F*\"\"*F'F'F'*&F)F'*$ )F*\"#5F'F'F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "Generate(p olynom(integer(range=2), x, degree=4));" }}{PARA 8 "" 1 "" {TEXT -1 135 "Error, (in Main) argument 'range = 2' invalid: rhs should be of t ype \{integer, identical(-infinity)\} .. \{integer, identical(infinity )\}\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "test:=proc()" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "global g;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 58 "f:=(Generate(polynom(integer(range=-2..2), x, degree= 6)));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "g:=x->f;\neval(g);" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "end proc;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 7 "" 1 "" {TEXT -1 62 "Warning, `f` is implicitly declared local to procedu re `test`\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%testGj+6\"6#%\"fGF&F &C%>8$-_%,RandomToolsG%)GenerateG6#-%(polynomG6%-%(integerG6#/%&rangeG ;!\"#\"\"#%\"xG/%'degreeG\"\"'>%\"gGj+6#F " 0 "" {MPLTEXT 1 0 5 "g(x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,0\"\"\"!\"\" *&\"\"#F$%\"xGF$F%*$)F(F'F$F$*&F'F$)F(\"\"$F$F%*$)F(\"\"%F$F$*$)F(\"\" &F$F%*$)F(\"\"'F$F%" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 15 "\n\n\ntest :=proc()" }}{PARA 0 "" 0 "" {TEXT -1 1 "\n" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "g:=x->Generate(polynom(integer(range=-2..2), x, degre e=6));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "f:=g;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"gGj+6#%\"xG6\"6$%)operatorG%&arrowGF(-_%,RandomTool sG%)GenerateG6#-%(polynomG6%-%(integerG6#/%&rangeG;!\"#\"\"#9$/%'degre eG\"\"'F(F(F(6#\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG%\"gG" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{SECT 0 {PARA 3 "" 0 " " {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "Generate(i nteger(range=-1..4));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 10 "diff(f,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"! " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 82 "plot([g(x),diff(g(x),x) ,diff(g(x),x$2)],x=-3..3,y=-20..20,color=[blue,green,red]);" }}{PARA 13 "" 1 "" {GLPLOT2D 617 617 617 {PLOTDATA 2 "6'-%'CURVESG6$7Z7$$!\"$ \"\"!$!%\\5F*7$$!3)****\\(oUInH!#<$!3&3w\"=JfuP)*!#:7$$!3&*****\\P&3Y$ HF0$!31y/'[&*\\#>#*F37$$!3#****\\i!G\">!HF0$!3GBc&fT=Jj)F37$$!3!****** \\2<#pGF0$!3aC;o!f+!y!)F37$$!3')**\\78.K7GF0$!3'))zN+#o1#=(F37$$!3#)** *\\7bBav#F0$!3%>W&opu]pjF37$$!3'***\\(=>P9p#F0$!3/6FHTtbZbF37$$!36++]K 3XFEF0$!3ere$R$G$[\"[F37$$!3w******H./jDF0$!39fU\"=wm%fTF37$$!3%)**** \\F)H')\\#F0$!3'*y7Y4*p\"zNF37$$!3))**\\(oXDXV#F0$!3ukU:IaHpIF37$$!3#* ***\\i3@/P#F0$!3([,ou]b0i#F37$$!3;++Dr^b^AF0$!35$*QJ1[[I>F37$$!3$**** \\7Sw%G@F0$!3G;a-ZpM!Q\"F37$$!3*****\\7;)=,?F0$!3Iw:'4+JS`*!#;7$$!3/++ DO\"3V(=F0$!3p*[T-!4;8%Fdp7$$!3* *****\\d;%)G;F0$!3,<8:bCI8FFdp7$$!3!******\\!)H%*\\\"F0$!3]K@6M#Gkh\"F dp7$$!3/+++vl[p8F0$!3Oi*pHu-)f!*F07$$!3\"******\\>iUC\"F0$!3?RA+Jr5A[F 07$$!3-++DhkaI6F0$!33=!z**y'[(\\#F07$$!3s******\\XF`**!#=$!3W(G8Q0n4j* F[s7$$!3u*******>#z2))F[s$!3m>[W.%Q;4$F[s7$$!3S++]7RKvuF[s$\"3oDNqvs%= p%!#>7$$!3s,+++P'eH'F[s$\"3>D*y8(pC8>F[s7$$!3q)***\\7*3=+&F[s$\"31hdWU /GnHF[s7$$!3[)***\\PFcpPF[s$\"3l[c_t[u/TF[s7$$!3;)****\\7VQ[#F[s$\"3%z n[5#)HTq&F[s7$$!32)***\\i6:.8F[s$\"3Y?Pj_^[ovF[s7$$!3Wb+++v`hH!#?$\"3n zvdep&3%**F[s7$$\"3]****\\(QIKH\"F[s$\"3QbE,ub\"F07$$\"3E,++vuY)o$F[s$\"3:q\"4LP&*=#>F07$$\"3!z**** **4FL(\\F[s$\"32dQ\\^$y+T#F07$$\"3A)****\\d6.B'F[s$\"31S'3IFT[1$F07$$ \"3s****\\(o3lW(F[s$\"3;!GMtO&=YRF07$$\"35*****\\A))oz)F[s$\"3R8%osg/6 K&F07$$\"3e******Hk-,5F0$\"3%)*p,F&=W;qF07$$\"36+++D-eI6F0$\"3fua`b%)) HT*F07$$\"3u***\\(=_(zC\"F0$\"35k*Q8[6\"=7Fdp7$$\"3M+++b*=jP\"F0$\"3=g BG&)QL!f\"Fdp7$$\"3g***\\(3/3(\\\"F0$\"32f'RgY$Q1?Fdp7$$\"33++vB4JB;F0 $\"3j()z\"R=y:]#Fdp7$$\"3u*****\\KCnu\"F0$\"3OAJZ4J0GIFdp7$$\"3s***\\( =n#f(=F0$\"3-m7rF@:#f$Fdp7$$\"3P+++!)RO+?F0$\"3-d))*Hr#Q,TFdp7$$\"30++ ]_!>w7#F0$\"3*\\C@sK>,_%Fdp7$$\"3O++v)Q?QD#F0$\"3\"ea0&4MHVZFdp7$$\"3G +++5jypBF0$\"312+h#QY%zYFdp7$$\"3<++]Ujp-DF0$\"3$[FF0$\"379;U,Z&>3\"Fdp7$$\"37+ +D6EjpGF0$!3=D^tVa%G'=Fdp7$$\"\"$F*$!#lF*-%'COLOURG6&%$RGBG$F*F*Fd]l$ \"*++++\"!\")-F$6$7U7$F($\"%l?F*7$F?$\"3g#fc?a\\vh\"!#97$FI$\"3[*[2j(G w$H\"Fa^l7$FS$\"3!o2a)eTMG**F37$Fgn$\"3=*3&[!eQ<[(F37$Fao$\"3r0Gd]s3Sb F37$Ffo$\"3]L1j?7i6TF37$F[p$\"3W0M];'G)[HF37$F`p$\"33R`*\\DCu-#F37$Ffp $\"3j6ljfaGT8F37$F[q$\"3]IsswUo#H)Fdp7$F`q$\"3;!\\HqA&4s]Fdp7$Feq$\"3# QA\\(*)y7mDFdp7$Fjq$\"3\\7TEJeWE&*F07$F_r$\"3mn/*G'G)y(>F[s7$Fdr$!3RjU 90p:IXF07$Fir$!3_D.vC\"*[XqF07$F_s$!3\\9!G.5&y2vF07$Fds$!3whq#Qw_!))pF 07$Fjs$!3q^+EBhi\"4'F07$F_t$!3#*>#=4X#\\,]F07$Fdt$!3'oua!\\7pWSF07$Fit $!3gMp;c!R`?$F07$F^u$!39$Qt*o%RYd#F07$Fcu$!3(4hzGYs=,#F07$Fiu$!39\"efF L7h`\"F07$F^v$!3'ztbuK-wC\"F07$Fcv$!3-&HFA8r(*>\"F07$Fhv$!3,\\f4KBcH(G68Fdp7$F\\x$ !3G/;V$)))[5BFdp7$Fax$!3?hj.52m\")RFdp7$Ffx$!3ih'e?-9iA'Fdp7$F[y$!3Qs[ s5<:K(*Fdp7$F`y$!3a=e;<04K9F37$Fey$!3)HQYSs!=\"3#F37$Fjy$!3?'yRMLcP#HF 37$F_z$!3[9lcBmtwSF37$Fdz$!39\"z@kl*o/bF37$Fiz$!3'R^%yk)\\;N(F37$F^[l$ !3'oDSx)>LT'*F37$Fc[l$!3hAa*3h:;A\"Fa^l7$Fh[l$!3cZx8B3I\"e\"Fa^l7$F]\\ l$!3;oJ\"G&yOq>Fa^l7$Fb\\l$!3)pF3R=TdY#Fa^l7$$\"39+++5h(*3GF0$!3KlQ!HE rbt#Fa^l7$Fg\\l$!3#=?<\"\\F[GIFa^l7$$\"31+]i0j\"[$HF0$!3+x^]*)4kqLFa^l 7$F\\]l$!%VPF*-Fa]l6&Fc]lFd]lFe]lFd]l-F$6$7S7$F($\"%_6F*7$F?$\"3zlznS2 =45Fa^l7$FI$\"3Slz13\")\\[*)F37$FS$\"3wQU@VhcoxF37$Fgn$\"3#*HQ#)z=2*o' F37$Fao$\"3y9cK[pZ2dfFdp7$Fir$\"3_(zw#*=5'QRFdp7$F_s$\"3]0,jEp72EF dp7$Fds$\"3fBNLC^UW9Fdp7$Fjs$\"3q]PR*3/P=(F07$F_t$\"3m]^p$4Ha+#F07$Fdt $!3q#yO&GEjdnF[s7$Fit$!3$R]?719ti\"F07$F^u$!3%4lhYVw9F\"F07$Fcu$!3'z(Q obi@VNFhs7$Fiu$\"3C&*)Gfebgm\"F07$F^v$\"3KD8'Hznk1$F07$Fcv$\"3Q#e.&*o- :0%F07$Fhv$\"33Q_71Im:SF07$F]w$\"3mER\\S=wgCF07$Fbw$!3++`$*eGLm#*F[s7$ Fgw$!3M\"=(He\"yuQ(F07$F\\x$!3d)*yv%RL'3;Fdp7$Fax$!3wV>M$*H$**)GFdp7$F fx$!3g>z+wf43WFdp7$F[y$!379ww>Eq.lFdp7$F`y$!3!R)H7y\"G`$*)Fdp7$Fey$!3v ^NaPc/+7F37$Fjy$!3%y@3.*>+c:F37$F_z$!3=(oF37$Fdz$!3!R(p2=!H:[# F37$Fiz$!3!*Q\\F8\\'R0$F37$F^[l$!3yl.W$3v%*p$F37$Fc[l$!3#R/AO=+^O%F37$ Fh[l$!3TM$[$[@I=_F37$F]\\l$!3[$H\\O^Zv1'F37$Fb\\l$!3'o='4K,KnqF37$Fg\\ l$!3>LDQ>%*z>\")F37$F\\]l$!$O*F*-Fa]l6&Fc]lFe]lFd]lFd]l-%+AXESLABELSG6 $Q\"x6\"Q\"yFgam-%%VIEWG6$;F(F\\]l;$FeuF*$\"#?F*" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" "Curve 3" }}} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}}}}{MARK "7 4 0 0" 35 }{VIEWOPTS 0 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }