{VERSION 3 0 "IBM INTEL NT" "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 "Warning" 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 "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 {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "A:=matrix(2,2,[1,1,0.11,0. 04]); # define matrix A" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%' matrixG6#7$7$\"\"\"F*7$$\"#6!\"#$\"\"%F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "b:=vector([700,42]); # define RHS vector b" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"bG-%'vectorG6#7$\"$+(\"#U" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "with(linalg): # \+ load linear algebra package" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "x:=linsolve(A,b); # solve the equation" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%\"xG-%'vectorG6#7$$\"+)*******>!\"($\"+-+++]F+" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 75 "A:=matrix(5,3,[1,274,24.5,1, 180,32.54,1,375,38.02,1,205,28.38,1,86,23.47]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%'matrixG6#7'7%\"\"\"\"$u#$\"$X#!\"\"7%F*\"$!=$ \"%aK!\"#7%F*\"$v$$\"%-QF37%F*\"$0#$\"%QGF37%F*\"#')$\"%ZBF3" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "b:=vector([162,120,223,131,6 7]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"bG-%'vectorG6#7'\"$i\"\"$? \"\"$B#\"$J\"\"#n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "with(l inalg):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "x:=linsolve(A,b) ;" }}{PARA 8 "" 1 "" {TEXT -1 94 "Error, (in solve/linear/float/sparse ) wrong number (or type) of parameters in function maxnorm" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "c:=leastsqrs(A,b);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"cG-%'vectorG6#7%$\"+nJ]Kq!\"*$\"+SfZW]!#5$\"+ \"\\08+(F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "multiply(A,c) ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'vectorG6#7'$\"+DM/C;!\"($\"+#= `h?\"F)$\"+XJ>GAF)$\"+]'RJI\"F)$\"+Cgq%o'!\")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "c[1], c[2], c[3];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6%$\"+nJ]Kq!\"*$\"+SfZW]!#5$\"+\"\\08+(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "A:=matrix(5,2,[1,1,2,1,3,1 ,4,1,5,1]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%'matrixG6#7'7$ \"\"\"F*7$\"\"#F*7$\"\"$F*7$\"\"%F*7$\"\"&F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "b:=vector([4.1,4.4,5.1,5.5, 5.7]);" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#>%\"bG-%'vectorG6#7'$\"#T!\"\"$\"#WF+$\"#^F+$\"# bF+$\"#dF+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "with(linalg): " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "u:=leastsqrs(A,b);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"uG-%'vectorG6#7$$\"*-++I%!\"*$\"+$ *****pOF+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "x:=vector([1,2 ,3,4,5]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"xG-%'vectorG6#7'\"\" \"\"\"#\"\"$\"\"%\"\"&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "y :=vector([4.1,4.4,5.1,5.5,5.7]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>% \"yG-%'vectorG6#7'$\"#T!\"\"$\"#WF+$\"#^F+$\"#bF+$\"#dF+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "points:=[seq([x[i],y[i]],i=1..5)]; " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'pointsG7'7$\"\"\"$\"#T!\"\"7$\" \"#$\"#WF*7$\"\"$$\"#^F*7$\"\"%$\"#bF*7$\"\"&$\"#dF*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "plot(points,style=point);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6&-%'CURVESG6$7'7$$\"\"\"\"\"! $\"1+++++++T!#:7$$\"\"#F*$\"1+++++++WF-7$$\"\"$F*$\"1+++++++^F-7$$\"\" %F*$\"1+++++++bF-7$$\"\"&F*$\"1+++++++dF--%'COLOURG6&%$RGBG$\"#5!\"\"F *F*-%&STYLEG6#%&POINTG-%+AXESLABELSG6$%!GFP-%%VIEWG6$%(DEFAULTGFT" 1 5 0 1 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a:=0.43; b:=3.67;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG$\"#V!\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\" bG$\"$n$!\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "plot(a*t+b, t=0..6);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'C URVESG6$7S7$\"\"!$\"1++++++qO!#:7$$\"1+++]#HyI\"!#;$\"1++vdmBEPF+7$$\" 1++]([kdW#F/$\"1+D'H(y;vPF+7$$\"1+++v;\\DPF/$\"1+]-Uh>IQF+7$$\"1+++Dq0]\"F+$\"1++&Q=X_ J%F+7$$\"1+++DM^I;F+$\"1++vs27rVF+7$$\"1+++0ytb4?`%F+7$$\"1+++!y ?#>@F+$\"1++SN\\E\"e%F+7$$\"1++v3wY_AF+$\"1+Dwr5cQYF+7$$\"1+++IOTqBF+$ \"1++!4'yF*o%F+7$$\"1++v3\">)*\\#F+$\"1+Dw;A#\\u%F+7$$\"1++DEP/BEF+$\" 1+vG-)3zz%F+7$$\"1++](o:;v#F+$\"1+]iXZ>`[F+7$$\"1++v$)[opGF+$\"1+D,+X' R!\\F+7$$\"1++]i%Qq*HF+$\"1+]()Qlse\\F+7$$\"1++vQIKHJF+$\"1+Dm1*3c,&F+ 7$$\"1++D^rZWKF+$\"1+v.v^7l]F+7$$\"1++]Zn%)oLF+$\"1**\\U,Tg=^F+7$$\"1+ ++5FL(\\$F+$\"1****HlI&Q<&F+7$$\"1++]d6.BOF+$\"1+]s(R.zA&F+7$$\"1++vo3 lWPF+$\"1+Dct)*>!G&F+7$$\"1++]A))ozQF+$\"1+]n$>m#Q`F+7$$\"1+++Ik-,SF+$ \"1++!\\OT/R&F+7$$\"1+++D-eITF+$\"1***\\n\\\\hW&F+7$$\"1++v=_(zC%F+$\" 1+D1W$Hm\\&F+7$$\"1+++b*=jP%F+$\"1++l]r\"=b&F+7$$\"1++v3/3(\\%F+$\"1+D wvXu.cF+7$$\"1++vB4JBYF+$\"1+D@(pB!ecF+7$$\"1+++DVsYZF+$\"1++vf946dF+7 $$\"1++v=n#f([F+$\"1+D1*[[mw&F+7$$\"1+++!)RO+]F+$\"1++S6l:?eF+7$$\"1++ ]_!>w7&F+$\"1+]d#>w[(eF+7$$\"1++v)Q?QD&F+$\"1*\\irwU\"HfF+7$$\"1+++5jy p`F+$\"1++I8\"3!zfF+7$$\"1++]Ujp-bF+$\"1+]FF%fh.'F+7$$\"1+++gEd@cF+$\" 1++!QCws3'F+7$$\"1++v3'>$[dF+$\"1+DwJuxThF+7$$\"1++D6EjpeF+$\"1+v$G-UR >'F+7$$\"\"'F($\"1++++++]iF+-%'COLOURG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLAB ELSG6$Q\"t6\"%!G-%%VIEWG6$;F(Fcz%(DEFAULTG" 1 2 0 1 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "plot1:=plot(points,style=point):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "plot2:=plot(a*t+b,t=0..6):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "plots[display](\{plot1,plot2\});" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6&-%'CURVESG6%7'7$$\"\"\"\"\"!$ \"1+++++++T!#:7$$\"\"#F*$\"1+++++++WF-7$$\"\"$F*$\"1+++++++^F-7$$\"\"% F*$\"1+++++++bF-7$$\"\"&F*$\"1+++++++dF--%'COLOURG6&%$RGBG$\"#5!\"\"F* F*-%&STYLEG6#%&POINTG-F$6$7S7$F*$\"1++++++qOF-7$$\"1+++]#HyI\"!#;$\"1+ +vdmBEPF-7$$\"1++]([kdW#FV$\"1+D'H(y;vPF-7$$\"1+++v;\\DPFV$\"1+]-Uh>IQ F-7$$\"1+++Dq0] \"F-$\"1++&Q=X_J%F-7$$\"1+++DM^I;F-$\"1++vs27rVF-7$$\"1+++0ytb4?` %F-7$$\"1+++!y?#>@F-$\"1++SN\\E\"e%F-7$$\"1++v3wY_AF-$\"1+Dwr5cQYF-7$$ \"1+++IOTqBF-$\"1++!4'yF*o%F-7$$\"1++v3\">)*\\#F-$\"1+Dw;A#\\u%F-7$$\" 1++DEP/BEF-$\"1+vG-)3zz%F-7$$\"1++](o:;v#F-$\"1+]iXZ>`[F-7$$\"1++v$)[o pGF-$\"1+D,+X'R!\\F-7$$\"1++]i%Qq*HF-$\"1+]()Qlse\\F-7$$\"1++vQIKHJF-$ \"1+Dm1*3c,&F-7$$\"1++D^rZWKF-$\"1+v.v^7l]F-7$$\"1++]Zn%)oLF-$\"1**\\U ,Tg=^F-7$$\"1+++5FL(\\$F-$\"1****HlI&Q<&F-7$$\"1++]d6.BOF-$\"1+]s(R.zA &F-7$$\"1++vo3lWPF-$\"1+Dct)*>!G&F-7$$\"1++]A))ozQF-$\"1+]n$>m#Q`F-7$$ \"1+++Ik-,SF-$\"1++!\\OT/R&F-7$$\"1+++D-eITF-$\"1***\\n\\\\hW&F-7$$\"1 ++v=_(zC%F-$\"1+D1W$Hm\\&F-7$$\"1+++b*=jP%F-$\"1++l]r\"=b&F-7$$\"1++v3 /3(\\%F-$\"1+DwvXu.cF-7$$\"1++vB4JBYF-$\"1+D@(pB!ecF-7$$\"1+++DVsYZF-$ \"1++vf946dF-7$$\"1++v=n#f([F-$\"1+D1*[[mw&F-7$$\"1+++!)RO+]F-$\"1++S6 l:?eF-7$$\"1++]_!>w7&F-$\"1+]d#>w[(eF-7$$\"1++v)Q?QD&F-$\"1*\\irwU\"Hf F-7$$\"1+++5jyp`F-$\"1++I8\"3!zfF-7$$\"1++]Ujp-bF-$\"1+]FF%fh.'F-7$$\" 1+++gEd@cF-$\"1++!QCws3'F-7$$\"1++v3'>$[dF-$\"1+DwJuxThF-7$$\"1++D6Ejp eF-$\"1+v$G-UR>'F-7$$\"\"'F*$\"1++++++]iF-FB-%+AXESLABELSG6$%!GFa]l-%% VIEWG6$;F*Fj\\l%(DEFAULTG" 1 2 0 1 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK " 19 1 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }