{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 }{PSTYLE "Maple Plot" 0 13 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 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,[9,3,3,1]);" } }{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%'MATRIXG6#7$7$\"\"*\"\"$7$F+ \"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "read(`a:eigenmat. txt`):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "eigenmat(A,Lambda ,X);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$-%'MATRIXG6#7$7$\"\"!F(7$F(\"# 5-F$6#7$7$,$*$F*#\"\"\"\"\"##F2F*,$F0#\"\"$F*7$,$F0#!\"$F*F/" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "z:=ve ctor(2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"zG-%&arrayG6$;\"\"\"\" \"#7\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "z[1]:=t; z[2]:=3* t^2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"zG6#\"\"\"%\"tG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"zG6#\"\"#,$*$%\"tGF'\"\"$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "plot([z[1],z[2],t=-2..2]);" }} {PARA 13 "" 1 "" {INLPLOT "6#-%'CURVESG6$7S7$$!\"#\"\"!$\"#7F*7$$!1LLL $Q6G\">!#:$\"1uGY;Ul(4\"!#97$$!1nm;M!\\p$=F0$\"1bxBEXJ75F37$$!1LLL))Qj ^8/%o%F0 7$$!1nmmc4`i6F0$\"1X\\ivYVaSF07$$!1LLLQW*e3\"F0$\"1'z4O>+v`$F07$$!1,++ +()>'***!#;$\"1^k\\`'>x*HF07$$!1++++0\"*H\"*Fco$\"13.9szl+DF07$$!1++++ 83&H)Fco$\"1\"H3K@^U1#F07$$!1LLL3k(p`(Fco$\"1(>$R,/=/%Fco$\"1Iq>(H`]G&Fco7$$!1*****\\FRXL$Fco$ \"1c_&HlXdL$Fco7$$!1+++D=/8DFco$\"1*zfUw8Y*=Fco7$$!1mmm;a*el\"Fco$\"1< I\"G*)ofA)!#<7$$!1pmm;Wn(o)Fhr$\"1O,5.1FkAFhr7$$!1qLLL$eV(>!#=$\"1x3_[ sUp6!#?7$$\"1Mmm;f`@')Fhr$\"1$=roWE*HAFhr7$$\"1)****\\nZ)H;Fco$\"1)p36 L5#pzFhr7$$\"1lmm;$y*eCFco$\"1Z5b3B(R\"=Fco7$$\"1*******R^bJ$Fco$\"1&e 7eKkyH$Fco7$$\"1'*****\\5a`TFco$\"1?0@w4dv^Fco7$$\"1(****\\7RV'\\Fco$ \"1@#G/$ )Fco$\"18)=)G&*ew?F07$$\"1*******pfa<*Fco$\"1A(*=@=nDDF07$$\"1HLLeg`!) **Fco$\"1a2N+IL))HF07$$\"1++]#G2A3\"F0$\"1.\"))o!y^8NF07$$\"1LLL$)G[k6 F0$\"1S*Gn:h!oSF07$$\"1++]7yh]7F0$\"1ao#)QZ8#p%F07$$\"1nmm')fdL8F0$\"1 @>kOZFN`F07$$\"1nmm,FT=9F0$\"1'*zuwPoNgF07$$\"1LL$e#pa-:F0$\"1,O*HzTHx 'F07$$\"1+++Sv&)z:F0$\"1aX3S&\\y[(F07$$\"1LLLGUYo;F0$\"1OQoV'=8N)F07$$ \"1nmm1^rZ\"HU,r+\"F37$$\"1++] 2%)38>F0$\"1mKZw@(z4\"F37$$\"\"#F*F+-%'COLOURG6&%$RGBG$\"#5!\"\"F*F*" 2 267 145 145 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 10030 10061 10056 10074 0 0 0 20030 0 12020 0 0 0 0 0 0 0 1 1 0 0 0 194 76 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "z[1]:=3*cos(t ); z[2]:=2*sin(t);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"zG6#\"\"\", $-%$cosG6#%\"tG\"\"$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"zG6#\"\"# ,$-%$sinG6#%\"tGF'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "plot( [z[1],z[2],t=0..2*Pi]);" }}{PARA 13 "" 1 "" {INLPLOT "6#-%'CURVESG6$7S 7$$\"\"$\"\"!F*7$$\"1F$)=7(3>(H!#:$\"1H`6ljbIF!#;7$$\"1MpkH19-HF.$\"1] )*=>zdm]F17$$\"16$eO%fduFF.$\"1nEr\\1A1wF17$$\"1e!RcF@ff#F.$\"1.2*y=%[ -5F.7$$\"1T\"F. 7$$\"1)z&*QsO\\$=F.$\"1VU!*4QE#e\"F.7$$\"1GA*oYJK]\"F.$\"1RQvF_!3t\"F. 7$$\"1Z7S$*=/Y6F.$\"11?@-JJ[=F.7$$\"1,WmG)ehd(F1$\"1xi*oit^$>F.7$$\"1r `%yY5a.%F1$\"1?([FZB=)>F.7$$!16F@K4K\"z\"!#=$\"1EKYV'*****>F.7$$!1%\\C x2Zu3%F1$\"1%*Q_d%\\8)>F.7$$!1o92^kaQzF1$\"1%QO)4lqG>F.7$$!19$>$zE$>8 \"F.$\"1cX;2L<_=F.7$$!1\\n3#e%p7:F.$\"1Hdh9q8Fo!H%o%=\"=F.$\" 1L'zw+YSf\"F.7$$!1u#HS!\\zE@F.$\"17N27Wb59F.7$$!1udmh7ErBF.$\"1UB'oZH^ A\"F.7$$!1%3V>-#z(f#F.$\"1f')*=3G.+\"F.7$$!1O4%>)3GpFF.$\"1Nt*)Re]\"p( F17$$!1s6#G0(3**GF.$\"1(QHKl(oV^F17$$!1$4De+4@(HF.$\"1'3/,,]3s#F17$$!1 y\\ysb)***HF.$\"1]W)H()=E?'Fao7$$!1:ph09`sHF.$!1&=)R7PE+FF17$$!1mg A!HF.$!1r5bcgck]F17$$!1Y*4Rmy*yFF.$!1>qjsqWMvF17$$!1#[H'ReD-EF.$!1_q!H x\"e^**F17$$!1xRQJ.#QQ#F.$!1\\f!Q&)[U@\"F.7$$!1)RF6ypJ8#F.$!1WOTi&piS \"F.7$$!1``.Hfd9=F.$!1E:c_=F.7$$!1Nu(Qu'*f#yF1$!1)Q%>R(\\2$>F.7$$!1NO sD.quQF1$!1zOh)R[K)>F.7$$!1PO5)G]@<*Fao$!1@ZQ_1****>F.7$$\"1#p'*3wpJ'Q F1$!1\\p,p$[L)>F.7$$\"1&z6r.C^m(F1$!1(p$*e#fhL>F.7$$\"1ltm:&R2:\"F.$!1 TTVQa,Z=F.7$$\"1%GHG^!G$=F.$!1\"zp$ e9O$e\"F.7$$\"1\"GSf6!zH@F.$!19x67Wa39F.7$$\"1el6=N0qBF.$!1heM5x;E7F.7 $$\"1UI'[D,Bg#F.$!1R'f^%R0^**F17$$\"1]Z'fG+vw#F.$!1\"R9M:P*>xF17$$\"1g owgmS'*GF.$!1@,NzwO5_F17$$\"1u'*ygm3sHF.$!1[RH7Y$>s#F17$F($\"1F)Q\"Gu# 3k\"!#C-%'COLOURG6&%$RGBG$\"#5!\"\"F*F*" 2 367 223 223 2 0 1 0 2 9 0 4 1 1.000000 45.000000 45.000000 10030 10061 10056 10074 0 0 0 20030 0 12010 0 0 0 0 0 0 0 1 1 0 0 0 184 42 0 0 0 0 0 0 }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 20 "z[1]:=3*sqrt(1+t^2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"zG6#\"\"\",$*$,&F'F'*$%\"tG\"\"#F'#F'F-\"\"$" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "z[2]:=2*t;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"zG6#\"\"#,$%\"tGF'" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 56 "plot(\{[z[1],z[2],t=-5..5],\n [-z[1],z[2],t=-5 ..5]\});" }}{PARA 13 "" 1 "" {INLPLOT "6$-%'CURVESG6$7W7$$\"1Ny2aeqH:! #9$!#5\"\"!7$$\"1W?$pNScY\"F*$!1nmm;p0k&*!#:7$$\"1Dd_gj**49F*$!1LL$3w&*o!*eA7F*$!1LL$3i.9!zF37$$\"1(HY)\\W1l6F*$!1nm;/R=0vF37$$\" 1[,%Hx8d5\"F*$!1,+]P8#\\4(F37$$\"1,x(3p*fW5F*$!1mm;/siqmF37$$\"1%[x!z) 3+%)*F3$!1****\\(y$pZiF37$$\"1\">!)=Ik1A*F3$!1LLL$yaE\"eF37$$\"1[s%HaF37$$\"1ndG;-5v!)F3$!1******\\$*4)*\\F37$$\"1Eq#)oLy vuF3$!1+++]_&\\c%F37$$\"1$oa;lfo!pF3$!1+++]1aZTF37$$\"1s/(*))H[*R'F3$! 1mm;/#)[oPF37$$\"1q.Fb4$4\"eF3$!1LLL$=exJ$F37$$\"1J5k)HI'G`F3$!1LLLL2$ f$HF37$$\"1VL0#)\\r#z%F3$!1++]PYx\"\\#F37$$\"1zI03E][VF3$!1MLLL7i)4#F3 7$$\"1D!R&=Rq0RF3$!1****\\P'psm\"F37$$\"1&y!3\\n$Ha$F3$!1****\\74_c7F3 7$$\"1=Jxr9!pC$F3$!1:LL$3x%z#)!#;7$$\"1iGZVP%e9$F3$!1BL$e9d;J'Fgr7$$\" 1aVU;J%*pIF3$!1ILL3s$QM%Fgr7$$\"1\"olz1Y%=IF3$!1****\\ivF@AFgr7$$\"1N* yVaO++$F3$!1^omm;zr)*!#=7$$\"1!\\Hsn'e;IF3$\"1QL$3-Dg5#Fgr7$$\"1MK]MT* )oIF3$\"1WLLezw5VFgr7$$\"1\"*>0g'*QF 3$\"1++++dxd;F37$$\"1)[@guM[K%F3$\"1,++D0xw?F37$$\"1tNX?v[\"y%F3$\"1,+ ]i&p@[#F37$$\"1k#HwLDTK&F3$\"1+++vgHKHF37$$\"1)*QcuKNNeF3$\"1lmmmZvOLF 37$$\"1R9))3@j*R'F3$\"1,++]2goPF37$$\"1C2/jneBpF3$\"1KL$eR<*fTF37$$\"1 ]dlGk32vF3$\"1-++])Hxe%F37$$\"17q.r^>k!)F3$\"1mm;H!o-*\\F37$$\"1#*[t7S B`')F3$\"1,+]7k.6aF37$$\"1]QLq%3XB*F3$\"1mmm;WTAeF37$$\"1R#R\"4orZ)*F3 $\"1****\\i!*3`iF37$$\"1sh+n\\?W5F*$\"1NLLL*zym'F37$$\"1nmN%=,`5\"F*$ \"1OLL3N1#4(F37$$\"1F8j-*eh;\"F*$\"1pm;HYt7vF37$$\"1+:!pQ\"GA7F*$\"1-+ ++xG**yF37$$\"1[gG'*p!oG\"F*$\"1qmmT6KU$)F37$$\"1Vfw)pyYM\"F*$\"1OLLLb dQ()F37$$\"1v&Q:#f_19F*$\"1++]i`1h\"*F37$$\"19biEP%eY\"F*$\"1-+]P?Wl&* F37$F($\"#5F--%'COLOURG6&%$RGBG$F\\\\l!\"\"F-F--F$6$7W7$$!1Ny2aeqH:F*F +7$$!1W?$pNScY\"F*F17$$!1Dd_gj**49F*F77$$!1LgWlQaZ8F*F<7$$!1Gb*R&)H[G \"F*FA7$$!1>w&*o!*eA7F*FF7$$!1(HY)\\W1l6F*FK7$$!1[,%Hx8d5\"F*FP7$$!1,x (3p*fW5F*FU7$$!1%[x!z)3+%)*F3FZ7$$!1\">!)=Ik1A*F3Fin7$$!1[0g'*QF3Fiu7$$!1)[@ guM[K%F3F^v7$$!1tNX?v[\"y%F3Fcv7$$!1k#HwLDTK&F3Fhv7$$!1)*QcuKNNeF3F]w7 $$!1R9))3@j*R'F3Fbw7$$!1C2/jneBpF3Fgw7$$!1]dlGk32vF3F\\x7$$!17q.r^>k!) F3Fax7$$!1#*[t7SB`')F3Ffx7$$!1]QLq%3XB*F3F[y7$$!1R#R\"4orZ)*F3F`y7$$!1 sh+n\\?W5F*Fey7$$!1nmN%=,`5\"F*Fjy7$$!1F8j-*eh;\"F*F_z7$$!1+:!pQ\"GA7F *Fdz7$$!1[gG'*p!oG\"F*Fiz7$$!1Vfw)pyYM\"F*F^[l7$$!1v&Q:#f_19F*Fc[l7$$! 19biEP%eY\"F*Fh[l7$Fg\\lF[\\l-F^\\l6&F`\\lF-Fa\\lF-" 2 271 271 271 2 0 1 0 2 9 0 4 1 1.000000 45.000000 45.000000 10030 10061 10056 10074 0 0 0 20030 0 12010 0 0 0 0 0 0 0 1 1 0 0 0 167 196 0 0 0 0 0 0 }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "A:=matrix(2,2,[8,-8,-8,8]); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%'MATRIXG6#7$7$\"\")!\")7$F +F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "eigenmat(A,lambda,X) ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$-%'MATRIXG6#7$7$\"#;\"\"!7$F)F)-F $6#7$7$,$*$\"\"##\"\"\"F1#!\"\"F1,$F0F27$F6F6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "z:=vector([t,-8*t^2]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"zG-%'VECTORG6#7$%\"tG,$*$F)\"\"#!\")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "plot([z[1],z[2],t=-0.3..0.3]);" }} {PARA 13 "" 1 "" {INLPLOT "6#-%'CURVESG6$7S7$$!1+++++++I!#;$!1+++++++s F*7$$!1+++vq@pGF*$!1Xsx)HDfe'F*7$$!1++D^NUbFF*$!1FlUdr)Q2'F*7$$!1++]K3 XFEF*$!1bRw,$)zAbF*7$$!1++]F)H')\\#F*$!1V\")*=\"3_%*\\F*7$$!1++D'3@/P# F*$!1/4\"4!p6&\\%F*7$$!1++Dr^b^AF*$!1$4Y8b+c0%F*7$$!1++D,kZG@F*$!1@DaK %HVi$F*7$$!1++Dh\")=,?F*$!1CiUC\"F *$!1u\\#zs]&Q7F*7$$!1++DhkaI6F*$!1>f$3C3D-\"F*7$$!1******\\XF`**!#<$!1 :UTTRTDzFep7$$!1++++Az2))Fep$!1o/2vi<1iFep7$$!1,+]7RKvuFep$!1YNu2uVqWF ep7$$!1/+++P'eH'Fep$!1>#=$y>.rJFep7$$!1++]7*3=+&Fep$!1aJx\"RZ9+#Fep7$$ !1)***\\PFcpPFep$!1zebe#on8\"Fep7$$!1,++DJ%Q[#Fep$!1=yoN8eN\\!#=7$$!1* ***\\i6:.8Fep$!1z+'=Oi&e8Ffr7$$!1x-++v`hH!#>$!1:j7\"\\jl,(!#A7$$\"1++] (QIKH\"Fep$!1>F7oe&zL\"Ffr7$$\"1****\\7:xWCFep$!1F_m)>E:y%Ffr7$$\"1,++ vuY)o$Fep$!1J18&Q$Q)3\"Fep7$$\"1(******4FL(\\Fep$!1]v[&f=(y>Fep7$$\"1( ****\\d6.B'Fep$!1;js&eU`5$Fep7$$\"1)***\\(o3lW(Fep$!1N5kI$RgV%Fep7$$\" 1*****\\A))oz)Fep$!1!\\^aR>3>'Fep7$$\"1******Hk-,5F*$!1[$o%38V;!)Fep7$ $\"1+++D-eI6F*$!1S)GhJpD-\"F*7$$\"1***\\(=_(zC\"F*$!1(G\"H%[;,KF*7$$\"1++]_!> w7#F*$!1)z[gE59i$F*7$$\"1++v)Q?QD#F*$!1ihzv]wjSF*7$$\"1+++5jypBF*$!1K2 0C(4F\\%F*7$$\"1++]Ujp-DF*$!1-.@'=\"z5]F*7$$\"1******fEd@EF*$!1yvKpX6) \\&F*7$$\"1++v3'>$[FF*$!1.=ZP&3E/'F*7$$\"1++D6EjpGF*$!1%fR)eI$ye'F*7$$ \"1+++++++IF*F+-%'COLOURG6&%$RGBG$\"#5!\"\"\"\"!F`[l" 2 268 148 148 2 0 1 0 2 9 0 4 1 1.000000 45.000000 45.000000 10030 10061 10056 10074 0 0 0 20030 0 12010 0 0 0 0 0 0 0 1 1 0 0 0 154 91 0 0 0 0 0 0 }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "y:=vector([z[2]-3,z[1]+2]); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"yG-%'VECTORG6#7$,&*$%\"tG\"\"# !\")!\"$\"\"\",&F+F/F,F/" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "plot([y[1],y[2],t=-0.3..0.3],-3.7..1,-1..2.3);" }}{PARA 13 "" 1 "" {INLPLOT "6$-%'CURVESG6$7S7$$!1++++++?P!#:$\"1+++++++q0]=F*7$$!1>%G$y%R+:$F*$\"1++]U80j=F*7$$!1)\\#z s]&Q7$F*$\"1++]!ytb(=F*7$$!1#f$3C3D-JF*$\"1+](QNXp)=F*7$$!1UTTRTDzIF*$ \"1++]asY+>F*7$$!102vi<1iIF*$\"1+++y?#>\">F*7$$!1Ou2uVqWIF*$\"1+](3wY_ #>F*7$$!1#=$y>.rJIF*$\"1+++j8/P>F*7$$!1Jx\"RZ9+-$F*$\"1+](3\">)*\\>F*7 $$!1fbe#on8,$F*$\"1+]isVIi>F*7$$!1)oN8eN\\+$F*$\"1++vo:;v>F*7$$!1g=Oi& e8+$F*$\"1+]P)[op)>F*7$$!1\\jl,2++IF*$\"1++DYQq**>F*7$$!1B\"oe&zL,IF*$ \"1+](QIKH,#F*7$$!1l')>E:y/IF*$\"1+]7:xWC?F*7$$!118&Q$Q)3,$F*$\"1++vuY )o.#F*7$$!1v[&f=(y>IF*$\"1+++rKt\\?F*7$$!1js&eU`5.$F*$\"1++v:JIi?F*7$$ !15kI$RgV/$F*$\"1+](o3lW2#F*7$$!1:X&R>3>1$F*$\"1++D#))oz3#F*7$$!1$o%38 V;!3$F*$\"1+++VE5+@F*7$$!1%)GhJpD-JF*$\"1++]A!eI6#F*7$$!1H\"H%[;,K$F*$\"1+++)RO+?#F*7$$!1! )[gE59iLF*$\"1++D0>w7AF*7$$!1;'zv]wjS$F*$\"1+]()Q?QDAF*7$$!1t]Ss4F\\MF *$\"1+++J'ypB#F*7$$!1I5i=\"z5]$F*$\"1++DM'p-D#F*7$$!1eF$pX6)\\NF*$\"1+ ++ms:iAF*7$$!1\"=ZP&3E/OF*$\"1+](3'>$[F#F*7$$!1gR)eI$yeOF*$\"1+]7hK'pG #F*7$F($\"1+++++++BF*-%'COLOURG6&%$RGBG$\"#5!\"\"\"\"!F\\[l-%%VIEWG6$; $!#PF[[l$\"\"\"F\\[l;$F[[lF\\[l$\"#BF[[l" 2 270 206 206 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "x :=multiply(X,y);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"xG-%'VECTORG6# 7$,&*&\"\"##\"\"\"F+,&*$%\"tGF+!\")!\"$F-F-#!\"\"F+*&F+F,,&F0F-F+F-F-F ,,&F*F,F5F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "plot([x[1],x [2],t=-0.3..0.3]);" }}{PARA 13 "" 1 "" {INLPLOT "6#-%'CURVESG6$7S7$$\" 1)3JSv=D$Q!#:$!1Eo*zpb$G9F*7$$\"13_!['[M)z$F*$!1jZ95jov8F*7$$\"1dv$yr% =qPF*$!1ltrGLVJ8F*7$$\"1BN()))eESPF*$!1JjICkT$G\"F*7$$\"1n(\\*\\+-7PF* $!1AO9WD&pB\"F*7$$\"1yKy(esdo$F*$!1z!3zitD>\"F*7$$\"1fh6y\"*4jOF*$!1r7 LR+4`6F*7$$\"1x79)o18k$F*$!1q*yFe\"*Q6\"F*7$$\"1:u/M;d?OF*$!1[7:`_:v5F *7$$\"1$4P%\\ts,OF*$!1,gKBuOQ5F*7$$\"1KPpsRC%e$F*$!1Fqy/pU-5F*7$$\"17S II3WqNF*$!1')Hd=qmB(*!#;7$$\"1x[L\"o!pcNF*$!1`\\JS*F^o7$$\"16=690z WNF*$!1$34:Q!Q+\"*F^o7$$\"15GAW+8NNF*$!1=L3m;oE))F^o7$$\"1DX5]W*y_$F*$ !12g(>R2Nf)F^o7$$\"1@NF*$!1ib'*)*>GN$)F^o7$$\"1KrI.x8O F*$!1Zl=#[&>eoF^o7$$\"1j8'G+8:k$F*$!16Uq<4z')oF^o7$$\"1vS+$*=+jOF*$!1D *y*GD3IpF^o7$$\"1Go2qXy(o$F*$!1f0wlDp%*pF^o7$$\"1`*z@J\")=r$F*$!1ReZ%R Q'pqF^o7$$\"1[s&G`4+u$F*$!15%)z[^TprF^o7$$\"1'4t&3x*3N)F^o7$$\"1Wq3a cy?SF*$!1Y/)QN,Ad)F^o7$$\"1**Q7/x\"o1%F*$!1X?r$oeX%))F^o7$$\"1s)Hg\\#o 4TF*$!10$=B5!40\"*F^o7$$\"1^WW'RYr:%F*$!1MCb_=[+%*F^o7$$\"1q'[nrxU?%F* $!1Np;iDB+(*F^o7$$\"1;IuAGycUF*$!1(*[GH;4/5F*-%'COLOURG6&%$RGBG$\"#5! \"\"\"\"!F_[l" 2 270 270 270 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 24 0 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "A:=matrix(2,2,[1,sqrt(3 ),sqrt(3),-1]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%'MATRIXG6#7 $7$\"\"\"*$\"\"$#F*\"\"#7$F+!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "eigenmat(A,Lambda,X);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$-%'MATRIXG6#7$7$!\"#\"\"!7$F)\"\"#-F$6#7$7$#!\"\"F+,$*$\"\"$#\" \"\"F+F57$F2F5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a:=3/ (2*sqrt(2));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"aG,$*$\"\"##\"\"\" F'#\"\"$\"\"%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "z:=vector( [a*t,a*sqrt(1+t^2)]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"zG-%'VECT ORG6#7$,$*&\"\"##\"\"\"F+%\"tGF-#\"\"$\"\"%,$*&F+F,,&F-F-*$F.F+F-F,F/ " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 56 "plot(\{[z[1],z[2],t=-5. .5],\n [z[1],-z[2],t=-5..5]\});" }}{PARA 13 "" 1 "" {INLPLOT "6$- %'CURVESG6$7W7$$!12\"**)e3I.`!#:$\"1$)f>8pK3aF*7$$!1G=2Er5s]F*$\"1-m$e <@==&F*7$$!1$)\\K&pY4([F*$\"1g/))R**3&)\\F*7$$!1uuB_2sWYF*$\"16h,EqGkZ F*7$$!1f0vO_*pT%F*$\"1*zb@^fDa%F*7$$!1%R()31_.>%F*$\"1+CK1^]AVF*7$$!1$ G;X#[A!)RF*$\"1a%G]'[7>TF*7$$!1O&)HU-liPF*$\"12n[M&)G4RF*7$$!1#GD\")HM w`$F*$\"1q\\ADw@$p$F*7$$!1O(QH)*RLJ$F*$\"1kdm-&o*yMF*7$$!1mN\\5di#3$F* $\"1.@XFr**fKF*7$$!1lMu`CTzGF*$\"1a0#F*$\"1\"R%>[O% >W#F*7$$!1B3*HnU&)*>F*$\"1)[%z3*eDE#F*7$$!1@\"HB)p]f'H6\"F*$\"1g33TyUP:F*7$$!1X,d+D.U))!#;$\"13H0j[(3Q\"F*7$$!1Nf[M% 3Pm'Fiq$\"1A]H+th_7F*7$$!1/xs#zb3R%Fiq$\"1xwECI&z9\"F*7$$!1buDw;EZLFiq $\"1n9y@PA76F*7$$!10syfvm.BFiq$\"17.u(z)Q&3\"F*7$$!1cf]?.,y6Fiq$\"1-Al T==n5F*7$$!1O2ZA\"3`B&!#=$\"1,*o@4t11\"F*7$$\"1X[=I%))o6\"Fiq$\"1%)HvZ W_m5F*7$$\"1(R%fT*HhG#Fiq$\"1HaiEz,&3\"F*7$$\"1`FZ9\"eRI$Fiq$\"1lX*p;G 46\"F*7$$\"136N(G'y@VFiq$\"1dR.M*G`9\"F*7$$\"1:jR44N?lFiq$\"1neL.,0X7F *7$$\"1q?n$H$o\"z)Fiq$\"1%[ibKcwP\"F*7$$\"1&)o*3*QP,6F*$\"1(\\6#))*f!H :F*7$$\"1[RF(>pjJ\"F*$\"1'yN\\760p\"F*7$$\"1)R4$H[3b:F*$\"1&Qi]ciB)=F* 7$$\"1,***>W\"epF*$\"1;YkI;hiAF*7$$ \"1Ds#)\\$Hh?#F*$\"1d(R^ddyW#F*7$$\"13-Rl6,LCF*$\"1\"*zKge:aEF*7$$\"1M ;_s#*[YEF*$\"1Tg7XN7^GF*7$$\"1gXR0ajpGF*$\"1h%*zC-QfIF*7$$\"1([xw`,y3$ F*$\"1Q)[,y\"*[E$F*7$$\"1')Gff7?;LF*$\"1aNZnOp\"[$F*7$$\"1z#[xLxh`$F*$ \"1(p$fl?#=p$F*7$$\"1>6^\\Y8hPF*$\"131c8)Hy!RF*7$$\"1mS:,#HU)RF*$\"1r$ e*RV*H7%F*7$$\"1;,TC*H#*=%F*$\"1W2)fG<9K%F*7$$\"1-8e()Q=CWF*$\"1&ygdw \\&\\XF*7$$\"1S\"[J^HVj%F*$\"11D2Kr:aZF*7$$\"16x`!e)Qe[F*$\"1BH<&3?G( \\F*7$$\"1RBK(pTG2&F*$\"1/LG'>SD=&F*7$$\"12\"**)e3I.`F*F+-%'COLOURG6&% $RGBG$\"#5!\"\"\"\"!Fb\\l-F$6$7W7$F($!1$)f>8pK3aF*7$F.$!1-m$e<@==&F*7$ F3$!1g/))R**3&)\\F*7$F8$!16h,EqGkZF*7$F=$!1*zb@^fDa%F*7$FB$!1+CK1^]AVF *7$FG$!1a%G]'[7>TF*7$FL$!12n[M&)G4RF*7$FQ$!1q\\ADw@$p$F*7$FV$!1kdm-&o* yMF*7$Fen$!1.@XFr**fKF*7$Fjn$!1a0[O%>W#F*7$F^p$!1)[%z3*eDE#F*7$Fcp$!1^#RSD=&F*7$Fi[lFg\\l- F\\\\l6&F^\\lFb\\lF_\\lFb\\l" 2 271 271 271 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 143 18592 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "y1:=vector([z[1]-3/4,z[2]-3*sqrt(3)/4]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#y1G-%'VECTORG6#7$,&*&\"\"##\"\"\"F+%\"tGF-#\"\"$\"\" %#!\"$F1F-,&*&F+F,,&F-F-*$F.F+F-F,F/*$F0F,F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "y2:=vector([z[1]-3/4,-z[2]-3*sqrt(3)/4]);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%#y2G-%'VECTORG6#7$,&*&\"\"##\"\"\"F+ %\"tGF-#\"\"$\"\"%#!\"$F1F-,&*&F+F,,&F-F-*$F.F+F-F,F2*$F0F,F2" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "plot(\{[y1[1],y1[2],t=-5..5] ,\n [y2[1],y2[2],t=-5..5]\});" }}{PARA 13 "" 1 "" {INLPLOT "6$-%' CURVESG6$7W7$$!12\"**)e3I`g!#:$!1TE()=]O2nF*7$$!1G=2Er5AeF*$!1gK^\"Gf3 ['F*7$$!1$)\\K&pY4i&F*$!1=rbX!GTG'F*7$$!1uuB_2s%R&F*$!1pFpJ^KjgF*7$$!1 f0vO_*p;&F*$!1dC$yh(fTeF*7$$!1%R()31_.%\\F*$!1e!**>@V:i&F*7$$!1$G;X#[A IZF*$!17^qqH;=aF*7$$!1O&)HU-l7XF*$!1lL;SmK3_F*7$$!1#GD\")HMwG%F*$!1F;! 4tbA*\\F*7$$!1O(QH)*RL1%F*$!1@CM3m+yZF*7$$!1mN\\5diKQF*$!1h(GJBN!fXF*7 $$!1lMu`CTHOF*$!17s%=(3fnVF*7$$!12=ddCk+MF*$!1p\\_mr,aTF*7$$!1*4;)4J$4 <$F*$!1gi1jm7URF*7$$!1'RY\"*el&\\HF*$!1\\5(Qv\")4u$F*7$$!1C3*HnU&[FF*$ !1Y6Z9qfhNF*7$$!1@\"HB)p]4DF*$!14fTZC^`LF*7$$!1&\\vzR7qI#F*$!1W#z\\T$* H=$F*7$$!1wO_dIYr?F*$!1*zGxt=N*HF*7$$!1dS#*y>'H'=F*$!1=vvYfYOGF*7$$!1: q0]K?M;F*$!1m&H(oH\"*zEF*7$$!1%f[M%3P;9F*$!1\"orfSb;b#F*7$$!1qFFzb3*= \"F*$!1NV%*H6*pW#F*7$$!1Ydinhs%3\"F*$!1E\"eu#=E6CF*7$$!10syfvm.)*!#;$! 1qpT.pU%Q#F*7$$!1cf]?.,y')F]s$!1g)Gt%*>iO#F*7$$!12ZA\"3`Bb(F]s$!1eb%y> 6(fBF*7$$!1b^\")p:6$Q'F]s$!1U'HMbibO#F*7$$!1.cSe+(Q@&F]s$!1(3-B.cSQ#F* 7$$!1Zs_&)=/'>%F]s$!1B7nsi'*4CF*7$$!1#*)[Er8#yJF]s$!1:1rRqOWCF*7$$!1[o .14\\'z*!#<$!1DD,4#)3WDF*7$$\"1q?n$H$o\"H\"F]s$!1V\"R7V%pwEF*7$$\"1`)o *3*QP^$F]s$!1b\"))Q4)4GGF*7$$\"1v%RF(>pjcF]s$!1WChI#\\&*)HF*7$$\"1!)R4 $H[30)F]s$!1V!R2n+9=$F*7$$\"1,***>W\"e>5F*$!1(G37/Z@O$F*7$$\"1#GK%fBg[ 7F*$!1u7KO(\\;c$F*7$$\"1Ds#)\\$HhX\"F*$!1:k\"3o&*ou$F*7$$\"13-Rl6,$o\" F*$!1\\Y+mR>`RF*7$$\"1M;_s#*['*=F*$!1*p-3lh,:%F*7$$\"1gXR0aj>@F*$!1>hZ I$=%eVF*7$$\"1([xw`,yL#F*$!1'\\De))HRc%F*7$$\"1')Gff7?mDF*$!17-:t6^\\Y86IF*$!1msB>z'o?&F*7$$\" 1mS:,#HUB$F*$!1H]jXC.AaF*7$$\"1;,TC*H#RMF*$!1-ul\"Rb/i&F*7$$\"1-8e()Q= uOF*$!1VuVrye[eF*7$$\"1S\"[J^HV)QF*$!1k\"\\xB&>`gF*7$$\"16x`!e)Q3TF*$! 1\"e\\3>e=F'F*7$$\"1RBK(pTGK%F*$!1i*f>Iy:['F*7$$\"12\"**)e3I`XF*F+-%'C OLOURG6&%$RGBG$\"#5!\"\"\"\"!Fb\\l-F$6$7W7$F($\"1D$>v!))G4TF*7$F.$\"1W *f,2$y#)QF*7$F3$\"1-Q?M=0'o$F*7$F8$\"1`%R.#*[_Y$F*7$F=$\"1T\"zkS@NC$F* 7$FB$\"1Udk+qYBIF*7$FG$\"1'z^$fn3?GF*7$FL$\"1\\+\")G/D5EF*7$FQ$\"17$[& >&zTR#F*7$FV$\"11\"*)pRI*z@F*7$Fen$\"1Xax@!f4'>F*7$Fjn$\"1'*Q\\gY^p?/at*QQ#F]s7$Fgq$\"1'*\\iPdn$=)Fau7$F\\r$!1tN;Q03UYFau7 $Far$!1:)*393&3^\"F]s7$Ffr$!11>&*QQ9o=F]s7$F[s$!1gMOzI\\O@F]s7$Fas$!1h XCSEc=BF]s7$Ffs$!1tv2N,l$Q#F]s7$F[t$!1SnBzl8DBF]s7$F`t$!1\"H70z,-9#F]s 7$Fet$!1K4#oQ*4\")=F]s7$Fjt$!11qU;<4P:F]s7$F_u$!1#3zSB+))R&Fau7$Feu$\" 1HEe))>#='yFau7$Fju$\"1!R[`#)=-I#F]s7$F_v$\"1$G\"f#>IZ\"RF]s7$Fdv$\"1l s&QfWK$eF]s7$Fiv$\"13(\\&)H32k(F]s7$F^w$\"1y&z'\\_tN'*F]s7$Fcw$\"1*4j% p%>)[6F*7$Fhw$\"1L8lax6b8F*7$F]x$\"1$Q\\%Ra3_:F*7$Fbx$\"1.G7>@MgF*7$F\\y$\"1'*ozhbl#=#F*7$Fay$\"1Rq\"*fRy#R#F*7$Ffy$\"1 ]R)yq\"z3EF*7$F[z$\"18^X$F*7$F_[l$\"1li\\z>ytOF*7$Fd[l$\"1Ymg!4-N)QF*7$Fi[lF g\\l-F\\\\l6&F^\\lFb\\lF_\\lFb\\l" 2 271 271 271 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 29810 13096 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "x1:=multiply(X,y1);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#x1G-%'VE CTORG6#7$,(*&\"\"##\"\"\"F+%\"tGF-#!\"$\"\")#\"\"$F1F-*&F3F,,&*&F+F,,& F-F-*$F.F+F-F,#F3\"\"%*$F3F,#F0F:F-F,,(*&F3F,,&F*F9F " 0 "" {MPLTEXT 1 0 19 "x2:=multiply(X,y2);" }} {PARA 12 "" 1 "" {XPPMATH 20 "6#>%#x2G-%'VECTORG6#7$,(*&\"\"##\"\"\"F+ %\"tGF-#!\"$\"\")#\"\"$F1F-*&F3F,,&*&F+F,,&F-F-*$F.F+F-F,#F0\"\"%*$F3F ,F9F-F,,(*&F3F,,&F*#F3F:F9F-F-F,F6F/F;F/" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "plot(\{[x1[1],x1[2],t=-5..5],\n [x2[1],x2[2],t=- 5..5]\});" }}{PARA 13 "" 1 "" {INLPLOT "6$-%'CURVESG6$7S7$$\"1^$[#G*)R &e'!#:$!1Drz;zm(=$F*7$$\"1h&y\"RBktiF*$!1SElR6q+JF*7$$\"15#\\d(yo-gF*$ !1CxO9n&[-$F*7$$\"1-$p:(RN)p&F*$!1A5fd2MRHF*7$$\"1[[5a&pCR&F*$!1.'>IV) )H&GF*7$$\"1^o]g_d)3&F*$!1Q`WHg#F*7$$\"1,>@MuBRF*$!1>M%4X!**GCF*7$$\"1,Y)Q=`Xh$F*$!1*3(f<&G!oXY#F*$!1F.2ff%H)>F*7$$\"1P-2H[q3AF*$!1Bnjwta)*=F* 7$$\"1kS`i/)*3>F*$!1\\,kz'ybz\"F*7$$\"1c$QkNf+m\"F*$!1q%z;usaq\"F*7$$ \"1/(RB![>y8F*$!1[(GwO=if\"F*7$$\"1=NKcD$z8\"F*$!1i1LKv<%\\\"F*7$$\"1K ozeLuz))!#;$!1V$33:VVP\"F*7$$\"1om**\\#Q)zmFiq$!1#*oHMN#)\\7F*7$$\"1sO .5F*pj%Fiq$!1X%G'f3K06F*7$$\"1/_:)\\w:0$Fiq$!1X[r'pr%e&*Fiq7$$\"1n4!*p \\(=r\"Fiq$!1j!HUpaBt(Fiq7$$\"1n@%R4fY`(!#<$!1_k'y\"[W&e&Fiq7$$\"1D._> QYzDFcs$!1+N-s'f4_$Fiq7$$\"1]c[.IZFA!#=$!1o5'4,T$=6Fiq7$$\"1$)H$y$4@,N F^t$\"1*4$RX;s6:Fiq7$$\"1,[ID[y^BFcs$\"1Qq5ql4$>%Fiq7$$\"12Ew$4)4%e&Fc s$\"1G!)*QAmA'oFiq7$$\"1T;AeQJE5Fiq$\"1/EwS9'))))*Fiq7$$\"1;6Xz-9>:Fiq $\"1ql#\\%)=]E\"F*7$$\"1%H-Krz<5#Fiq$\"1Cv(\\73Jc\"F*7$$\"1Ef.+=EI7z'Fiq$\"1Eq*QL# H4OF*7$$\"1K8auc7PvFiq$\"1cTja\\67RF*7$$\"1,P'[PK]G)Fiq$\"1G<+nF!H@%F* 7$$\"1*ou!y=Uy*)Fiq$\"1Po9u+l*[%F*7$$\"15tR\"HP$z(*Fiq$\"1RH'[T#>2[F*7 $$\"1\"p$Q$4c+0\"F*$\"1aQD[v[\"4&F*7$$\"1\"RS>B%RF6F*$\"1!o6\"p)f[R&F* 7$$\"1iTX<1z,7F*$\"14JsrKj`DF*$!1Mrg$yFOq(F*7$$!1*GatJuaZ#F*$!1-a'*>B#) R#F*$!1=oO%*>C*3(F*7$$!1Zm@iV:FBF*$!1Ya**[jd0oF*7$$!1f%R/1=UD#F*$!1.#F*$!1#>\\]%)o')f&F*7$$!1y\\[@%Qx'>F*$!1gqn@)epK&F*7$$!1t8=l J;(*=F*$!18wqS80A]F*7$$!15LC!G:&G=F*$!1i]Le><t$RC+lfM3W-DF*7$$!1(fIF*$!12jB,\\U(\\\"F*7$$!1V/U)oN\"F*7 $$!1S]IS&pEQ#F*$!1uJ-hT[E7F*7$$!1L*\\\"R<*[i#F*$!1$z+7L](46F*7$$!1t:@y ,@sGF*$!1$)fa-XG/5F*7$$!1i:8:irdJF*$!1T7')4UwM*)Fiq7$$!18]%*pa\\@MF*$! 1)e]g!4!4)zFiq7$$!17DvI.y3PF*$!1?4nc].&*pFiq7$$!1<3$)>:(H(RF*$!1KrhA$G S7'Fiq7$$!1'[UL)>2lUF*$!16b@*el1>&Fiq7$$!1=zmb+RUXF*$!1f%HRPHnK%Fiq7$$ !1f$4sp=V$[F*$!1MW0u0^NMFiq7$$!1OY0\"**z87&F*$!15sxAUptDFiq7$$!1\\R-%z NLU&F*$!1=/WXSqz;Fiq7$$!1@-$RO+`r&F*$!1xrmpJ(HD)Fcs7$$!1__'p@Z[,'F*$\" 1Fyat59&G%F^t7$$!1O/kQCt7jF*$\"1WdL/F%3**)Fcs7$$!1&e " 0 "" {MPLTEXT 1 0 9 "?implicit" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "?plots" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "f :=u^2-v^2+2*sqrt(3)*u*v+6*u=0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\" fG/,**$%\"uG\"\"#\"\"\"*$%\"vGF)!\"\"*(\"\"$#F*F)F(F*F,F*F)F(\"\"'\"\" !" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(plots):" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "implicitplot(f,u=-8..6,v=-8. .6);" }}{PARA 13 "" 1 "" {INLPLOT "6$-%'CURVESG6_q7$7$$!\")\"\"!$\"1hI :*f0bj&!#;7$$!1!)4iv%H;X(!#:$\"1G)4iv%H;TF-7$7$$!1++++++SuF1$\"1'p![wu 3!4%F-F.7$7$$!1************zoF1$\"1C?oY!H%)[#F-7$$!1xs%p,dmF1$\"1(f7%>%p,x\"F-7$7 $$!1************>jF1$\"1J'>J&F1$! 1h40!*)y2O#F-7$$!1)RD8P\"QOaF1$!1h***********f\"F-7$Fbo7$Fhn$!1SyF1$)z irFU7$7$F^o$!1g40!*)y2O#F-7$$!15pJ^$*Hz]F1$!1R3$o[1q!GF-7$7$$!1(****** *****RYF1$!1'>T3a^v2%F-F_p7$Fep7$$!19uhoKziUF1$!1#zDQJn?P&F-7$7$$!1(** *********zSF1$!1su`?SlBeF-F[q7$7$$!1'***********>NF1$!1RlhM(z'fwF-7$$! 1ZdJI7XMOF1$!1i***********>(F-7$F\\rFaq7$7$Fhq$!1QlhM(z'fwF-7$$!1D2)=p Y7V$F1$!1uE>\"3Lv3)F-7$7$$!1'***********fHF1$!1ECeINi&y*F-Ffr7$7$$!1NB dv')REEF1F(7$$!1$>RPy++f#F1$!1.3E;#***4yF17$7$$!1,4ig;4&[#F1F6Fes7$F[t 7$$!1Jq>[=CtCF1$!1mH!=:enO(F17$7$$!1'************R#F1$!1-Q-S<$R3(F1F_t 7$F\\s7$$!1$pw\"pvY\"[#F1$!1*HB3VK&)>\"F17$7$Fft$!1/DJ\"ecCA\"F1F[u7$7 $Fft$!1.Q-S<$R3(F17$$!1'f1Ru(>fBF1$!1*R$4cA!3#pF17$7$$!1$y\"*RO4XM#F1F F1F^oF[x7$ Fax7$$!1k]#=9sr#>F1$!1I\\5LG5m%F17$7$$!1;-y.aN5=F1FfpF[z7$Faz7$$!1> #)Q,dGIz>(*[J;F1$!1$43-G5&[?F17$7$$ !1.l6d,2V;F1F\\yF]]l7$Fc]lFay7$7$FC$!1z+oTIMG5F17$$\"1C/=Go287F-F_r7$F [^l7$$\"1r)[,s&Rw%*FU$!15[,s&Rw9%F-7$7$$!1B.HbQt`n!#=FeoF_^l7$7$$!14.H bQt`nFh^lFeo7$$\"1-+UF-7$7$$\"1\"QO3i5*e7FUFCF]_l 7$7$$\"1%QO3i5*e7FUFC7$$\"1R')47'=E.*FU$\"19-zQ\"Qn4(F-7$7$$\"1S1C&4=b '*)FU$\"1S++++++'*F-Fj_l7$F``l7$$\"1#=mtx\"F17$7$$ \"1.v@V'oC&>F-$\"1/+++++?:F1Ff`l7$F\\al7$$\"1&)4adZk&\\#F-$\"14fCCbVq; F17$7$$\"1&GLE.r,<$F-$\"1/+++++!3#F1Fbal7$7$$\"1'GLE.r,<$F-F[bl7$$\"1x 3'f*e(RS$F-$\"1?RS5CgR@F17$7$FC$\"1D(Ggw;YT#F1Fabl7$7$$\"1T++++++'*F-$ !1dotdU--9F17$$\"1?Uu)GV>\"pF-Fgy7$F`clFh]l7$Fgbl7$$\"1whw8X%)>WF-$\"1 !RB'[b,)f#F17$7$$\"12KZTbJbWF-$\"1/+++++SEF1Fecl7$7$$\"11KZTbJbWF-F^dl 7$$\"1U**o/2n[bF-$\"195`HH8XIF17$7$$\"1JF7DuyfdF-$\"1/++++++KF1Fddl7$F jdl7$$\"1W+D^2,^mF-$\"1.]([#*)*[\\$F17$7$$\"1yT@^;mBrF-$\"1.+++++gPF1F `el7$7$$\"1xT@^;mBrF-$\"1/+++++gPF17$$\"1DhgTK%et(F-$\"1&RRen:k%RF17$7 $$\"1L`2NJXJ&)F-$\"1/+++++?VF1Fafl7$7$$\"1K`2NJXJ&)F-Fjfl7$$\"1%*eJ^0] 3))F-$\"1>%o[%*\\\"*R%F17$7$Fc`l$\"1x=%3\\$3EZF1F`gl7$7$Fc`lF^cl7$$\"1 !o:aZX79\"F1$!1scTvaCh9F17$7$F_al$!14)f6`$*Rk\"F1F[hl7$Ffgl7$$\"1Oj%\\ v)Q3**F-$\"1v`]C6;\\[F17$7$$\"1\"GU*G!)=c**F-$\"1/+++++!)[F1Fehl7$7$$ \"1!GU*G!)=c**F-F^il7$$\"1r:qfQ*)36F1$\"1Q%)HSh5\"H&F17$7$$\"1`#yZYOk8 \"F1$\"10+++++SaF1Fdil7$Fjil7$$\"1E$Q\\^gUA\"F1$\"1%oh][Rdt&F17$7$$\"1 6%p;2<+G\"F1$\"10++++++gF1F`jl7$7$F[bl$!1nP7n2Ca=F17$$\"17[PpoZH?F1F\\ y7$F_[mFahl7$7$F[bl$!1oP7n2Ca=F17$$\"1C\"*QX:.)4#F1$!1;\"*QX:.e=F17$7$ F^dl$!1&fS]T.S.#F1Fg[m7$F]\\m7$$\"1aT(o*)*Q.HF1$!1YT(o*)*Q.@F17$7$$\"1 0++++++KF1$!1!)G\")3E=4AF1Fa\\m7$Fg\\m7$$\"1]s4f[!)HPF1$!1Us4f[!)pBF17 $7$F_fl$!1SmQQLK\"Q#F1F]]m7$7$Fjfl$!1+?GZk+VDF17$$\"1M`!=l@f\"QF1Fft7$ Fj]mFc]m7$Fg]m7$$\"1Mc40=+4XF1$!1Dc40=+*e#F17$7$F^il$!17<$4pXPq#F1F_^m 7$Fe^m7$$\"1H*QBd'\\(H&F1$!1?*QBd'\\ " 0 "" {MPLTEXT 1 0 25 "A:=ma trix(2,2,[5,6,6,0]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%'MATRI XG6#7$7$\"\"&\"\"'7$F+\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "eigenmat(A,Lambda,X);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$-%'MATRIX G6#7$7$!\"%\"\"!7$F)\"\"*-F$6#7$7$,$*$\"#8#\"\"\"\"\"##F5F2,$F1#\"\"$F 27$,$F1#!\"$F2F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "b:=vect or([-12*sqrt(13),0]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"bG-%'VECT ORG6#7$,$*$\"#8#\"\"\"\"\"#!#7\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "multiply(transpose(b),X);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%*transposeG6#-%'VECTORG6#7$!#C!#O" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "45 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }