{VERSION 3 0 "DEC ALPHA UNIX" "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 "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 108 "A:=matrix(3,3,[-1/2 ,v/u,w/u,\n u/v,-1/2,w/v,\n u/w,v/w,-1/2 ]):\nM:=evalm(-2/3*A);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"MG-%'mat rixG6#7%7%#\"\"\"\"\"$,$*&%\"vG\"\"\"%\"uG!\"\"#!\"#F,,$*&%\"wGF0F1F2F 37%,$*&F1F0F/F2F3F*,$*&F7F0F/F2F37%,$*&F1F0F7F2F3,$*&F/F0F7F2F3F*" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "linalg[eigenvects](M);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6$7%!\"\"\"\"\"<#-%'vectorG6#7%*&%\"wG\" \"\"%\"uG!\"\"*&F,F-%\"vGF/F%7%F%\"\"#<$-F(6#7%,$F+F$\"\"!F%-F(6#7%,$* &F1F-F.F/F$F%F9" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "linalg[j ordan](M,'P');" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'matrixG6#7%7%!\" \"\"\"!F)7%F)\"\"\"F)7%F)F)F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "print(P);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'matrixG6#7%7%#\" \"\"\"\"$,$*&,&%\"wGF*%\"uG!\"#\"\"\"F/!\"\"#!\"\"F*,$*&F.F1F/F2F47%,$ *&F/F1%\"vGF2F(,$F9F3\"\"!7%,$*&F/F1F.F2F(,$*&,&F.F*F/F4F1F.F2F(F)" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "Test:=evalm(transpose(M)&*M -&*());" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%TestG-%'matrixG6#7%7%,(# !\")\"\"*\"\"\"*&*$)%\"uG\"\"#\"\"\"F4*$)%\"vG\"\"#F4!\"\"#\"\"%F-*&*$ F1F4F4*$)%\"wG\"\"#F4F9F:,(*&F7F4F2F9#!\"#F-*&F2F4F7F9FD*&*&F2F.F7F.F4 *$)F@\"\"#F4F9F:,(*&F@F4F2F9FD*&*&F2F4F@F.F4*$)F7\"\"#F4F9F:*&F2F4F@F9 FD7%FB,(*&*$)F7F3F4F4*$)F2\"\"#F4F9F:F+F.*&*$FXF4F4*$)F@\"\"#F4F9F:,(* &*&F7F4F@F4F4*$)F2\"\"#F4F9F:*&F@F4F7F9FD*&F7F4F@F9FD7%FLF[o,(*&*$)F@F 3F4F4*$)F2\"\"#F4F9F:*&*$FgoF4F4*$)F7\"\"#F4F9F:F+F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "entries(Test);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6+7#,(*&*&%\"vG\"\"\"%\"wGF(\"\"\"*$)%\"uG\"\"#F*!\"\"#\" \"%\"\"**&F)F*F'F/#!\"#F2*&F'F*F)F/F47#,(#!\")F2F(*&*$)F-\"\"#F*F**$)F '\"\"#F*F/F0*&*$F=F*F**$)F)\"\"#F*F/F07#,(*&*$)F)F>F*F**$)F-\"\"#F*F/F 0*&*$FKF*F**$)F'\"\"#F*F/F0F9F(7#,(*&F'F*F-F/F4*&F-F*F'F/F4*&*&F-F(F'F *F**$)F)\"\"#F*F/F07#,(*&F)F*F-F/F4*&*&F-F*F)F*F**$)F'\"\"#F*F/F0*&F-F *F)F/F4FgnFT7#,(*&*$)F'F>F*F**$)F-\"\"#F*F/F0F9F(*&*$FdoF*F**$)F)\"\"# F*F/F0F#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "test:=map(op,\{ entries(Test)\});" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%%testG<(,(*&%\" wG\"\"\"%\"uG!\"\"#!\"#\"\"**&*&F*\"\"\"F(F1F)*$)%\"vG\"\"#F)F+#\"\"%F .*&F*F)F(F+F,,(*&F4F)F*F+F,*&F*F)F4F+F,*&*&F*F)F4F1F)*$)F(\"\"#F)F+F6, (#!\")F.F1*&*$)F*\"\"#F)F)*$)F4\"\"#F)F+F6*&*$FFF)F)*$)F(\"\"#F)F+F6,( *&*$)F4FGF)F)*$)F*\"\"#F)F+F6FBF1*&*$FSF)F)*$)F(\"\"#F)F+F6,(*&*$)F(FG F)F)*$)F*\"\"#F)F+F6*&*$FinF)F)*$)F4\"\"#F)F+F6FBF1,(*&*&F4F)F(F)F)*$) F*\"\"#F)F+F6*&F(F)F4F+F,*&F4F)F(F+F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "convert(Test,set);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6 #<(,(*&%\"wG\"\"\"%\"uG!\"\"#!\"#\"\"**&*&F(\"\"\"F&F/F'*$)%\"vG\"\"#F 'F)#\"\"%F,*&F(F'F&F)F*,(*&F2F'F(F)F**&F(F'F2F)F**&*&F(F'F2F/F'*$)F&\" \"#F'F)F4,(#!\")F,F/*&*$)F(\"\"#F'F'*$)F2\"\"#F'F)F4*&*$FDF'F'*$)F&\" \"#F'F)F4,(*&*$)F2FEF'F'*$)F(\"\"#F'F)F4F@F/*&*$FQF'F'*$)F&\"\"#F'F)F4 ,(*&*$)F&FEF'F'*$)F(\"\"#F'F)F4*&*$FgnF'F'*$)F2\"\"#F'F)F4F@F/,(*&*&F2 F'F&F'F'*$)F(\"\"#F'F)F4*&F&F'F2F)F**&F2F'F&F)F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "test:=map(numer,test);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%%testG<(,(*&)%\"vG\"\"#\"\"\")%\"wGF*F+!\"#*&F,F+)%\" uGF*F+F.*&F(F+F0F+\"\"%,(F'F3F/F.F2F.,(F'F.F/F3F2F.,(F'!\")F/F3F2F3,(F 'F3F/F3F2F7,(F'F3F/F7F2F3" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "sol:=[solve(test,\{u,v,w\})];" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#> %$solG7)<%/%\"vG\"\"!/%\"wGF+/%\"uGF)<%/F+F)/F(F(F,<%F*/F(F+/F-F+<%F*F 2/F-,$F+!\"\"<%F*/F(F6F3<%F*F9F5<%/F-F-F'F/" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "sol:=remove(has,sol,0);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$solG7&<%/%\"wGF(/%\"vGF(/%\"uGF(<%F'F)/F,,$F(!\"\"<% F'/F*F/F+<%F'F2F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "for i \+ in sol do\n i,subs(i,eval(M))\nod;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 $<%/%\"wGF%/%\"vGF%/%\"uGF%-%'matrixG6#7%7%#\"\"\"\"\"$#!\"#F1F27%F2F/ F27%F2F2F/" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$<%/%\"wGF%/%\"vGF%/%\"uG ,$F%!\"\"-%'matrixG6#7%7%#\"\"\"\"\"$#\"\"#F3F47%F4F1#!\"#F37%F4F7F1" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$<%/%\"wGF%/%\"vG,$F%!\"\"/%\"uGF%-%' matrixG6#7%7%#\"\"\"\"\"$#\"\"#F3#!\"#F37%F4F1F47%F6F4F1" }}{PARA 11 " " 1 "" {XPPMATH 20 "6$<%/%\"wGF%/%\"vG,$F%!\"\"/%\"uGF(-%'matrixG6#7%7 %#\"\"\"\"\"$#!\"#F3#\"\"#F37%F4F1F67%F6F6F1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "12 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }