{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 "" 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 "Text Output" -1 2 1 
{CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 0 }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 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 "Title" 0 18 1 
{CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 1 0 0 0 0 0 0 0 }3 0 0 -1 12 12 
0 0 0 0 0 0 19 0 }}
{SECT 0 {EXCHG {PARA 18 "" 0 "" {TEXT -1 30 "Inverses, elementary mati
rices" }}}{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 39 "A:=matrix([[1,1,-1],[3,-2,1],[2,4,2]]);" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#>%\"AG-%'matrixG6#7%7%\"\"\"F*!\"\"7%\"\"$!\"#F*
7%\"\"#\"\"%F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "E1:=matri
x([[1,0,0],[-3,1,0],[0,0,1]]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#E
1G-%'matrixG6#7%7%\"\"\"\"\"!F+7%!\"$F*F+7%F+F+F*" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 18 "B1:=evalm(E1&*A);\n" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%#B1G-%'matrixG6#7%7%\"\"\"F*!\"\"7%\"\"!!\"&\"\"%7%\"
\"#F/F1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "E2:=matrix([[1,0
,0],[0,1,0],[-2,0,1]]);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#E2G-%'matrixG6#7%7%\"\"\"\"\"!F+7%F
+F*F+7%!\"#F+F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "B2:=eval
m(E2&*B1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#B2G-%'matrixG6#7%7%\"
\"\"F*!\"\"7%\"\"!!\"&\"\"%7%F-\"\"#F/" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 41 "E3:=matrix([[1,0,0],[0,-1/5,0],[0,0,1]]);" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#>%#E3G-%'matrixG6#7%7%\"\"\"\"\"!F+7%F+#!\"
\"\"\"&F+7%F+F+F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "B3:=ev
alm(E3&*B2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#B3G-%'matrixG6#7%7%
\"\"\"F*!\"\"7%\"\"!F*#!\"%\"\"&7%F-\"\"#\"\"%" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 39 "E4:=matrix([[1,0,0],[0,1,0],[0,-2,1]]);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#E4G-%'matrixG6#7%7%\"\"\"\"\"!F+7%F
+F*F+7%F+!\"#F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "B4:=eval
m(E4&*B3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#B4G-%'matrixG6#7%7%\"
\"\"F*!\"\"7%\"\"!F*#!\"%\"\"&7%F-F-#\"#GF0" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 39 "E5:=matrix([[1,-1,0],[0,1,0],[0,0,1]]);" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#>%#E5G-%'matrixG6#7%7%\"\"\"!\"\"\"\"!7%F,F*
F,7%F,F,F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "B5:=evalm(E5&
*B4);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#B5G-%'matrixG6#7%7%\"\"\"
\"\"!#!\"\"\"\"&7%F+F*#!\"%F.7%F+F+#\"#GF." }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 41 "E6:=matrix([[1,0,0],[0,1,0],[0,0,5/28]]);" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#>%#E6G-%'matrixG6#7%7%\"\"\"\"\"!F+7%F+F*F+7
%F+F+#\"\"&\"#G" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "B6:=eval
m(E6&*B5);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#B6G-%'matrixG6#7%7%\"
\"\"\"\"!#!\"\"\"\"&7%F+F*#!\"%F.7%F+F+F*" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 40 "E7:=matrix([[1,0,1/5],[0,1,0],[0,0,1]]);" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#>%#E7G-%'matrixG6#7%7%\"\"\"\"\"!#F*\"\"&7%F
+F*F+7%F+F+F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "B7:=evalm(
E7&*B6);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#B7G-%'matrixG6#7%7%\"\"
\"\"\"!F+7%F+F*#!\"%\"\"&7%F+F+F*" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 40 "E8:=matrix([[1,0,0],[0,1,4/5],[0,0,1]]);" }}{PARA 11 
"" 1 "" {XPPMATH 20 "6#>%#E8G-%'matrixG6#7%7%\"\"\"\"\"!F+7%F+F*#\"\"%
\"\"&7%F+F+F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "B8:=evalm(
E8&*B7);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#B8G-%'matrixG6#7%7%\"\"
\"\"\"!F+7%F+F*F+7%F+F+F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
41 "B:=evalm(E8&*E7&*E6&*E5&*E4&*E3&*E2&*E1);" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"BG-%'matrixG6#7%7%#\"\"#\"\"(#\"\"$\"#9#\"\"\"\"#G7
%#F1F,#!\"\"F,F47%#!\"%F,#F1F/#\"\"&F2" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 11 "inverse(A);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'mat
rixG6#7%7%#\"\"#\"\"(#\"\"$\"#9#\"\"\"\"#G7%#F/F*#!\"\"F*F27%#!\"%F*#F
/F-#\"\"&F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "evalm(B-inve
rse(A));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'matrixG6#7%7%\"\"!F(F(F
'F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "22 0 0" 
0 }{VIEWOPTS 1 1 0 3 2 1804 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }