{VERSION 5 0 "IBM INTEL NT" "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 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Warning" -1 7 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 1 3 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 12 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 3 0 0 0 0 1 0 1 0 2 2 0 1 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "with(linalg);" }} {PARA 7 "" 1 "" {TEXT -1 80 "Warning, the protected names norm and tra ce have been redefined and unprotected\n" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#7^r%.BlockDiagonalG%,GramSchmidtG%,JordanBlockG%)LUdecompG%)QRde compG%*WronskianG%'addcolG%'addrowG%$adjG%(adjointG%&angleG%(augmentG% (backsubG%%bandG%&basisG%'bezoutG%,blockmatrixG%(charmatG%)charpolyG%) choleskyG%$colG%'coldimG%)colspaceG%(colspanG%*companionG%'concatG%%co ndG%)copyintoG%*crossprodG%%curlG%)definiteG%(delcolsG%(delrowsG%$detG %%diagG%(divergeG%(dotprodG%*eigenvalsG%,eigenvaluesG%-eigenvectorsG%+ eigenvectsG%,entermatrixG%&equalG%,exponentialG%'extendG%,ffgausselimG %*fibonacciG%+forwardsubG%*frobeniusG%*gausselimG%*gaussjordG%(geneqns G%*genmatrixG%%gradG%)hadamardG%(hermiteG%(hessianG%(hilbertG%+htransp oseG%)ihermiteG%*indexfuncG%*innerprodG%)intbasisG%(inverseG%'ismithG% *issimilarG%'iszeroG%)jacobianG%'jordanG%'kernelG%*laplacianG%*leastsq rsG%)linsolveG%'mataddG%'matrixG%&minorG%(minpolyG%'mulcolG%'mulrowG%) multiplyG%%normG%*normalizeG%*nullspaceG%'orthogG%*permanentG%&pivotG% *potentialG%+randmatrixG%+randvectorG%%rankG%(ratformG%$rowG%'rowdimG% )rowspaceG%(rowspanG%%rrefG%*scalarmulG%-singularvalsG%&smithG%,stackm atrixG%*submatrixG%*subvectorG%)sumbasisG%(swapcolG%(swaprowG%*sylvest erG%)toeplitzG%&traceG%*transposeG%,vandermondeG%*vecpotentG%(vectdimG %'vectorG%*wronskianG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "?li nsolve" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "m:=10;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"mG\"#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "n:=10;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"nG\"#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A:=matrix(m,n);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%&arrayG6%;\"\"\"\"#5F(7\"" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "for i from 1 by 1 to 10 do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 30 " for j from 1 by 1 to 10 do " } }{PARA 0 "> " 0 "" {MPLTEXT 1 0 31 " A[i,j]:=evalf(sin(i-2*j));" } }{PARA 0 "> " 0 "" {MPLTEXT 1 0 6 " od:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "print (A);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'matrixG6#7,7,$!%:%)!\"%$!%6 9F*$\"%*e*F*$!%qlF*$!%@TF*$\"%+5!\"$$!%-UF*$!%.lF*$\"%9'*F*$!%*\\\"F*7 ,$\"\"!F@$!%$4*F*$\"%ovF*$\"%%z#F*$!%%*)*F*$\"%SaF*$\"%m`F*$!%1**F*$\" %zGF*$\"%5vF*7,$\"%:%)F*F(F+F-F/F1F3F6F8F:7,$\"%$4*F*F?FAFCFEFGFIFKFMF O7,$\"%69F*FTF(F+F-F/F1F3F6F87,$!%ovF*FWF?FAFCFEFGFIFKFM7,$!%*e*F*FZFT F(F+F-F/F1F3F67,$!%%z#F*FgnFWF?FAFCFEFGFIFK7,$\"%qlF*FjnFZFTF(F+F-F/F1 F37,$\"%%*)*F*F]oFgnFWF?FAFCFEFGFI" }}}{EXCHG {PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "b:=vector(n);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"bG-%&arrayG6$;\"\"\"\"#57\"" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "for i from 1 by 1 to 10 do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 25 " b[i]:=evalf(cos(i));" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "print(b);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'vector G6#7,$\"%.a!\"%$!%hTF)$!%+**F)$!%OlF)$\"%PGF)$\"%-'*F)$\"%RvF)$!%b9F)$ !%6\"*F)$!%\"R)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "linsol ve(A,b);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'vectorG6#7,$!%?7!\"$$\" $'QF)$\"%@=F)$\"%Xy!\"%$!%XyF0$!%6=F)$\"%/HF0$\"%\")RF0$!$c$F0$!%/;F) " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "Digits:=4;" }}{PARA 0 " > " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'Digits G\"\"%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "12 1 \+ 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }