{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 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 3 }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 "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 8 "restart;" }}}{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:=3:b:=5:r:=2.22:s:=5.1;" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"sG$\"#^!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 47 "ll:=[a*cos(r),b*sin(r)]:l:=[a*cos(s),b*sin(s)];" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#>%\"lG7$$\"+GK$R8\"!\"*$!+7M2HYF(" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "m:=[l,ll];" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"mG7$7$$\"+GK$R8\"!\"*$!+7M2HYF)7$$!+8ol8=F)$\"+ht#G
)RF)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 195 "for k to 200 do u:
=ll-l: n:=[-b*ll[1]/a,-a*ll[2]/b]:v:=u-2*dotprod(u , n)*n/dotprod(n,n)
:t:=-2*(b^2*v[1]*ll[1]+a^2*ll[2]*v[2])/(b^2*v[1]^2+a^2*v[2]^2):lll:=ll
+t*v:m:=[op(m),lll]:l:=ll:ll:=lll:od:" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 38 "plot(m,scaling=constrained,axes=none);" }}{PARA 13 "
" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6'-%'CURVESG6$7fw7$$\"1+++GK
$R8\"!#:$!1+++7M2HYF*7$$!1+++8ol8=F*$\"1+++ht#G)RF*7$$\"1+++IP;z?F*$\"
1+++)eDWg$F*7$$!1+++(RLp-\"F*$!1+++$GLzp%F*7$$\"1+++A$en*HF*$!1+++5;wB
B!#;7$$!1+++?\"Hv))*FA$\"1+++Q2j?ZF*7$$\"1+++%)**\\6AF*$!1+++F[byLF*7$
$!1+++P;B&p\"F*$!1+++;,>DTF*7$$\"1+++&[6')>\"F*$\"1+++&)\\e$e%F*7$$!1+
++ef+TGF*$\"1+++#\\Qhg\"F*7$$\"1+++59JD#*FA$!1+++<OsdZF*7$$!1+++O&Gqg#
F*$\"1+++po(RZ#F*7$$\"1+++qk&)y8F*$\"1+++89eSWF*7$$!1+++>nAa9F*$!1+++Z
_GtVF*7$$\"1+++\"pH#3DF*$!1+++aQ1VFF*7$$!1+++gu%\\K*FA$\"1+++5]K_ZF*7$
$\"1+++&QLH!HF*$!1+++s\")eh7F*7$$!1++++cXX6F*$!1+++Rl=@YF*7$$\"1+++&)>
\"3z\"F*$\"1+++M$R9,%F*7$$!1+++**e)R5#F*$\"1+++_/>kNF*7$$\"1+++$*[4>5F
*$!1+++vAn-ZF*7$$!1+++c9u)*HF*$!1++++K9[9FA7$$\"1++++n9`**FA$\"1+++\"y
)z;ZF*7$$!1+++NyX'=#F*$!1+++Q0`BMF*7$$\"1+++1x-<<F*$!1+++,J2+TF*7$$!1+
++b=u&=\"F*$\"1+++tP(Gf%F*7$$\"1+++EddcGF*$\"1+++#e-v_\"F*7$$!1+++qcxV
#*FA$!1+++5!Gnv%F*7$$\"1+++tag%e#F*$\"1+++k&*[QDF*7$$!1+++.Y&eR\"F*$\"
1+++')\\!eU%F*7$$\"1+++&G+iV\"F*$!1+++O:!)*Q%F*7$$!1+++[&)oJDF*$!1+++C
D`#o#F*7$$\"1++++K5(H*FA$\"1+++q,%Qv%F*7$$!1+++$H^(*)GF*$!1+++-Y-V8F*7
$$\"1+++e(*Gd6F*$!1+++?!*)Hh%F*7$$!1+++0%)>o<F*$\"1+++c'3#RSF*7$$\"1++
+yl))G@F*$\"1+++g$yG_$F*7$$!1+++\"oa:,\"F*$!1+++8A>2ZF*7$$\"1+++hR!)**
HF*$!1++++'=er&!#<7$$!1+++v9<-5F*$\"1+++!3kFr%F*7$$\"1+++R&Q9;#F*$!1++
+'4\"QnMF*7$$!1+++c$z!R<F*$!1+++2W<uSF*7$$\"1+++3k=t6F*$\"1+++&Q@=g%F*
7$$!1+++&)yWrGF*$\"1+++_Y(zW\"F*7$$\"1+++!yu]E*FA$!1+++,odbZF*7$$!1+++
x#R=c#F*$\"1+++eY!=g#F*7$$\"1+++Zd;89F*$\"1+++L&=0T%F*7$$!1+++mK[=9F*$
!1+++rVx0WF*7$$\"1+++GL'[b#F*$!1+++2%*y?EF*7$$!1+++5H5s#*FA$\"1+++'H'>
bZF*7$$\"1+++N<#e(GF*$!1+++b&eOU\"F*7$$!1+++rlVp6F*$!1+++()=Z/YF*7$$\"
1+++bR#eu\"F*$\"1+++$*Q:mSF*7$$!1+++3(\\Q:#F*$\"1+++rQZ![$F*7$$\"1+++&
y6V+\"F*$!1+++$G)\\6ZF*7$$!1+++YS%***HF*$\"1++++V^`IFfw7$$\"1+++(HC$45
F*$\"1+++V>_3ZF*7$$!1+++@(fk8#F*$!1+++6-75NF*7$$\"1+++@(z8w\"F*$!1+++&
pvu/%F*7$$!1+++@X%4;\"F*$\"1+++ptV5YF*7$$\"1+++^-g&)GF*$\"1+++GBfn8F*7
$$!1+++!R7#*G*FA$!1+++Q'oUv%F*7$$\"1+++NdvQDF*$\"1+++u[\"Rm#F*7$$!1+++
)\\)yI9F*$\"1+++_xq%R%F*7$$\"1+++1t2,9F*$!1+++B&=7U%F*7$$!1+++O'Gxd#F*
$!1+++)GRyb#F*7$$\"1+++!3U*\\#*FA$\"1+++<]RcZF*7$$!1+++Fd;hGF*$!1+++P.
X.:F*7$$\"1+++%z'*==\"F*$!1+++Afi&f%F*7$$!1+++kepB<F*$\"1+++cPH#4%F*7$
$\"1+++U(e)y@F*$\"1+++->'pV$F*7$$!1******R6lt**FA$!1+++Bbf:ZF*7$$\"1++
+p9;**HF*$\"1+++]e4#=\"FA7$$!1+++0Ux;5F*$\"1+++Zu1/ZF*7$$\"1+++1!Q:6#F
*$!1+++]Hw^NF*7$$!1+++B=#Ry\"F*$!1+++h\"e*>SF*7$$\"1+++P`,\\6F*$\"1+++
46t=YF*7$$!1+++c;,**GF*$\"1+++oRR'G\"F*7$$\"1+++gI>;$*FA$!1+++N>!Gv%F*
7$$!1+++o+Q:DF*$\"1+++Kb\"[s#F*7$$\"1+++$[@([9F*$\"1+++txNyVF*7$$!1+++
3P)RQ\"F*$!1+++l&[hV%F*7$$\"1+++3!f-g#F*$!1+++#=)o$\\#F*7$$!1++++shI#*
FA$\"1+++fxVdZF*7$$\"1+++!40e%GF*$!1+++6BO#e\"F*7$$!1+++17n%>\"F*$!1++
+%eTke%F*7$$\"1+++M6#=q\"F*$\"1+++(eYw6%F*7$$!1+++!H'*Q?#F*$\"1+++?%GB
R$F*7$$\"1+++5z82**FA$!1+++:')[>ZF*7$$!1+++DvX(*HF*$\"1+++qX2e?FA7$$\"
1+++#=AX-\"F*$\"1+++`aR*p%F*7$$!1+++#***o'3#F*$!1+++fRK#f$F*7$$\"1+++
\\wp1=F*$!1+++kNg\"*RF*7$$!1+++e#)RP6F*$\"1+++r9rEYF*7$$\"1+++k9m6HF*$
\"1+++5>U/7F*7$$!1+++]7-Y$*FA$!1+++z\\<^ZF*7$$\"1+++fyt\"\\#F*$\"1+++(
*>]%y#F*7$$!1+++)eipY\"F*$\"1+++#*QXhVF*7$$\"1+++-S?n8F*$!1+++z$y0X%F*
7$$!1+++k\"GCi#F*$!1+++ecMGCF*7$$\"1,++q\\79#*FA$\"1+++]dKeZF*7$$!1+++
9FwHGF*$!1+++7sNg;F*7$$\"1+++$>gx?\"F*$!1+++I#4pd%F*7$$!1+++jk?!o\"F*$
\"1+++@/BUTF*7$$\"1+++\\S%*GAF*$\"1+++(fglM$F*7$$!1+++!GoN%)*FA$!1+++v
?=BZF*7$$\"1+++a]$[*HF*$\"1+++]grKHFA7$$!1+++e\"pD.\"F*$\"1+++*f+Xp%F*
7$$\"1+++M7$>1#F*$!1+++&4>=j$F*7$$!1+++p*)pH=F*$!1+++VKRiRF*7$$\"1+++H
B4E6F*$\"1+++\">(QMYF*7$$!1+++V-`BHF*$\"1+++$e=<7\"F*7$$\"1******R<qy$
*FA$!1+++\"z&Q\\ZF*7$$!1+++eO&yY#F*$\"1+++wH(H%GF*7$$\"1+++,*4b[\"F*$
\"1+++=1)RM%F*7$$!1+++K*Q2N\"F*$!1+++u>_kWF*7$$\"1+++d.@WEF*$!1+++z5#=
O#F*7$$!1+++?@Y+#*FA$\"1+++k+1fZF*7$$\"1+++(phI\"GF*$!1+++*=-ut\"F*7$$
!1+++#[k6A\"F*$!1+++N'=qc%F*7$$\"1+++3w&)e;F*$\"1+++uP1mTF*7$$!1+++UP)
RD#F*$\"1+++4`k*H$F*7$$\"1+++SD$Hy*FA$!1+++!G!oEZF*7$$!1+++[%)H\"*HF*$
\"1+++]ZY0QFA7$$\"1+++qi\"4/\"F*$\"1+++!Gx$*o%F*7$$!1+++llFP?F*$!1+++$
)\\EqOF*7$$\"1+++Gs\"H&=F*$!1+++(R3B$RF*7$$!1+++;m4:6F*$\"1+++pnwTYF*7
$$\"1+++7'*fMHF*$\"1+++e\"G$Q5F*7$$!1+++!RSUT*FA$!1+++%GKuu%F*7$$\"1++
+-=vVCF*$\"1+++6&G-!HF*7$$!1+++B7O/:F*$\"1+++'HAfK%F*7$$\"1+++Z#*eM8F*
$!1+++pH*zZ%F*7$$!1+++t&zbm#F*$!1+++!HETH#F*7$$\"1+++Sgi*=*FA$\"1+++0;
kfZF*7$$!1+++des&z#F*$!1+++(zlM\"=F*7$$\"1+++:Y)[B\"F*$!1+++G$fnb%F*7$
$!1+++z*zxj\"F*$\"1+++X[;*=%F*7$$\"1+++Mj**yAF*$\"1+++X/d^KF*7$$!1+++g
3AD(*FA$!1+++?t)*HZF*7$$\"1+++.N&o)HF*$\"1++++,xvYFA7$$!1+++QYc\\5F*$
\"1+++[&>So%F*7$$\"1+++>,u7?F*$!1+++v'ywq$F*7$$!1+++qLMw=F*$!1+++-,L,R
F*7$$\"1+++T,T/6F*$\"1+++d$e)[YF*7$$!1+++BA&[%HF*$\"1+++IR'Ha*FA7$$\"1
+++gNk_%*FA$!1+++*47`u%F*7$$!1+++2iX>CF*$\"1+++/+FcHF*7$$\"1+++;S^B:F*
$\"1+++IHE2VF*7$$!1+++pbv=8F*$!1+++.X+\"\\%F*7$$\"1+++:'4lo#F*$!1+++0`
FDAF*7$$!1+++S^h\"=*FA$\"1+++B52gZF*7$$\"1+++!pzxx#F*$!1+++7z^))=F*7$$
!1+++P4#*[7F*$!1+++)e?ha%F*7$$\"1+++.*yph\"F*$\"1+++78b6UF*7$$!1+++7='
RI#F*$\"1+++@bK-KF*7$$\"1+++!pC/n*FA$!1+++Zq5LZF*7$$!1+++$f2:)HF*$\"1+
++5Z2VbFA7$$\"1+++__^e5F*$\"1+++O8UyYF*7$$!1+++9dL))>F*$!1+++*>xSu$F*7
$$\"1+++#\\n***=F*$!1+++?*R%pQF*7$$!1+++F>.%4\"F*$\"1+++:)pcl%F*7$$\"1
+++6=FaHF*$\"1+++q6r'p)FA7$$!1+++?u\"R\\*FA$!1+++PF-VZF*7$$\"1+++s.*\\
R#F*$\"1+++N.56IF*7$$!1+++ba'Ha\"F*$\"1+++5j)zG%F*7$$\"1+++:$QKI\"F*$!
1+++I&pN]%F*7$$!1+++!Qupq#F*$!1+++,SGb@F*7$$\"1+++?xUw\"*FA$\"1+++\"))
[.w%F*7$$!1+++9![#fFF*$!1+++P7`i>F*7$$\"1+++0QFj7F*$!1+++a84NXF*7$$!1+
++-!fkf\"F*$\"1+++E5CLUF*7$$\"1+++\\*f)GBF*$\"1+++l.!>:$F*7$$!1+++S_`=
'*FA$!1+++tJ/OZF*7$$\"1+++2&p_(HF*$\"1+++I*RoS'FA7$$!1+++Q#px1\"F*$\"1
+++ridsYF*7$$\"1+++Rj2k>F*$!1+++k#y%zPF*7$$!1+++#QzP#>F*$!1+++0#>m$QF*
7$$\"1+++t4'R3\"F*$\"1+++r(3Am%F*7$$!1+++gL%G'HF*$\"1+++!48]%yFA7$$\"1
++++\"p!Q&*FA$!1+++(\\h0u%F*7$$!1+++MtPqBF*$\"1+++-PskIF*7$$\"1+++xBri
:F*$\"1+++\\f2oUF*7$$!1+++#yP!)G\"F*$!1+++\"f+d^%F*7$$\"1+++ix%ps#F*$!
1+++B/<%3#F*7$$!1+++SG1u\"*FA$\"1+++#\\v/w%F*7$$\"1++++h:SFF*$!1++++,[
N?F*7$$!1+++\"QVzF\"F*$!1+++K-mBXF*7$$\"1+++RYAw:F*$\"1+++<9DaUF*7$$!1
+++M(pON#F*$\"1+++ihG+JF*7$$\"1+++!yV&p&*FA$!1+++d\"*zQZF*7$$!1+++-%\\
\"oHF*$\"1+++gX`msFA7$$\"1+++gwKx5F*$\"1+++(pxkm%F*7$$!1+++YU(*R>F*$!1
+++u***Q\"QF*7$$\"1+++8$ox%>F*$!1+++&G\\G!QF*7$$!1+++Kh>u5F*$\"1+++pD[
oYF*7$$\"1+++?JbqHF*$\"1,+++aO))pFA7$$!1+++qg5&e*FA$!1+++,a#zt%F*7$$\"
1+++h#RcM#F*$\"1+++.j9<JF*7$$!1+++\\:v#e\"F*$\"1+++%y9vC%F*7$$\"1+++3R
:t7F*$!1+++l+TFXF*7$$!1+++hSSYFF*$!1+++WO&>,#F*-%'COLOURG6&%$RGBG$\"#5
!\"\"\"\"!F][o-%+AXESLABELSG6$%!GFa[o-%(SCALINGG6#%,CONSTRAINEDG-%*AXE
SSTYLEG6#%%NONEG-%%VIEWG6$%(DEFAULTGF]\\o" 1 2 0 1 0 2 9 1 1 1 
1.000000 45.000000 45.000000 0 }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 0 "" }}}}{MARK "6 1" 1 }{VIEWOPTS 1 1 0 1 1 1803 }