{VERSION 6 0 "IBM INTEL NT" "6.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 "Times" 1 12 0 0 0 1 2 2 2 2 
2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 
11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 
0 0 0 1 0 1 0 2 2 0 1 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "with(linalg):" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 56 "k:=EA/(2*L)*matrix([[2,0,-1],[0,2,1],[-1,1,1+
sqrt(2)]]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"kG,$*&#\"\"\"\"\"#F
(*(%#EAGF(%\"LG!\"\"K%'matrixG6#7%7%F)\"\"!F-7%F3F)F(7%F-F(,&F(F(*$F)F
'F(Q(pprint06\"F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "r:
=vector([P1,P2,0]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"rGK%'vector
G6#7%%#P1G%#P2G\"\"!Q(pprint06\"" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "U:=linsolve(k,r);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#
>%\"UGK%'vectorG6#7%,$*,\"\"%!\"\"\"\"##\"\"\"F-%\"LGF/,(%#P2GF/%#P1GF
,*(F-F/F-F.F3F/F,F/%#EAGF,F,,$**F+F,F-F.,(*&F2F/F0F/F,**F-F/F-F.F2F/F0
F/F,*&F3F/F0F/F/F/F5F,F,,$*,F-F,F-F.F0F/,&F2F,F3F/F/F5F,F/Q(pprint06\"
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 53 "M:=(EA/L/sqrt(2))*matri
x([[1,1,0],[-1,1,1],[0,0,1]]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"
MG,$*&#\"\"\"\"\"#F(**%#EAGF(%\"LG!\"\"F)F'K%'matrixG6#7%7%F(F(\"\"!7%
F-F(F(7%F3F3F(Q(pprint06\"F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "F:=multiply(M,U);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#
>%\"FGK%'vectorG6#7%,**&\"\"%!\"\"%#P2G\"\"\"F,*&F+F,%#P1GF.F.*(\"\"#F
,F2#F.F2F0F.F.*(F+F,%\"LGF,,(*&F-F.F5F.F,**F2F.F2F3F-F.F5F.F,*&F0F.F5F
.F.F.F,,**&F+F,F-F.F,*&F+F,F0F.F.*(F2F,F2F3F0F.F,*(F+F,F5F,F6F.F,,&*&F
2F,F-F.F,*&F2F,F0F.F.Q(pprint06\"" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "F:=simplify(F);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%
\"FGK%'vectorG6#7%,$*(\"\"#!\"\"F+#\"\"\"F+,&%#P1GF.%#P2GF.F.F.,$*(F+F
,F+F-,&F1F,F0F.F.F,,&*&F+F,F1F.F,*&F+F,F0F.F.Q(pprint06\"" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "7 1 0" 0 }{VIEWOPTS 1 
1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }