{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 "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 "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 19 "y:=exp(x) * sin(x);
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"yG*&-%$expG6#%\"xG\"\"\"-%$sin
GF(F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 63 "z := diff(y,x); q \+
:= diff(z,x); r := diff(q,x); s := diff(r,x);" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"zG,&*&-%$expG6#%\"xG\"\"\"-%$sinGF)F+F+*&F'F+-%$cos
GF)F+F+" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"qG,$*&-%$expG6#%\"xG\"
\"\"-%$cosGF)F+\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"rG,&*&-%$e
xpG6#%\"xG\"\"\"-%$cosGF)F+\"\"#*&F'F+-%$sinGF)F+!\"#" }}{PARA 11 "" 
1 "" {XPPMATH 20 "6#>%\"sG,$*&-%$expG6#%\"xG\"\"\"-%$sinGF)F+!\"%" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "readlib(C);" }}{PARA 11 "" 
1 "" {XPPMATH 20 "6#:6\"6.%%locsG%%parsG%%glosG%\"kG%\"xG%&errorG%+old
_DigitsG%*old_QuietG%,output_fileG%(statseqG%$optG%\"AG6#%aoCopyright~
(c)~1992~by~the~University~of~Waterloo.~All~rights~reserved.GF$C5>8*%'
DigitsG>8+-%*interfaceG6#%&quietG>F7\"#;@%4-%)assignedG6#%*precisionG>
%,C/precisionG.%'doubleG>FGFE>8$%%NULLG>8&FM>8%FM>%'C/ansiG%&falseG>8.
FT?&8'7#&9\"6#;\"\"#9#%%trueG@3/FX.%*optimizedG>FVFjn/FX.%%ansiG>FSFjn
-%%typeG6$FX./-%*identicalG6#%'digitsG%'posintG>F7-%$rhsG6#FX-Feo6$FX.
/-Fjo6#%)filenameG%'stringG>8,F_p-Feo6$FX./-FjoFDFip>FG-%#opG6$FhnFX-F
eo6$FX./-Fjo6#%(globalsG-%%listG6#Fip>FOFX-Feo6$FX./-Fjo6#%'localsGF\\
r>FLFX-Feo6$FX./-Fjo6#%+parametersGF\\r>FQFX-%&ERRORG6$%+bad~optionGFX
@'/FG.%'singleG>F7\"\"(/FGFH>F7F?-Fas6$%:bad~setting~for~precisionGFE@
'3-Feo6$&Fen6#\"\"\"%%nameG-Feo6$Fct.%&arrayGC&>8(--%(readlibG6#%-tool
s/gensymG6#Fct-%'assignG6$F]u-%/C/arrayreindexGFcu-Feu6$F]u-%$mapG6$%2
C/ConvertAndCheckGF]u@%FV>8-7#--F`u6#.%)optimizeG6#F]u>Fav7#-%.C/array
expandGFhv3-Feo6$Fct.Fip-Feo6$Fct.%*procedureGC+-%)userinfoG6%Fet%\"CG
%Bgenerating~output~for~a~procedureG-F;6#/F=Fjn@$-FC6#F[q-%)appendtoGF
`x@%FVC$>FV-FdvFcu>8)-%*traperrorG6#--F`u6#%,C/procedureG6$FVFct>Fhx-F
jx6#-F]yFcu-%*C/writelnGF$@$F_x-Fbx6#%)terminalG-F;6#/F=F9>F7F6@%/Fhx%
*lasterrorG-Fas6#Fhx-%'RETURNG6#FMC$>F]u-F^vFcu@)FV>Fav7#-Fdv6&F]uFOFL
FQ-Feo6$F]u-F]r6#/Fft%*algebraicG>FavF]u-Feo6$F]uFd[l>Fav7#/%#t0GF]u-F
as6$%1invalid~argumentGF]uF[x@$F_xFax>Fhx-Fjx6#-%6C/ComputationSequenc
eG6#Fav@$F_xFhyF[z>F7F6@%F`zFbzFMF$6&%)C/bufferGFSFEFG" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "C(q, optimized);\nC(s, optimized);
" }}{PARA 6 "" 1 "" {TEXT -1 60 "      t4 = 2.0*exp(x)*cos(x);\n      \+
t4 = -4.0*exp(x)*sin(x);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 
"plot(q, x=1..3); plot(s, x=1..3);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 
32 "zz := sin(x); plot(zz, x=-6..6);" }}{PARA 13 "" 1 "" {INLPLOT "6%-
%'CURVESG6$7S7$$\"\"\"\"\"!$\"1q<$)zyQPH!#:7$$\"1LLL3VfV5F-$\"14%36k1r
&GF-7$$\"1nm\"H[D:3\"F-$\"1ar._27sFF-7$$\"1LL$e0$=C6F-$\"109.5:geEF-7$
$\"1LL$3RBr;\"F-$\"1X:X*H=R_#F-7$$\"1nm\"zjf)47F-$\"1KwLB'Q#oBF-7$$\"1
LLe4;[\\7F-$\"1%\\Y2kdM?#F-7$$\"1++Dmy]!H\"F-$\"1)y\\NJ<4,#F-7$$\"1LLe
zs$HL\"F-$\"1a)\\:3Rqy\"F-7$$\"1++D@1Bv8F-$\"1L*G*>tYP:F-7$$\"1nmm@Xt=
9F-$\"1ZSP&on<D\"F-7$$\"1LL$3y_qX\"F-$\"1%R0;>Hcu*!#;7$$\"1+++l+>+:F-$
\"1D&R\"p6lCjF_o7$$\"1+++vW]V:F-$\"1\"eF>PFZb#F_o7$$\"1+++NfC&e\"F-$!1
^n_CZP59F_o7$$\"1LLez6:B;F-$!1[Owd4N0`F_o7$$\"1nmm\"=C#o;F-$!1Y3u2ejJ5
F-7$$\"1nmmEpS1<F-$!1n5w6wh*[\"F-7$$\"1++DOD#3v\"F-$!18v)zm![i?F-7$$\"
1mmmwy8!z\"F-$!1\"zwQL8og#F-7$$\"1++DOIFL=F-$!1H$=Z=fcC$F-7$$\"1++v3zM
u=F-$!1c))\\;<v&*QF-7$$\"1nm;H_?<>F-$!1D\\MBu!)=YF-7$$\"1nm\"zihl&>F-$
!1$)Grub;C`F-7$$\"1LL$3#G,**>F-$!1z;9*HT08'F-7$$\"1LLezw5V?F-$!12#3$Q4
S>qF-7$$\"1++v$Q#\\\"3#F-$!1G5k8*3m$yF-7$$\"1LL$e\"*[H7#F-$!1p(4/QEbw)
F-7$$\"1+++qvxl@F-$!1Aq#Hf\\lx*F-7$$\"1++]_qn2AF-$!1$\\]!40p\"3\"!#97$
$\"1++Dcp@[AF-$!1)>MF'eB(=\"Fjt7$$\"1++]2'HKH#F-$!1_>m<*4,J\"Fjt7$$\"1
nmmwanLBF-$!1a!3#fJlD9Fjt7$$\"1+++v+'oP#F-$!17@OI]Sa:Fjt7$$\"1LLeR<*fT
#F-$!13Y?Rk(en\"Fjt7$$\"1+++&)HxeCF-$!1+\"[$pO)Q\"=Fjt7$$\"1mm\"H!o-*
\\#F-$!1NJ+t!o'[>Fjt7$$\"1++DTO5TDF-$!1jBlhng%4#Fjt7$$\"1nmmT9C#e#F-$!
1(4.n#y>UAFjt7$$\"1++D1*3`i#F-$!1Aq\\E#)z,CFjt7$$\"1LLL$*zymEF-$!1Fo<b
HHgDFjt7$$\"1LL$3N1#4FF-$!1YBN6i0FFFjt7$$\"1nm\"HYt7v#F-$!1ujRY$4p*GFj
t7$$\"1+++q(G**y#F-$!1'*\\9w$4n0$Fjt7$$\"1mm;9@BMGF-$!1ShosO'RC$Fjt7$$
\"1LLL`v&Q(GF-$!1\"*[vB*y[T$Fjt7$$\"1++DOl5;HF-$!1K>LC)R.g$Fjt7$$\"1++
v.UacHF-$!1#e%poJh!y$Fjt7$$\"\"$F*$!1(RH)oh!p(RFjt-%'COLOURG6&%$RGBG$
\"#5!\"\"F*F*-%+AXESLABELSG6$%\"xG%!G-%%VIEWG6$;F(Ffz%(DEFAULTG" 2 
784 784 784 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 -16431 -13068 0 0 0 0 0 0 }}{PARA 
13 "" 1 "" {INLPLOT "6%-%'CURVESG6$7W7$$\"\"\"\"\"!$!1p`r[6U\\\"*!#:7$
$\"1LLL3VfV5F-$!1'Rj$)Rfa\")*F-7$$\"1nm\"H[D:3\"F-$!1791bhET5!#97$$\"1
LL$e0$=C6F-$!16M&*>,L56F87$$\"1LL$3RBr;\"F-$!1_mdJ[!==\"F87$$\"1nm\"zj
f)47F-$!1lMtWpya7F87$$\"1LLe4;[\\7F-$!1PJu'z(*RK\"F87$$\"1++Dmy]!H\"F-
$!1K0r\"=<rR\"F87$$\"1LLezs$HL\"F-$!1Ct5!ReTZ\"F87$$\"1++D@1Bv8F-$!1Iq
![zJAb\"F87$$\"1nmm@Xt=9F-$!1.[$z&RoL;F87$$\"1LL$3y_qX\"F-$!1NN)40=iq
\"F87$$\"1+++l+>+:F-$!1>waH*[&)y\"F87$$\"1+++vW]V:F-$!1onez!*or=F87$$
\"1+++NfC&e\"F-$!1')fn3G*>&>F87$$\"1LLez6:B;F-$!1uEC2s$[-#F87$$\"1nmm
\"=C#o;F-$!1\"4*)[7Q56#F87$$\"1nmmEpS1<F-$!1M(z`l?M=#F87$$\"1++DOD#3v
\"F-$!1'Q8H`/lE#F87$$\"1mmmwy8!z\"F-$!1UE6NFqQBF87$$\"1++DOIFL=F-$!1up
&e/YgT#F87$$\"1++v3zMu=F-$!1oQ;%oau[#F87$$\"1nm;H_?<>F-$!1/%)z0)\\\"fD
F87$$\"1nm\"zihl&>F-$!1s(H5;5?i#F87$$\"1LL$3#G,**>F-$!17G'=!)*4'o#F87$
$\"1LLezw5V?F-$!1(*>pC/)zu#F87$$\"1++v$Q#\\\"3#F-$!1&\\e)*eDuz#F87$$\"
1LL$e\"*[H7#F-$!1gC9;FiXGF87$$\"1+++qvxl@F-$!1^Z?Jg2*)GF87$$\"1++]_qn2
AF-$!1g7G.ukCHF87$$\"1++Dcp@[AF-$!1\\l()o#R=&HF87$$\"1++]2'HKH#F-$!1KV
LdJ&G(HF87$$\"1nmmwanLBF-$!1g6C.Zq#)HF87$$\"1+++v+'oP#F-$!1FTE<L!H)HF8
7$$\"1LLeR<*fT#F-$!1:J5bI4tHF87$$\"1+++&)HxeCF-$!1r&\\_G#f]HF87$$\"1mm
\"H!o-*\\#F-$!18Ajj2J<HF87$$\"1++DTO5TDF-$!1\\pjvN+pGF87$$\"1nmmT9C#e#
F-$!1Nyf+%Qu!GF87$$\"1++D1*3`i#F-$!1`>\\aEqEFF87$$\"1LLL$*zymEF-$!1k$G
p')4@j#F87$$\"1LL$3N1#4FF-$!1*e%H&fSr^#F87$$\"1nm\"HYt7v#F-$!1VzXU(RPQ
#F87$$\"1+++q(G**y#F-$!1u'ztX1JC#F87$$\"1mm;9@BMGF-$!1p#z^q&Rf?F87$$\"
1++vL[/aGF-$!1<jiUa3p>F87$$\"1LLL`v&Q(GF-$!1.&G,\"zat=F87$$\"1n;zW?)\\
*GF-$!1vu)pMvdw\"F87$$\"1++DOl5;HF-$!1*p*=pBu^;F87$$\"1+++q`KOHF-$!1<K
'oC\"eO:F87$$\"1++v.UacHF-$!1i&>p'eQ:9F87$$\"1+](=5s#yHF-$!1Tzif#\\#y7
F87$$\"\"$F*$!1-[*HX)yL6F8-%'COLOURG6&%$RGBG$\"#5!\"\"F*F*-%+AXESLABEL
SG6$%\"xG%!G-%%VIEWG6$;F(Fi[l%(DEFAULTG" 2 784 784 784 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 31271 21491 0 0 0 0 0 0 }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#z
zG-%$sinG6#%\"xG" }}{PARA 13 "" 1 "" {INLPLOT "6%-%'CURVESG6$7[r7$$!\"
'\"\"!$\"1f#*)>)\\:%z#!#;7$$!1+++vq@pe!#:$\"1o'[PGbC-%F-7$$!1+++]TVQdF
1$\"1j#*o@G0#=&F-7$$!1++DE1kCcF1$\"1H)GM7l'>hF-7$$!1++]-r%3^&F1$\"1N>I
i&>\"ypF-7$$!1+++l;!\\D&F1$\"1.L?N69k&)F-7$$!1+++g13E^F1$\"1&eduQIk:*F
-7$$!1+++b'fs*\\F1$\"1+lFa+)pf*F-7$$!1**\\P%GbJ$\\F1$\"1Z)=eK*Hd(*F-7$
$!1++v840p[F1$\"1gm**pf`x)*F-7$$!1+]7Vl%\\![F1$\"1![!4fg>d**F-7$$!1++]
s@%3u%F1$\"1W#zBN_f***F-7$$!1,+v$pD6r%F1$\"0XN0-#******F17$$!1+++:#49o
%F1$\"1))zYa;?&***F-7$$!1++DOFp^YF1$\"1^)*3%[&e\")**F-7$$!1++]di(>i%F1
$\"1#oND`b\"f**F-7$$!1++++LaiXF1$\"12](RFTz))*F-7$$!1++]U.6.XF1$\"1-t>
`.\"=y*F-7$$!1++]s:.!Q%F1$\"1/X#*Q\"eFX*F-7$$!1++]-G&pD%F1$\"1#3Y**e#p
!)*)F-7$$!1++]AjP-SF1$\"1Z/$4DONe(F-7$$!1++](H'\\vQF1$\"1B-:@Wt(p'F-7$
$!1++]sih[PF1$\"1>*=PT`Uq&F-7$$!1++DrX5=OF1$\"1y)QKhCoe%F-7$$!1+++qGf(
[$F1$\"1:EIqyP\"R$F-7$$!1++]#4QEP$F1$\"1e^,vI&**G#F-7$$!1+++:LodKF1$\"
1#*>(Gx+$e6F-7$$!1++]i9FGJF1$!1f)))4rz?L\"!#<7$$!1+++5'f))*HF1$!1y$ef$
*)[A9F-7$$!1+++!Q;*oGF1$!1t#H)Hz4$p#F-7$$!1+++]J(*QFF1$!1y9vgsH=RF-7$$
!1+++q([Ph#F1$!1w!=4b=n.&F-7$$!1+++!RC&)[#F1$!1Ty`\"[hi2'F-7$$!1++Dc'3
[P#F1$!1hXP+%G#QpF-7$$!1++]AH4hAF1$!1Uh#)o=d5xF-7$$!1+++5\\l!*>F1$!1I<
e`fYJ\"*F-7$$!1+++vm5w=F1$!1p#f=6Pv`*F-7$$!1+++S%e:w\"F1$!1XI\"4=+'=)*
F-7$$!1+]iD]$\\p\"F1$!1Q)Ro\"o/B**F-7$$!1++D6;JG;F1$!1wgJ>XY$)**F-7$$!
1+D1/***\\f\"F1$!1,\\Ax52(***F-7$$!1+](o>)oh:F1$!1=Vr7_e****F-7$$!1+vo
*[w$G:F1$!1()>=OT+\"***F-7$$!1++]#yk]\\\"F1$!1!>4*otLr**F-7$$!1++Dh(=r
P\"F1$!1-)G<bII\")*F-7$$!1+++SF<f7F1$!1s\"ztDq$=&*F-7$$!1++DhswH6F1$!1
Zb9Y'GJ/*F-7$$!1++]#yh.+\"F1$!1q(Rl,kmT)F-7$$!1(*****\\;Pr()F-$!1>kwVm
6*o(F-7$$!1(****\\ZD\"RvF-$!1i?3HI'\\%oF-7$$!1(***\\ieS`iF-$!1b`()=Wt`
eF-7$$!1'*****\\ion\\F-$!1%H:;Usew%F-7$$!1'***\\(G%*py$F-$!1lGC:O7(p$F
-7$$!1'****\\K-jg#F-$!1VVo6b*od#F-7$$!1****\\PlwK8F-$!1f.)*eW#)G8F-7$$
!16,++]2Bf!#=$!1iV.n./BfF[]l7$$\"1****\\7]hj7F-$\"1B>yd\\Dg7F-7$$\"1**
***\\xgke#F-$\"1hzG&**=xb#F-7$$\"1********=+QPF-$\"1RPrL$e:l$F-7$$\"1)
****\\-V&*)[F-$\"1.:kx(Hqp%F-7$$\"1++]()*QK8'F-$\"1!G?]<()ev&F-7$$\"1.
++]\\$pP(F-$\"1$p>7QGes'F-7$$\"1*****\\d%zh')F-$\"1x(e^x(f=wF-7$$\"1'*
*****>am%**F-$\"17:\\%RndQ)F-7$$\"1++]nQO?6F1$\"1x2pK\"*e-!*F-7$$\"1++
+:B1Y7F1$\"1Rih_iNx%*F-7$$\"1++DE?on8F1$\"1g%>25JWz*F-7$$\"1++]P<I*[\"
F1$\"1@xuL:\"o'**F-7$$\"1+v$fAhI_\"F1$\"1\\G)R'*3'))**F-7$$\"1+]P92#ob
\"F1$\"1mF=FM-****F-7$$\"1+D\"G?!e!f\"F1$\"1b\"z]0V!)***F-7$$\"1++D\"p
RVi\"F1$\"1))*)*['*oc)**F-7$$\"1+]7o'e=p\"F1$\"1RuD/!4o#**F-7$$\"1+++X
wPf<F1$\"14J%[x6F#)*F-7$$\"1****\\__r!)=F1$\"1Vnp\"*HeB&*F-7$$\"1*****
*fG0-?F1$\"1LON-AT%3*F-7$$\"1+++]/;hAF1$\"15<:f=95xF-7$$\"1++vVabyBF1$
\"1w+lKu>6pF-7$$\"1****\\P/&f\\#F1$\"1Z&oA4:r,'F-7$$\"1++vtTHCEF1$\"1'
H\">l*Q`%\\F-7$$\"1,++5zj_FF1$\"1r.'[S9Az$F-7$$\"1++vj$*RtGF1$\"1J3Lwu
*)\\EF-7$$\"1****\\<3;%*HF1$\"1rMgiJ)*o9F-7$$\"1++]K8R?JF1$\"1>js!Gt*>
@F`t7$$\"1++]Z=iYKF1$!1Rz5>?O[5F-7$$\"1++v[_.qLF1$!1,Y6\\&3YE#F-7$$\"1
******\\'[M\\$F1$!1AiV#)oSYMF-7$$\"1***\\P/^Ei$F1$!1S^CMq<FYF-7$$\"1**
**\\PM&=v$F1$!1!*GL;>\"3t&F-7$$\"1++v)p!HwQF1$!1-/%oDJOq'F-7$$\"1,++gz
s+SF1$!1ne^67ysvF-7$$\"1+++0\"Q_D%F1$!1#p\"QCs8t*)F-7$$\"1++DT%R9Q%F1$
!1?O]bAMd%*F-7$$\"1,+]x2k2XF1$!1:\\06@7\"z*F-7$$\"1,]7QPilXF1$!1OBs,I
\\#*)*F-7$$\"1,+v)p1Oi%F1$!1\\vE8Whg**F-7$$\"1,D1z\")f_YF1$!1qJ$[iI@)*
*F-7$$\"1,]Pf'*e\"o%F1$!1iv/%Qd_***F-7$$\"1+voR6e5ZF1$!0_k&eO)*****F17
$$\"1,++?EdRZF1$!140?waI'***F-7$$\"1,+DOw-1[F1$!1!)*\\^.\">c**F-7$$\"1
++]_E[s[F1$!1?.r`N7s)*F-7$$\"1++vow$*Q\\F1$!1_c*)fTZW(*F-7$$\"1+++&o#R
0]F1$!1(3a.Q1Qd*F-7$$\"1++]-!pU7&F1$!1r]K\"3)pj\"*F-7$$\"1+++?`9V_F1$!
1\")=u)oWUi)F-7$$\"1++]<#Rm\\&F1$!1K9x:-=zqF-7$$\"1+++?A&zh&F1$!1B9yh`
UshF-7$$\"1++]A_ERdF1$!16!yKBV\\<&F-7$$\"1++D6EjpeF1$!1;w$*p0l=SF-7$$
\"\"'F*$!1f#*)>)\\:%z#F--%'COLOURG6&%$RGBG$\"#5!\"\"F*F*-%+AXESLABELSG
6$%\"xG%!G-%%VIEWG6$;F(F]^m%(DEFAULTG" 2 784 784 784 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 -16417 21603 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "r := 2 + (1 / (17 \+
- (1 / (340 - (1 / (8.5 + (1 / 51)))))));" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"rG$\"+7P$)e?!\"*" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 0 "" }}}}{MARK "5 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }