{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 "Maple 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 Plo t" 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 34 "data:=[[1,2],[2,3],[ 3,4],[-1,-1]];" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%dataG7&7$\"\"\"\"\"#7$F(\"\"$7$F*\"\"%7$!\"\"F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "E(m,b):= sum((m*data[i][1 ]+b-data[i][2])^2,i=1..4);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>-%\"EG6 $%\"mG%\"bG,**$),(F'\"\"\"F(F-\"\"#!\"\"F.F-F-*$),(*&F.F-F'F-F-F(F-\" \"$F/F.F-F-*$),(*&F4F-F'F-F-F(F-\"\"%F/F.F-F-*$),(F'F/F(F-F-F-F.F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "eq1:=diff(E(m,b),m)=0;" } }{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #>%$eq1G/,(*&\"#I\"\"\"%\"mGF)F)*&\"#5F)%\"bGF)F)\"#U!\"\"\"\"!" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "eq2:=diff(E(m,b),b)=0;" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%$eq2G/,(*&\"#5\"\"\"%\"mGF)F)*&\"\") F)%\"bGF)F)\"#;!\"\"\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "solve(\{eq1,eq2\},\{m,b\});" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#<$/ %\"bG#\"\"$\"\"(/%\"mG#\"#W\"#N" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "assign(%);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "f(x): =m*x+b;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>-%\"fG6#%\"xG,&*(\"#W\"\" \"\"#N!\"\"F'F+F+#\"\"$\"\"(F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(plots);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#7Z%(animateG%* animate3dG%-animatecurveG%&arrowG%-changecoordsG%,complexplotG%.comple xplot3dG%*conformalG%,conformal3dG%,contourplotG%.contourplot3dG%*coor dplotG%,coordplot3dG%-cylinderplotG%,densityplotG%(displayG%*display3d G%*fieldplotG%,fieldplot3dG%)gradplotG%+gradplot3dG%,graphplot3dG%-imp licitplotG%/implicitplot3dG%(inequalG%,interactiveG%-listcontplotG%/li stcontplot3dG%0listdensityplotG%)listplotG%+listplot3dG%+loglogplotG%( logplotG%+matrixplotG%(odeplotG%'paretoG%,plotcompareG%*pointplotG%,po intplot3dG%*polarplotG%,polygonplotG%.polygonplot3dG%4polyhedra_suppor tedG%.polyhedraplotG%'replotG%*rootlocusG%,semilogplotG%+setoptionsG%- setoptions3dG%+spacecurveG%1sparsematrixplotG%+sphereplotG%)surfdataG% )textplotG%+textplot3dG%)tubeplotG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 67 "display(plot(f(x), x=-1..4, color=green), plot(data, \+ style=point));" }}{PARA 13 "" 1 "" {GLPLOT2D 435 435 435 {PLOTDATA 2 " 6&-%'CURVESG6$7S7$$!\"\"\"\"!$!39&G9dG9dG)!#=7$$!3Fnmm\"HU,\"*)F-$!3(= &4Q_ug:pF-7$$!3)HL$3FH'='zF-$!37Z!>E#[[BdF-7$$!35mm;/OU&*oF-$!3E%4Q_C= GQ%F-7$$!3Plm;H_\">#eF-$!3?3Q_f[ELIF-7$$!3SLL3_!4Nv%F-$!3O!>wamD,p\"F- 7$$!3YmmTg(fHw$F-$!3AR_4))pj[W!#>7$$!3]++vVLIPFF-$\"38Pr&GRH`W)FL7$$!3 \"em;/,oln\"F-$\"3kiZ!pyG!y@F-7$$!3Y&***\\(oWB>'FL$\"3#=dGk4[s]$F-7$$ \"3B%ommTIOo%FL$\"3zR_4QN^u[F-7$$\"3eML$3_>jU\"F-$\"3qMLL$o,)ygF-7$$\" 3E,++D;v/DF-$\"3!>+++!\\aMuF-7$$\"3x+++v=h(e$F-$\"3OH9dG\\&ez)F-7$$\"3 U+++v$[6j%F-$\"3eG9dQHx55!#<7$$\"3DMLe*[z(ybF-$\"3#\\!>E2P!*H6F_p7$$\" 3knmmTXg0nF-$\"3(Q_4Qrh:F\"F_p7$$\"3OommmJZl\"F_p7$$ \"3K+]i!f#=$3\"F_p$\"3IVrN&o'G!z\"F_p7$$\"3>+](=xpe=\"F_p$\"3W9dyT\"z$ >>F_p7$$\"37nm\"H28IH\"F_p$\"3k_4QxN2a?F_p7$$\"3um;zpSS\"R\"F_p$\"3tB& 4j6lx<#F_p7$$\"3GLL3_?`(\\\"F_p$\"3!fZ!>^J=6BF_p7$$\"3fL$e*)>pxg\"F_p$ \"3\\!>wH*pw\\CF_p7$$\"33+]Pf4t.Ef'p+FF_p7$$\"3/+++DRW9>F_p$\"3G9dGM4INGF_p7$$\"39++DJE>>?F_ p$\"34dG9A])p'HF_p7$$\"3F+]i!RU07#F_p$\"3)eG9#[hR%4$F_p7$$\"3+++v=S2LA F_p$\"3c&G92[keB$F_p7$$\"3Jmmm\"p)=MBF_p$\"3y3Q_p+)HO$F_p7$$\"3B++](=] @W#F_p$\"3wUr&G4.()\\$F_p7$$\"35L$e*[$z*RDF_p$\"3_hZSC$)o@OF_p7$$\"3e+ +]iC$pk#F_p$\"3jdG9nO9cPF_p7$$\"3Zm;H2qcZFF_p$\"3HB&4jmbE)QF_p7$$\"3O+ ]7.\"fF&GF_p$\"3]'G9#er*[,%F_p7$$\"3Xmm;/OgbHF_p$\"3MP_4)Q(=WTF_p7$$\" 3w**\\ilAFjIF_p$\"3k8dywAazUF_p7$$\"3yLLL$)*pp;$F_p$\"3.iZ!>70*4WF_p7$ $\"3(RL$3xe,tKF_p$\"311>wf*>Ka%F_p7$$\"3Cn;HdO=yLF_p$\"3)=Q_M)3VvYF_p7 $$\"3`+++D>#[Z$F_p$\"3#>dG9**=pz%F_p7$$\"3RnmT&G!e&e$F_p$\"3-R_4t!eh$ \\F_p7$$\"3\"RLLL)Qk%o$F_p$\"3O[!>w;&pg]F_p7$$\"37+]iSjE!z$F_p$\"39VrN &oxM>&F_p7$$\"3a+]P40O\"*QF_p$\"3!3++v\\n0K&F_p7$$\"\"%F*$\"3HdG9dG9da F_p-%'COLOURG6&%$RGBG$F*F*$\"*++++\"!\")F^[l-F$6%7&7$$\"\"\"F*$\"\"#F* 7$Fh[l$\"\"$F*7$F[\\lFfz7$F(F(-F[[l6&F][l$\"#5F)F^[lF^[l-%&STYLEG6#%&P OINTG-%+AXESLABELSG6%Q\"x6\"Q!F[]l-%%FONTG6#%(DEFAULTG-%%VIEWG6$;F(Ffz F`]l" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1 " "Curve 2" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK " 8 1 0" 0 }{VIEWOPTS 1 1 0 2 1 1805 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }