{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 31 "read(`c:\\\\user\\\\ lsq_data.txt`);" }}{PARA 6 "" 1 "" {TEXT -1 82 "defined line_pts(), ba d_line_pts(), quadratic_pts(), cubic_pts(), and circle_pts()" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "plot(bad_line_pts(),style=po int);" }}{PARA 13 "" 1 "" {INLPLOT "6$-%'CURVESG6$7T7$$!1+++![Z8!p!#:$ !1+++i?A\"p\"!#97$$!1+++G'4N:'F*$!1+++d>8tF-7$$\"1+++I1W8hF*$!1+++DYsw@F-7$$!1+++=QQ)R&F*$!1++ +0a[w;F-7$$\"1+++IA;9HF*$!1+++i:2n?F-7$$!1+++k)>b2(F*$!1+++qEK7F-7$$\"1+++5Gib5F*$!1+++joV#*=F-7$$!1+++C.c-L F*$!1+++]**=X>F-7$$\"1+++Ig*)HvF*$!1+++&Hh\"GAF-7$$\"1+++Iz\\lIF*$!1++ +$*o@q?F-7$$!1*****fa[Fn)F*$!1+++c9?I;F-7$$\"1+++IlmJTF*$!1+++FSp5?F-7 $$!1******z%\\]/*F*$!1+++C_DR;F-7$$!1+++FX=\\$*F*$!1+++)49ej\"F-7$$\"1 *******\\h\"enFJ$!1+++s(Q)\\=F-7$$!1+++M'y]p(F*$!1+++l^a2cF-7$$\"1+++g:9Q**F*$!1+++hRyqAF-7$$!1+++-(z-q#F*$!1+++h`l>=F-7 $$\"1+++5\\%QS(F*$!1+++'\\h'[AF-7$$\"1++++-!R%\\F*$!1+++/VcD?F-7$$!1++ +7t'z3\"F*$!1+++\\'4&4>F-7$$!1+++#)e%G@&F*$!1+++^H18=F-7$$\"1+++5\"G$ \\ZF*$!1+++`GO%4#F-7$$\"1++++3eCgF*$!1+++g/m<@F-7$$!1+++g;V(f%FJ$!1+++ >qN1?F-7$$\"1+++I!eWv%F*$!1+++Rl)*z@F-7$$!1+++'*)zl5\"F*$!1+++g%o,#>F- 7$$!1+++#fs.+%F*$!1+++X[xn)H;?F-7$$!1+++&p^qQ&F*$!1+++0*\\c4\"F-7$$!1+++>OmhhF*$!1+++0?& yu(F*7$$!1+++w>+SqF*$!1+++&))=JN\"F-7$$!1+++7c_joF*$!1+++1kqY7F-7$$\"1 +++T([Vr'F*$!1+++Jn79IF-7$$\"1+++-%H(=pF*$!1+++%Q7Te#F-7$$\"1+++.y_RqF *$!1++++)Hs'GF-7$$\"1+++')*>,8(F*$!1+++%f0Jc#F--%'COLOURG6&%$RGBG$\"#5 !\"\"\"\"!Ff[l-%&STYLEG6#%&POINTG" 2 382 169 169 5 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 "pts:= line_pts();" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 610 "pts := [[5. 32862469, -.9253487087], [-2.412812122, -10.01553164], [-1.451386320, \+ -8.443319340], [3.23084914, -2.296904011], [6.80164794, 1.430807736], \+ [5.22791877, -1.148304217], [-9.429911721, -18.34323697], [-5.02142086 0, -13.44756420], [.93799097, -5.307530065], [8.50168590, 3.956936122] , [9.62459355, 4.801624678], [-4.865254114, -12.59273370], [1.19077443 , -5.499071079], [-5.055630416, -12.47007107], [1.81688553, -4.9380251 95], [-5.882390334, -13.83170490], [-4.193642084, -11.65054029], [9.05 744126, 2.786888242], [-2.378029274, -10.75050733], [6.37329845, .7678 323161], [-7.150112772, -15.53023568]]:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "?save" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "sa ve pts,`c:\\\\user\\\\stuff.txt`;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "pts:=bad_line_pts():" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "pts[1]:= [-5,200];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #>&%$ptsG6#\"\"\"7$!\"&\"$+#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "epsilon:= (pt,m,b) -> (m*pt[1]+b-pt[2]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%(epsilonG:6%%#ptG%\"mG%\"bG6\"6$%)operatorG%&arrowGF* ,(*&9%\"\"\"&9$6#F1F1F19&F1&F36#\"\"#!\"\"F*F*" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 53 "H:= (m,b)->sum(epsilon(pts[i],m,b)^2,i=1..nops (pts));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"HG:6$%\"mG%\"bG6\"6$%)o peratorG%&arrowGF)-%$sumG6$*$-%(epsilonG6%&%$ptsG6#%\"iG9$9%\"\"#/F7; \"\"\"-%%nopsG6#F5F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "s ol:=solve(\{diff(H(m,b),m)=0, diff(H(m,b),b)=0\},\{m,b\});" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$solG<$/%\"mG$!+04A;?!\"*/%\"bG$\"+u<=> " 0 "" {MPLTEXT 1 0 86 "p := plot(pts,style=point):\nl := plot(subs(sol, m*x+b),x=-10..10):\nplots[display](p,l);" }}{PARA 13 "" 1 "" {INLPLOT "6&-%'CURVESG6%7T7$$!\"&\"\"!$\"$+#F*7$$!1+++#>^wz\"!#:$\"1+++c4&3i\"! #97$$!1+++')\\%Rv&F0$\"1+++/#RA(>F37$$!1,++7dJ+&*F0$\"1+++hueTEF37$$!1 ******o!HD5*F0$\"1+++TlnhDF37$$!1+++%oXxr%F0$\"1+++5@Rj?F37$$!1+++O[-. lF0$\"1+++1'p;G#F37$$!1+++OS(>L$F0$\"1+++-q^!z\"F37$$!1+++gmvC6F0$\"1+ ++e\"zR_\"F37$$\"1+++5<]k7F0$\"1+++VvZt6F37$$!1+++g[YS$)!#;$\"1+++.!f= X\"F37$$\"1++++TK5YF0$\"1+++SGFkyF07$$!1+++?@1!=#F0$\"1+++'Q)zQ;F37$$! 1+++k?b0KF0$\"1+++9`***y\"F37$$\"1+++?j%\\C(F0$\"1+++RRN%H$F07$$\"1+++ !Qdej$F0$\"1+++:\"Hm_)F07$$!1+++Ug(oq\"F0$\"1+++[iVS;F37$$!1+++o=8yEF0 $\"1+++jnr\"o\"F37$$!1+++yy@![%F0$\"1+++a-LY>F37$$!1,+++>x(H)F0$\"1+++ W$GvX#F37$$\"1+++SQ2-GF0$\"1,++C=2P)*F07$$!1+++e%4/H(F0$\"1+++cgHlBF37 $$\"1+++?V@>MF0$\"1*****\\J'pG&)F07$$\"1,++I$o-n*F0$\"1+++FL^'3%Fin7$$ \"1+++!=/;i$F0$\"1+++(\\*4]*)F07$$!1+++'pF#HyF0$\"1+++)3!>$R#F37$$\"1+ ++gAe6VF0$\"1+++(*o]2$)F07$$\"1++++EyyXF0$\"1+++4pmXwF07$$!1+++S1;r\\F 0$\"1+++`??-?F37$$\"1+++5t-KRF0$\"1+++1Kj'z(F07$$!1+++=7+'>\"F0$\"1+++ fE!)H9F37$$\"1++++nd#o$F0$\"1*****4t2!e#)F07$$\"1++++FCUuF0$\"1+++*oy[ s$F07$$!1+++(zEUj*F0$\"1+++252kEF37$$\"1+++!ovi!yF0$\"1++++ur^@F07$$\" 1******>Y@*p*F0$\"1+++0qx=5F07$$\"1+++?,&Rh$F0$\"1,++GA%>])F07$$\"1+++ !p66o)F0$\"1+++JeUF@F07$$\"1++++kGYdFin$\"1+++\"[LCK\"F37$$!1++++H'fV% F0$\"1+++>9$R+#F37$$\"1+++?&oHz&F0$\"1+++4w=klF07$$\"1+++IZavgF0$\"1++ +'RD5&eF07$$!1+++a'))3U'F0$\"1+++$4jXq#F37$$!1+++:&)*)*z'F0$\"1+++i([R n#F37$$!1+++)Re\\x(F0$\"1+++\\@mKJF37$$!1+++vCA%o'F0$\"1+++L4TJGF37$$ \"1+++'yO(4_F0$\"1++++b4]Hi=F0-%'COLOURG6&% $RGBG$\"#5!\"\"F*F*-%&STYLEG6#%&POINTG-F$6$7S7$$!#5F*$\"1,++zESNPF37$$ !1nmm;p0k&*F0$\"1<$*>Bp]ZOF37$$!1LL$3`gHH5d$F37$$!1mmmT%p \"e()F0$\"1_?y0A-&[$F37$$!1nmm\"4m(G$)F0$\"1[to/]W)R$F37$$!1LL$3i.9!zF 0$\"1'o;**GzAJ$F37$$!1nm;/R=0vF0$\"1N]MUERKKF37$$!1,+]P8#\\4(F0$\"11)* *fku'\\JF37$$!1mm;/siqmF0$\"1a-&edFT1$F37$$!1****\\(y$pZiF0$\"18'Ri&[& )yHF37$$!1LLL$yaE\"eF0$\"1\"\\qFQT6*GF37$$!1mmm\">s%HaF0$\"1]af2L)Q\"G F37$$!1******\\$*4)*\\F0$\"1\"ptM,4ps#F37$$!1+++]_&\\c%F0$\"1]Ra%fx&RE F37$$!1+++]1aZTF0$\"1HnG!fF37$$!1:LL$3x%z#)Fin$\"1^ )y%zF07$$\"1mm;H!o-*\\F0$\"1?5/=]LIrF07$$\"1,+]7k.6aF0$\"1 %H,u+t>G'F07$$\"1mmm;WTAeF0$\"1*GVb2WDX&F07$$\"1****\\i!*3`iF0$\"1_1O^ )3Ue%F07$$\"1NLLL*zym'F0$\"1DLQE))*yu$F07$$\"1OLL3N1#4(F0$\"1)o5\\.^E* GF07$$\"1pm;HYt7vF0$\"1Sn&p7&[W?F07$$\"1-+++xG**yF0$\"1H1lW(3^E\"F07$$ \"1qmmT6KU$)F0$\"1n>[zXb=PFin7$$\"1OLLLbdQ()F0$!1L>G-$43F%Fin7$$\"1++] i`1h\"*F0$!1/R%fv8*y7F07$$\"1-+]P?Wl&*F0$!1'Ht:YEU4#F07$$Fd[lF*$!1+++5 8RqHF0F_[l-%+AXESLABELSG6$%\"xG%!G-%%VIEWG6$;F^\\lF_[m%(DEFAULTG" 2 380 212 212 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 265 8738 0 0 0 0 0 1 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "plots[display](p,l,view=0..40);" }} {PARA 13 "" 1 "" {INLPLOT "6&-%'CURVESG6%7T7$$!\"&\"\"!$\"$+#F*7$$!1++ +#>^wz\"!#:$\"1+++c4&3i\"!#97$$!1+++')\\%Rv&F0$\"1+++/#RA(>F37$$!1,++7 dJ+&*F0$\"1+++hueTEF37$$!1******o!HD5*F0$\"1+++TlnhDF37$$!1+++%oXxr%F0 $\"1+++5@Rj?F37$$!1+++O[-.lF0$\"1+++1'p;G#F37$$!1+++OS(>L$F0$\"1+++-q^ !z\"F37$$!1+++gmvC6F0$\"1+++e\"zR_\"F37$$\"1+++5<]k7F0$\"1+++VvZt6F37$ $!1+++g[YS$)!#;$\"1+++.!f=X\"F37$$\"1++++TK5YF0$\"1+++SGFkyF07$$!1+++? @1!=#F0$\"1+++'Q)zQ;F37$$!1+++k?b0KF0$\"1+++9`***y\"F37$$\"1+++?j%\\C( F0$\"1+++RRN%H$F07$$\"1+++!Qdej$F0$\"1+++:\"Hm_)F07$$!1+++Ug(oq\"F0$\" 1+++[iVS;F37$$!1+++o=8yEF0$\"1+++jnr\"o\"F37$$!1+++yy@![%F0$\"1+++a-LY >F37$$!1,+++>x(H)F0$\"1+++W$GvX#F37$$\"1+++SQ2-GF0$\"1,++C=2P)*F07$$!1 +++e%4/H(F0$\"1+++cgHlBF37$$\"1+++?V@>MF0$\"1*****\\J'pG&)F07$$\"1,++I $o-n*F0$\"1+++FL^'3%Fin7$$\"1+++!=/;i$F0$\"1+++(\\*4]*)F07$$!1+++'pF#H yF0$\"1+++)3!>$R#F37$$\"1+++gAe6VF0$\"1+++(*o]2$)F07$$\"1++++EyyXF0$\" 1+++4pmXwF07$$!1+++S1;r\\F0$\"1+++`??-?F37$$\"1+++5t-KRF0$\"1+++1Kj'z( F07$$!1+++=7+'>\"F0$\"1+++fE!)H9F37$$\"1++++nd#o$F0$\"1*****4t2!e#)F07 $$\"1++++FCUuF0$\"1+++*oy[s$F07$$!1+++(zEUj*F0$\"1+++252kEF37$$\"1+++! ovi!yF0$\"1++++ur^@F07$$\"1******>Y@*p*F0$\"1+++0qx=5F07$$\"1+++?,&Rh$ F0$\"1,++GA%>])F07$$\"1+++!p66o)F0$\"1+++JeUF@F07$$\"1++++kGYdFin$\"1+ ++\"[LCK\"F37$$!1++++H'fV%F0$\"1+++>9$R+#F37$$\"1+++?&oHz&F0$\"1+++4w= klF07$$\"1+++IZavgF0$\"1+++'RD5&eF07$$!1+++a'))3U'F0$\"1+++$4jXq#F37$$ !1+++:&)*)*z'F0$\"1+++i([Rn#F37$$!1+++)Re\\x(F0$\"1+++\\@mKJF37$$!1+++ vCA%o'F0$\"1+++L4TJGF37$$\"1+++'yO(4_F0$\"1++++b4]Hi=F0-%'COLOURG6&%$RGBG$\"#5!\"\"F*F*-%&STYLEG6#%&POINTG-F$6$7S 7$$!#5F*$\"1,++zESNPF37$$!1nmm;p0k&*F0$\"1<$*>Bp]ZOF37$$!1LL$3`gHH5d$F37$$!1mmmT%p\"e()F0$\"1_?y0A-&[$F37$$!1nmm\"4m(G$)F0$\"1[ to/]W)R$F37$$!1LL$3i.9!zF0$\"1'o;**GzAJ$F37$$!1nm;/R=0vF0$\"1N]MUERKKF 37$$!1,+]P8#\\4(F0$\"11)**fku'\\JF37$$!1mm;/siqmF0$\"1a-&edFT1$F37$$!1 ****\\(y$pZiF0$\"18'Ri&[&)yHF37$$!1LLL$yaE\"eF0$\"1\"\\qFQT6*GF37$$!1m mm\">s%HaF0$\"1]af2L)Q\"GF37$$!1******\\$*4)*\\F0$\"1\"ptM,4ps#F37$$!1 +++]_&\\c%F0$\"1]Ra%fx&REF37$$!1+++]1aZTF0$\"1HnG!fF 37$$!1:LL$3x%z#)Fin$\"1^)y%zF07$$\"1mm;H!o-*\\F0$\"1?5/=]LI rF07$$\"1,+]7k.6aF0$\"1%H,u+t>G'F07$$\"1mmm;WTAeF0$\"1*GVb2WDX&F07$$\" 1****\\i!*3`iF0$\"1_1O^)3Ue%F07$$\"1NLLL*zym'F0$\"1DLQE))*yu$F07$$\"1O LL3N1#4(F0$\"1)o5\\.^E*GF07$$\"1pm;HYt7vF0$\"1Sn&p7&[W?F07$$\"1-+++xG* *yF0$\"1H1lW(3^E\"F07$$\"1qmmT6KU$)F0$\"1n>[zXb=PFin7$$\"1OLLLbdQ()F0$ !1L>G-$43F%Fin7$$\"1++]i`1h\"*F0$!1/R%fv8*y7F07$$\"1-+]P?Wl&*F0$!1'Ht: YEU4#F07$$Fd[lF*$!1+++58RqHF0F_[l-%+AXESLABELSG6$%\"xG%!G-%%VIEWG6$;F^ \\lF_[m;F*$\"#SF*" 2 382 140 140 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 28 "plot(ln(1+x^2/2),x=-10..1 0);" }}{PARA 13 "" 1 "" {INLPLOT "6%-%'CURVESG6$7in7$$!#5\"\"!$\"1EVsK c#=$R!#:7$$!1nmm;p0k&*F-$\"1[_EBg]WQF-7$$!1LL$3tdyiV%)GF-7$$!1mmm\">s%HaF-$\"1B$e?#)y hv#F-7$$!1******\\$*4)*\\F-$\"1`T+Fc)>g#F-7$$!1+++]_&\\c%F-$\"1k(HIQ9` V#F-7$$!1+++]1aZTF-$\"171/E@(=E#F-7$$!1mm;/#)[oPF-$\"1+MWco&>4#F-7$$!1 LLL$=exJ$F-$\"1'yHAU!Qs=F-7$$!1LLLL2$f$HF-$\"1'4ofdi&p;F-7$$!1++]PYx\" \\#F-$\"18RbEn279F-7$$!1MLLL7i)4#F-$\"1(oO[d3Q;\"F-7$$!1****\\P'psm\"F -$\"1c#zsA!\\7()!#;7$$!1****\\74_c7F-$\"1CT2s)G*=eF\\r7$$!1:LL$3x%z#)F \\r$\"1xn?Xy=ZHF\\r7$$!1BL$e9d;J'F\\r$\"1q%[zDAk\"=F\\r7$$!1ILL3s$QM%F \\r$\"19gF*Hlb,*!#<7$$!1lmT&QdDG$F\\r$\"1&*G/V:ZZ_Fas7$$!1****\\ivF@AF \\r$\"1q.Cnq4PCFas7$$!1n;/^wj!p\"F\\r$\"1Z%*)f17!>9Fas7$$!1MLeRx**f6F \\r$\"1(\\H%p>W0n!#=7$$!17+D\"GyNH'Fas$\"1:+zgy\\y>Fft7$$!1^omm;zr)*Ff t$\"1kJaF[\\s[!#?7$$\"1IL3x\"yY_%Fas$\"1LXhs?6B5Fft7$$\"1NL3_Nl.5F\\r$ \"1ft255'R-&Fft7$$\"1O$ekGR[b\"F\\r$\"1$=`1T::?\"Fas7$$\"1QL$3-Dg5#F\\ r$\"1%eu4*zV$>#Fas7$$\"1TLe*['R3KF\\r$\"1@g'QAF)=]Fas7$$\"1WLLezw5VF\\ r$\"1)yWm$fr%)))Fas7$$\"1tmmmJ+IiF\\r$\"1d!>$))>jtnGF\\r7$$\"1NLLe\"*[H7F-$\"1Dq3n+PHcF\\r7$$\"1++++dxd ;F-$\"1Dj%f(oAY')F\\r7$$\"1,++D0xw?F-$\"10$)f()*f%\\6F-7$$\"1,+]i&p@[# F-$\"16#R\"Q)RiS\"F-7$$\"1+++vgHKHF-$\"1s/A<@bn;F-7$$\"1lmmmZvOLF-$\"1 *H$=e>0#)=F-7$$\"1,++]2goPF-$\"1rOV7#4?4#F-7$$\"1KL$eR<*fTF-$\"1S;3HC@ nAF-7$$\"1-++])Hxe%F-$\"1Z$F-7$$\"1qmmT6KU$)F-$\"1?\\,*eoyd$F-7$$\"1OLLLbdQ()F -$\"1T%*G)*3?oOF-7$$\"1++]i`1h\"*F-$\"1\\\"p@-H.w$F-7$$\"1-+]P?Wl&*F-$ \"1[]Fd%*yWQF-7$$\"#5F*F+-%'COLOURG6&%$RGBG$Fe^l!\"\"F*F*-%+AXESLABELS G6$%\"xG%!G-%%VIEWG6$;F(Fd^l%(DEFAULTG" 2 382 90 90 2 0 1 0 2 9 0 4 1 1.000000 45.000000 45.000000 10030 10061 10056 10074 0 0 0 20030 0 12010 0 0 0 0 0 0 0 1 1 0 0 0 -12478 -798 0 0 0 0 0 1 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 61 "R:= (m,b)->sum(ln(1+epsilon(pts[i],m,b)^2 /2),i=1..nops(pts));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"RG:6$%\"mG %\"bG6\"6$%)operatorG%&arrowGF)-%$sumG6$-%#lnG6#,&\"\"\"F4*$-%(epsilon G6%&%$ptsG6#%\"iG9$9%\"\"##F4F?/F<;F4-%%nopsG6#F:F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "solve(\{diff(R(m,b),m)=0,diff(R(m,b ),b)=0\},\{m,b\});" }}{PARA 7 "" 1 "" {TEXT -1 32 "Warning, computatio n interrupted" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 50 "fsolve(\{d iff(R(m,b),m)=0,diff(R(m,b),b)=0\},\{m,b\});" }}{PARA 8 "" 1 "" {TEXT -1 42 "Error, (in fsolve/gensys) did not converge" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 31 "plot(R(m,b),m=-3..-2,b=10..20);" }}{PARA 8 " " 1 "" {TEXT -1 26 "Plotting error, empty plot" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+MA2*p#! \"(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "cpts:=circle_pts(): " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "p:=plot(cts,style=point ):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "c:=plot([8*cos(t)-8,8 *sin(t),t=0..2*Pi]):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "plo ts[display](p,c);" }}{PARA 13 "" 1 "" {INLPLOT "6$-%'CURVESG6$7S7$\"\" !F(7$$!1fE6$355\\(!#<$\"1Jh/YDA#4\"!#:7$$!1%4:%4Ke4E!#;$\"1Sfnn6jE?F/7 $$!1?<6p\"38,'F3$\"1n]))f#)[UIF/7$$!17D'\\EVv2\"F/$\"17Gc^n$*4SF/7$$!1 c**pt$)fw;F/$\"1i$=g`o/!\\F/7$$!1?&)3l1%RL#F/$\"1!*QrgTjZcF/7$$!1QX%HS No5$F/$\"1sphR_0HjF/7$$!1dS&\\v#Q\"*RF/$\"1a`,64ABpF/7$$!1TLE%G))Q%\\F /$\"1D![)3CD$R(F/7$$!1FG-z4pzfF/$\"13^e2XpSxF/7$$!1,z!>a!*Q#pF/$\"1z[* 4*QHFzF/7$$!1M#>e&ox/!)F/$\"1.H&Qd)****zF/7$$!1)>$R()e)**3*F/$\"1wb4Iy RDzF/7$$!1s&G?d%p65!#9$\"1QbMRg#[r(F/7$$!1]^[9([=5\"Fjo$\"1C#e'GKp3uF/ 7$$!1+)*)=A&Q.7Fjo$\"19HYe![&3pF/7$$!1&[3\"e\"fJG\"Fjo$\"1I&=2.%=wjF/7 $$!1S6u2`9n8Fjo$\"1ZSH[w@UcF/7$$!12UWOjLK9Fjo$\"1n$\\u!z^+\\F/7$$!1A[= RXu#\\\"Fjo$\"1NYfFBJ,SF/7$$!1;4&=!\\ZQ:Fjo$\"1M*efL-m2$F/7$$!18Bv!))* 3t:Fjo$\"1b\\v/\"[#F,7$$!1Wy\\T]n#f\"Fjo$!1u#f\\[0,3\"F/7$$!1%G!QP_#Rd \"Fjo$!1G/iAk#e-#F/7$$!1_E/x41T:Fjo$!13[0H)yP,$F/7$$!1iyc!*[$R\\\"Fjo$ !1@G;4Fj!)RF/7$$!1%R-\"Fjo$!1j2HH() \\KpF/7$$!1[w`=D#=5\"Fjo$!1V#3@&**z3uF/7$$!1)R.lC$p35Fjo$!1avxc*)*Hs(F /7$$!1pH>?MDL!*F/$!1:ZX%f$*H$zF/7$$!1V\\Vn!fW-)F/$!1&))Q&4E'***zF/7$$! 1;U4(R@)ppF/$!1(zngZ$RLzF/7$$!1aoVBp'f&fF/$!1(yuNqjWt(F/7$$!1#p`:Hh8$ \\F/$!1jlt`<1)Q(F/7$$!15>7R&ft*RF/$!1C[W)3ym#pF/7$$!1,%4/o>D6$F/$!1j\" zM$eWLjF/7$$!1'F3$!1cdOh[(z3$F/7$$!1rq@ Y!*[iFF3$!1[+urq9%3#F/7$$!1vNvArbVuF,$!1zv\"\\%Qx)3\"F/7$F($\"15`b7(4L c'!#C-%'COLOURG6&%$RGBG$\"#5!\"\"F(F(-%%VIEWG6$;$!#5F($F[[lF(%(DEFAULT G" 2 384 384 384 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 23 "plot(cpts,style=point);" }}{PARA 13 "" 1 "" {INLPLOT "6$-%'CURVESG6$777$$!1+++h;r?:!#9$!1+++F[*Gc%!#:7$$!1+++-3 @*=%F-$!1+++y74-\")F-7$$!1+++gtA`g!#;$\"1++++Oq>AF67$$!1+++?T*y?\"F*$ \"1+++Vm0j\\F-7$$!1+++ly6%o$F-$\"1+++1'o*[XF-7$$!1+++T`@i:F*$\"1+++]t \"R*=F67$$!1+++:$HMA\"F-$\"1+++b9t?@F-7$$!1+++1#[J;#F-$\"1+++9(G05$F-7 $$!1+++3k[*)=F-$!1+++%>DjQ'F-7$$!1+++(*frP7F*$!1,++@A#QZ)F-7$$!1+++'z, &37F-$\"1+++OK.-;F-7$$!1+++*zP2M\"F*$\"1+++Ex&y;%F-7$$!1+++n!)4'Q\"F*$ \"1+++2cg1NF-7$$!1+++tEN\"Q&F-$\"1+++4h&>W&F-7$$!1+++:^+m:F*$!1+++&Q7j $RF-7$$!1+++!*[F/#*F6$\"1+++))[#)3>F-7$$!1+++q$)eT8F*$!1+++I95ypF-7$$! 1+++O\">y`\"F*$\"1+++Sx&*=&*F67$$!1+++U\\0`nF-$\"1+++Dc2yeF-7$$!1+++]_ igOF6$!1+++ud%\\&GF-7$$!1+++cUt(f\"F*$!1+++U0Ct " 0 "" {MPLTEXT 1 0 23 "save `c:\\\\user\\\\stuff`;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "26 0 0" 0 }{VIEWOPTS 1 1 0 3 2 1804 }