{VERSION 2 3 "IBM INTEL NT" "2.3" } {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 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 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 }{PSTYLE "" 11 12 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }1 0 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 25 "A:=matrix(2,2,[2,3,4,5]);" } }{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%'MATRIXG6#7$7$\"\"#\"\"$7$\" \"%\"\"&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "eigenvects(A); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6$7%,&#\"\"(\"\"#\"\"\"*$\"#d#F(F'F+ F(<#-%'VECTORG6#7$F(,&F+F(F)#F(\"\"'7%,&F%F(F)#!\"\"F'F(<#-F.6#7$F(,&F +F(F)#F7F3" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "X:=matrix(2,2 ,[1,1,1/2+sqrt(57)/6,1/2-sqrt(57)/6]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"XG-%'MATRIXG6#7$7$\"\"\"F*7$,&#F*\"\"#F**$\"#dF-#F*\"\"',&F- F*F/#!\"\"F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "W:=inverse( X);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"WG-%'MATRIXG6#7$7$,$*&,&!\" $\"\"\"*$\"#d#F.\"\"#F.F.F0F1#F.\"$9\",$F/#F.\"#>7$,$*&,&\"\"$F.F/F.F. F0F1F3,$F/#!\"\"F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "l1:=7 /2+sqrt(57)/2; l2:=7/2-sqrt(57)/2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6# >%#l1G,&#\"\"(\"\"#\"\"\"*$\"#d#F)F(F," }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#l2G,&#\"\"(\"\"#\"\"\"*$\"#d#F)F(#!\"\"F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "Lambda:=matrix(2,2,[l1,0,0,l2]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'LambdaG-%'MATRIXG6#7$7$,&#\"\"(\"\"#\"\" \"*$\"#d#F.F-F1\"\"!7$F2,&F+F.F/#!\"\"F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "B:=multiply( X, Lambda, W );" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%\"BG-%'MATRIXG6#7$7$,&*(,&#\"\"(\"\"#\"\"\"*$\"#d#F0F /F3F0,&!\"$F0F1F0F0F2F3#F0\"$9\"*(,&F-F0F1#!\"\"F/F0,&\"\"$F0F1F0F0F2F 3F6,&*&F,F0F2F3#F0\"#>*&F9F0F2F3#F;FA7$,&**,&F3F0F1#F0\"\"'F0F,F0F4F0F 2F3F6**,&F3F0F1#F;FIF0F9F0F " 0 "" {MPLTEXT 1 0 17 "simplify(B[1,1]);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "simplify(B[1,2]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6# \"\"$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "simplify(B[2,1]); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"%" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 17 "simplify(B[2,2]);" }}{PARA 11 "" 1 "" {XPPMATH 20 " 6#\"\"&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "A:=matrix(2,2,[1 ,1,1,0]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%'MATRIXG6#7$7$\" \"\"F*7$F*\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "eigenvec ts(A);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$7%,&*$\"\"&#\"\"\"\"\"#F'F'F (F(<#-%'VECTORG6#7$F$F(7%,&F'F(F%#!\"\"F)F(<#-F,6#7$F0F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "X:=matrix(2,2,[sqrt(5)/2+1/2,1/2-sq rt(5)/2,1,1]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"XG-%'MATRIXG6#7$ 7$,&*$\"\"&#\"\"\"\"\"#F-F-F.,&F-F.F+#!\"\"F/7$F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "W:=inverse(X);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"WG-%'MATRIXG6#7$7$,$*$\"\"&#\"\"\"\"\"##F.F,,$*&,&F +F.!\"\"F.F.F,F-#F.\"#57$,$F+#F4F,,$*&,&F+F.F.F.F.F,F-F5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "Lambda:=matrix(2,2,[1/2+sqrt(5)/2,0 ,0,1/2-sqrt(5)/2]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'LambdaG-%'MA TRIXG6#7$7$,&*$\"\"&#\"\"\"\"\"#F-F-F.\"\"!7$F0,&F-F.F+#!\"\"F/" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "A:=matrix(2,2,[2,3,3,5]);" } }{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%'MATRIXG6#7$7$\"\"#\"\"$7$F+ \"\"&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "eigenvects(A);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6$7%,&#\"\"(\"\"#\"\"\"*$\"\"&#F(F'#\"\" $F'F(<#-%'VECTORG6#7$F(,&F)F+F+F(7%,&F%F(F)#!\"$F'F(<#-F06#7$F(,&F+F(F )#!\"\"F'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "X:=matrix(2,2, [1,1,sqrt(5)/2+1/2,1/2-sqrt(5)/2]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #>%\"XG-%'MATRIXG6#7$7$\"\"\"F*7$,&*$\"\"&#F*\"\"#F/F/F*,&F/F*F-#!\"\" F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "W:=inverse(X);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"WG-%'MATRIXG6#7$7$,$*&,&*$\"\"&#\" \"\"\"\"#F0!\"\"F0F0F.F/#F0\"#5,$F-#F0F.7$,$*&,&F-F0F0F0F0F.F/F3,$F-#F 2F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 58 "Lambda:=matrix(2,2,[ 7/2+3*sqrt(5)/2,0,0,7/2-3*sqrt(5)/2]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'LambdaG-%'MATRIXG6#7$7$,&#\"\"(\"\"#\"\"\"*$\"\"&#F.F-#\"\"$F -\"\"!7$F4,&F+F.F/#!\"$F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "22 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }