{VERSION 3 0 "SUN SPARC SOLARIS" "3.0" }
{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 3 }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 "" 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 45 "read \"/home/mat331/
Worksheets2/lsq_data.txt\";" }}{PARA 6 "" 1 "" {TEXT -1 82 "defined li
ne_pts(), bad_line_pts(), quadratic_pts(), cubic_pts(), and circle_pts
()" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 63 "data:=circle_pts():\n
plot(data,scaling=constrained,style=point);" }}{PARA 13 "" 1 "" 
{INLPLOT "6'-%'CURVESG6$777$$\"1*****f#>`A&)!#:$\"1+++p;FJDF*7$$\"1+++
QgzmeF*$\"1+++B2ySaF*7$$\"1+++j?A?[F*$\"1+++#)\\mveF*7$$\"1+++-v&eG#F*
$\"1+++X1FTiF*7$$\"1+++:CDhGF*$!1+++5qe4hF*7$$\"1+++ciqhjF*$\"1+++f3pg
]F*7$$\"1+++yMx?$)F*$!1+++TmvBDF*7$$\"1+++!G-c\\&F*$!1+++0M/6`F*7$$\"1
++++<448!#;$\"1+++wcn%p&F*7$$\"1+++Bp0*y&F*$!1+++SNa\">&F*7$$\"1+++`$e
Wq\"F*$!1+++s73mfF*7$$!1+++bu$*[AF*$\"1+++)*=XtOF*7$$!1+++u1W#y\"F*$\"
1+++-IY4TF*7$$!1+++VHh69F*$\"1+++nZ+)y%F*7$$\"1+++Ws$G*zF*$\"1+++!)G.9
KF*7$$\"1+++Da5*)QF*$\"1+++q?hTgF*7$$\"1+++i#3a%oF*$\"1+++ZT(4s%F*7$$
\"1+++,no?9F*$\"1+++O`AKfF*7$$\"1+++j#Q<&>F*$\"1+++NLp5hF*7$$\"1+++HGV
2]F*$\"1+++:IvvdF*7$$\"1+++%**))ex#F*$\"1+++[QgpjF*-%'COLOURG6&%$RGBG$
\"#5!\"\"\"\"!Fcr-%&STYLEG6#%&POINTG-%+AXESLABELSG6$%!GF[s-%(SCALINGG6
#%,CONSTRAINEDG-%%VIEWG6$%(DEFAULTGFcs" 2 546 158 158 5 0 1 0 2 9 0 4 
1 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 0 }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 63 "distance \+
from one point to a circle with center [a,b] radius r " }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 56 "alpha:= (a,b,r,pt) -> (pt[1] - a)^2
 + (pt[2] -b)^2 -r^2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&alphaGR6&%
\"aG%\"bG%\"rG%#ptG6\"6$%)operatorG%&arrowGF+,(*$),&&9'6#\"\"\"F69$!\"
\"\"\"#\"\"\"F6*$),&&F46#F9F69%F8F9F:F6*$)9&F9F:F8F+F+F+" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 97 "C := (a,b,r, data) ->sum(  (alpha(a
,b,r, data[i]))^2,\n                         i=1..nops(data)); " }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"CGR6&%\"aG%\"bG%\"rG%%dataG6\"6$%)
operatorG%&arrowGF+-%$sumG6$*$)-%&alphaG6&9$9%9&&9'6#%\"iG\"\"#\"\"\"/
F=;\"\"\"-%%nopsG6#F;F+F+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
35 "simplify(diff(C(a,b,r,data),b) =0);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#/,6%\"aG$\"+jK'z<\"!\"'%\"bG$\"+%))p$H))F(*$)%\"rG\"\"#\"\"\"$\"
+zi7fA!\"(*$)F%F/F0$!+zi7fAF3*$)F)F/F0$!+Q)ytx'F3*&F)\"\"\"F%F=$!+W=%z
7'F3*&F5F0F)F0$\"#%)\"\"!*&F-F0F)F0$!#%)FC*$)F)\"\"$F0FA$!+F^f\\5!\"&F
=FC" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 95 "solve(\{diff(C(a,b,r
,data),a) =0, diff(C(a,b,r,data),b) =0, diff(C(a,b,r,data),r) =0\}, \{
a,b,r\});" }}{PARA 12 "" 1 "" {XPPMATH 20 "6)<%/%\"rG\"\"!/%\"aG,&$\"+
Nm9b_!\"*\"\"\"%\"IG$!+$QBVq(F,/%\"bG,&$!+J)e#o6F,F-F.$!+7do]FF,<%F$/F
2,&F4F-F.$\"+7do]FF,/F(,&F*F-F.$\"+$QBVq(F,<%F$/F($\"+y-/IMF,/F2$\"+$o
ioI\"F,<%F$/F(,&$\"+`!f**[%F,F-F.$\"+-dh\\<F,/F2,&$\"+\"*oi9NF,F-F.$!+
m9z1%)F,<%F$/F(,&FKF-F.$!+-dh\\<F,/F2,&FQF-F.$\"+m9z1%)F,<%/F%$!+A8xSh
F,/F($\"+F/2fFF,/F2$\"+,0BG)*!#6<%/F%$\"+A8xShF,F\\oF_o" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 87 "r:='r'; a:='a'; b:='b';\nassign(\{r
 = 6.140771322, a = 2.759070427, b = .9828230501e-1\});" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#>%\"rGF$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"
