{VERSION 5 0 "SUN SPARC SOLARIS" "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 "" 0 1 0 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 3 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 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "M aple Output" 0 11 1 {CSTYLE "" -1 -1 "" 0 1 0 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 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 0 }3 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "restart;\nread(\"/ho me/mat331/Worksheets/lsq_data.txt\");" }}{PARA 6 "" 1 "" {TEXT -1 82 " defined line_pts(), bad_line_pts(), quadratic_pts(), cubic_pts(), and \+ circle_pts()" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 56 "data:=bad_l ine_pts():\nplot(data,style=point,symbol=box);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6'-%'CURVESG6$7T7$$\"3?++++s,$H$!#= $!3=+++!Qc//$!#<7$$\"3y******\\ORxuF-$\"3#*******pl*p#yF*7$$!3;+++7l.* >%F-$!3#******48$QSpF-7$$\"36+++5RD2HF-$!3%*******[eaM=F-7$$!3++++C@1< LF-$!3n******p6zPkF-7$$\"3!*******RS9a#*F-$\"39+++v8eQ?F-7$$\"3Q+++Iy' )RgF-$\"3N*****pO!on)*!#>7$$!30+++!)>2j5F*$!38+++1ER$)QF-7$$\"3N+++!e? ^5'F-$!3\"*******=#f::#F*7$$\"3G++++JD4tF-$\"3a+++Fb(R>(F*7$$\"3()**** ***)*yWl#F-$!3#)*****p='\\!\\;F-$!3%******f\"4UHJF-7$$!3?+++oogveF-$!3-+++5I)e\\ )F-7$$\"3'********\\]&*>\"F-$!3A+++iwzWJF-7$$\"3x******R&z'fHF-$!3()** ***f$*pAe#F-7$$!3/+++)fPx(fF-$!3<+++bUZl%)F-7$$\"31+++SC8*p$F-$!3'**** **z\\:J4\"F-7$$\"3')******f3J%>&F-$!35+++!HT1[&F*7$$\"3X+++?3u*G(F-$\" 3M+++zh&=Q\"zF-$\"3&*******eJ;26F-7$$!3$******R#Gs 'G&F-$!3=+++\"R>Hl(F-7$$\"3:+++]d\\HDF-$!3*)*****fSx)pEF-7$$\"37+++])f &4')F-$\"30+++;VB<9F-7$$\"3.++++9>,9F*$!3d******=L**GSF-7$$!3@+++S\"\\ f'fF-$!3\\+++mJ1,$*F-7$$!35+++1FK(H(F-$!3m+++/*3!R\"*F-7$$!3x*****>+$[ x^F-$!3!*******QI5[vF-7$$\"3#)*******=)*4/*F-$\"3&)*****HI_]a#F-7$$\"3 1+++S'H(G>F-$!30+++!HV x)HF-7$$!3-+++]j.$*eF-$!3f*****\\%3m&3*F-7$$\"3%)*******eQaH'F-$\"3#** ****H[IW7#F*7$$!3b*****Hu@!f)*F-$!32+++_6)y9\"Fdu7$$\"3S+++q6vd]F-$!33 +++].f-;FL7$$!39+++omI!G$F-$!3?+++To5]pF-7$$!3E+++W3(G+%F-$!3>+++sJr%) pF-7$$\"3&*******Rw#[=)F-$\"3'******R'Rn%)>F-7$$!38+++1'Q/E$F-$!33+++c ?]ArF-7$$!3y******p[\"e(pF-$!3G*****Ht.+W*F-7$$!3i*****fbSGf(F-$!35+++ &)3+G>F-7$$!3Q*****p:;gn)F-$!3,+++doEmIF-7$$!3,+++?7kSrF-$!3()*****4Sc @?%F-7$$!3++++%eSnj'F-$!37+++K,pBYF-7$$\"3,+++w/DhuF-$!3\"******\\MsZ, #F-7$$\"3N+++/!f#RcF-$!3a*****4,&47!*F-7$$\"3%)******4#RVS)F-$!3j***** \\#\\-#!#:-%'COLOURG6&%$RGBG$\"#5!\" \"$F][lF][lFh[l-%+AXESLABELSG6$Q!6\"F\\\\l-%&STYLEG6#%&POINTG-%'SYMBOL G6#%$BOXG-%%VIEWG6$%(DEFAULTGFi\\l" 1 5 3 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "vdist:=(m,b,pt) -> (m*pt[1] +b - pt[2]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&vdistGf*6%%\"mG%\"bG%#ptG6\"6$%)operatorG%&a rrowGF*,(*&9$\"\"\"&9&6#F1F1F19%F1&F36#\"\"#!\"\"F*F*F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 61 "E:=(m,b,data) -> sum((vdist(m,b,dat a[i]))^2,i=1..nops(data));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"EGf* 6%%\"mG%\"bG%%dataG6\"6$%)operatorG%&arrowGF*-%$sumG6$*$)-%&vdistG6%9$ 9%&9&6#%\"iG\"\"#\"\"\"/F;;F=-%%nopsG6#F9F*F*F*" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 62 "fit:=solve(\{diff(E(m,b,data),m), diff(E(m,b,d ata),b)\}, \{m,b\});" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$fitG<$/%\"m G$\"+P,_w9!\"*/%\"bG$!+%Rk'Gk!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 85 "plots[display](\n plot(data,style=point,symbol=box), \+ plot(subs(fit,m*x+b),x=-10..10));" }}{PARA 13 "" 1 "" {GLPLOT2D 399 165 165 {PLOTDATA 2 "6&-%'CURVESG6&7T7$$\"3?++++s,$H$!#=$!3=+++!Qc//$! #<7$$\"3y******\\ORxuF-$\"3#*******pl*p#yF*7$$!3;+++7l.*>%F-$!3#****** 48$QSpF-7$$\"36+++5RD2HF-$!3%*******[eaM=F-7$$!3++++C@17$$!30+++!)>2j5F*$!38+++1ER$)QF-7$$\"3N+++!e?^5'F-$!3\"**** ***=#f::#F*7$$\"3G++++JD4tF-$\"3a+++Fb(R>(F*7$$\"3()*******)*yWl#F-$!3 #)*****p=' \\!\\;F-$!3%******f\"4UHJF-7$$!3?+++oogveF-$!3-+++5I)e\\)F-7$$\"3'**** ****\\]&*>\"F-$!3A+++iwzWJF-7$$\"3x******R&z'fHF-$!3()*****f$*pAe#F-7$ $!3/+++)fPx(fF-$!3<+++bUZl%)F-7$$\"31+++SC8*p$F-$!3'******z\\:J4\"F-7$ $\"3')******f3J%>&F-$!35+++!HT1[&F*7$$\"3X+++?3u*G(F-$\"3M+++zh&=Q\"zF-$\"3&*******eJ;26F-7$$!3$******R#Gs'G&F-$!3=+++\" R>Hl(F-7$$\"3:+++]d\\HDF-$!3*)*****fSx)pEF-7$$\"37+++])f&4')F-$\"30+++ ;VB<9F-7$$\"3.++++9>,9F*$!3d******=L**GSF-7$$!3@+++S\"\\f'fF-$!3\\+++m J1,$*F-7$$!35+++1FK(H(F-$!3m+++/*3!R\"*F-7$$!3x*****>+$[x^F-$!3!****** *QI5[vF-7$$\"3#)*******=)*4/*F-$\"3&)*****HI_]a#F-7$$\"31+++S'H(G>F-$!30+++!HVx)HF-7$$!3-+++ ]j.$*eF-$!3f*****\\%3m&3*F-7$$\"3%)*******eQaH'F-$\"3#******H[IW7#F*7$ $!3b*****Hu@!f)*F-$!32+++_6)y9\"Fdu7$$\"3S+++q6vd]F-$!33+++].f-;FL7$$! 39+++omI!G$F-$!3?+++To5]pF-7$$!3E+++W3(G+%F-$!3>+++sJr%)pF-7$$\"3&**** ***Rw#[=)F-$\"3'******R'Rn%)>F-7$$!38+++1'Q/E$F-$!33+++c?]ArF-7$$!3y** ****p[\"e(pF-$!3G*****Ht.+W*F-7$$!3i*****fbSGf(F-$!35+++&)3+G>F-7$$!3Q *****p:;gn)F-$!3,+++doEmIF-7$$!3,+++?7kSrF-$!3()*****4Sc@?%F-7$$!3++++ %eSnj'F-$!37+++K,pBYF-7$$\"3,+++w/DhuF-$!3\"******\\MsZ,#F-7$$\"3N+++/ !f#RcF-$!3a*****4,&47!*F-7$$\"3%)******4#RVS)F-$!3j*****\\#\\-#!#:-%'COLOURG6&%$RGBG$\"#5!\"\"$F][lF][lFh[l -%&STYLEG6#%&POINTG-%'SYMBOLG6#%$BOXG-F$6$7S7$$!#5F][l$!3.++%4y13a\"Fd u7$$!3!pmmm\"p0k&*F-$!3jYs#o!*QkZ\"Fdu7$$!3uKL$3s%HaF-$!3xctnj9ff')F-7$$!3]******\\$*4)*\\F-$!3!)4;Sw2mA!)F- 7$$!3o******\\_&\\c%F-$!3)*o)G0z9JQ(F-7$$!3$)******\\1aZTF-$!30p5:GPzm nF-7$$!3Imm;/#)[oPF-$!3I]!**)e^62iF-7$$!3%HLLL=exJ$F-$!3s.#)y1KgTbF-7$ $!3lKLLL2$f$HF-$!3bUQ+)GFy(\\F-7$$!3%)****\\PYx\"\\#F-$!3+DY`o=-AVF-7$ $!3gLLLL7i)4#F-$!3wUCN]H_TPF-7$$!3n)***\\P'psm\"F-$!3gQu(HjBY5$F-7$$!3 ?****\\74_c7F-$!3%Q'yEp[9)\\#F-7$$!3L:LL$3x%z#)F*$!3pmr8.zMl=F-7$$!3') HLL3s$QM%F*$!3e-aR]FC%G\"F-7$$!3\\^omm;zr)*!#?$!3#R-TeQBWd'F*7$$\"3eVL Lezw5VF*$!3rRSke(pGP'F_dl7$$\"3-.++v$Q#\\\")F*$\"3[i1!z;]Qg&F*7$$\"3% \\LL$e\"*[H7F-$\"3Y]B5h!*\\s6F-7$$\"3=++++dxd;F-$\"3,r#zUws[!=F-7$$\"3 e+++D0xw?F-$\"3yi0pgq_BCF-7$$\"34,+]i&p@[#F-$\"3%=tzI!p5AIF-7$$\"3++++ vgHKHF-$\"3TiN)HwFno$F-7$$\"3ElmmmZvOLF-$\"3GoS\"e;>RG%F-7$$\"3%4+++v+ 'oPF-$\"3]/$)Gc%[:#\\F-7$$\"3UKL$eR<*fTF-$\"3q:X!QON$*\\&F-7$$\"3K-++] )Hxe%F-$\"3#Q*4Cn!458'F-7$$\"3!fmm\"H!o-*\\F-$\"3U')=p%zk`s'F-7$$\"3X, +]7k.6aF-$\"3G\"\\'p&yPmM(F-7$$\"3#emmmT9C#eF-$\"3WTuw#pXS&zF-7$$\"32* ***\\i!*3`iF-$\"3A+d$)za%**e)F-7$$\"3;NLLL*zym'F-$\"3.')[E`DR-#*F-7$$ \"3'eLL$3N1#4(F-$\"39Pq`V\"3(G)*F-7$$\"3,pm;HYt7vF-$\"3\\\"=]Cv$)\\/\" Fdu7$$\"37-+++xG**yF-$\"3yT1w\"4f?5\"Fdu7$$\"3gpmmT6KU$)F-$\"3tm\"f:(Q Zn6Fdu7$$\"3qNLLLbdQ()F-$\"3U=iUI;)fA\"Fdu7$$\"3Z++]i`1h\"*F-$\"3ZX/Z/ JO)G\"Fdu7$$\"3@-+]P?Wl&*F-$\"3?1v#[8q![8Fdu7$$Ff[lF][l$\"3#****fI\\LA T\"FduFa[l-%+AXESLABELSG6%Q!6\"F\\\\m-%%FONTG6#%(DEFAULTG-%%VIEWG6$;Fe \\lFf[mFa\\m" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 43.000000 0 0 "Curve 1" "Curve 2" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "plot ( ln(1+e^2/2), e=-5..5);" }}{PARA 13 "" 1 "" {GLPLOT2D 616 118 118 {PLOTDATA 2 "6%-%'CURVESG6$7en7$$!\"&\"\"!$\"3t$QWao*o-E!#<7$$!3XLLLe% G?y%F-$\"3k!*)*efkU?DF-7$$!3OmmT&esBf%F-$\"3v&*>+/vCYCF-7$$!3@LL$3s%3z VF-$\"3K#pZ.PR(fBF-7$$!3^LL$e/$QkTF-$\"3h!3))3f_PF-$\"3\\7B3=,b%3#F-7$$!3K++vo1YZNF-$\"3A \\#>od5o)>F-7$$!3;LL3-OJNLF-$\"3@+n2v&>8)=F-7$$!3o***\\P*o%Q7$F-$\"3N* [T%\\BUr7$$! 3Hhm\"HdGe:$Fhp$\"3W/mXo;hf[Fgr7$$!3$\\mmTg=><#Fhp$\"3Xp(y-mH7L#Fgr7$$ !3EK$3Fpy7k\"Fhp$\"3!yM#fQy!zL\"Fgr7$$!3g***\\7yQ16\"Fhp$\"3%pRQov]'[h !#?7$$!3Epm\"zp))**z&Fgr$\"3GkD+y/e!o\"F\\t7$$!3uDMLLe*e$\\F\\t$\"3%z, ZW'f9=7!#A7$$\"3bsmTgxE=]Fgr$\"3'po/0]e$e7F\\t7$$\"3womT5D,`5Fhp$\"3sq K\"zNk)GbF\\t7$$\"3Gq;zW#)>/;Fhp$\"3Lfbx>!=&y7Fgr7$$\"3zrm;zRQb@Fhp$\" 3_5$)QVFF'H#Fgr7$$\"3mOLL$e,]6$Fhp$\"3#yxI$R(*fPZFgr7$$\"3^,+](=>Y2%Fh p$\"3$>*y@L4muzFgr7$$\"3rumm\"zXu9'Fhp$\"3Y)GFaZ^2t\"Fhp7$$\"3#4+++]y) )G)Fhp$\"34mM\\Ik)H&HFhp7$$\"3H++]i_QQ5F-$\"3?TmB)3@@J%Fhp7$$\"3a++D\" y%3T7F-$\"3(*zbc#p=1r&Fhp7$$\"3+++]P![hY\"F-$\"3/c-w*pB')H(Fhp7$$\"3iK LL$Qx$o;F-$\"3)f&>u6y@?()Fhp7$$\"3Y+++v.I%)=F-$\"3B/u4qmv?5F-7$$\"3?mm \"zpe*z?F-$\"3%e3cY,d::\"F-7$$\"3;,++D\\'QH#F-$\"3&3KW_z#[*G\"F-7$$\"3 %HL$e9S8&\\#F-$\"3Z>z7fa699F-7$$\"3s++D1#=bq#F-$\"3Su\\/vq**Q:F-7$$\"3 \"HLL$3s?6HF-$\"3,vfS[k&el\"F-7$$\"3a***\\7`Wl7$F-$\"3`G(*>)HbGx\"F-7$ $\"3enmmm*RRL$F-$\"3)>z#p/8i!)=F-7$$\"3$zmmTvJga$F-$\"3%f%e2]`6')>F-7$ $\"3]MLe9tOcPF-$\"3(GJEIN6j3#F-7$$\"31,++]Qk\\RF-$\"3(>*H?6Rtu@F-7$$\" 3zML$3dg6<%F-$\"3\\7[78F0sAF-7$$\"3%ymmmw(GpVF-$\"3d$Q&)p%QobBF-7$$\"3 B++D\"oK0e%F-$\"3epxUvF`TCF-7$$\"35,+v=5s#y%F-$\"35))pU*z#p?DF-7$$\"\" &F*F+-%'COLOURG6&%$RGBG$\"#5!\"\"$F*F*Fi]l-%+AXESLABELSG6$Q\"e6\"Q!F^^ l-%%VIEWG6$;F(F`]l%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "loggy:= x -> ln(1+x^2/2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&loggyGf*6#%\"xG6\"6$%)operatorG%&arrowGF(-%#lnG6#,& \"\"\"F0*&#F0\"\"#F0)9$F3F0F0F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 66 "R:=(m,b,data) -> sum(loggy(vdist(m,b,data[i])),i=1..n ops(data));\n\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"RGf*6%%\"mG%\"b G%%dataG6\"6$%)operatorG%&arrowGF*-%$sumG6$-%&loggyG6#-%&vdistG6%9$9%& 9&6#%\"iG/F<;\"\"\"-%%nopsG6#F:F*F*F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "diff(R(m,b,data),m);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#,`q*&,(%\"mG$\"+UxysM!\")*&$\"+]j.$*e!\"*\"\"\"%\"bGF.!\"\"$\"+gH@a `F)F0F.,&F.F.*&#F.\"\"#F.),(F&$!+]j.$*eF-F/F.$\"+X3m&3*F-F.F6F.F.F0F.* &,(F&$\"+/ZDjRF)*&$\"+!fQaH'F-F.F/F.F.$\"+k@UP8F-F0F.,&F.F.*&F5F.),(F& $\"*fQaH'F)F/F.$\"+$[IW7#!#5F0F6F.F.F0F.*&,(F&$\"+v4.?(*F)*&$\"+X<-f)* F-F.F/F.F0$\"+C&)pJ6!\"(F0F.,&F.F.*&F5F.),(F&$!+V<-f)*F-F/F.$\"+_6)y9 \"F)F.F6F.F.F0F.*&,(F&$\"+!p%3eDF)*&$\"+q6vd]F-F.F/F.F.$\"+?K]0\")!#6F .F.,&F.F.*&F5F.),(F&$\"*<^x0&F)F/F.$\"*N!f-;FNF.F6F.F.F0F.*&,(F&$\"+*f 9Vo$F-*&$\"+]oX>>F-F.F/F.F.$\"+DV%[t&F-F.F.,&F.F.*&F5F.),(F&$\"*&oX>>F )F/F.$\"+!HVx)HF-F.F6F.F.F0F.*&,(F&$\"+RtLj>Fdo*&$\"++9>,9FNF.F/F.F.$ \"+!z!RXcFNF.F.,&F.F.*&F5F.),(F&$\")9>,9F)F/F.$\"+>L**GSF-F.F6F.F.F0F. *&,(F&$\"+9\\DfNF)*&$\"+S\"\\f'fF-F.F/F.F0$\"+!)p'*[bF)F0F.,&F.F.*&F5F .),(F&$!+S\"\\f'fF-F/F.$\"+mJ1,$*F-F.F6F.F.F0F.*&,(F&$\"+q=4D`F)*&$\"+ 0FK(H(F-F.F/F.F0$\"+?(H!pmF)F0F.,&F.F.*&F5F.),(F&$!+1FK(H(F-F/F.$\"+/* 3!R\"*F-F.F6F.F.F0F.*&,(F&$\"+CIj!o#F)*&$\"++I[x^F-F.F/F.F0$\"+=v,3RF) F0F.,&F.F.*&F5F.),(F&$!+-I[x^F-F/F.$\"+RI5[vF-F.F6F.F.F0F.*&,(F&$\"+D[ 'R<)F)*&$\"+!>)*4/*F-F.F/F.F.$\"+E8)4I#F)F0F.,&F.F.*&F5F.),(F&$\"*>)*4 /*F)F/F.$\"+.B0XDF-F0F6F.F.F0F.*&,(F&$\"+Jl3)p#F)*&$\"+g3J%>&F-F.F/F.F .$\"+da\"o%GF-F.F.,&F.F.*&F5F.),(F&$\"*'3J%>&F)F/F.$\"+!HT1[&FNF.F6F.F .F0F.*&,(F&$\"+?@.9`F)*&$\"+?3u*G(F-F.F/F.F.$\"+&H7H-'F-F0F.,&F.F.*&F5 F.),(F&$\"*#3u*G(F)F/F.$\"+zhHl(F-F.F6F.F.F0F.*&,( F&$\"+]([$)R'F-*&$\"+]d\\HDF-F.F/F.F.$\"+]NW`nF-F.F.,&F.F.*&F5F.),(F&$ \"*v&\\HDF)F/F.$\"+1u()pEF-F.F6F.F.F0F.*&,(F&$\"+!3_CT(F)*&$\"+])f&4') F-F.F/F.F.$\"+njF-F.F6F.F.F0F.*&,(F&$\"+NcKFvF)*&$\"+bh,w')F-F.F/F.F0$\"+ z!)HgEF)F0F.,&F.F.*&F5F.),(F&$!+dh,w')F-F/F.$\"+doEmIF-F.F6F.F.F0F.*&, (F&$\"+0d())4&F)*&$\"+?7kSrF-F.F/F.F0$\"+@\"41+$F)F0F.,&F.F.*&F5F.),(F &$!+?7kSrF-F/F.$\"+,k:-UF-F.F6F.F.F0F.*&,(F&$\"+eDj/WF)*&$\"+&eSnj'F-F .F/F.F0$\"+&>B'oIF)F0F.,&F.F.*&F5F.),(F&$!+%eSnj'F-F/F.$\"+K,pBYF-F.F6 F.F.F0F.*&,(F&$\"+le-nbF)*&$\"+v/DhuF-F.F/F.F.$\"+7@F.:F)F.F.,&F.F.*&F 5F.),(F&$\"+w/DhuF-F/F.$\"+XBx9?F-F.F6F.F.F0F.*&,(F&$\"+6U7!=$F)*&$\"+ 0!f#RcF-F.F/F.F.$\"+&z`@3&F)F.F.,&F.F.*&F5F.),(F&$\"+/!f#RcF-F/F.$\"+6 ]47!*F-F.F6F.F.F0F.*&,(F&$\"+bF-F0F6F.F.F0F.*&,(F& $\"+!*f/j5F)*&$\"+1'Q/E$F-F.F/F.F0$\"+n![AK#F)F0F.,&F.F.*&F5F.),(F&$!+ 1'Q/E$F-F/F.$\"+c?]ArF-F.F6F.F.F0F.*&,(F&$\"+5$*>m[F)*&$\"+q[\"e(pF-F. F/F.F0$\"+S=<&e'F)F0F.,&F.F.*&F5F.),(F&$!+q[\"e(pF-F/F.$\"+LP+S%*F-F.F 6F.F.F0F.*&,(F&$\"+p$)4w>Fdo*&$\"+gwt09FNF.F/F.F0$\"+?W\"=U'FNF0F.,&F. F.*&F5F.),(F&$!*mPdS\"F-F/F.$\"+czGoXF-F.F6F.F.F0F.*&,(F&$\"+GiR%3\"FN *&$\"++s,$H$FNF.F/F.F.$\"+;vA,5F-F.F.,&F.F.*&F5F.),(F&$\")s,$H$F)F/F.$ \"+!Qc//$F-F.F6F.F.F0F.*&,(F&$\"+!eT6f&F)*&$\"+]ORxuF-F.F/F.F.$\"+XMb_ eF-F0F.,&F.F.*&F5F.),(F&$\"*l$RxuF)F/F.$\"+ql*p#yFNF0F6F.F.F0F.*&,(F&$ \"+j2>j%F-F.F/F.F0$\"+%F-F/F.$\"+JJQSpF-F.F6F.F.F0F.*&,(F&$\"+&HD@X)F-*&$\"+5RD2HF-F.F/F.F .$\"+&f!\\L`F-F.F.,&F.F.*&F5F.),(F&$\"*\"RD2HF)F/F.$\"+\\eaM=F-F.F6F.F .F0F.*&,(F&\"#\")*&\"\"*F.F/F.F.$\"+)fS(>=!\"'F0F.,&F.F.*&F5F.),(F&F_b mF/F.$\"+)*R$>-#FXF0F6F.F.F0F.*&,(F&$\"+S.+[OF)*&$\"+Iy')RgF-F.F/F.F.$ \"+?&[*ffFNF0F.,&F.F.*&F5F.),(F&$\"*$y')RgF)F/F.$\"+n.on)*FdoF0F6F.F.F 0F.*&,(F&$\"+N?7I6Fdo*&$\"+!)>2j5FNF.F/F.F0$\"+neKGTFNF0F.,&F.F.*&F5F. ),(F&$!*)>2j5F-F/F.$\"+1ER$)QF-F.F6F.F.F0F.*&,(F&$\"+I(\\ss$F)*&$\"+!e ?^5'F-F.F/F.F.$\"+ZGb88F-F.F.,&F.F.*&F5F.),(F&$\"*e?^5'F)F/F.$\"+>#f:: #FNF.F6F.F.F0F.*&,(F&$\"+!4=DM&F)*&$\"++JD4tF-F.F/F.F.$\"+!ze#e_F-F0F. ,&F.F.*&F5F.),(F&$\"*5`#4tF)F/F.$\"+Fb(R>(FNF0F6F.F.F0F.*&,(F&$\"+5(ei /(F-*&$\"+!**yWl#F-F.F/F.F.$\"+vxc%f'F-F.F.,&F.F.*&F5F.),(F&$\"***yWl# F)F/F.$\"+(=FF-*&$ \"+?'\\!\\;F-F.F/F.F.$\"+q.dg^F-F.F.,&F.F.*&F5F.),(F&$\"*i\\!\\;F)F/F. $\"+;4UHJF-F.F6F.F.F0F.*&,(F&$\"+2cF_MF)*&$\"+qogveF-F.F/F.F0$\"+co%=* \\F)F0F.,&F.F.*&F5F.),(F&$!+oogveF-F/F.$\"+5I)e\\)F-F.F6F.F.F0F.*&,(F& $\"+-9#*Q9F-*&$\"++0b*>\"F-F.F/F.F.$\"+3OMsPF-F.F.,&F.F.*&F5F.),(F&$\" *]]&*>\"F)F/F.$\"+iwzWJF-F.F6F.F.F0F.*&,(F&$\"+8,H+6F)*&$\"+C@1=Rc)F)*&$\"+SS9a#*F-F.F/F.F.$\"+oD`')=F)F0F.,&F.F.*&F5 F.),(F&$\"*/WTD*F)F/F.$\"+v8eQ?F-F0F6F.F.F0F.*&,(F&$\"+!)Hqf()F-*&$\"+ S&z'fHF-F.F/F.F.$\"+&\\\"pUwF-F.F.,&F.F.*&F5F.),(F&$\"*az'fHF)F/F.$\"+ O*pAe#F-F.F6F.F.F0F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "plo t3d(R(m,b,data),m=-10..10,b=-5..5,axes=boxed);" }}{PARA 13 "" 1 "" {GLPLOT3D 400 300 300 {PLOTDATA 3 "6%-%%GRIDG6%;$!#5\"\"!$\"#5F);$!\"& F)$\"\"&F)X,%)anythingG6\"6\"[gl'!%\"!!#\\bm\":\":40754AC37832B8F54075 47002DE2E5B8407544DC047B1B2940754329354E5B384075416DD7D9F7AA4075401B21 68E3D0407540080791C32C40754164E29698EB40754368E28F5934407545272A796086 4075463BB1088471407546F0B2C4737C4075482CEC44D63540754AF3A2514C7D40754F 714815E58F407554D1865237F640755A19C81DD8C640755EB1BB5CDB4C4075625985DF 3805407564FFAAD5C72B407566A58B06BBD2407567523E3486F84075670CFA0BC5CE40 7565DAD7971F32407563BE069858C34074D06CA69BCDAE4074CB92BE6CAEED4074C8A6 59EE6D3B4074C681A177FFCF4074C4A74E4F9D914074C386468DA70D4074C3C7F4B7E8 694074C545E8CC8BD04074C7158E04DED54074C87473D7C79C4074C94D44642B3B4074 CA44D1F019D44074CC6658AF8FF54074D03BDAF4D5EB4074D53600611C0A4074DA4E4F AF568D4074DEC731E6A98D4074E24740D398A94074E4B08E4580B64074E5FF07D4E07E 4074E6373473AFCC4074E55EA399256A4074E378E3EB4E4A4074E086853B6FB54074DC 8540726C4F40744BAB62E888154074459F321F5ECA407441CDFA33778D40743F258376 A71A40743D2806FFA8FF40743C350BA2A37B40743CB2CBEBF16F40743E28FEDBEBCC40 743FA746456605407440AC3EEB5DD840744180BCC4E56740744310F503EF164074462B 1820A4F640744A99CF44BC0540744F62267994BC407453A2CC9CCCE2407456E341252A 6F407458F4F86D50AA407459CC29BA504B407459698F8B33DA407457D056623FE24074 55022D23A816407450FE7390636F40744BC3D2C8E539407445557C60F5BF4073BA7417 9C6C614073B318D3E405814073AE4378DE6C144073AB01C3E3EA2D4073A8D7DADC17A5 4073A804CD37D3784073A899F440B7F74073A9DCDE56AEEC4073AAF5F2F112E44073AB BAFDE08DA24073ACD208932AC34073AF26307C85DD4073B2E18F6938C64073B730AE70 8FF54073BB161ECAD36F4073BDF54AA959524073BF89EF8CDAB44073BFBD989897E840 73BE8BAE60B7D24073BBF46DCEFB5A4073B7F862883BBF4073B2994161EA3E4073ABE0 B778D9994073A3F184CE25D840739B2920FE6C2D40731A0ED845E7B9407311462AAFAB 8E40730B49F973A0194073075428FAE229407304EC033461224073041C73BC51B34073 0498371DED114073057C2D19874040730628F494AC55407306D8B926D43D40730862C6 71359E40730B418CE3903340730EE304320C3D4073123C89ABD2F64073148A5DF8CF54 4073156CA2FBCFAD407314BE90F3437940731274D244499F40730E8D9D02E1CB407309 0D6E2F34BE40730206983A60B74072F9AF533A5D934072F0893C5F605F4072E77C6DD2 A5734072DF7C060AF970407266C280F84A7E40725C6BE0D985E740725521573885F640 7250543CA94DFC40724D8E4894FAB640724C92E51D3C4D40724CB7CC2BEB5D40724D12 3D921B2040724D56057012B440724E105A93C4BA40724FE70999C65040725298497473 04407255218B749B974072569878BE67014072567B7805466A40725493A3E14A6C4072 50CF525F1BD140724B31A005206C407243D6D7F29C4240723B0E4E1730E34072318325 3B69F640722837E3FB441240721FE5526BE14D407218350F1D73E440721024DD0D25F8 40719B43E74B22C940718F3B8CD1B191407186737E7FF6934071809E5090E2BC40717D 4538268B0040717BD53FCB9EFD40717B55E13D1CCA40717AF88A32EA7740717ACB1DD4 61C140717B657A972E7C40717CD01CDD22BC40717E27B081D82B40717E614F06383540 717CD4EDB7ADAF40717938249BA1A74071737B889F474D40716BC1FDA0C21440716278 3FA6CE9A40715873EF7EB95740714EBA8AF2652A407145AF4391C8B040713CB5DA4E50 83407133191DDF03C540712904A607115B40711FC4BBF42A064070AFAD5837C8974070 A1CA39644590407097480FFC14CF40709022793C8D3E40708BDD960DD7534070898A7B 13BF5C407087FD22A478A64070869DC163DBEB407085ACAE233BBA40708559A1E9B5A6 407084F0CDB593E740708353A5E43E5B40707FB517105186407079C152E0AFE4407071 8E3AC311D3407067A357A98C1040705CFA3E1741C740705282AA0EBADC407048596946 6F5540703E0FDA2C404A407033E09C7C87EA40702B30E2FAC9BC407025BA1B1EFC3740 702436E68B75774070261BDC89D4DD406F2EDA3FB216FA406F0EF8F43132DB406EF5D3 DD38B077406EE3FF2C586493406ED87025BFBA6E406ED0A002E00D2D406ECA0EB460E7 6D406EC3EDD4830E58406EBE6050A35C2E406EB858AEEC216D406EAF9E2D6056A7406E A27786D8B644406E9086CE2E49DF406E7AE2DF77B2C2406E63AA5F71ED96406E4C9823 6F70D7406E362D21E43A0F406E216CD45F3D48406E113FA416B2A2406E089544C14830 406E07BEE5FF5E77406E0C29C8683FBF406E11B1B0FED9CA406E14AB5A913D73406E13 9F735F5142406C791A9FDF86B2406C548DB92F1790406C362B27A14ACA406C1F28D426 ED26406C0E660F39B2F2406C00DCE1A3B66A406BF40CDACC70FB406BE714F7D6A8CE40 6BD90523E84B34406BC7FAE94499A0406BB2B64541CB5B406B99EC97471284406B7FD4 17AFAF4B406B66A993E41981406B50AC68B09242406B40DAD7ECD062406B3906802705 EF406B378D9E4C35B1406B3837AB8C6891406B37603AFFC36F406B349EE0C04E8E406B 32F9E36044EA406B36D34E58A676406B43CFF332E7D8406B5C65D268D6004068E4D08C FC56234068BA7D4C1A68784068947931A29412406874951B53376F406859A6176081AF 4068406E79EF231E40682685CC1D1AB740680ADB5A3B038E4067ECC9A5BFA4134067CD 19D88C81554067AEDCDEFD45214067969B9034735F4067890E805957EB406788771D32 E013406792B10642A0164067A3DC9F51675B4067BAC409E6ED984067D8C8CB79CE1240 67FE892733342E40682A3A4130C5EA4068584B27021E4340688481F856CF1B4068AB9E 2A457FEE4068CCE46FE05A8F4068EA26469F9706406382BF4413279D4063570C3DC981 7D40632FF063114DF7406310807040734C4062F6CC917282454062DF5967FBE0114062 C9D595B2436E4062B9D4CCC3F53F4062B50FC79FFCCE4062C050A5877CCD4062DC993A 05FECA40630807F271141140633FD01A6D55F540637F88BB1D5B174063C167C322495A 40640015929EE79440643839C3E9061A406468DF4E1AA3D5406491BAF1E8462E4064B2 439927AA8F4064CBAA2B1600C54064E2A5F8D7B2754064FE32D3A7BEB3406523C13BF1 F6BE4065551E826E863A40586AB5D21B37C04057D4B561CD842740574810754E540C40 56D5A0EC0B1E8F40568EAED283618A4056870ABD6BFE4E4056C96EFBD89C0840574C5E 2D5069E74057FA2FDEE7D11D4058BD300FAF040C405988AB93CA04BC405A5E2D4E1CB0 63405B4A6B71105355405C5BD90CD9B816405D9AA02670F6CC405F067FC7CC8BD64060 4BE5FB41A6224061222444D3C7A0406200CB4416AE2F4062E199CD67B3904063BDF0D6 8F9124406490FDF238B5CA406558944D4F3D264066146D3504AE8A4066C52C057293E1 4047C06A8265717B4045A1D0F2BE21164045796FE276C2D64047410CBFA070AC404AAB F8F6C8CA57404F4149606A5CEB405237FE34193CD84054DB107ABEBD3F4057607CBCDF 95524059B5CD6C64A9FA405BD69020711F9F405DC50E5007367E405F86CEE40B57D940 6091D653CCE1F9406152B73CC5BB7F40620ABF036345904062BCDFCA6012DE406369D5 3C494FC840641076E770D3284064AF3F342317754065463E1C90DF8E4065D7F7632F59 C5406668DE04DD5E304066FC90246F718F406792ADE20A69D3406096A7D5CA02574060 A937452C33964060C1D4F0DFC5B74060E3A0851EB6A940610E44009220B740613BE016 364649406165017C22D7C340618653FC779C314061A1EE1DCF0DDF4061BC359835A598 4061D83C536E78B44061F7CB9DE0EEEA40621D6C0711664840624D62D8CE56DD40628D 8B8C6F5ABE4062E2F7CCB3B08A40634D6D16CF0B214063C68FF8CB2EC94064467F3947 50154064C7712BD89162406545C445082D1B4065BEE7A4B8CF03406631DAA2480C7540 66A08D30E05CD140670EE42DBE486F4066BC54D5A3F0754066C460D8AEFEC44066D253 0D9E08514066EB72456A1ED240670FD4B689871340673B58058B3F2A40676958170E88 B4406795E6691B0A6C4067BD4982C0EBBC4067DCA535C0EBAC4067F27ED1968F824067 FE85F8FAB2E240680178A0DDD5674067FD8AFA745F6D4067F6EEBEB602A34067F2EBD0 672A034067F4C9BABD8BCE4067FC045D5AB3F24068060FACB3257B4068113DF4F409EC 40681DA250261D7D40682B06D85136AB406837A16B47E311406842303812731540684D 8D98831B3E406AC3EC2CCD0272406AC32B8431B7A5406ACBA0A4565AFC406AE1756EBB FEBC406B02FCFEE95F8B406B2AB2EAEE8D2A406B53450A2471A6406B7A35FF1D8FD240 6B9FC301EDADEA406BC48B3E6E6CA8406BE783723FC9FB406C06A4727C768A406C2064 16E9667F406C33FFB4EC1127406C412ABFB6A19F406C47C92FE02E5C406C47D4381F65 DB406C416590E70525406C34F23CF1E6A6406C23CDF948D534406C10EDC5CB0B5C406C 010F7268A7A5406BF8A7D4E7E08D406BF8C93820A644406BFEDCE7C3C057406DBD5E34 406E13406DB91C47A127A0406DBFFF64872B3F406DD4505314E1EA406DF3F664052AD2 406E1A2A153455DB406E41A6E2A2F9BE406E66B49F4DE6DC406E87E04DDBD98A406EA5 B291229FFA406EC21FE7C43C7F406EDF2609EF0BB4406EFCDD8EEDB22D406F198D0BD3 6B96406F336C211D2E4C406F497942B578D7406F5B4DA3F78C9C406F68CB4CCA3FAD40 6F71EB92CB4C6E406F76A81B2B635B406F76F1C1B0C721406F72AF03C7C329406F69C1 2C26BBB8406F5C15095AA55A406F49CC794C163E40700C30477DC72940700A12B2362E 7140700D991CA2CE5C40701704955A330340702598247C475D407037B3EEF633004070 4B15363DAD8040705DC657AE93C140706EAC7D77361840707D671494824640708A1227 028EF640709536D3F6246C40709FD4ABAD60014070AB180DA90FB54070B779D5A5CDE1 4070C456B5C0756A4070D0B091FBDA004070DBDC45DF06BF4070E58D5B1C962D4070ED AC489E30E64070F4374FF89F6A4070F932EDEBE5C74070FCA309496F8C4070FE8816C1 316E4070FEDDE391164A4071064D59434FD440710520CA6A0576407108E83B012CA940 711165201403BA40711E700002AF4140712F3BED7B8CDB407141F16576CF9E40715497 E487ABDC407165EA031E4FCF40717557C2D8FF6B407182BB51600A6140718E2556AD3C CA407197CF2ECC582B4071A02D9D579FE84071A815FF8CDADA4071B0B181F919A64071 BACF9613013E4071C62473B147CA4071D1B07CB7B1224071DC9D15F8CE524071E67C3F 2A9DB14071EF26254D5EC54071F693B2B3EB8D4071FCC9F9F85722407201D0EEC88D33 4071DCA8F502E25D4071DCAEF1A9A6F34071E09057E2C7414071E7F5802B82954071F3 4F430D3E9940720293DD7696DF4072145C9D72BE3C407226B43B14413D4072382D21CC 95ED40724815F03BE5AF407256337ACA8EAF40726280FD83434E40726D0F90BB8CA840 7275FBD84F6A3940727D7397F3D439407283CC73B3898F407289AC75AA145740729020 1C30F0DA4072982EF5BFB46E4072A1F6FDA5F1264072AC99A3904A9C4072B71C982A79 054072C0EA568C9FAC4072C9C498ED48974072D19A97E834E2407298B4469C17224072 99C2A6E460D040729D86EE2728DA4072A3C460EDFC464072AD61194026394072BAFC12 EBC9304072CBA88135E8064072DD7F859FB9364072EEE9F4D9308D4072FF10E1BBB47E 40730DA52EA653A140731A993DBB5053407325F88E58FD6740732FD5BC1DA373407338 4453E5786F40733F599AF1BEDF4073453450E35C7840734A0FC6E60F2240734E67FC83 DB6C407353201E7FA497407359554E9E1BD84073618D536FBB8040736B2F4C3559AA40 73752F3BA436EF40737ECD07EFBD2D4073406CB0D1E4574073423324DCB329407345B1 4BE2079440734ACD6092BA5E407352B630C32EE440735E9469CCA0FB40736DFF13CFED F440737F2F85B7C1FE407390672461D69D4073A0A3E17888C54073AF7E31F9C5E74073 BCDE38767B354073C8CC666A170C4073D35B1147DE0D4073DC9D251775534073E4A2E5 85E6064073EB79C02A982B4073F12EA6AA9CB64073F5D473767F744073F9928E7622D8 4073FCC291086D194074001AF3FDC8E8407404B01555C54D40740B5A205C97B6407413 E299F0E4964073D7D3265AAB494073DA06ED34FFEA4073DD28F424A7FF4073E1386E79 39404073E78543239F904073F19FDB6CB0754073FFA96F72E39840741012719FB11F40 7420FBF10E7693407431342CA476D840744035E9E16C2740744DDBDA5884BC40745A29 D12798C840746531AEB44D1540746F07C19147A2407477BE3688D8C040747F6391C30E 6B4074860287A55AE840748BA2BDCEB2C14074904AD14C62F6407494051446E6844074 96EA6AE05103407499398717E36540749B7ED1A67A0740749EB0FA09AE16407461BE2A 777C28407464285BFD12B2407466E6A5C564F240746A059DEB463240746ED830034DA1 40747733552D04A7407483C17835F61140749343A561380A4074A3C7451C2E724074B3 E81C23CC064074C2FDD372056F4074D0D219A8127D4074DD622233C1C94074E8BE22E6 95244074F2FB0CDF79134074FC2CCF6C70E240750464415501B240750BAE8891998140 7512151D42DB884075179E1B7774C040751C4CF0B281C240752023D3BDFC9840752327 291D4384407525656F35775940752708ED3750CE-%+AXESLABELSG6%%\"mG%\"bGQ!F4 -%*AXESSTYLEG6#%$BOXG" 1 2 0 1 10 0 2 1 1 2 2 1.000000 83.000000 -22.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "plot3d(R(m,b,data),m=-0..2,b=-5..-3,axes=boxed);" }}{PARA 13 "" 1 "" {GLPLOT3D 400 300 300 {PLOTDATA 3 "6%-%%GRIDG6%;$\"\"!F($\"\"#F(;$!\"& F($!\"$F(X,%)anythingG6\"6\"[gl'!%\"!!#\\bm\":\":40586AB5D21B37C240584 CCC1246BAAB40582EB5002B3E5B40581091DA08FF6E4057F285DB2515A24057D4B561C D84284057B745227F1C0A40579A597C503C9640577E15FEA70A0E4057629D2AB2E5D44 0574810754E540F40572E908850A06E4057163DBC95DF144056FF38BF6C45634056E9A 34E59F3EA4056D5A0EC0B1E934056C3576A9AD98B4056B2EF24F723624056A492C551E F894056986E82A4D86440568EAED283618B4056877EA3CFAED7405683054D92CED2405 681646DCCA197405682B5FA13F7884056FC7A2C2326284056DB99F12A5E144056BA34B 208E09040569865362C687F4056764C5C97A34140565410BD1638BF405631DE277B789 D40560FE506D3DEBE4055EE59AF9F0CD14055CD73A0F7680F4055AD6CC1385A3A40558 E809EE4DDB0405570EBBD66B437405554EAF1D2B52640553ABACDF5C6DB40552297108 3440440550CBA0A77EAFA4054F95BE64D57674054E8B1BF9752834054DAEC81C960F04 054D03791FB6FA64054C8B756A7C4D44054C487BDBE34EF4054C3BAE98574494054C65 82D7E833F405560263A94947040553DD08960757D40551B04E3AA20524054F7D14C810 B514054D44BABA335B54054B091CDC32E4F40548CC94FCB071C4054691F7708C432405 445C8F53717804054230193346BEB4054010BB8F722A44053E02FC5D10E084053C0BB2 9F012254053A2FF3194A7E44053874F741FDB6540536DFFDDAB189E405357625257E08 D405343C3F78E08614053336A4060BD434053268FECF2A6A640531D623CF0C29D40531 7FE9E6B29D740531671209108B7405318B3E37A8E9840531EAFA49613F040538E0E02B C41C9405369E4D5921ED6405345D813A2E732405321EC41F5B4574052FE2FAFBC7B5B4 052DABA7BB254424052B7AE5A6D9F49405295361E82CADC4052738502365D54405252D 5B10D526C405233690EDD155140521584BAEA34844051F9715076778B4051DF786A8D1 F844051C7E27663D6124051B2F465E645074051A0ED5ACBAD2240519204699A1A15405 186669A47AAB340517E354FEECE32405179853FFC444E4051785E1991EB0E40517ABAE F50C65F4051808B6229563D405189B576BF8F1840518E4C15FC4CB1405166BDEAECA4A E4051407FB27A772E40511B88E38687224050F7D9807BBFA84050D57A6019480A4050B 47D1C3F95E3405094FBAF46812040507717C661B7AB40505AF9CAFAB18B405040CFA07 5DFE7405028CB12B09CAE4050131FF5ED9BF640500002036B8E14404FDF4519FDCA964 04FC45C64BFB532404FAF959FF63467404FA12BC90616B8404F99474A3F7FB3404F97F DCE8EDB83404F9D53DACEADF0404FA9400B27256E404FBBAF9B325D33404FD48BB6E7D FFE404FF3BEFEF10550404EF7F58283E468404E9A88F74B7CD2404E42F5EB45E52B404 DF105BC2AD06E404DA48C8D2A5B02404D5D6DB86CA9A2404D1B9F20EDCDFD404CDF2B1 01451AF404CA8306C81CDFE404C76E13D7876A8404C4B7F96664FA2404C26592FD6DA1 9404C07C21BE9B923404BF00F275B3FE9404BDF908D704CC5404BD68DA4767064404BD 5420CB1E17E404BDBDCB55AA8C9404BEA80C312B729404C0148175E8861404C2046F93 0831E404C4790381F37F7404C77391BCA5587404CAF5C84AB6B5D404CF01CCACD0F6A4 04AFF6600009351404A8225A45B0930404A0E7D954051C74049A46FFB5D1CE84049440 0C20375104048ED39380F2E244048A02B3ADBC4D940485CF384BCF8F5404823BACB1C4 BFC4047F4B5805B6A224047D02243F9FF134047B6474472B76D4047A76F03B1CA0F404 7A3E50403CA574047ABF2D81F0E964047BFDDE6151A934047DFE5ECAFE2E040480C441 69503CC4048452A32785A7C40488AC193ADE6FA4048DD29314A281D40493C72CF2499A F4049A89F4542A92E404A219A44211E96404AA7362C179C264047A77B6CBCFB974046F 65551AE335E4046534F60C658474045BF3EE8F3DFD540453AED8F301AEF4044C7183B6 3767F4044646E0F6E55464044138F482ECC844043D50BEAB8D48E4043A9622453E04F4 04390FC49CE8F7B40438C2E6B0272D840439B337AE3AA524043BE2A1BCC73814043F51 132E96B2940443FC47BE9DF1640449DF96CDA511D40450F3CCC668836404592F163C34 E54404628502A8F5BFC4046CE6A2B2B36164047842C2CD4043F40484863F8364286404 919C6D8B32ADD4049F6F8DC4D324940459F9F70CD5A284044C0C31B411D124043F3F68 AB6E80540433B5345B2E248404298E068439F5C40420E83DC199BA340419DF287DB346 8404148A04998BD3140410FB0D5AFB1734040F3EABF2F15A94040F5ADEDCC0CD240411 4EE8C68D104404151350CDA111A4041A9A34C6E36A140421CFE4E9903224042A9BB883 1651E40434E106E207ED440440802EF5F99C04044D579AC5EAAF54045B44B09F7D7C94 046A24A942AC03F40479D5470C0F3254048A356D81B545E4049B259A8D8D02D404AC88 4372178D7404585ACD19EB58F4044B2B18C205F944043F44962974C2140434C7CE714D B194042BD246F736BB1404247DA6F3643AB4041EDEFE19A1BC94041B0633E4A1630404 18FDA34FF7E4940418C9E36EE7AA94041A69BB093CE364041DD63C525D76A404230305 A395C4E40429DEA45AC013540432531708680494043C466B8EE8778404479B749EAAC4 E404543290536ECFA40461EA780C3A9C840470A1106B0983B4048034301EA605840490 8254DA045C1404A16B3F8ECF591404B2D07353FC226404C49594EB566584047C06A826 5717A40472E5D5EC22F974046AE5CCD85F4EB4046413086A06E384045E78038B494A44 045A1D0F2BE21164045708318610AE9404553D112ADA73040454BCEEE60067F4045586 B0B0A7D994045796FE276C2D04045AE86C80A6EC94045F73B55DDC7DC404652FF1CBF1 3964046C12D212EE1244047410CBFA070A44047D1D3BB920EEB404872A774D4F550404 9229D759BA1434049E0BBB47F4C6E404AABF8F6C8CA4E404B833DB7353A6C404C6565D 8D2B688404D514344FCB4E2404E45A168A41181404BEC28C98D0A25404B96B3246EF16 3404B4D8D6298EC37404B10F4501E25F8404AE11BF97EAAD2404ABE2CD8CD4687404AA 84165E59E10404A9F646D0F0C27404AA3906D5979C6404AB4B0134EABA3404AD29FB77 1055E404AFD2FA3A9F4BD404B3426CCD3C41A404B7745A6E5A92C404BC648C023999F4 04C20EADD8F7662404C86E664B93ABC404CF7F5F2BE2ECC404D73D4155C7E69404DFA3 A31AB5052404E8ADEBBA34687404F2572F7CF830F404FC9A0915BCDE240503B83AB148 97D4050969DB2FB648F4050785E41D228FB40505FE1D9FE729740504BA130D61534405 03BA89F5DD53C40502FFDE558CAFE4050289FF077179A405025872A66340A405026A63 F7B1F1A40502BEB44B6291C405035411CC8E17740504290F8AB993D405053C3D0E356C 2405068C3B86CA81E4050817CF0C6D38840509DDEAEFD5D384050BDDB8A95FBF24050E 169979EE9794051088233B3182A40513321923DE9214051614616C081CB405192EF8CB 38BE94051C81E4C04C36C405200D257111AAD40523D0A7B6AA49E40527CC37A59BF494 05304979D136BD94052F744B218A9014052ED1860C41ECB4052E60B026E95A14052E20 F9D9F8C0C4052E114CC47E6134052E305B9E280B34052E7CB26C751BF4052EF4C65D2D 79F4052F9705010A3F14053061E2CF72DD24053153E8C89F799405326BC0D0DFEB4405 33A8402B0EF0440535086F718629D405368B8FA46E95440538311C4B71DEB40539F8CB 19A99ED4053BE289D0FA6144053DEE7B2E1612D405401CF36A0CBC1405426E74702B0C 840544E3A9724E4AD405477D613AA13E34054A3C8698C720140557617F4DCDCC140557 0392CB4802E40556CB8D232143A40556B8424A4304740556C86BAB670CF40556FAB4C2 C40A0405574DC42D70C4E40557C04154609964055850D793DBFB540558FE3827890EE4 0559C71C2321D574055AAA476303CB64055BA68CCAA8DC44055CBAD38C445D44055DE6 1CC3E00B54055F2788881E357405607E59B9507DE40561E9F83B21DEB4056369F1C39C 54B40564FDF9DC1423440566A5E9F244C154056861C253340734056A31AC9A11659405 6C15FF9383F104056E0F43F3DAB314057C295287FB6734057C1BC0A2C30EF4057C2A2F 49377194057C53632E99CB14057C96346202D374057CF19298347154057D6484AAA999 A4057DEE243D422514057E8D96F7C35154057F4206F4DE8F0405800A9BF21F93840580 E67676210B240581D4ADA32297840582D44FE07E7D340583E4660A752124058503F883 1C4E24058632155A5E87A405876DD6C9F616F40588B66968090544058A0B11A7E03E74 058B6B3077EF5184058CD647005C6714058E4BF9B2597F34058FCC12FB5187A4059156 86003BEC54059E89475AEC72B4059EB073D68E2B64059EEBF667D327D4059F3ADB6C1F 9FC4059F9C5AA5838F9405A00FD4DC5E399405A094CD3E6BB5F405A12ADF7BC44BC405 A1D1B3E45C6EB405A288F2E2D0B13405A3503924E5E0D405A4270D940AD51405A50CD9 F975113405A600E6D6BC49E405A7025AAA55010405A8103C90BD14B405A92979FB05A2 4405AA4CEF06BCAF4405AB7970DBFAE19405ACADD95028D17405ADE912E885C7A405AF 2A243F8B754405B07039D1B744C405B1BAAD5DADBDB405B3090A559D772405BE9BF2AB B542F405BEE4709D788AA405BF3B874514AC6405BFA0A3F55DB34405C01368C10F02E4 05C093A69A8FFC1405C12153FD7648C405C1BC80E5BFA61405C2654900EE7A4405C31B C51C4E1C0405C3DFFCD6606D2405C4B1D988238D6405C5911B3B8E41D405C67D5060AB 866405C775D0D1066DB405C879BC915B872405C987FE9C3E055405CA9F53CB8412A405 CBBE55AC001D2405CCE388AA581B2405CE0D6CA539E30405CF3A8E9B57DFF405D06999 F598A22405D19967E5D4028405D2C90B7DFF286405DC8E03468DD8D405DCEA6F69F506 5405DD513C82810FD405DDC2349CF997E405DE3D58C642E20405DEC2D9CAAAD47405DF 530E0AC8D72405DFEE64EACA06B405E095588BC6296405E1485E9D22DF2405E207D91C 6EC9D405E2D407CD40880405E3ACFB1CB31CE405E4928915567A0405E5844509D86164 05E6817AA81EFC3405E7892D27F0B49405E89A1B27D4D15405E9B2C77AB8239405EAD1 86AE097F1405EBF49081D25DD405ED1A140B76246405EE404CE5A173F405EF6597B4B5 E57405F088846631A32405F890EF5966636405F8F82874F19F4405F966ACF99A070405 F9DC96736101B405FA5A34F7C3C3F405FAE007826B8AC405FB6EB19CE45E6405FC06EE B6F76C8405FCA983D05B013405FD573038DD56E405FE109E2D9BF36405FED653FDBBD8 D405FFA8A63D46DBF4060043D5BE0374040600B999040C8C740601355C38D513B40601 B6B4D8F4939406023D0EEE6D4F240602C7B0047BAB74060355BCCB6699F40603E6412C 8B38940604783A3BB1776406050AA137055F3406059C76AFF2AD6406062CCD0572C5C4 06096A7D5CA025340609A0635ACBE5340609D8CDD9034824060A13EAAE4A4614060A52 0264EEAC94060A937452C33934060AD8B1526C0434060B223554A46B24060B70802518 CFB4060BC40DCFED3CE4060C1D4F0DFC5B44060C7CA203E368A4060CE24B82006E1406 0D4E70E336FD84060DC112B0E1F044060E3A0851EB6A74060EB8FD31D8A2A4060F3D6F E38BBF54060FC6B3B6E9BCE4061053F502145B540610E44009220B540611768A1193A6 74061209BBE385F12406129CBCD4A4BB0406132E7D7DB1F3440615C3541BC899A40615 F960B5E85A140616311D775C7F8406166AD3F0529D340616A6E7D7D30FA40616E5D2F3 7A46140617281F90C1B11406176E61D89996D40617B9306CF66BC40618091CCD4A6F44 06185EABEF259A440618BA4F5316865406191C5EB46A5E340619851258489F940619F4 7E03595304061A6A8CBCC52194061AE6FDB35B6FE4061B6962BE74AE24061BF120F98C 6684061C7D73D4CECD94061D0D72AB9D27C4061DA01898160CF4061E344DE980AC8406 1EC8F270758C14061F5CE7C8ED3564062166EFD3AE1F4406219BA951BA7DA40621D177 7E365DB4062208BBC489E8E4062241F132BEDBC406227DA8072835040622BC7FC58ED7 840622FF2032AB29A406234631B931C13406239255C3A9B5E40623E41F7F9C92540624 3C0D51EF0CE406249A8312A3C0840624FFC503E2EDC406256BF3730258240625DF070B EA9944062658CE13178DA40626D8EAE32D3F7406275ED41BB2BA040627E9D6DB3FC504 0628791B2A48CAD406290BAA72DA5FF40629A077992706C4062A36681360F994062ACC 5D484D51F4062C66F3ED8C73D4062C99547DEDB7D4062CCC5979EEE654062D00796E27 4004062D3643EF4D3174062D6E5CAE781664062DA97517B0DFC4062DE844EC22936406 2E2B8269403FB4062E73DA91A2FB64062EC1EA11D82E34062F16370B161B14062F712B D84FCC24062FD312BA714AB406303C124C41F0740630AC2AAF6D68040631233387C3E1 740631A0DAFD80A164063224A611C0FF240632ADF287D8A29406333BFA844938A40633 CDD9D0D3C9440634629481C61E840634F91E8F2E05B406359063DC9160E40636D2DF33 B51D140637023225562D84063731DB1AA6AD6406376263BA19DEB40637946DE38D1804 0637C8AE405D17F40637FFE56C90F97406383AD835EB5F1406387A47898012040638BE E8A94DAC740639095E27E2A52406395A31F7B9B1640639B1D0A5F4F1E4063A1085AE0C FDB4063A7678C25F0044063AE3ABEDE3EA04063B57FA8C1823C4063BD3192D862D6406 3C54968BC369D4063CDBDDA957ED14063D6839248211D4063DF8D7A7E1A1B4063E8CD1 4A68D824063F232D9D26B584063FBAEA1A3A1E2-%+AXESLABELSG6%%\"mG%\"bGQ!F3- %*AXESSTYLEG6#%$BOXG" 1 4 0 1 10 0 2 1 1 2 2 1.000000 67.000000 -97.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 81 "rfit:=fsolve(\{diff(R(m,b,data),m)=0, diff(R(m,b,data),b)=0\}, \{m=0. .2, b=-5..-3\});" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%rfitG<$/%\"bG$! +]:WRU!\"*/%\"mG$\"+mjD[p!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 141 "plots[display](\n plot(data,style=point,symbol=box), plot(subs( fit,m*x+b),x=-10..10,color=black),plot(subs(rfit,m*x+b),x=-10..10,colo r=blue));" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6'-%' CURVESG6&7T7$$\"3?++++s,$H$!#=$!3=+++!Qc//$!#<7$$\"3y******\\ORxuF-$\" 3#*******pl*p#yF*7$$!3;+++7l.*>%F-$!3#******48$QSpF-7$$\"36+++5RD2HF-$ !3%*******[eaM=F-7$$!3++++C@17$$!30+++!)>2j5 F*$!38+++1ER$)QF-7$$\"3N+++!e?^5'F-$!3\"*******=#f::#F*7$$\"3G++++JD4t F-$\"3a+++Fb(R>(F*7$$\"3()*******)*yWl#F-$!3#)*****p='\\!\\;F-$!3%******f\"4UHJF -7$$!3?+++oogveF-$!3-+++5I)e\\)F-7$$\"3'********\\]&*>\"F-$!3A+++iwzWJ F-7$$\"3x******R&z'fHF-$!3()*****f$*pAe#F-7$$!3/+++)fPx(fF-$!3<+++bUZl %)F-7$$\"31+++SC8*p$F-$!3'******z\\:J4\"F-7$$\"3')******f3J%>&F-$!35++ +!HT1[&F*7$$\"3X+++?3u*G(F-$\"3M+++zh&=Q\"zF-$\"3& *******eJ;26F-7$$!3$******R#Gs'G&F-$!3=+++\"R>Hl(F-7$$\"3:+++]d\\HDF-$ !3*)*****fSx)pEF-7$$\"37+++])f&4')F-$\"30+++;VB<9F-7$$\"3.++++9>,9F*$! 3d******=L**GSF-7$$!3@+++S\"\\f'fF-$!3\\+++mJ1,$*F-7$$!35+++1FK(H(F-$! 3m+++/*3!R\"*F-7$$!3x*****>+$[x^F-$!3!*******QI5[vF-7$$\"3#)*******=)* 4/*F-$\"3&)*****HI_]a#F-7$$\"31+++S'H(G>F-$!30+++!HVx)HF-7$$!3-+++]j.$*eF-$!3f*****\\%3m&3*F -7$$\"3%)*******eQaH'F-$\"3#******H[IW7#F*7$$!3b*****Hu@!f)*F-$!32+++_ 6)y9\"Fdu7$$\"3S+++q6vd]F-$!33+++].f-;FL7$$!39+++omI!G$F-$!3?+++To5]pF -7$$!3E+++W3(G+%F-$!3>+++sJr%)pF-7$$\"3&*******Rw#[=)F-$\"3'******R'Rn %)>F-7$$!38+++1'Q/E$F-$!33+++c?]ArF-7$$!3y******p[\"e(pF-$!3G*****Ht.+ W*F-7$$!3i*****fbSGf(F-$!35+++&)3+G>F-7$$!3Q*****p:;gn)F-$!3,+++doEmIF -7$$!3,+++?7kSrF-$!3()*****4Sc@?%F-7$$!3++++%eSnj'F-$!37+++K,pBYF-7$$ \"3,+++w/DhuF-$!3\"******\\MsZ,#F-7$$\"3N+++/!f#RcF-$!3a*****4,&47!*F- 7$$\"3%)******4#RVS)F-$!3j*****\\#\\- #!#:-%'COLOURG6&%$RGBG$\"#5!\"\"$F][lF][lFh[l-%&STYLEG6#%&POINTG-%'SYM BOLG6#%$BOXG-F$6$7S7$$!#5F][l$!3.++%4y13a\"Fdu7$$!3!pmmm\"p0k&*F-$!3jY s#o!*QkZ\"Fdu7$$!3uKL$3s%HaF-$!3xctnj9 ff')F-7$$!3]******\\$*4)*\\F-$!3!)4;Sw2mA!)F-7$$!3o******\\_&\\c%F-$!3 )*o)G0z9JQ(F-7$$!3$)******\\1aZTF-$!30p5:GPzmnF-7$$!3Imm;/#)[oPF-$!3I] !**)e^62iF-7$$!3%HLLL=exJ$F-$!3s.#)y1KgTbF-7$$!3lKLLL2$f$HF-$!3bUQ+)GF y(\\F-7$$!3%)****\\PYx\"\\#F-$!3+DY`o=-AVF-7$$!3gLLLL7i)4#F-$!3wUCN]H_ TPF-7$$!3n)***\\P'psm\"F-$!3gQu(HjBY5$F-7$$!3?****\\74_c7F-$!3%Q'yEp[9 )\\#F-7$$!3L:LL$3x%z#)F*$!3pmr8.zMl=F-7$$!3')HLL3s$QM%F*$!3e-aR]FC%G\" F-7$$!3\\^omm;zr)*!#?$!3#R-TeQBWd'F*7$$\"3eVLLezw5VF*$!3rRSke(pGP'F_dl 7$$\"3-.++v$Q#\\\")F*$\"3[i1!z;]Qg&F*7$$\"3%\\LL$e\"*[H7F-$\"3Y]B5h!* \\s6F-7$$\"3=++++dxd;F-$\"3,r#zUws[!=F-7$$\"3e+++D0xw?F-$\"3yi0pgq_BCF -7$$\"34,+]i&p@[#F-$\"3%=tzI!p5AIF-7$$\"3++++vgHKHF-$\"3TiN)HwFno$F-7$ $\"3ElmmmZvOLF-$\"3GoS\"e;>RG%F-7$$\"3%4+++v+'oPF-$\"3]/$)Gc%[:#\\F-7$ $\"3UKL$eR<*fTF-$\"3q:X!QON$*\\&F-7$$\"3K-++])Hxe%F-$\"3#Q*4Cn!458'F-7 $$\"3!fmm\"H!o-*\\F-$\"3U')=p%zk`s'F-7$$\"3X,+]7k.6aF-$\"3G\"\\'p&yPmM (F-7$$\"3#emmmT9C#eF-$\"3WTuw#pXS&zF-7$$\"32****\\i!*3`iF-$\"3A+d$)za% **e)F-7$$\"3;NLLL*zym'F-$\"3.')[E`DR-#*F-7$$\"3'eLL$3N1#4(F-$\"39Pq`V \"3(G)*F-7$$\"3,pm;HYt7vF-$\"3\\\"=]Cv$)\\/\"Fdu7$$\"37-+++xG**yF-$\"3 yT1w\"4f?5\"Fdu7$$\"3gpmmT6KU$)F-$\"3tm\"f:(QZn6Fdu7$$\"3qNLLLbdQ()F-$ \"3U=iUI;)fA\"Fdu7$$\"3Z++]i`1h\"*F-$\"3ZX/Z/JO)G\"Fdu7$$\"3@-+]P?Wl&* F-$\"3?1v#[8q![8Fdu7$$Ff[lF][l$\"3#****fI\\LAT\"Fdu-Fb[l6&Fd[lF][lF][l F][l-F$6$7S7$Fe\\l$!3%*****f\"zp(=6Fdu7$Fj\\l$!3&[:g&[$z%)3\"Fdu7$F_]l $!3e/L.'zB@1\"Fdu7$Fd]l$!3kqcx?U[K5Fdu7$Fi]l$!3^yM-y>,)F-7$Fa`l$!3`&z`E6\\Ar(F-7$Ff`l$!3wgW>=*\\qWlF-7$Fjal$!3^O=!3\\,%ziF- 7$F_bl$!3!3nk([/zqfF-7$Fdbl$!3Q5JV%QCoG'4 ;&Q$F-7$Fbel$!3c)[2R\\wv3$F-7$Fgel$!3/eZ*y9[kz#F-7$F\\fl$!3*Hz'e.lw9DF -7$Fafl$!3SV%))H12??#F-7$Fffl$!3r\\F2&zy4#>F-7$F[gl$!3l6+zM6#4i\"F-7$F `gl$!3P!pOsHC!\\8F-7$Fegl$!3fD\\UO#p<0\"F-7$Fjgl$!3VPkH)*Qv?xF*7$F_hl$ !3)=1*=+t9(z%F*7$Fdhl$!39gc!RY(yQ>F*7$Fihl$\"3**)e!o&Q]O0\"F*7$F^il$\" 3m+q]%pBd$RF*7$Fcil$\"3:)R`)>*fI)oF*7$Fhil$\"3\\gf<82*f!)*F*7$F]jl$\"3 V^!R[0'=\\7F-7$Fbjl$\"3f#=!)z/b#zvWB$=F-7$F\\[m$\"3 YsKVA:!f7#F-7$Fa[m$\"3WSj1.G(oS#F-7$Ff[m$\"3H+++;[\")3FF--Fb[l6&Fd[lFh [lFh[l$\"*++++\"!\")-%+AXESLABELSG6%Q!6\"Fiem-%%FONTG6#%(DEFAULTG-%%VI EWG6$;Fe\\lFf[mF^fm" 1 2 0 1 10 0 2 9 1 4 2 1.000000 87.000000 45.000000 0 0 "Curve 1" "Curve 2" "Curve 3" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "13 1 0" 2 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }