{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 Input" 2 19 "" 0 1 255 0 0 1 0 0 0 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 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 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple O
utput" 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 15 "with(linalg):\n\n" }
}{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 41 "A:=matrix(3,3,[4,12,8,2,6,5,
-3,-8,-6]);\n\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%'matrixG6#7
%7%\"\"%\"#7\"\")7%\"\"#\"\"'\"\"&7%!\"$!\")!\"'" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 20 "b:=vector([8,5,-5]);" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"bG-%'vectorG6#7%\"\")\"\"&!\"&" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 17 "Ab:=augment(A,b);" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%#AbG-%'matrixG6#7%7&\"\"%\"#7\"\")F,7&\"\"#\"\"'\"\"&
F07&!\"$!\")!\"'!\"&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "Ab1
:=mulrow(Ab,1,1/4);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$Ab1G-%'matri
xG6#7%7&\"\"\"\"\"$\"\"#F,7&F,\"\"'\"\"&F/7&!\"$!\")!\"'!\"&" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "Ab2:=addrow(Ab1,1,2,-2);Ab3:
=addrow(Ab2,1,3,3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$Ab2G-%'matri
xG6#7%7&\"\"\"\"\"$\"\"#F,7&\"\"!F.F*F*7&!\"$!\")!\"'!\"&" }}{PARA 11 
"" 1 "" {XPPMATH 20 "6#>%$Ab3G-%'matrixG6#7%7&\"\"\"\"\"$\"\"#F,7&\"\"
!F.F*F*7&F.F*F.F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "Ab4:=s
waprow(Ab3,2,3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$Ab4G-%'matrixG6
#7%7&\"\"\"\"\"$\"\"#F,7&\"\"!F*F.F*7&F.F.F*F*" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 14 "gausselim(Ab);" }}{PARA 0 "> " 0 "" {MPLTEXT 
1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'matrixG6#7%7&\"\"%\"#7\"
\")F*7&\"\"!\"\"\"F,F-7&F,F,F-F-" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 48 "Ab5:=addrow(Ab4,3,1,-2);Ab6:=addrow(Ab5,2,1,-3);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$Ab5G-%'matrixG6#7%7&\"\"\"\"\"$\"\"
!F,7&F,F*F,F*7&F,F,F*F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$Ab6G-%'m
atrixG6#7%7&\"\"\"\"\"!F+!\"$7&F+F*F+F*7&F+F+F*F*" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 9 "rref(Ab);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#
-%'matrixG6#7%7&\"\"\"\"\"!F)!\"$7&F)F(F)F(7&F)F)F(F(" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "evalm(A&*vector([-3,1,1]));" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'vectorG6#7%\"\")\"\"&!\"&" }}}
{PARA 0 "" 0 "" {TEXT -1 59 "What is the geometric interpretation of t
he point (-3,1,1)?" }}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "%?;" "6#
%#%?G" }}}}{MARK "11 0" 59 }{VIEWOPTS 1 1 0 3 4 1802 }