aGF$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"bGF$" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 146 "cplot:=plot( [ a + r*cos(t),b+r*sin(t),t=0..
2*Pi], scaling=constrained):\npplot:=plot(data,style=point,color=black
):\nplots[display]([cplot,pplot]);" }}{PARA 13 "" 1 "" {INLPLOT "6'-%'
CURVESG6$7S7$$\"1+++\\<%)**))!#:$\"1+++,0BG)*!#<7$$\"17g8C5MU))F*$\"1&
Q-,;%om$*!#;7$$\"1RcJx5`*p)F*$\"1t>NCr\"Rl\"F*7$$\"1!oU)))eTQ%)F*$\"1)
)zt'Q&oLCF*7$$\"1'*z`,Mss!)F*$\"1W)))3Q&HwJF*7$$\"1MR`Z3*Gh(F*$\"15JI'
Qk)fQF*7$$\"1^=2hsJ3rF*$\"1CuTTgQLWF*7$$\"1%)z#4.Y]^'F*$\"1<#f)=CWc\\F
*7$$\"1'f1Wlqg$eF*$\"1D#*Ge=_7aF*7$$\"1')HgC3$\\5&F*$\"1r,3^jJtdF*7$$
\"1;$*>*Q_)4VF*$\"1#px0m6+/'F*7$$\"1:\"[%*=)3&e$F*$\"1$*3PyYC$='F*7$$
\"1!*pfHPSbFF*$\"1+YIKD0RiF*7$$\"1\"*Q;n6SA>F*$\"1#\\@)o#*y\"='F*7$$\"
1\\)H3[5T8\"F*$\"1!**)3<^:?gF*7$$\"1\"zP8:04U%F3$\"1,],p'o^y&F*7$$!19O
ue2+tLF3$\"1![o#H!f7S&F*7$$!1/\"Gf]>k\\*F3$\"1SQ'*4$=E*\\F*7$$!1p&zWi;
Vf\"F*$\"1&z+fMG#HWF*7$$!13*oQi?Z4#F*$\"1llj$G-*fQF*7$$!1HGiA=TeDF*$\"
1ws'RIv'pJF*7$$!1*eGrWO%4HF*$\"1a=CH7()fCF*7$$!1^_J%yR^<$F*$\"1DQ_'y#f
x;F*7$$!1()G%f:5YK$F*$\"1\"Hbo!>)oL*F37$$!1z0fj8n\"Q$F*$\"1%f#eqtEt6F3
7$$!1,*=hxuaK$F*$!1:gOLz-3tF37$$!19h%=&>b\"=$F*$!1s@\"\\zMnX\"F*7$$!1C
gfnqGHHF*$!18)G0_$3:AF*7$$!1>z;<*[vc#F*$!1x-(H4Ps&HF*7$$!1@WD#3G/7#F*$
!1q9gk*H*HOF*7$$!1Y!o>^ltg\"F*$!1)fD\\f2&>UF*7$$!17gq==G_&*F3$!1'=dpn:
=z%F*7$$!1hI&e/sf0$F3$!1p(=$o)yIA&F*7$$\"1qu(G%f\"HU%F3$!1fE`zfo)e&F*7
$$\"1p5(za[r:\"F*$!1S>>4S')HeF*7$$\"1v]h0)[f'>F*$!1_YHS^0\"*fF*7$$\"1!
e;Xt&HSFF*$!1%31iJgC/'F*7$$\"1MxlH=$)\\NF*$!1yt)z3i8*fF*7$$\"1*HA#*)G1
GVF*$!1X_t2VmQeF*7$$\"1w2I*\\YX6&F*$!1:Q!GTnFd&F*7$$\"1IYI'*G[JeF*$!1q
4Fl4h=_F*7$$\"1pE#**z#o5lF*$!1b'[H,[Kw%F*7$$\"1y$[*[%)e=rF*$!10z$3E#\\
EUF*7$$\"1A^))=$*Q5wF*$!1Mr\"3XDlm$F*7$$\"1$>*oKFy&3)F*$!1jb\\H]2dHF*7
$$\"1YI*obKRU)F*$!1qk&*Gh.sAF*7$$\"1Rc4!3%z(o)F*$!1Y96;:],:F*7$$\"1d'e
8F0F%))F*$!1Jpm`fcutF37$F($\"1,tz/5BG)*F--%'COLOURG6&%$RGBG$\"#5!\"\"
\"\"!F^[l-F$6%777$$\"1*****f#>`A&)F*$\"1+++p;FJDF*7$$\"1+++QgzmeF*$\"1
+++B2ySaF*7$$\"1+++j?A?[F*$\"1+++#)\\mveF*7$$\"1+++-v&eG#F*$\"1+++X1FT
iF*7$$\"1+++:CDhGF*$!1+++5qe4hF*7$$\"1+++ciqhjF*$\"1+++f3pg]F*7$$\"1++
+yMx?$)F*$!1+++TmvBDF*7$$\"1+++!G-c\\&F*$!1+++0M/6`F*7$$\"1++++<448F3$
\"1+++wcn%p&F*7$$\"1+++Bp0*y&F*$!1+++SNa\">&F*7$$\"1+++`$eWq\"F*$!1+++
s73mfF*7$$!1+++bu$*[AF*$\"1+++)*=XtOF*7$$!1+++u1W#y\"F*$\"1+++-IY4TF*7
$$!1+++VHh69F*$\"1+++nZ+)y%F*7$$\"1+++Ws$G*zF*$\"1+++!)G.9KF*7$$\"1+++
Da5*)QF*$\"1+++q?hTgF*7$$\"1+++i#3a%oF*$\"1+++ZT(4s%F*7$$\"1+++,no?9F*
$\"1+++O`AKfF*7$$\"1+++j#Q<&>F*$\"1+++NLp5hF*7$$\"1+++HGV2]F*$\"1+++:I
vvdF*7$$\"1+++%**))ex#F*$\"1+++[QgpjF*-Fhz6&FjzF^[lF^[lF^[l-%&STYLEG6#
%&POINTG-%+AXESLABELSG6$%!GFdbl-%(SCALINGG6#%,CONSTRAINEDG-%%VIEWG6$%(
DEFAULTGF\\cl" 2 546 121 121 2 0 1 0 2 9 0 4 1 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 22006 0 0 0 0 0 
0 0 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 91 "plot( [data,[ a + r*c
os(t),b+r*sin(t),t=0..2*Pi]], scaling=constrained,style=[point,line]);
" }}{PARA 13 "" 1 "" {INLPLOT "6'-%'CURVESG6%777$$\"1*****f#>`A&)!#:$
\"1+++p;FJDF*7$$\"1+++QgzmeF*$\"1+++B2ySaF*7$$\"1+++j?A?[F*$\"1+++#)\\
mveF*7$$\"1+++-v&eG#F*$\"1+++X1FTiF*7$$\"1+++:CDhGF*$!1+++5qe4hF*7$$\"
1+++ciqhjF*$\"1+++f3pg]F*7$$\"1+++yMx?$)F*$!1+++TmvBDF*7$$\"1+++!G-c\\
&F*$!1+++0M/6`F*7$$\"1++++<448!#;$\"1+++wcn%p&F*7$$\"1+++Bp0*y&F*$!1++
+SNa\">&F*7$$\"1+++`$eWq\"F*$!1+++s73mfF*7$$!1+++bu$*[AF*$\"1+++)*=XtO
F*7$$!1+++u1W#y\"F*$\"1+++-IY4TF*7$$!1+++VHh69F*$\"1+++nZ+)y%F*7$$\"1+
++Ws$G*zF*$\"1+++!)G.9KF*7$$\"1+++Da5*)QF*$\"1+++q?hTgF*7$$\"1+++i#3a%
oF*$\"1+++ZT(4s%F*7$$\"1+++,no?9F*$\"1+++O`AKfF*7$$\"1+++j#Q<&>F*$\"1+
++NLp5hF*7$$\"1+++HGV2]F*$\"1+++:IvvdF*7$$\"1+++%**))ex#F*$\"1+++[Qgpj
F*-%'COLOURG6&%$RGBG$\"#5!\"\"\"\"!Fcr-%&STYLEG6#%&POINTG-F$6%7S7$$\"1
+++\\<%)**))F*$\"1+++,0BG)*!#<7$$\"17g8C5MU))F*$\"1&Q-,;%om$*FS7$$\"1R
cJx5`*p)F*$\"1t>NCr\"Rl\"F*7$$\"1!oU)))eTQ%)F*$\"1))zt'Q&oLCF*7$$\"1'*
z`,Mss!)F*$\"1W)))3Q&HwJF*7$$\"1MR`Z3*Gh(F*$\"15JI'Qk)fQF*7$$\"1^=2hsJ
3rF*$\"1CuTTgQLWF*7$$\"1%)z#4.Y]^'F*$\"1<#f)=CWc\\F*7$$\"1'f1Wlqg$eF*$
\"1D#*Ge=_7aF*7$$\"1')HgC3$\\5&F*$\"1r,3^jJtdF*7$$\"1;$*>*Q_)4VF*$\"1#
px0m6+/'F*7$$\"1:\"[%*=)3&e$F*$\"1$*3PyYC$='F*7$$\"1!*pfHPSbFF*$\"1+YI
KD0RiF*7$$\"1\"*Q;n6SA>F*$\"1#\\@)o#*y\"='F*7$$\"1\\)H3[5T8\"F*$\"1!**
)3<^:?gF*7$$\"1\"zP8:04U%FS$\"1,],p'o^y&F*7$$!19Oue2+tLFS$\"1![o#H!f7S
&F*7$$!1/\"Gf]>k\\*FS$\"1SQ'*4$=E*\\F*7$$!1p&zWi;Vf\"F*$\"1&z+fMG#HWF*
7$$!13*oQi?Z4#F*$\"1llj$G-*fQF*7$$!1HGiA=TeDF*$\"1ws'RIv'pJF*7$$!1*eGr
WO%4HF*$\"1a=CH7()fCF*7$$!1^_J%yR^<$F*$\"1DQ_'y#fx;F*7$$!1()G%f:5YK$F*
$\"1\"Hbo!>)oL*FS7$$!1z0fj8n\"Q$F*$\"1%f#eqtEt6FS7$$!1,*=hxuaK$F*$!1:g
OLz-3tFS7$$!19h%=&>b\"=$F*$!1s@\"\\zMnX\"F*7$$!1CgfnqGHHF*$!18)G0_$3:A
F*7$$!1>z;<*[vc#F*$!1x-(H4Ps&HF*7$$!1@WD#3G/7#F*$!1q9gk*H*HOF*7$$!1Y!o
>^ltg\"F*$!1)fD\\f2&>UF*7$$!17gq==G_&*FS$!1'=dpn:=z%F*7$$!1hI&e/sf0$FS
$!1p(=$o)yIA&F*7$$\"1qu(G%f\"HU%FS$!1fE`zfo)e&F*7$$\"1p5(za[r:\"F*$!1S
>>4S')HeF*7$$\"1v]h0)[f'>F*$!1_YHS^0\"*fF*7$$\"1!e;Xt&HSFF*$!1%31iJgC/
'F*7$$\"1MxlH=$)\\NF*$!1yt)z3i8*fF*7$$\"1*HA#*)G1GVF*$!1X_t2VmQeF*7$$
\"1w2I*\\YX6&F*$!1:Q!GTnFd&F*7$$\"1IYI'*G[JeF*$!1q4Fl4h=_F*7$$\"1pE#**
z#o5lF*$!1b'[H,[Kw%F*7$$\"1y$[*[%)e=rF*$!10z$3E#\\EUF*7$$\"1A^))=$*Q5w
F*$!1Mr\"3XDlm$F*7$$\"1$>*oKFy&3)F*$!1jb\\H]2dHF*7$$\"1YI*obKRU)F*$!1q
k&*Gh.sAF*7$$\"1Rc4!3%z(o)F*$!1Y96;:],:F*7$$\"1d'e8F0F%))F*$!1Jpm`fcut
FS7$F\\s$\"1,tz/5BG)*F`s-F]r6&F_rFcrF`rFcr-Fer6#%%LINEG-%+AXESLABELSG6
$%!GFgbl-%(SCALINGG6#%,CONSTRAINEDG-%%VIEWG6$%(DEFAULTGF_cl" 2 547 97 
97 2 0 1 0 2 9 0 4 1 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 9784 -16421 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "9 0 0" 89 }{VIEWOPTS 1 1 0 2 1 
1805 }