{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 "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 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "with(linalg):" }}
{PARA 7 "" 1 "" {TEXT -1 32 "Warning, new definition for norm" }}
{PARA 7 "" 1 "" {TEXT -1 33 "Warning, new definition for trace" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "a := matrix(4,4,[-1,-2,1,3,4
,1,0,0,4,1,0,0,3,1,1,-2]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG-%
'matrixG6#7&7&!\"\"!\"#\"\"\"\"\"$7&\"\"%F,\"\"!F0F.7&F-F,F,F+" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 53 "b := matrix(4,4,[1,0,2,1,2,0
,-1,3,-2,4,4,1,1,0,3,1]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"bG-%'
matrixG6#7&7&\"\"\"\"\"!\"\"#F*7&F,F+!\"\"\"\"$7&!\"#\"\"%F2F*7&F*F+F/
F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "multiply(a,b);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'matrixG6#7&7&!\"%\"\"%\"#8!\"$7&\"
\"'\"\"!\"\"(F/F,7&\"\"\"F)\"\"$\"\"&" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 102 "h4a := matrix(3, 3, [1, 2, 3, -1, 3, 4, 2, 4, 0]);\n
h4b := matrix(3, 3, [0, 1, -2, 3, 0, 1, 5, 0, -1]);" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#>%$h4aG-%'matrixG6#7%7%\"\"\"\"\"#\"\"$7%!\"\"F,\"\"%
7%F+F/\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$h4bG-%'matrixG6#7%7%
\"\"!\"\"\"!\"#7%\"\"$F*F+7%\"\"&F*!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 19 "multiply(h4a, h4b);" }}{PARA 11 "" 1 "" {XPPMATH 20 "
6#-%'matrixG6#7%7%\"#@\"\"\"!\"$7%\"#H!\"\"F)7%\"#7\"\"#\"\"!" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "h5 := matrix(2, 2, [1, 3, 5,
 2]);\ninverse(h5);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#h5G-%'matrix
G6#7$7$\"\"\"\"\"$7$\"\"&\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'m
atrixG6#7$7$#!\"#\"#8#\"\"$F*7$#\"\"&F*#!\"\"F*" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 61 "h7 := matrix(3, 3, [3, 1, 5, 3, 1, 6, 5, 1, 5]
);\ninverse(h7);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#h7G-%'matrixG6#
7%7%\"\"$\"\"\"\"\"&7%F*F+\"\"'7%F,F+F," }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#-%'matrixG6#7%7%#!\"\"\"\"#\"\"!#\"\"\"F*7%#\"#:F*!\"&#!\"$F*7%F
)F-F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "8 0 0
" 0 }{VIEWOPTS 1 1 0 1 1 1803 }