{VERSION 5 0 "APPLE_PPC_MAC" "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 }} {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" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "A := matrix(3, 3, [2, 5, 7, 3, 1, 7, 8, 1, 2]);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%'matrixG6#7%7%\"\"#\"\"&\"\"(7 %\"\"$\"\"\"F,7%\"\")F/F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "A := matrix( [ [2, 5, 7], [3, 1, 7], [8, 1, 2] ] );" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#>%\"AG-%'matrixG6#7%7%\"\"#\"\"&\"\"(7%\"\"$\"\" \"F,7%\"\")F/F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "a := 7;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG\"\"(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 2 "a;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"(" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 2 "A;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%\"AG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "eval m(A);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'matrixG6#7%7%\"\"#\"\"&\" \"(7%\"\"$\"\"\"F*7%\"\")F-F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "4*A;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$%\"AG\"\"%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "evalm(4*A);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'matrixG6#7%7%\"\")\"#?\"#G7%\"#7\"\"%F*7%\"#KF-F(" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 52 "B := matrix( [ [1, 0, 3], \+ [-3, 5, 1], [2, 4, 1] ] );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"BG-% 'matrixG6#7%7%\"\"\"\"\"!\"\"$7%!\"$\"\"&F*7%\"\"#\"\"%F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "evalm(A + B);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'matrixG6#7%7%\"\"$\"\"&\"#57%\"\"!\"\"'\"\")7%F*F)F( " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "evalm(A^2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'matrixG6#7%7%\"#v\"#A\"#j7%\"#l\"#B\"#U7% \"#N\"#V\"#n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "evalm(A &* \+ B);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'matrixG6#7%7%\"\"\"\"#`\"#=7 %\"#9\"#L\"#<7%\"\"*\"#8\"#F" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "evalm( A^3 - 4*B &* A );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'m atrixG6#7%7%\"$;'\"$G%\"$`(7%\"$n%\"$E%\"$O'7%\"$R'\"$D#\"$/&" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "c := vector([1, 4, 2]);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"cG-%'vectorG6#7%\"\"\"\"\"%\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "x := linsolve(A, c);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"xG-%'vectorG6#7%#\"#R\"$0##!$W\"F+ #\"$@\"F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "invA := evalm( A^(-1));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%invAG-%'matrixG6#7%7%#! \"\"\"#T#!\"$\"$0##\"#GF/7%#\"#5F,#!#_F/#\"\"(F/7%F*#\"#QF/#!#8F/" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "x := evalm(invA &* c);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"xG-%'vectorG6#7%#\"#R\"$0##!$W\"F+ #\"$@\"F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "mat0 := matrix (3, 3, 0);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%mat0G-%'matrixG6#7%7% \"\"!F*F*F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "mat1 := ma trix(4, 4, 1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%mat1G-%'matrixG6# 7&7&\"\"\"F*F*F*F)F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "i d := diag(1, 1, 1, 1, 1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#idG-%' matrixG6#7'7'\"\"\"\"\"!F+F+F+7'F+F*F+F+F+7'F+F+F*F+F+7'F+F+F+F*F+7'F+ F+F+F+F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "0 0 0" 0 }{VIEWOPTS 1 1 0 3 2 1804 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }