{VERSION 2 3 "APPLE_PPC_MAC" "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 "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 12 "####### 3.32" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 102 "op32:= annihiloper( q^(2*j^
2+2*j)/ qfac(-q,q^2,j) / qfac(-q^2,q^2,j) / spqfac(q^2,q^2,j), 0, forw
ard);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%op32G,**$%\"NG\"\"$\"\"\"*
&,(*$%\"qG\"\"#F)F-F)!\"\"F)F)F'F.F)*&,*F,F/F-F/)F-,&%\"nGF.\"\"'F)F/*
$F-F(F)F)F'F)F)F6F/" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "####
## n even = 2*m" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 454 "a1:= as
oe(op32,  \n   q^(56*j^2 +  6*j     ) * gp(2*n+1, n + 7*j + 1, 2)\n - \+
q^(56*j^2 + 90*j + 36) * gp(2*n+1, n + 7*j + 6, 2)\n - q^(56*j^2 + 34*
j +  5) * gp(2*n  , n + 7*j + 2, 2) \n + q^(56*j^2 + 62*j + 17) * gp(2
*n  , n + 7*j + 4, 2),\n   q^(56*j^2 +  6*j     ) * gp(2*n+1, n + 7*j \+
+ 1, 2)\n - q^(56*j^2 + 90*j + 36) * gp(2*n+1, n + 7*j + 6, 2)\n - q^(
56*j^2 + 34*j +  5) * gp(2*n+2, n + 7*j + 3, 2) \n + q^(56*j^2 + 62*j \+
+ 17) * gp(2*n+2, n + 7*j + 5, 2));" }}{PARA 12 "" 1 "" {XPPMATH 20 "6
#>%#a1G,J*&)%\"qG,(\"\"#\"\"\"*$%\"jGF*\"#cF-\"\"'F+-%#gpG6%,&%\"mGF*F
+F+,(F4F+F-\"\"(F+F+F*F+!\"\"*&)F(,(F,F.F-\"#M\"\"&F+F+-F16%,&F4F*F*F+
,(F4F+\"\"$F+F-F6F*F+F+*&)F(,*F4\"\"%F/F+F,F.F-F/F+F0F+F7*&)F(,(F,F.F-
\"#i\"#<F+F+-F16%,&F4F*FEF+,(F4F+F-F6F/F+F*F+F+*&F9F+-F16%FM,(F4F+F-F6
FEF+F*F+F7*&)F(,(F+F+F,F.F-F/F+F0F+F7*&)F(,*F4FE\"#BF+F,F.F-FIF+-F16%F
?,(F4F+F<F+F-F6F*F+F7*&)F(,(\"#QF+F,F.F-\"#!*F+-F16%F3FNF*F+F+*&)F(,(
\"#?F+F,F.F-FIF+FZF+F+*&-F16%,$F4F*FRF*F+F_oF+F7*&FTF+-F16%,&F4F*FAF+,
(F4F+F-F6F*F+F*F+F+*&)F(,*F4FE\"#UF+F,F.F-F[oF+F\\oF+F+*&)F(,(F,F.F-F[
o\"#PF+F+F\\oF+F+*&)F(,(\"\")F+F,F.F-F;F+-F16%FeoFjoF*F+F+*&FdpF+F=F+F
7*&FGF+FZF+F7*&F'F+FgoF+F+*&)F(,*F4FE\"#6F+F,F.F-F;F+F=F+F+*&FhnF+-F16
%Fio,(F4F+F6F+F-F6F*F+F7*&F`pF+FaqF+F7" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 16 "a2:= eG0(17,a1);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>
%#a2G,L*&)%\"qG,(\"\"#\"\"\"*$%\"jGF*\"#cF-\"\"'F+-%#gpG6%,&%\"mGF*F+F
+,(F4F+F-\"\"(F+F+F*F+!\"\"*&)F(,(F,F.F-\"#M\"\"&F+F+-F16%,&F4F*F*F+,(
F4F+\"\"$F+F-F6F*F+F+*&)F(,*F4\"\"%F/F+F,F.F-F/F+F0F+F7*&)F(,(F,F.F-\"
#i\"#<F+F+-F16%,&F4F*FEF+,(F4F+F-F6F/F+F*F+F+*&F9F+-F16%FM,(F4F+F-F6FE
F+F*F+F7*&)F(,(F+F+F,F.F-F/F+F0F+F7*&)F(,*F4FE\"#BF+F,F.F-FIF+-F16%F?,
(F4F+F<F+F-F6F*F+F7*&)F(,(\"#QF+F,F.F-\"#!*F+-F16%F3FNF*F+F+*&)F(,(\"#
?F+F,F.F-FIF+FZF+F+*&-F16%,$F4F*FRF*F+F_oF+F7*&FTF+-F16%,&F4F*FAF+,(F4
F+F-F6F*F+F*F+F+*&)F(,*F4FE\"#UF+F,F.F-F[oF+F\\oF+F+*&)F(,(F,F.F-F[o\"
#PF+F+F\\oF+F+*&)F(,(\"\")F+F,F.F-F;F+-F16%FeoFjoF*F+F+*&FdpF+F=F+F7*&
FGF+FZF+F7*&F'F+-F16%F?FjoF*F+F+*&)F(,*FEF+F,F.F-!\")F4F*F+-F16%F?F5F*
F+F+*&)F(,*F4FE\"#6F+F,F.F-F;F+F=F+F+*&FhnF+-F16%Fio,(F4F+F6F+F-F6F*F+
F7*&F`pF+FiqF+F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "a3:= eG
1(17,a2);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a3G,J*&)%\"qG,(*$%\"jG
\"\"#\"#cF+\"#M\"\"&\"\"\"F0-%#gpG6%,&%\"mGF,F,F0,(F5F0\"\"$F0F+\"\"(F
,F0F0*&)F(,*F5\"\"%\"\"'F0F*F-F+F=F0-F26%,&F5F,F0F0,(F5F0F+F8F0F0F,F0!
\"\"*&)F(,(F*F-F+\"#i\"#<F0F0-F26%,&F5F,F<F0,(F5F0F+F8F=F0F,F0F0*&F'F0
-F26%FJ,(F5F0F+F8F<F0F,F0FB*&)F(,(F0F0F*F-F+F=F0F>F0FB*&)F(,*F5F<\"#BF
0F*F-F+FFF0-F26%F4,(F5F0F/F0F+F8F,F0FB*&)F(,(\"#QF0F*F-F+\"#!*F0-F26%F
@FKF,F0F0*&)F(,(\"#?F0F*F-F+FFF0FWF0F0*&-F26%,$F5F,FOF,F0F\\oF0FB*&FQF
0-F26%,&F5F,F7F0,(F5F0F+F8F,F0F,F0F0*&)F(,*F5F<\"#UF0F*F-F+FhnF0FinF0F
0*&)F(,(F*F-F+Fhn\"#PF0F0FinF0F0*&)F(,(\"\")F0F*F-F+F.F0-F26%FboFgoF,F
0F0*&FapF0F1F0FB*&FDF0FWF0FB*&)F(,*F=F0F*F-F+F^oF5F,F0-F26%F@FgoF,F0F0
*&)F(,*F<F0F*F-F+!\")F5F,F0-F26%F4FAF,F0F0*&)F(,*F5F<\"#6F0F*F-F+F.F0F
1F0F0*&FenF0-F26%Ffo,(F5F0F8F0F+F8F,F0FB*&F]pF0FhqF0FB" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a4:= eG1(4,a3);" }}{PARA 12 "" 1 "
" {XPPMATH 20 "6#>%#a4G,L*&)%\"qG,(*$%\"jG\"\"#\"#cF+\"#M\"\"&\"\"\"F0
-%#gpG6%,&%\"mGF,F,F0,(F5F0\"\"$F0F+\"\"(F,F0F0*&)F(,*F5\"\"%\"\"'F0F*
F-F+F=F0-F26%,&F5F,F0F0,(F5F0F+F8F0F0F,F0!\"\"*&)F(,(F*F-F+\"#i\"#<F0F
0-F26%,&F5F,F<F0,(F5F0F+F8F=F0F,F0F0*&F'F0-F26%,&F5F,F7F0F6F,F0FB*&)F(
,*F*F-F+\"#[\"#8F0F5F,F0-F26%FO,(F5F0F+F8F<F0F,F0FB*&)F(,(F0F0F*F-F+F=
F0F>F0FB*&)F(,*F5F<\"#BF0F*F-F+FFF0-F26%F4,(F5F0F/F0F+F8F,F0FB*&)F(,(
\"#QF0F*F-F+\"#!*F0-F26%F@FKF,F0F0*&)F(,(\"#?F0F*F-F+FFF0FinF0F0*&-F26
%,$F5F,FWF,F0FdoF0FB*&FYF0-F26%FO,(F5F0F+F8F,F0F,F0F0*&)F(,*F5F<\"#UF0
F*F-F+F`oF0FaoF0F0*&)F(,(F*F-F+F`o\"#PF0F0FaoF0F0*&)F(,(\"\")F0F*F-F+F
.F0-F26%FjoF^pF,F0F0*&FhpF0F1F0FB*&FDF0FinF0FB*&)F(,*F=F0F*F-F+FfoF5F,
F0-F26%F@F^pF,F0F0*&)F(,*F<F0F*F-F+!\")F5F,F0-F26%F4FAF,F0F0*&)F(,*F5F
<\"#6F0F*F-F+F.F0F1F0F0*&F]oF0-F26%FO,(F5F0F8F0F+F8F,F0FB*&FdpF0F_rF0F
B" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a5:= eG0(4,a4);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a5G,J*&)%\"qG,*%\"mG\"\"%\"\"'\"\"
\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F-F-F0F-!\"\"*&
)F(,(F.F1F/\"#i\"#<F-F--F36%,&F*F0F+F-,(F*F-F/F7F,F-F0F-F-*&)F(,*F.F1F
/\"#?\"\"&F-F*F0F--F36%,&F*F0F0F-,(F*F-F/F7F0F-F0F-F8*&)F(,*F.F1F/\"#[
\"#8F-F*F0F--F36%,&F*F0\"\"$F-,(F*F-F/F7F+F-F0F-F8*&)F(,(F-F-F.F1F/F,F
-F2F-F8*&)F(,*F*F+\"#BF-F.F1F/F<F--F36%FI,(F*F-FFF-F/F7F0F-F8*&)F(,(\"
#QF-F.F1F/\"#!*F--F36%F5FAF0F-F-*&)F(,(FEF-F.F1F/F<F-FfnF-F-*&-F36%,$F
*F0FTF0F-FaoF-F8*&FVF--F36%FRFJF0F-F-*&)F(,*F*F+\"#UF-F.F1F/F]oF-F^oF-
F-*&)F(,(F.F1F/F]o\"#PF-F-F^oF-F-*&)F(,(\"\")F-F.F1F/\"#MF--F36%FfoFJF
0F-F-*&FcpF--F36%FI,(F*F-FSF-F/F7F0F-F8*&F:F-FfnF-F8*&)F(,*F,F-F.F1F/F
EF*F0F--F36%F5FJF0F-F-*&)F(,*F+F-F.F1F/!\")F*F0F--F36%FIF6F0F-F-*&)F(,
*F*F+\"#6F-F.F1F/FfpF-FjpF-F-*&FjnF--F36%FR,(F*F-F7F-F/F7F0F-F8*&F_pF-
F^rF-F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "nops(a5);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#\"#?" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 16 "a6:= eG0(10,a5);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>
%#a6G,L*&)%\"qG,*%\"mG\"\"%\"\"'\"\"\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&
F*F0F-F-,(F*F-F/\"\"(F-F-F0F-!\"\"*&)F(,(F.F1F/\"#i\"#<F-F--F36%,&F*F0
F+F-,(F*F-F/F7F,F-F0F-F-*&)F(,*F.F1F/\"#?\"\"&F-F*F0F--F36%,&F*F0F0F-,
(F*F-F/F7F0F-F0F-F8*&)F(,*F.F1F/\"#[\"#8F-F*F0F--F36%,&F*F0\"\"$F-,(F*
F-F/F7F+F-F0F-F8*&)F(,(F-F-F.F1F/F,F-F2F-F8*&)F(,*F*F+\"#BF-F.F1F/F<F-
-F36%FI,(F*F-FFF-F/F7F0F-F8*&)F(,(\"#QF-F.F1F/\"#!*F--F36%F5FAF0F-F-*&
)F(,(FEF-F.F1F/F<F-FfnF-F-*&-F36%,$F*F0FTF0F-FaoF-F8*&FVF-FGF-F-*&)F(,
*FSF-F.F1F/!\")F*F0F--F36%FIF6F0F-F-*&)F(,*F*F+\"#UF-F.F1F/F]oF-F^oF-F
-*&)F(,(F.F1F/F]o\"#PF-F-F^oF-F-*&)F(,(\"\")F-F.F1F/\"#MF--F36%FfoFJF0
F-F-*&FgpF--F36%FI,(F*F-FSF-F/F7F0F-F8*&F:F-FfnF-F8*&)F(,*F,F-F.F1F/FE
F*F0F--F36%F5FJF0F-F-*&)F(,*F+F-F.F1F/F[pF*F0F-F\\pF-F-*&)F(,*F*F+\"#6
F-F.F1F/FjpF-F^qF-F-*&FjnF--F36%FR,(F*F-F7F-F/F7F0F-F8*&FcpF-F_rF-F8" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "a7:= eG1(10,a6);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a7G,J*&)%\"qG,*%\"mG\"\"%\"\"'\"\"
\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F-F-F0F-!\"\"*&
)F(,(F.F1F/\"#i\"#<F-F--F36%,&F*F0F+F-,(F*F-F/F7F,F-F0F-F-*&)F(,*F.F1F
/\"#?\"\"&F-F*F0F--F36%,&F*F0F0F-,(F*F-F/F7F0F-F0F-F8*&)F(,*F.F1F/\"#[
\"#8F-F*F0F--F36%,&F*F0\"\"$F-,(F*F-F/F7F+F-F0F-F8*&)F(,*F*F+\"#BF-F.F
1F/F<F--F36%FI,(F*F-FFF-F/F7F0F-F8*&)F(,(\"#QF-F.F1F/\"#!*F--F36%F5FAF
0F-F-*&)F(,(FEF-F.F1F/F<F-FYF-F-*&-F36%,$F*F0FTF0F-F^oF-F8*&FCF--F36%F
5FJF0F-F-*&)F(,*FSF-F.F1F/!\")F*F0F--F36%FIF6F0F-F-*&)F(,*F*F+\"#UF-F.
F1F/FjnF-F[oF-F-*&)F(,(F.F1F/Fjn\"#PF-F-F[oF-F-*&)F(,(\"\")F-F.F1F/\"#
MF--F36%FcoFJF0F-F-*&FfpF--F36%FI,(F*F-FSF-F/F7F0F-F8*&F:F-FYF-F8*&)F(
,*F,F-F.F1F/FEF*F0F-FeoF-F-*&)F(,*F+F-F.F1F/FjoF*F0F-F[pF-F-*&)F(,*F*F
+\"#6F-F.F1F/FipF-F]qF-F-*&FgnF--F36%FR,(F*F-F7F-F/F7F0F-F8*&FbpF-F\\r
F-F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a8:= eG0(3,a7);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a8G,H*&)%\"qG,*%\"mG\"\"%\"\"'\"\"
\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F-F-F0F-!\"\"*&
)F(,(F.F1F/\"#i\"#<F-F--F36%,&F*F0F+F-,(F*F-F/F7F,F-F0F-F-*&)F(,*F.F1F
/F,\"\"&F-F*F+F-F2F-F8*&)F(,*F.F1F/\"#[\"#8F-F*F0F--F36%,&F*F0\"\"$F-,
(F*F-F/F7F+F-F0F-F8*&)F(,*F*F+\"#BF-F.F1F/F<F--F36%,&F*F0F0F-,(F*F-FEF
-F/F7F0F-F8*&)F(,(\"#QF-F.F1F/\"#!*F--F36%F5FAF0F-F-*&)F(,(\"#?F-F.F1F
/F<F-FTF-F-*&-F36%,$F*F0FOF0F-FjnF-F8*&)F(,*FNF-F.F1F/!\")F*F0F--F36%F
VF6F0F-F-*&)F(,*F*F+\"#UF-F.F1F/FfnF-FgnF-F-*&)F(,(F.F1F/Ffn\"#PF-F-Fg
nF-F-*&)F(,(\"\")F-F.F1F/\"#MF--F36%F`o,(F*F-F/F7F0F-F0F-F-*&F`pF--F36
%FV,(F*F-FNF-F/F7F0F-F8*&F:F-FTF-F8*&)F(,*F,F-F.F1F/F\\oF*F0F--F36%F5F
fpF0F-F-*&)F(,*F+F-F.F1F/FdoF*F0F-FeoF-F-*&)F(,*F*F+\"#6F-F.F1F/FcpF-F
hpF-F-*&FYF--F36%FM,(F*F-F7F-F/F7F0F-F8*&F\\pF-FiqF-F8" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a9:= eG0(2,a8);" }}{PARA 12 "" 1 "
" {XPPMATH 20 "6#>%#a9G,J*&)%\"qG,*%\"mG\"\"%\"\"'\"\"\"*$%\"jG\"\"#\"
#cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F-F-F0F-!\"\"*&)F(,(F.F1F/\"#i
\"#<F-F--F36%,&F*F0\"\"$F-,(F*F-F/F7F,F-F0F-F-*&)F(,*F.F1F/\"#[\"#8F-F
*F0F--F36%F@,(F*F-\"\"&F-F/F7F0F-F-*&)F(,*F.F1F/F,FKF-F*F+F-F2F-F8*&FD
F--F36%F@,(F*F-F/F7F+F-F0F-F8*&)F(,*F*F+\"#BF-F.F1F/F<F--F36%,&F*F0F0F
-FJF0F-F8*&)F(,(\"#QF-F.F1F/\"#!*F--F36%F5FBF0F-F-*&)F(,(\"#?F-F.F1F/F
<F-FWF-F-*&-F36%,$F*F0FRF0F-F\\oF-F8*&)F(,*FAF-F.F1F/!\")F*F0F--F36%FY
F6F0F-F-*&)F(,*F*F+\"#UF-F.F1F/FhnF-FinF-F-*&)F(,(F.F1F/Fhn\"#PF-F-Fin
F-F-*&)F(,(\"\")F-F.F1F/\"#MF--F36%Fbo,(F*F-F/F7F0F-F0F-F-*&FbpF--F36%
FY,(F*F-FAF-F/F7F0F-F8*&F:F-FWF-F8*&)F(,*F,F-F.F1F/F^oF*F0F--F36%F5Fhp
F0F-F-*&)F(,*F+F-F.F1F/FfoF*F0F-FgoF-F-*&)F(,*F*F+\"#6F-F.F1F/FepF-Fjp
F-F-*&FenF--F36%F@,(F*F-F7F-F/F7F0F-F8*&F^pF-F[rF-F8" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 16 "a10:= eG1(2,a9);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$a10G,H*&)%\"qG,*%\"mG\"\"%\"\"'\"\"\"*$%\"jG\"\"#\"#
cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F-F-F0F-!\"\"*&)F(,*F.F1F/\"#w\"
#HF-F*F0F--F36%,&F*F0F0F-,(F*F-F/F7F,F-F0F-F-*&)F(,*F.F1F/\"#[\"#8F-F*
F0F--F36%,&F*F0\"\"$F-,(F*F-\"\"&F-F/F7F0F-F-*&)F(,*F.F1F/F,FLF-F*F+F-
F2F-F8*&FCF--F36%FI,(F*F-F/F7F+F-F0F-F8*&)F(,*F*F+\"#BF-F.F1F/\"#iF--F
36%F@FKF0F-F8*&)F(,(\"#QF-F.F1F/\"#!*F--F36%F5FAF0F-F-*&)F(,(\"#?F-F.F
1F/FXF-FYF-F-*&-F36%,$F*F0FSF0F-F]oF-F8*&)F(,*FJF-F.F1F/!\")F*F0F--F36
%F@F6F0F-F-*&)F(,*F*F+\"#UF-F.F1F/FinF-FjnF-F-*&)F(,(F.F1F/Fin\"#PF-F-
FjnF-F-*&)F(,(\"\")F-F.F1F/\"#MF--F36%Fco,(F*F-F/F7F0F-F0F-F-*&FcpF--F
36%F@,(F*F-FJF-F/F7F0F-F8*&)F(,*F,F-F.F1F/F_oF*F0F--F36%F5FipF0F-F-*&)
F(,*F+F-F.F1F/FgoF*F0F-FhoF-F-*&)F(,*F*F+\"#6F-F.F1F/FfpF-F[qF-F-*&Ffn
F--F36%FI,(F*F-F7F-F/F7F0F-F8*&F_pF-F[rF-F8" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 18 "a11:= eG1(19,a10);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%$a11G,J*&)%\"qG,*%\"mG\"\"%\"\"'\"\"\"*$%\"jG\"\"#\"#cF/F,F--%
#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F-F-F0F-!\"\"*&)F(,*F.F1F/\"#w\"#HF-F*F0F
--F36%,&F*F0F0F-,(F*F-F/F7F,F-F0F-F-*&)F(,*F.F1F/\"#[\"#8F-F*F0F--F36%
,&F*F0\"\"$F-,(F*F-\"\"&F-F/F7F0F-F-*&)F(,*F.F1F/F,FLF-F*F+F-F2F-F8*&F
CF--F36%FI,(F*F-F/F7F+F-F0F-F8*&)F(,*F*F+\"#BF-F.F1F/\"#iF--F36%F@FKF0
F-F8*&)F(,(\"#QF-F.F1F/\"#!*F--F36%F5FAF0F-F-*&)F(,(\"#?F-F.F1F/FXF-FY
F-F-*&-F36%,$F*F0FSF0F-F]oF-F8*&)F(,*FJF-F.F1F/!\")F*F0F--F36%F@F6F0F-
F-*&)F(,*F*F+\"#UF-F.F1F/FinF-FjnF-F-*&)F(,(F.F1F/Fin\"#PF-F-FjnF-F-*&
)F(,(\"\")F-F.F1F/\"#MF--F36%Fco,(F*F-F/F7F0F-F0F-F-*&FcpF--F36%F@,(F*
F-FJF-F/F7F0F-F8*&)F(,*F,F-F.F1F/F_oF*F0F--F36%F5FipF0F-F-*&)F(,*F+F-F
.F1F/FgoF*F0F-FhoF-F-*&)F(,*F*F+\"#6F-F.F1F/FfpF-F[qF-F-*&FfnF--F36%FI
,(F*F-F7F-F/F7F0F-F8*&F_pF-F>F-F8*&)F(,*F.F1F/\"$/\"\"#^F-F*F0F--F36%F
@F]rF0F-F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a12:= eG0(19,
a11);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a12G,H*&)%\"qG,*%\"mG\"\"%
\"\"'\"\"\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F-F-F0
F-!\"\"*&)F(,*F.F1F/\"#w\"#HF-F*F0F--F36%,&F*F0F0F-,(F*F-F/F7F,F-F0F-F
-*&)F(,*F.F1F/\"#[\"#8F-F*F0F--F36%,&F*F0\"\"$F-,(F*F-\"\"&F-F/F7F0F-F
-*&)F(,*F.F1F/F,FLF-F*F+F-F2F-F8*&FCF--F36%FI,(F*F-F/F7F+F-F0F-F8*&)F(
,*F*F+\"#BF-F.F1F/\"#iF--F36%F@FKF0F-F8*&)F(,(\"#QF-F.F1F/\"#!*F--F36%
F5FAF0F-F-*&)F(,(\"#?F-F.F1F/FXF-FYF-F-*&-F36%,$F*F0FSF0F-F]oF-F8*&)F(
,*FJF-F.F1F/!\")F*F0F--F36%F@F6F0F-F-*&)F(,*F*F+\"#UF-F.F1F/FinF-FjnF-
F-*&)F(,(\"\")F-F.F1F/\"#MF--F36%Fco,(F*F-F/F7F0F-F0F-F-*&F_pF--F36%F@
,(F*F-FJF-F/F7F0F-F8*&)F(,*F,F-F.F1F/F_oF*F0F--F36%F5FepF0F-F-*&)F(,*F
+F-F.F1F/FgoF*F0F-FhoF-F-*&)F(,*F*F+\"#6F-F.F1F/FbpF-FgpF-F-*&FfnF--F3
6%FI,(F*F-F7F-F/F7F0F-F8*&F:F--F36%F5FKF0F-F8*&)F(,*F.F1F/\"$/\"\"#^F-
F*F0F--F36%F@FiqF0F-F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "a
13:= shiftdown(19,a12);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a13G,H*&
)%\"qG,*%\"mG\"\"%\"\"'\"\"\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,
(F*F-F/\"\"(F-F-F0F-!\"\"*&)F(,*F.F1F/\"#w\"#HF-F*F0F--F36%,&F*F0F0F-,
(F*F-F/F7F,F-F0F-F-*&)F(,*F.F1F/\"#[\"#8F-F*F0F--F36%,&F*F0\"\"$F-,(F*
F-\"\"&F-F/F7F0F-F-*&)F(,*F.F1F/F,FLF-F*F+F-F2F-F8*&FCF--F36%FI,(F*F-F
/F7F+F-F0F-F8*&)F(,*F*F+\"#BF-F.F1F/\"#iF--F36%F@FKF0F-F8*&)F(,(\"#QF-
F.F1F/\"#!*F--F36%F5FAF0F-F-*&)F(,(\"#?F-F.F1F/FXF-FYF-F-*&-F36%,$F*F0
FSF0F-F]oF-F8*&)F(,*FJF-F.F1F/!\")F*F0F--F36%F@F6F0F-F-*&)F(,*F*F+\"#U
F-F.F1F/FinF-FjnF-F-*&)F(,(\"\")F-F.F1F/\"#MF--F36%Fco,(F*F-F/F7F0F-F0
F-F-*&F_pF--F36%F@,(F*F-FJF-F/F7F0F-F8*&)F(,*F,F-F.F1F/F_oF*F0F--F36%F
5FepF0F-F-*&)F(,*F+F-F.F1F/FgoF*F0F-FhoF-F-*&)F(,*F*F+\"#6F-F.F1F/FbpF
-FgpF-F-*&FfnF--F36%FI,(F*F-F7F-F/F7F0F-F8*&F:F--F36%F5FKF0F-F8*&FeoF-
-F36%F@,&F*F-F/F7F0F-F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "
a14:= eG1(10,a13);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a14G,F*&)%\"q
G,*%\"mG\"\"%\"\"'\"\"\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-
F/\"\"(F-F-F0F-!\"\"*&)F(,*F.F1F/\"#w\"#HF-F*F0F--F36%,&F*F0F0F-,(F*F-
F/F7F,F-F0F-F-*&)F(,*F.F1F/\"#[\"#8F-F*F0F--F36%,&F*F0\"\"$F-,(F*F-\"
\"&F-F/F7F0F-F-*&FCF--F36%FI,(F*F-F/F7F+F-F0F-F8*&)F(,*F*F+\"#BF-F.F1F
/\"#iF--F36%F@FKF0F-F8*&)F(,(\"#QF-F.F1F/\"#!*F--F36%F5FAF0F-F-*&)F(,(
\"#?F-F.F1F/FUF-FVF-F-*&-F36%,$F*F0FPF0F-FjnF-F8*&)F(,*FJF-F.F1F/!\")F
*F0F--F36%F5,&F*F-F/F7F0F-F-*&)F(,*F*F+\"#UF-F.F1F/FfnF-FgnF-F-*&)F(,(
\"\")F-F.F1F/\"#MF--F36%F`o,(F*F-F/F7F0F-F0F-F-*&F]pF--F36%F@,(F*F-FJF
-F/F7F0F-F8*&)F(,*F,F-F.F1F/F\\oF*F0F--F36%F5FcpF0F-F-*&)F(,*F+F-F.F1F
/FdoF*F0F--F36%F@F6F0F-F-*&)F(,*F*F+\"#6F-F.F1F/F`pF-FepF-F-*&FYF--F36
%FI,(F*F-F7F-F/F7F0F-F8*&F:F--F36%F5FKF0F-F8*&FboF--F36%F@FgoF0F-F8" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a15:= eG0(18,a14);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a15G,D*&)%\"qG,*%\"mG\"\"%\"\"'\"\"
\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F-F-F0F-!\"\"*&
)F(,*F.F1F/\"#w\"#HF-F*F0F--F36%,&F*F0F0F-,(F*F-F/F7F,F-F0F-F-*&)F(,*F
.F1F/\"#[\"#8F-F*F0F--F36%,&F*F0\"\"$F-,(F*F-\"\"&F-F/F7F0F-F-*&FCF--F
36%FI,(F*F-F/F7F+F-F0F-F8*&)F(,*F*F+\"#BF-F.F1F/\"#iF--F36%F@FKF0F-F8*
&)F(,(\"#QF-F.F1F/\"#!*F--F36%F5FAF0F-F-*&)F(,(\"#?F-F.F1F/FUF-FVF-F-*
&-F36%,$F*F0FPF0F-FjnF-F8*&)F(,*F*F+\"#UF-F.F1F/FfnF-FgnF-F-*&)F(,(\"
\")F-F.F1F/\"#MF--F36%F`o,(F*F-F/F7F0F-F0F-F-*&FfoF--F36%F@,(F*F-FJF-F
/F7F0F-F8*&)F(,*F,F-F.F1F/F\\oF*F0F--F36%F5F\\pF0F-F-*&)F(,*F+F-F.F1F/
!\")F*F0F--F36%F@F6F0F-F-*&)F(,*F*F+\"#6F-F.F1F/FioF-F^pF-F-*&FYF--F36
%FI,(F*F-F7F-F/F7F0F-F8*&F:F--F36%F5FKF0F-F8*&)F(,*F7F-F.F1F/!#AF*F+F-
-F36%F5,(F*F-F/F7F8F-F0F-F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
17 "a16:= eG1(2,a15);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a16G,B*&)%
\"qG,*%\"mG\"\"%\"\"'\"\"\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,(F
*F-F/\"\"(F-F-F0F-!\"\"*&)F(,*F.F1F/\"#!*\"#TF-F*F+F--F36%F5,(F*F-F/F7
F,F-F0F-F-*&)F(,*F.F1F/\"#[\"#8F-F*F0F--F36%,&F*F0\"\"$F-,(F*F-\"\"&F-
F/F7F0F-F-*&FBF--F36%FH,(F*F-F/F7F+F-F0F-F8*&)F(,*F*F+\"#BF-F.F1F/\"#i
F--F36%,&F*F0F0F-FJF0F-F8*&)F(,(\"#QF-F.F1F/F<F-F>F-F-*&)F(,(\"#?F-F.F
1F/FTF-FUF-F-*&-F36%,$F*F0FOF0F-FgnF-F8*&)F(,*F*F+\"#UF-F.F1F/F<F-F>F-
F-*&)F(,(\"\")F-F.F1F/\"#MF--F36%F]o,(F*F-F/F7F0F-F0F-F-*&FcoF--F36%FW
,(F*F-FIF-F/F7F0F-F8*&)F(,*F,F-F.F1F/FinF*F0F--F36%F5FioF0F-F-*&)F(,*F
+F-F.F1F/!\")F*F0F--F36%FWF6F0F-F-*&)F(,*F*F+\"#6F-F.F1F/FfoF-F[pF-F-*
&FYF--F36%FH,(F*F-F7F-F/F7F0F-F8*&)F(,*F7F-F.F1F/!#AF*F+F--F36%F5,(F*F
-F/F7F8F-F0F-F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a17:= eG
1(15,a16);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a17G,D*&)%\"qG,*%\"mG
\"\"%\"\"'\"\"\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F
-F-F0F-!\"\"*&)F(,*F.F1F/\"#!*\"#TF-F*F+F--F36%F5,(F*F-F/F7F,F-F0F-F-*
&)F(,*F.F1F/\"#[\"#8F-F*F0F--F36%,&F*F0\"\"$F-,(F*F-\"\"&F-F/F7F0F-F-*
&FBF--F36%FH,(F*F-F/F7F+F-F0F-F8*&)F(,*F*F+\"#BF-F.F1F/\"#iF--F36%,&F*
F0F0F-FJF0F-F8*&)F(,(\"#QF-F.F1F/F<F-F>F-F-*&)F(,(\"#?F-F.F1F/FTF-FUF-
F-*&-F36%,$F*F0FOF0F-FgnF-F8*&)F(,*F*F+\"#UF-F.F1F/F<F-F>F-F-*&)F(,(\"
\")F-F.F1F/\"#MF--F36%F]o,(F*F-F/F7F0F-F0F-F-*&FcoF--F36%FW,(F*F-FIF-F
/F7F0F-F8*&)F(,*F,F-F.F1F/FinF*F0F--F36%F5FioF0F-F-*&)F(,*F+F-F.F1F/!
\")F*F0F--F36%FWF6F0F-F-*&)F(,*F*F+\"#6F-F.F1F/FfoF-F[pF-F-*&FYF--F36%
FWF@F0F-F8*&)F(,*\"#_F-F.F1F/\"$/\"F*F0F--F36%FW,(F*F-F7F-F/F7F0F-F8*&
)F(,*F7F-F.F1F/!#AF*F+F--F36%F5,(F*F-F/F7F8F-F0F-F8" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 18 "a18:= eG0(15,a17);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$a18G,B*&)%\"qG,*%\"mG\"\"%\"\"'\"\"\"*$%\"jG\"\"#\"#
cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F-F-F0F-!\"\"*&)F(,*F.F1F/\"#!*
\"#TF-F*F+F--F36%F5,(F*F-F/F7F,F-F0F-F-*&)F(,*F.F1F/\"#[\"#8F-F*F0F--F
36%,&F*F0\"\"$F-,(F*F-\"\"&F-F/F7F0F-F-*&FBF--F36%FH,(F*F-F/F7F+F-F0F-
F8*&)F(,*F*F+\"#BF-F.F1F/\"#iF--F36%,&F*F0F0F-FJF0F-F8*&)F(,(\"#?F-F.F
1F/FTF-FUF-F-*&-F36%,$F*F0FOF0F-FYF-F8*&)F(,*F*F+\"#UF-F.F1F/F<F-F>F-F
-*&)F(,(\"\")F-F.F1F/\"#MF--F36%Fin,(F*F-F/F7F0F-F0F-F-*&F_oF--F36%FW,
(F*F-FIF-F/F7F0F-F8*&)F(,*F,F-F.F1F/FenF*F0F--F36%F5FeoF0F-F-*&)F(,*F+
F-F.F1F/!\")F*F0F--F36%FWF6F0F-F-*&)F(,*F*F+\"#6F-F.F1F/FboF-FgoF-F-*&
)F(,*\"#IF-F.F1F/\"#wF*F0F--F36%F5FJF0F-F8*&)F(,*\"#_F-F.F1F/\"$/\"F*F
0F--F36%FW,(F*F-F7F-F/F7F0F-F8*&)F(,*F7F-F.F1F/!#AF*F+F--F36%F5,(F*F-F
/F7F8F-F0F-F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "a19:= shif
tdown(15,a18);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a19G,B*&)%\"qG,*%
\"mG\"\"%\"\"'\"\"\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"
\"(F-F-F0F-!\"\"*&)F(,*F.F1F/\"#!*\"#TF-F*F+F--F36%F5,(F*F-F/F7F,F-F0F
-F-*&)F(,*F.F1F/\"#[\"#8F-F*F0F--F36%,&F*F0\"\"$F-,(F*F-\"\"&F-F/F7F0F
-F-*&FBF--F36%FH,(F*F-F/F7F+F-F0F-F8*&)F(,*F*F+\"#BF-F.F1F/\"#iF--F36%
,&F*F0F0F-FJF0F-F8*&)F(,(\"#?F-F.F1F/FTF-FUF-F-*&-F36%,$F*F0FOF0F-FYF-
F8*&)F(,*F*F+\"#UF-F.F1F/F<F-F>F-F-*&)F(,(\"\")F-F.F1F/\"#MF--F36%Fin,
(F*F-F/F7F0F-F0F-F-*&F_oF--F36%FW,(F*F-FIF-F/F7F0F-F8*&)F(,*F,F-F.F1F/
FenF*F0F--F36%F5FeoF0F-F-*&)F(,*F+F-F.F1F/!\")F*F0F--F36%FWF6F0F-F-*&)
F(,*F*F+\"#6F-F.F1F/FboF-FgoF-F-*&)F(,*\"#IF-F.F1F/\"#wF*F0F--F36%F5FJ
F0F-F8*&F`pF--F36%FW,&F*F-F/F7F0F-F8*&)F(,*F7F-F.F1F/!#AF*F+F--F36%F5,
(F*F-F/F7F8F-F0F-F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a20:
= eG1(12,a19);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a20G,@*&)%\"qG,**
$%\"jG\"\"#\"#cF+\"#!*\"#T\"\"\"%\"mG\"\"%F0-%#gpG6%,&F1F,F0F0,(F1F0F+
\"\"(\"\"'F0F,F0F0*&)F(,*F*F-F+\"#[\"#8F0F1F,F0-F46%,&F1F,\"\"$F0,(F1F
0\"\"&F0F+F8F,F0F0*&F;F0-F46%FA,(F1F0F+F8F2F0F,F0!\"\"*&)F(,*F1F2\"#BF
0F*F-F+\"#iF0-F46%,&F1F,F,F0FCF,F0FI*&)F(,(\"#?F0F*F-F+FNF0FOF0F0*&-F4
6%,$F1F,FHF,F0FSF0FI*&)F(,*F1F2\"#UF0F*F-F+F.F0F3F0F0*&)F(,(\"\")F0F*F
-F+\"#MF0-F46%FY,(F1F0F+F8F,F0F,F0F0*&FinF0-F46%FQ,(F1F0FBF0F+F8F,F0FI
*&)F(,*F9F0F*F-F+FUF1F,F0-F46%F6F_oF,F0F0*&)F(,*F2F0F*F-F+!\")F1F,F0-F
46%F6,&F1F0F+F8F,F0F0*&)F(,*F1F2\"#6F0F*F-F+F\\oF0FaoF0F0*&)F(,*\"#IF0
F*F-F+\"#wF1F,F0-F46%F6FCF,F0FI*&FjoF0-F46%FQF_pF,F0FI*&)F(,*F8F0F*F-F
+!#AF1F2F0-F46%F6,(F1F0F+F8FIF0F,F0FI" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 18 "a21:= eG0(14,a20);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6
#>%$a21G,>*&)%\"qG,**$%\"jG\"\"#\"#cF+\"#!*\"#T\"\"\"%\"mG\"\"%F0-%#gp
G6%,&F1F,F0F0,(F1F0F+\"\"(\"\"'F0F,F0F0*&)F(,*F*F-F+\"#[\"#8F0F1F,F0-F
46%,&F1F,\"\"$F0,(F1F0\"\"&F0F+F8F,F0F0*&F;F0-F46%FA,(F1F0F+F8F2F0F,F0
!\"\"*&)F(,*F1F2\"#BF0F*F-F+\"#iF0-F46%,&F1F,F,F0FCF,F0FI*&)F(,(\"#?F0
F*F-F+FNF0FOF0F0*&-F46%,$F1F,FHF,F0FSF0FI*&)F(,*F1F2\"#UF0F*F-F+F.F0F3
F0F0*&)F(,(\"\")F0F*F-F+\"#MF0-F46%FY,(F1F0F+F8F,F0F,F0F0*&FinF0-F46%F
Q,(F1F0FBF0F+F8F,F0FI*&)F(,*F9F0F*F-F+FUF1F,F0-F46%F6F_oF,F0F0*&)F(,*F
1F2\"#6F0F*F-F+F\\oF0FaoF0F0*&)F(,*\"#IF0F*F-F+\"#wF1F,F0-F46%F6FCF,F0
FI*&)F(,*F[oF0F*F-F+!#AF1F2F0-F46%F6,(F1F0F+F8FIF0F,F0FI*&)F(,*F8F0F*F
-F+FgpF1F2F0FhpF0FI" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a22:
= eG1(5,a21);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a22G,<*&)%\"qG,**$
%\"jG\"\"#\"#cF+\"#!*\"#T\"\"\"%\"mG\"\"%F0-%#gpG6%,&F1F,F0F0,(F1F0F+
\"\"(\"\"'F0F,F0F0*&)F(,*F*F-F+\"#[\"#8F0F1F,F0-F46%,&F1F,\"\"$F0,(F1F
0\"\"&F0F+F8F,F0F0*&F;F0-F46%FA,(F1F0F+F8F2F0F,F0!\"\"*&)F(,*F1F2\"#BF
0F*F-F+\"#iF0-F46%,&F1F,F,F0FCF,F0FI*&)F(,(\"#?F0F*F-F+FNF0-F46%F6FHF,
F0F0*&-F46%,$F1F,FHF,F0FSF0FI*&)F(,*F1F2\"#UF0F*F-F+F.F0F3F0F0*&)F(,(
\"\")F0F*F-F+\"#MF0-F46%Fen,(F1F0F+F8F,F0F,F0F0*&F[oF0-F46%FQ,(F1F0FBF
0F+F8F,F0FI*&)F(,*F9F0F*F-F+FUF1F,F0-F46%F6FaoF,F0F0*&)F(,*F1F2\"#6F0F
*F-F+F^oF0FcoF0F0*&)F(,*F]oF0F*F-F+!#AF1F2F0-F46%F6,(F1F0F+F8FIF0F,F0F
I*&)F(,*F8F0F*F-F+FbpF1F2F0FcpF0FI" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "a23:= eG0(5,a22);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%$a23G,:*&)%\"qG,**$%\"jG\"\"#\"#cF+\"#!*\"#T\"\"\"%\"mG\"\"%F0-%#gpG
6%,&F1F,F0F0,(F1F0F+\"\"(\"\"'F0F,F0F0*&)F(,*F*F-F+\"#[\"#8F0F1F,F0-F4
6%,&F1F,\"\"$F0,(F1F0\"\"&F0F+F8F,F0F0*&F;F0-F46%FA,(F1F0F+F8F2F0F,F0!
\"\"*&)F(,*F1F2\"#BF0F*F-F+\"#iF0-F46%,&F1F,F,F0FCF,F0FI*&)F(,*\"#9F0F
*F-F+F=F1F,F0-F46%,$F1F,,(F1F0FBF0F+F8F,F0F0*&)F(,*F1F2\"#UF0F*F-F+F.F
0F3F0F0*&)F(,(\"\")F0F*F-F+\"#MF0-F46%FX,(F1F0F+F8F,F0F,F0F0*&FinF0-F4
6%FQFYF,F0FI*&)F(,*F9F0F*F-F+\"#?F1F,F0-F46%F6F_oF,F0F0*&)F(,*F1F2\"#6
F0F*F-F+F\\oF0FaoF0F0*&)F(,*F[oF0F*F-F+!#AF1F2F0-F46%F6,(F1F0F+F8FIF0F
,F0FI*&)F(,*F8F0F*F-F+F`pF1F2F0FapF0FI" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "a24:= eG0(8,a23);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%$a24G,8*&)%\"qG,**$%\"jG\"\"#\"#cF+\"#!*\"#T\"\"\"%\"mG\"\"%F0-%#gpG
6%,&F1F,F0F0,(F1F0F+\"\"(\"\"'F0F,F0F0*&)F(,*F*F-F+\"#[\"#8F0F1F,F0-F4
6%,&F1F,\"\"$F0,(F1F0\"\"&F0F+F8F,F0F0*&F;F0-F46%FA,(F1F0F+F8F2F0F,F0!
\"\"*&)F(,*F1F2\"#BF0F*F-F+\"#iF0-F46%,&F1F,F,F0FCF,F0FI*&)F(,*\"#9F0F
*F-F+F=F1F,F0-F46%,$F1F,,(F1F0FBF0F+F8F,F0F0*&)F(,*F1F2\"#UF0F*F-F+F.F
0F3F0F0*&)F(,(\"\")F0F*F-F+\"#MF0-F46%FX,(F1F0F+F8F,F0F,F0F0*&FinF0-F4
6%F6FYF,F0FI*&)F(,*F1F2\"#6F0F*F-F+F\\oF0-F46%FQFYF,F0F0*&)F(,*F[oF0F*
F-F+!#AF1F2F0-F46%F6,(F1F0F+F8FIF0F,F0FI*&)F(,*F8F0F*F-F+F\\pF1F2F0F]p
F0FI" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a25:= eG1(8,a24);" 
}}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a25G,2*&)%\"qG,**$%\"jG\"\"#\"#cF
+\"#!*\"#T\"\"\"%\"mG\"\"%F0-%#gpG6%,&F1F,F0F0,(F1F0F+\"\"(\"\"'F0F,F0
F0*&)F(,*F*F-F+\"#[\"#8F0F1F,F0-F46%,&F1F,\"\"$F0,(F1F0\"\"&F0F+F8F,F0
F0*&F;F0-F46%FA,(F1F0F+F8F2F0F,F0!\"\"*&)F(,*F1F2\"#BF0F*F-F+\"#iF0-F4
6%,&F1F,F,F0FCF,F0FI*&)F(,*F1F2\"#UF0F*F-F+F.F0F3F0F0*&)F(,*F1F2\"#6F0
F*F-F+\"#MF0-F46%FQ,(F1F0FBF0F+F8F,F0F0*&)F(,*\"\")F0F*F-F+!#AF1F2F0-F
46%F6,(F1F0F+F8FIF0F,F0FI*&)F(,*F8F0F*F-F+F\\oF1F2F0F]oF0FI" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "a26:= shiftdown(1,a25);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a26G,.*&)%\"qG,**$%\"jG\"\"#\"#cF+
\"#[\"#8\"\"\"%\"mGF,F0-%#gpG6%,&F1F,\"\"$F0,(F1F0\"\"&F0F+\"\"(F,F0F0
*&F'F0-F36%F5,(F1F0F+F9\"\"%F0F,F0!\"\"*&)F(,*F1F>\"#BF0F*F-F+\"#iF0-F
36%,&F1F,F,F0F7F,F0F?*&)F(,*F1F>\"#UF0F*F-F+\"#!*F0-F36%,&F1F,F0F0,(F1
F0F+F9\"\"'F0F,F0F0*&)F(,*F1F>\"#6F0F*F-F+\"#MF0-F36%FG,(F1F0F6F0F+F9F
,F0F0*&)F(,*\"\")F0F*F-F+!#AF1F>F0-F36%FO,(F1F0F+F9F?F0F,F0F?" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "a27:= shiftdown(4,a26);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a27G,**&)%\"qG,**$%\"jG\"\"#\"#cF+
\"#[\"#8\"\"\"%\"mGF,F0-%#gpG6%,&F1F,\"\"$F0,(F1F0\"\"&F0F+\"\"(F,F0F0
*&F'F0-F36%F5,(F1F0F+F9\"\"%F0F,F0!\"\"*&)F(,*F1F>\"#BF0F*F-F+\"#iF0-F
36%,&F1F,F,F0F7F,F0F?*&)F(,*F1F>\"#6F0F*F-F+\"#MF0-F36%FG,(F1F0F6F0F+F
9F,F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a28:= eG1(1,a27)
;" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a28G,(*&)%\"qG,**$%\"jG\"\"#\"
#cF+\"#[\"#8\"\"\"%\"mGF,F0-%#gpG6%,&F1F,F,F0,(F1F0F+\"\"(\"\"%F0F,F0F
0*&F'F0-F36%,&F1F,\"\"$F0F6F,F0!\"\"*&)F(,*F1F8\"#6F0F*F-F+\"#MF0-F36%
F5,(F1F0F=F0F+F7F,F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a
29:= eG0(2,a28);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$a29G\"\"!" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 24 "######## n odd = 2*m + 1" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 454 "b1:= asoe(op32,  \n   q^(56*j^2 +  6*j     ) * gp
(2*n+1, n + 7*j + 1, 2)\n - q^(56*j^2 + 90*j + 36) * gp(2*n+1, n + 7*j
 + 6, 2)\n - q^(56*j^2 + 34*j +  5) * gp(2*n  , n + 7*j + 2, 2) \n + q
^(56*j^2 + 62*j + 17) * gp(2*n  , n + 7*j + 4, 2),\n   q^(56*j^2 +  6*
j     ) * gp(2*n+1, n + 7*j + 1, 2)\n - q^(56*j^2 + 90*j + 36) * gp(2*
n+1, n + 7*j + 6, 2)\n - q^(56*j^2 + 34*j +  5) * gp(2*n+2, n + 7*j + \+
3, 2) \n + q^(56*j^2 + 62*j + 17) * gp(2*n+2, n + 7*j + 5, 2));" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b1G,J*&)%\"qG,(\"\"#\"\"\"*$%\"jGF*
\"#cF-\"\"'F+-%#gpG6%,&%\"mGF*F+F+,(F4F+F-\"\"(F+F+F*F+!\"\"*&)F(,(F,F
.F-\"#M\"\"&F+F+-F16%,&F4F*F*F+,(F4F+\"\"$F+F-F6F*F+F+*&)F(,*F4\"\"%F/
F+F,F.F-F/F+F0F+F7*&)F(,(F,F.F-\"#i\"#<F+F+-F16%,&F4F*FEF+,(F4F+F-F6F/
F+F*F+F+*&F9F+-F16%FM,(F4F+F-F6FEF+F*F+F7*&)F(,(F+F+F,F.F-F/F+F0F+F7*&
)F(,*F4FE\"#BF+F,F.F-FIF+-F16%F?,(F4F+F<F+F-F6F*F+F7*&)F(,(\"#QF+F,F.F
-\"#!*F+-F16%F3FNF*F+F+*&)F(,(\"#?F+F,F.F-FIF+FZF+F+*&-F16%,$F4F*FRF*F
+F_oF+F7*&FTF+-F16%,&F4F*FAF+,(F4F+F-F6F*F+F*F+F+*&)F(,*F4FE\"#UF+F,F.
F-F[oF+F\\oF+F+*&)F(,(F,F.F-F[o\"#PF+F+F\\oF+F+*&)F(,(\"\")F+F,F.F-F;F
+-F16%FeoFjoF*F+F+*&FdpF+F=F+F7*&FGF+FZF+F7*&F'F+FgoF+F+*&)F(,*F4FE\"#
6F+F,F.F-F;F+F=F+F+*&FhnF+-F16%Fio,(F4F+F6F+F-F6F*F+F7*&F`pF+FaqF+F7" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b2:= eG1(17,b1);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b2G,L*&)%\"qG,(\"\"#\"\"\"*$%\"jGF*
\"#cF-\"\"'F+-%#gpG6%,&%\"mGF*F+F+,(F4F+F-\"\"(F+F+F*F+!\"\"*&)F(,(F,F
.F-\"#M\"\"&F+F+-F16%,&F4F*F*F+,(F4F+\"\"$F+F-F6F*F+F+*&)F(,*F4\"\"%F/
F+F,F.F-F/F+F0F+F7*&)F(,(F,F.F-\"#i\"#<F+F+-F16%,&F4F*FEF+,(F4F+F-F6F/
F+F*F+F+*&F9F+-F16%FM,(F4F+F-F6FEF+F*F+F7*&)F(,(F+F+F,F.F-F/F+F0F+F7*&
)F(,*F4FE\"#BF+F,F.F-FIF+-F16%F?,(F4F+F<F+F-F6F*F+F7*&)F(,(\"#QF+F,F.F
-\"#!*F+-F16%F3FNF*F+F+*&)F(,(\"#?F+F,F.F-FIF+FZF+F+*&-F16%,$F4F*FRF*F
+F_oF+F7*&FTF+-F16%,&F4F*FAF+,(F4F+F-F6F*F+F*F+F+*&)F(,*F4FE\"#UF+F,F.
F-F[oF+F\\oF+F+*&)F(,(F,F.F-F[o\"#PF+F+F\\oF+F+*&)F(,(\"\")F+F,F.F-F;F
+-F16%FeoFjoF*F+F+*&FdpF+F=F+F7*&FGF+FZF+F7*&F'F+-F16%F?F5F*F+F+*&)F(,
*F/F+F,F.F-FaoF4F*F+-F16%F?FjoF*F+F+*&)F(,*F4FE\"#6F+F,F.F-F;F+F=F+F+*
&FhnF+-F16%Fio,(F4F+F6F+F-F6F*F+F7*&F`pF+FhqF+F7" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 16 "b3:= eG0(17,b2);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%#b3G,J*&)%\"qG,(*$%\"jG\"\"#\"#cF+\"#M\"\"&\"\"\"F0-%
#gpG6%,&%\"mGF,F,F0,(F5F0\"\"$F0F+\"\"(F,F0F0*&)F(,*F5\"\"%\"\"'F0F*F-
F+F=F0-F26%,&F5F,F0F0,(F5F0F+F8F0F0F,F0!\"\"*&)F(,(F*F-F+\"#i\"#<F0F0-
F26%,&F5F,F<F0,(F5F0F+F8F=F0F,F0F0*&F'F0-F26%FJ,(F5F0F+F8F<F0F,F0FB*&)
F(,(F0F0F*F-F+F=F0F>F0FB*&)F(,*F5F<\"#BF0F*F-F+FFF0-F26%F4,(F5F0F/F0F+
F8F,F0FB*&)F(,(\"#QF0F*F-F+\"#!*F0-F26%F@FKF,F0F0*&)F(,(\"#?F0F*F-F+FF
F0FWF0F0*&-F26%,$F5F,FOF,F0F\\oF0FB*&FQF0-F26%,&F5F,F7F0,(F5F0F+F8F,F0
F,F0F0*&)F(,*F5F<\"#UF0F*F-F+FhnF0FinF0F0*&)F(,(F*F-F+Fhn\"#PF0F0FinF0
F0*&)F(,(\"\")F0F*F-F+F.F0-F26%FboFgoF,F0F0*&FapF0F1F0FB*&FDF0FWF0FB*&
)F(,*F<F0F*F-F+!\")F5F,F0-F26%F@,&F5F0F+F8F,F0F0*&)F(,*F=F0F*F-F+F^oF5
F,F0-F26%F4FgoF,F0F0*&)F(,*F5F<\"#6F0F*F-F+F.F0F1F0F0*&FenF0-F26%Ffo,(
F5F0F8F0F+F8F,F0FB*&F]pF0FiqF0FB" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "b4:= eG0(4,b3);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%
#b4G,L*&)%\"qG,(*$%\"jG\"\"#\"#cF+\"#M\"\"&\"\"\"F0-%#gpG6%,&%\"mGF,F,
F0,(F5F0\"\"$F0F+\"\"(F,F0F0*&)F(,*F5\"\"%\"\"'F0F*F-F+F=F0-F26%,&F5F,
F0F0,(F5F0F+F8F0F0F,F0!\"\"*&)F(,(F*F-F+\"#i\"#<F0F0-F26%,&F5F,F<F0,(F
5F0F+F8F=F0F,F0F0*&F'F0-F26%,&F5F,F7F0,(F5F0F+F8F<F0F,F0FB*&)F(,*F*F-F
+\"#?F/F0F5F,F0-F26%FOF6F,F0FB*&)F(,(F0F0F*F-F+F=F0F>F0FB*&)F(,*F5F<\"
#BF0F*F-F+FFF0-F26%F4,(F5F0F/F0F+F8F,F0FB*&)F(,(\"#QF0F*F-F+\"#!*F0-F2
6%F@FKF,F0F0*&)F(,(FTF0F*F-F+FFF0FhnF0F0*&-F26%,$F5F,FPF,F0FcoF0FB*&FX
F0-F26%FO,(F5F0F+F8F,F0F,F0F0*&)F(,*F5F<\"#UF0F*F-F+F_oF0F`oF0F0*&)F(,
(F*F-F+F_o\"#PF0F0F`oF0F0*&)F(,(\"\")F0F*F-F+F.F0-F26%FhoF\\pF,F0F0*&F
fpF0F1F0FB*&FDF0FhnF0FB*&)F(,*F<F0F*F-F+!\")F5F,F0-F26%F@,&F5F0F+F8F,F
0F0*&)F(,*F=F0F*F-F+FTF5F,F0-F26%F4F\\pF,F0F0*&)F(,*F5F<\"#6F0F*F-F+F.
F0F1F0F0*&F\\oF0-F26%FO,(F5F0F8F0F+F8F,F0FB*&FbpF0F^rF0FB" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "b5:= eG1(4,b4);" }}{PARA 12 "" 1 "
" {XPPMATH 20 "6#>%#b5G,J*&)%\"qG,*%\"mG\"\"%\"\"'\"\"\"*$%\"jG\"\"#\"
#cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F-F-F0F-!\"\"*&)F(,(F.F1F/\"#i
\"#<F-F--F36%,&F*F0F+F-,(F*F-F/F7F,F-F0F-F-*&)F(,*F.F1F/\"#[\"#8F-F*F0
F--F36%,&F*F0F0F-,(F*F-F/F7F+F-F0F-F8*&)F(,*F.F1F/\"#?\"\"&F-F*F0F--F3
6%,&F*F0\"\"$F-,(F*F-FSF-F/F7F0F-F8*&)F(,(F-F-F.F1F/F,F-F2F-F8*&)F(,*F
*F+\"#BF-F.F1F/F<F--F36%FI,(F*F-FOF-F/F7F0F-F8*&)F(,(\"#QF-F.F1F/\"#!*
F--F36%F5FAF0F-F-*&)F(,(FNF-F.F1F/F<F-FfnF-F-*&-F36%,$F*F0FJF0F-FaoF-F
8*&FVF--F36%FR,(F*F-F/F7F0F-F0F-F-*&)F(,*F*F+\"#UF-F.F1F/F]oF-F^oF-F-*
&)F(,(F.F1F/F]o\"#PF-F-F^oF-F-*&)F(,(\"\")F-F.F1F/\"#MF--F36%FfoFjoF0F
-F-*&FdpF--F36%FIFTF0F-F8*&F:F-FfnF-F8*&)F(,*F+F-F.F1F/!\")F*F0F--F36%
F5,&F*F-F/F7F0F-F-*&)F(,*F,F-F.F1F/FNF*F0F--F36%FIFjoF0F-F-*&)F(,*F*F+
\"#6F-F.F1F/FgpF-F[qF-F-*&FjnF--F36%FR,(F*F-F7F-F/F7F0F-F8*&F`pF-F_rF-
F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b6:= eG1(10,b5);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b6G,L*&)%\"qG,*%\"mG\"\"%\"\"'\"\"
\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F-F-F0F-!\"\"*&
)F(,(F.F1F/\"#i\"#<F-F--F36%,&F*F0F+F-,(F*F-F/F7F,F-F0F-F-*&)F(,*F.F1F
/\"#[\"#8F-F*F0F--F36%,&F*F0F0F-,(F*F-F/F7F+F-F0F-F8*&)F(,*F.F1F/\"#?
\"\"&F-F*F0F--F36%,&F*F0\"\"$F-,(F*F-FSF-F/F7F0F-F8*&)F(,(F-F-F.F1F/F,
F-F2F-F8*&)F(,*F*F+\"#BF-F.F1F/F<F--F36%FI,(F*F-FOF-F/F7F0F-F8*&)F(,(
\"#QF-F.F1F/\"#!*F--F36%F5FAF0F-F-*&)F(,(FNF-F.F1F/F<F-FfnF-F-*&-F36%,
$F*F0FJF0F-FaoF-F8*&FVF--F36%FIF6F0F-F-*&FLF--F36%FI,(F*F-F/F7F0F-F0F-
F-*&)F(,*F*F+\"#UF-F.F1F/F]oF-F^oF-F-*&)F(,(F.F1F/F]o\"#PF-F-F^oF-F-*&
)F(,(\"\")F-F.F1F/\"#MF--F36%FfoF]pF0F-F-*&FgpF--F36%FIFTF0F-F8*&F:F-F
fnF-F8*&)F(,*F+F-F.F1F/!\")F*F0F--F36%F5,&F*F-F/F7F0F-F-*&)F(,*F,F-F.F
1F/FNF*F0F-F[pF-F-*&)F(,*F*F+\"#6F-F.F1F/FjpF-F^qF-F-*&FjnF--F36%FR,(F
*F-F7F-F/F7F0F-F8*&FcpF-F`rF-F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 16 "b7:= eG0(10,b6);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b7G,J*&
)%\"qG,*%\"mG\"\"%\"\"'\"\"\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,
(F*F-F/\"\"(F-F-F0F-!\"\"*&)F(,(F.F1F/\"#i\"#<F-F--F36%,&F*F0F+F-,(F*F
-F/F7F,F-F0F-F-*&)F(,*F.F1F/\"#[\"#8F-F*F0F--F36%,&F*F0F0F-,(F*F-F/F7F
+F-F0F-F8*&)F(,*F.F1F/\"#?\"\"&F-F*F0F--F36%,&F*F0\"\"$F-,(F*F-FSF-F/F
7F0F-F8*&)F(,*F*F+\"#BF-F.F1F/F<F--F36%FI,(F*F-FOF-F/F7F0F-F8*&)F(,(\"
#QF-F.F1F/\"#!*F--F36%F5FAF0F-F-*&)F(,(FNF-F.F1F/F<F-FYF-F-*&-F36%,$F*
F0FJF0F-F^oF-F8*&)F(,*FSF-F.F1F/!\")F*F0F--F36%F5,&F*F-F/F7F0F-F-*&FLF
--F36%FI,(F*F-F/F7F0F-F0F-F-*&)F(,*F*F+\"#UF-F.F1F/FjnF-F[oF-F-*&)F(,(
F.F1F/Fjn\"#PF-F-F[oF-F-*&)F(,(\"\")F-F.F1F/\"#MF--F36%FcoF^pF0F-F-*&F
hpF--F36%FIFTF0F-F8*&F:F-FYF-F8*&)F(,*F+F-F.F1F/FgoF*F0F-FhoF-F-*&)F(,
*F,F-F.F1F/FNF*F0F-F\\pF-F-*&)F(,*F*F+\"#6F-F.F1F/F[qF-F_qF-F-*&FgnF--
F36%FR,(F*F-F7F-F/F7F0F-F8*&FdpF-F]rF-F8" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "b8:= eG0(2,b7);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%
#b8G,L*&)%\"qG,*%\"mG\"\"%\"\"'\"\"\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F
*F0F-F-,(F*F-F/\"\"(F-F-F0F-!\"\"*&)F(,(F.F1F/\"#i\"#<F-F--F36%,&F*F0
\"\"$F-,(F*F-F/F7F,F-F0F-F-*&)F(,*F.F1F/\"#[\"#8F-F*F0F--F36%F@,(F*F-
\"\"&F-F/F7F0F-F-*&FDF--F36%,&F*F0F0F-,(F*F-F/F7F+F-F0F-F8*&)F(,*F.F1F
/\"#?FKF-F*F0F--F36%F@,(F*F-FAF-F/F7F0F-F8*&)F(,*F*F+\"#BF-F.F1F/F<F--
F36%FOFJF0F-F8*&)F(,(\"#QF-F.F1F/\"#!*F--F36%F5FBF0F-F-*&)F(,(FTF-F.F1
F/F<F-FfnF-F-*&-F36%,$F*F0FPF0F-F`oF-F8*&)F(,*FAF-F.F1F/!\")F*F0F--F36
%F5,&F*F-F/F7F0F-F-*&FRF--F36%FO,(F*F-F/F7F0F-F0F-F-*&)F(,*F*F+\"#UF-F
.F1F/F\\oF-F]oF-F-*&)F(,(F.F1F/F\\o\"#PF-F-F]oF-F-*&)F(,(\"\")F-F.F1F/
\"#MF--F36%FeoF`pF0F-F-*&FjpF--F36%FOFWF0F-F8*&F:F-FfnF-F8*&)F(,*F+F-F
.F1F/FioF*F0F-FjoF-F-*&)F(,*F,F-F.F1F/FTF*F0F-F^pF-F-*&)F(,*F*F+\"#6F-
F.F1F/F]qF-FaqF-F-*&FinF--F36%F@,(F*F-F7F-F/F7F0F-F8*&FfpF-F_rF-F8" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "b9:= eG1(2,b8);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%#b9G,J*&)%\"qG,*%\"mG\"\"%\"\"'\"\"\"*$%\"
jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F-F-F0F-!\"\"*&)F(,*F.
F1F/\"#w\"#HF-F*F0F--F36%,&F*F0F0F-,(F*F-F/F7F,F-F0F-F-*&)F(,*F.F1F/\"
#[\"#8F-F*F0F--F36%,&F*F0\"\"$F-,(F*F-\"\"&F-F/F7F0F-F-*&FCF--F36%F@,(
F*F-F/F7F+F-F0F-F8*&)F(,*F.F1F/\"#?FLF-F*F0F--F36%FI,(F*F-FJF-F/F7F0F-
F8*&)F(,*F*F+\"#BF-F.F1F/\"#iF--F36%F@FKF0F-F8*&)F(,(\"#QF-F.F1F/\"#!*
F--F36%F5FAF0F-F-*&)F(,(FTF-F.F1F/FfnF-FgnF-F-*&-F36%,$F*F0FPF0F-FaoF-
F8*&)F(,*FJF-F.F1F/!\")F*F0F--F36%F5,&F*F-F/F7F0F-F-*&FRF--F36%F@,(F*F
-F/F7F0F-F0F-F-*&)F(,*F*F+\"#UF-F.F1F/F]oF-F^oF-F-*&)F(,(F.F1F/F]o\"#P
F-F-F^oF-F-*&)F(,(\"\")F-F.F1F/\"#MF--F36%FfoFapF0F-F-*&F[qF--F36%F@FW
F0F-F8*&)F(,*F+F-F.F1F/FjoF*F0F-F[pF-F-*&)F(,*F,F-F.F1F/FTF*F0F-F_pF-F
-*&)F(,*F*F+\"#6F-F.F1F/F^qF-FbqF-F-*&FjnF--F36%FI,(F*F-F7F-F/F7F0F-F8
*&FgpF-F_rF-F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b10:= eG1
(19,b9);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b10G,L*&)%\"qG,*%\"mG\"
\"%\"\"'\"\"\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F-F
-F0F-!\"\"*&)F(,*F.F1F/\"#w\"#HF-F*F0F--F36%,&F*F0F0F-,(F*F-F/F7F,F-F0
F-F-*&)F(,*F.F1F/\"#[\"#8F-F*F0F--F36%,&F*F0\"\"$F-,(F*F-\"\"&F-F/F7F0
F-F-*&FCF--F36%F@,(F*F-F/F7F+F-F0F-F8*&)F(,*F.F1F/\"#?FLF-F*F0F--F36%F
I,(F*F-FJF-F/F7F0F-F8*&)F(,*F*F+\"#BF-F.F1F/\"#iF--F36%F@FKF0F-F8*&)F(
,(\"#QF-F.F1F/\"#!*F--F36%F5FAF0F-F-*&)F(,(FTF-F.F1F/FfnF-FgnF-F-*&-F3
6%,$F*F0FPF0F-FaoF-F8*&)F(,*FJF-F.F1F/!\")F*F0F--F36%F5,&F*F-F/F7F0F-F
-*&FRF--F36%F@,(F*F-F/F7F0F-F0F-F-*&)F(,*F*F+\"#UF-F.F1F/F]oF-F^oF-F-*
&)F(,(F.F1F/F]o\"#PF-F-F^oF-F-*&)F(,(\"\")F-F.F1F/\"#MF--F36%FfoFapF0F
-F-*&F[qF--F36%F@FWF0F-F8*&)F(,*F+F-F.F1F/FjoF*F0F-F[pF-F-*&)F(,*F,F-F
.F1F/FTF*F0F-F_pF-F-*&)F(,*F*F+\"#6F-F.F1F/F^qF-FbqF-F-*&FjnF-F>F-F8*&
)F(,*\"#_F-F.F1F/\"$/\"F*F0F--F36%F@,(F*F-F7F-F/F7F0F-F8*&FgpF--F36%FI
FfrF0F-F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "b11:= eG0(19,b
10);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b11G,J*&)%\"qG,*%\"mG\"\"%
\"\"'\"\"\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F-F-F0
F-!\"\"*&)F(,*F.F1F/\"#w\"#HF-F*F0F--F36%,&F*F0F0F-,(F*F-F/F7F,F-F0F-F
-*&)F(,*F.F1F/\"#[\"#8F-F*F0F--F36%,&F*F0\"\"$F-,(F*F-\"\"&F-F/F7F0F-F
-*&FCF--F36%F@,(F*F-F/F7F+F-F0F-F8*&)F(,*F.F1F/\"#?FLF-F*F0F--F36%FI,(
F*F-FJF-F/F7F0F-F8*&)F(,*F*F+\"#BF-F.F1F/\"#iF--F36%F@FKF0F-F8*&)F(,(F
TF-F.F1F/FfnF-FgnF-F-*&-F36%,$F*F0FPF0F-FjnF-F8*&)F(,*FJF-F.F1F/!\")F*
F0F--F36%F5,&F*F-F/F7F0F-F-*&FRF--F36%F@,(F*F-F/F7F0F-F0F-F-*&)F(,*F*F
+\"#UF-F.F1F/\"#!*F--F36%F5FAF0F-F-*&)F(,(F.F1F/F_p\"#PF-F-F`pF-F-*&)F
(,(\"\")F-F.F1F/\"#MF--F36%F_oFjoF0F-F-*&FgpF--F36%F@FWF0F-F8*&)F(,*F+
F-F.F1F/FcoF*F0F-FdoF-F-*&)F(,*F,F-F.F1F/FTF*F0F-FhoF-F-*&)F(,*F*F+\"#
6F-F.F1F/FjpF-F^qF-F-*&)F(,*\"#IF-F.F1F/F<F*F0F--F36%F5FKF0F-F8*&)F(,*
\"#_F-F.F1F/\"$/\"F*F0F--F36%F@,(F*F-F7F-F/F7F0F-F8*&FcpF--F36%FIFgrF0
F-F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "b12:= eG0(14,b11);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b12G,L*&)%\"qG,*%\"mG\"\"%\"\"'
\"\"\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(F-F-F0F-!\"
\"*&)F(,*F.F1F/\"#w\"#HF-F*F0F--F36%,&F*F0F0F-,(F*F-F/F7F,F-F0F-F-*&)F
(,*F.F1F/\"#[\"#8F-F*F0F--F36%,&F*F0\"\"$F-,(F*F-\"\"&F-F/F7F0F-F-*&FC
F--F36%F@,(F*F-F/F7F+F-F0F-F8*&)F(,*F.F1F/\"#?FLF-F*F0F--F36%FI,(F*F-F
JF-F/F7F0F-F8*&)F(,*F*F+\"#BF-F.F1F/\"#iF--F36%F@FKF0F-F8*&)F(,(FTF-F.
F1F/FfnF-FgnF-F-*&-F36%,$F*F0FPF0F-FjnF-F8*&)F(,*FJF-F.F1F/!\")F*F0F--
F36%F5,&F*F-F/F7F0F-F-*&FRF--F36%F@,(F*F-F/F7F0F-F0F-F-*&)F(,*F*F+\"#U
F-F.F1F/\"#!*F--F36%F5FAF0F-F-*&)F(,(F.F1F/F_p\"#PF-F-F`pF-F-*&)F(,(\"
\")F-F.F1F/\"#MF--F36%F_oFjoF0F-F-*&FgpF--F36%F5FWF0F-F8*&)F(,*F,F-F.F
1F/FTF*F0F--F36%F5FjoF0F-F8*&)F(,*F+F-F.F1F/FcoF*F0F-FdoF-F-*&FaqF-Fho
F-F-*&)F(,*F*F+\"#6F-F.F1F/FjpF--F36%F@FWF0F-F-*&)F(,*\"#IF-F.F1F/F<F*
F0F--F36%F5FKF0F-F8*&)F(,*\"#_F-F.F1F/\"$/\"F*F0F--F36%F@,(F*F-F7F-F/F
7F0F-F8*&FcpF--F36%FIF\\sF0F-F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 18 "b13:= eG1(14,b12);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b13G,
J*&)%\"qG,*%\"mG\"\"%\"\"'\"\"\"*$%\"jG\"\"#\"#cF/F,F--%#gpG6%,&F*F0F-
F-,(F*F-F/\"\"(F-F-F0F-!\"\"*&)F(,*F.F1F/\"#w\"#HF-F*F0F--F36%,&F*F0F0
F-,(F*F-F/F7F,F-F0F-F-*&)F(,*F.F1F/\"#[\"#8F-F*F0F--F36%,&F*F0\"\"$F-,
(F*F-\"\"&F-F/F7F0F-F-*&FCF--F36%F@,(F*F-F/F7F+F-F0F-F8*&)F(,*F.F1F/\"
#?FLF-F*F0F--F36%FI,(F*F-FJF-F/F7F0F-F8*&)F(,*F*F+\"#BF-F.F1F/\"#iF--F
36%F@FKF0F-F8*&)F(,(FTF-F.F1F/FfnF-FgnF-F-*&-F36%,$F*F0FPF0F-FjnF-F8*&
)F(,*FJF-F.F1F/!\")F*F0F--F36%F5,&F*F-F/F7F0F-F-*&FRF--F36%F@,(F*F-F/F
7F0F-F0F-F-*&)F(,*F*F+\"#UF-F.F1F/\"#!*F--F36%F5FAF0F-F-*&)F(,(F.F1F/F
_p\"#PF-F-F`pF-F-*&)F(,*\"#9F-F.F1F/FEF*F0F--F36%F_oFWF0F-F8*&)F(,*F,F
-F.F1F/FTF*F0F--F36%F5FjoF0F-F8*&)F(,*F+F-F.F1F/FcoF*F0F-FdoF-F-*&F]qF
-FhoF-F-*&)F(,*F*F+\"#6F-F.F1F/\"#MF--F36%F@FWF0F-F-*&)F(,*\"#IF-F.F1F
/F<F*F0F--F36%F5FKF0F-F8*&)F(,*\"#_F-F.F1F/\"$/\"F*F0F--F36%F@,(F*F-F7
F-F/F7F0F-F8*&FcpF--F36%FIFirF0F-F8" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 18 "b14:= eG0(16,b13);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6
#>%$b14G,D*&)%\"qG,**$%\"jG\"\"#\"#cF+\"#w\"#H\"\"\"%\"mGF,F0-%#gpG6%,
&F1F,F,F0,(F1F0F+\"\"(\"\"'F0F,F0F0*&)F(,*F*F-F+\"#[\"#8F0F1F,F0-F36%,
&F1F,\"\"$F0,(F1F0\"\"&F0F+F7F,F0F0*&F:F0-F36%F5,(F1F0F+F7\"\"%F0F,F0!
\"\"*&)F(,*F*F-F+\"#?FCF0F1F,F0-F36%F@,(F1F0FAF0F+F7F,F0FI*&)F(,*F1FH
\"#BF0F*F-F+\"#iF0-F36%F5FBF,F0FI*&)F(,(FMF0F*F-F+FUF0FVF0F0*&-F36%,$F
1F,FGF,F0FYF0FI*&)F(,*FAF0F*F-F+!\")F1F,F0-F36%,&F1F,F0F0,&F1F0F+F7F,F
0F0*&FKF0-F36%F5,(F1F0F+F7F,F0F,F0F0*&)F(,*F1FH\"#UF0F*F-F+\"#!*F0-F36
%F_oF6F,F0F0*&)F(,(F*F-F+Fio\"#PF0F0FjoF0F0*&)F(,*\"#9F0F*F-F+F<F1F,F0
-F36%FhnFPF,F0FI*&)F(,*FHF0F*F-F+F\\oF1F,F0F]oF0F0*&)F(,*F1FH\"#6F0F*F
-F+\"#MF0-F36%F5FPF,F0F0*&)F(,*\"#IF0F*F-F+F.F1F,F0-F36%F_oFBF,F0FI*&)
F(,*\"#_F0F*F-F+\"$/\"F1F,F0-F36%F5,(F1F0F7F0F+F7F,F0FI*&F]pF0-F36%F@F
]rF,F0FI" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b15:= eG1(4,b14
);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b15G,>*&)%\"qG,**$%\"jG\"\"#
\"#cF+\"#w\"#H\"\"\"%\"mGF,F0-%#gpG6%,&F1F,F,F0,(F1F0F+\"\"(\"\"'F0F,F
0F0*&)F(,*F*F-F+\"#[\"#8F0F1F,F0-F36%,&F1F,\"\"$F0,(F1F0\"\"&F0F+F7F,F
0F0*&F:F0-F36%F5,(F1F0F+F7\"\"%F0F,F0!\"\"*&)F(,*F1FH\"#BF0F*F-F+\"#iF
0-F36%F5FBF,F0FI*&)F(,(\"#?F0F*F-F+FNF0FOF0F0*&-F36%,$F1F,FGF,F0FRF0FI
*&)F(,*FAF0F*F-F+!\")F1F,F0-F36%,&F1F,F0F0,&F1F0F+F7F,F0F0*&)F(,*F1FH
\"#UF0F*F-F+\"#!*F0-F36%FinF6F,F0F0*&)F(,(F*F-F+F_o\"#PF0F0F`oF0F0*&)F
(,*\"#9F0F*F-F+F<F1F,F0-F36%FX,(F1F0FAF0F+F7F,F0FI*&)F(,*FHF0F*F-F+Ffn
F1F,F0FgnF0F0*&)F(,*\"#IF0F*F-F+F.F1F,F0-F36%FinFBF,F0FI*&)F(,*\"#_F0F
*F-F+\"$/\"F1F,F0-F36%F5,(F1F0F7F0F+F7F,F0FI*&FcoF0-F36%F@F]qF,F0FI" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b16:=eG1(14,b15);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b16G,@*&)%\"qG,**$%\"jG\"\"#\"#cF+
\"#w\"#H\"\"\"%\"mGF,F0-%#gpG6%,&F1F,F,F0,(F1F0F+\"\"(\"\"'F0F,F0F0*&)
F(,*F*F-F+\"#[\"#8F0F1F,F0-F36%,&F1F,\"\"$F0,(F1F0\"\"&F0F+F7F,F0F0*&F
:F0-F36%F5,(F1F0F+F7\"\"%F0F,F0!\"\"*&)F(,*F1FH\"#BF0F*F-F+\"#iF0-F36%
F5FBF,F0FI*&)F(,(\"#?F0F*F-F+FNF0FOF0F0*&-F36%,$F1F,FGF,F0FRF0FI*&)F(,
*FAF0F*F-F+!\")F1F,F0-F36%,&F1F,F0F0,&F1F0F+F7F,F0F0*&)F(,*F1FH\"#UF0F
*F-F+\"#!*F0-F36%FinF6F,F0F0*&)F(,(F*F-F+F_o\"#PF0F0F`oF0F0*&)F(,*\"#9
F0F*F-F+F<F1F,F0-F36%FX,(F1F0FAF0F+F7F,F0FI*&)F(,*FHF0F*F-F+FfnF1F,F0F
gnF0F0*&)F(,*\"#IF0F*F-F+F.F1F,F0-F36%FinFBF,F0FI*&)F(,*\"#_F0F*F-F+\"
$/\"F1F,F0-F36%F5,(F1F0F7F0F+F7F,F0FI*&FcoF0F2F0FI*&)F(,*F*F-F+Fjp\"#^
F0F1F,F0F[qF0FI" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "b17:= eG
0(14,b16);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b17G,>*&)%\"qG,**$%\"
jG\"\"#\"#cF+\"#w\"#H\"\"\"%\"mGF,F0-%#gpG6%,&F1F,F,F0,(F1F0F+\"\"(\"
\"'F0F,F0F0*&)F(,*F*F-F+\"#[\"#8F0F1F,F0-F36%,&F1F,\"\"$F0,(F1F0\"\"&F
0F+F7F,F0F0*&F:F0-F36%F5,(F1F0F+F7\"\"%F0F,F0!\"\"*&)F(,*F1FH\"#BF0F*F
-F+\"#iF0-F36%F5FBF,F0FI*&)F(,(\"#?F0F*F-F+FNF0FOF0F0*&-F36%,$F1F,FGF,
F0FRF0FI*&)F(,*FAF0F*F-F+!\")F1F,F0-F36%,&F1F,F0F0,&F1F0F+F7F,F0F0*&)F
(,*F1FH\"#UF0F*F-F+\"#!*F0-F36%FinF6F,F0F0*&)F(,*\"#9F0F*F-F+F<F1F,F0-
F36%FX,(F1F0FAF0F+F7F,F0FI*&)F(,*FHF0F*F-F+FfnF1F,F0FgnF0F0*&)F(,*\"#I
F0F*F-F+F.F1F,F0-F36%FinFBF,F0FI*&)F(,*\"#_F0F*F-F+\"$/\"F1F,F0-F36%F5
,(F1F0F7F0F+F7F,F0FI*&F'F0F`pF0FI*&)F(,*F*F-F+Ffp\"#^F0F1F,F0FgpF0FI" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b18:= eG0(5,b17);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b18G,@*&)%\"qG,**$%\"jG\"\"#\"#cF+
\"#w\"#H\"\"\"%\"mGF,F0-%#gpG6%,&F1F,F,F0,(F1F0F+\"\"(\"\"'F0F,F0F0*&)
F(,*F*F-F+\"#[\"#8F0F1F,F0-F36%,&F1F,\"\"$F0,(F1F0\"\"&F0F+F7F,F0F0*&F
:F0-F36%F5,(F1F0F+F7\"\"%F0F,F0!\"\"*&)F(,*F1FH\"#BF0F*F-F+\"#iF0-F36%
F5FBF,F0FI*&)F(,(\"#?F0F*F-F+FNF0-F36%,&F1F,F0F0FBF,F0F0*&)F(,*\"#9F0F
*F-F+F<F1F,F0-F36%FWFGF,F0F0*&-F36%,$F1F,FGF,F0FRF0FI*&)F(,*FAF0F*F-F+
!\")F1F,F0-F36%FW,&F1F0F+F7F,F0F0*&)F(,*F1FH\"#UF0F*F-F+\"#!*F0-F36%FW
F6F,F0F0*&FYF0-F36%F[o,(F1F0FAF0F+F7F,F0FI*&)F(,*FHF0F*F-F+F_oF1F,F0F`
oF0F0*&)F(,*\"#IF0F*F-F+F.F1F,F0FUF0FI*&)F(,*\"#_F0F*F-F+\"$/\"F1F,F0-
F36%F5,(F1F0F7F0F+F7F,F0FI*&F'F0FUF0FI*&)F(,*F*F-F+Fip\"#^F0F1F,F0FjpF
0FI" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b19:= eG1(5,b18);" }
}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b19G,>*&)%\"qG,**$%\"jG\"\"#\"#cF+
\"#w\"#H\"\"\"%\"mGF,F0-%#gpG6%,&F1F,F,F0,(F1F0F+\"\"(\"\"'F0F,F0F0*&)
F(,*F*F-F+\"#[\"#8F0F1F,F0-F36%,&F1F,\"\"$F0,(F1F0\"\"&F0F+F7F,F0F0*&F
:F0-F36%F5,(F1F0F+F7\"\"%F0F,F0!\"\"*&)F(,*F1FH\"#BF0F*F-F+\"#iF0-F36%
F5FBF,F0FI*&)F(,*\"#IF0F*F-F+F.F1F,F0-F36%,$F1F,FBF,F0F0*&)F(,*\"#9F0F
*F-F+F<F1F,F0-F36%,&F1F,F0F0FGF,F0F0*&)F(,*FAF0F*F-F+!\")F1F,F0-F36%Fh
n,&F1F0F+F7F,F0F0*&)F(,*F1FH\"#UF0F*F-F+\"#!*F0-F36%FhnF6F,F0F0*&FYF0-
F36%FW,(F1F0FAF0F+F7F,F0FI*&)F(,*FHF0F*F-F+F\\oF1F,F0F]oF0F0*&FRF0-F36
%FhnFBF,F0FI*&)F(,*\"#_F0F*F-F+\"$/\"F1F,F0-F36%F5,(F1F0F7F0F+F7F,F0FI
*&F'F0F_pF0FI*&)F(,*F*F-F+Fep\"#^F0F1F,F0FfpF0FI" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 17 "b20:= eG1(2,b19);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$b20G,8*&)%\"qG,**$%\"jG\"\"#\"#cF+\"#w\"#H\"\"\"%\"m
GF,F0-%#gpG6%,&F1F,F,F0,(F1F0F+\"\"(\"\"'F0F,F0F0*&)F(,*\"#IF0F*F-F+F.
F1F,F0-F36%,$F1F,,(F1F0\"\"&F0F+F7F,F0F0*&)F(,*\"#9F0F*F-F+\"#[F1F,F0-
F36%,&F1F,F0F0,(F1F0F+F7\"\"%F0F,F0F0*&)F(,*\"\"$F0F*F-F+!\")F1F,F0-F3
6%FI,&F1F0F+F7F,F0F0*&)F(,*F1FK\"#UF0F*F-F+\"#!*F0-F36%FIF6F,F0F0*&FCF
0-F36%F?,(F1F0FOF0F+F7F,F0!\"\"*&)F(,*FKF0F*F-F+FPF1F,F0FQF0F0*&F:F0-F
36%FIF@F,F0Fin*&)F(,*\"#_F0F*F-F+\"$/\"F1F,F0-F36%F5,(F1F0F7F0F+F7F,F0
Fin*&F'F0F^oF0Fin*&)F(,*F*F-F+Fdo\"#^F0F1F,F0FeoF0Fin" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b21:= eG0(8,b20);" }}{PARA 12 "" 1 
"" {XPPMATH 20 "6#>%$b21G,6*&)%\"qG,**$%\"jG\"\"#\"#cF+\"#w\"#H\"\"\"%
\"mGF,F0-%#gpG6%,&F1F,F,F0,(F1F0F+\"\"(\"\"'F0F,F0F0*&)F(,*\"#9F0F*F-F
+\"#[F1F,F0-F36%,&F1F,F0F0,(F1F0F+F7\"\"%F0F,F0F0*&)F(,*\"\"$F0F*F-F+!
\")F1F,F0-F36%F@,&F1F0F+F7F,F0F0*&)F(,*F1FB\"#UF0F*F-F+\"#!*F0-F36%F@F
6F,F0F0*&F:F0-F36%,$F1F,,(F1F0FFF0F+F7F,F0!\"\"*&)F(,*FBF0F*F-F+FGF1F,
F0FHF0F0*&)F(,*\"#AF0F*F-F+\"#iF1FBF0-F36%FUFAF,F0FW*&)F(,*\"#_F0F*F-F
+\"$/\"F1F,F0-F36%F5,(F1F0F7F0F+F7F,F0FW*&F'F0-F36%F@,(F1F0\"\"&F0F+F7
F,F0FW*&)F(,*F*F-F+F`o\"#^F0F1F,F0FaoF0FW" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 17 "b22:= eG1(2,b21);" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>%$b22G,0*&)%\"qG,**$%\"jG\"\"#\"#cF+\"#w\"#H\"\"\"%\"mGF,F0-%#gpG6%
,&F1F,F,F0,(F1F0F+\"\"(\"\"'F0F,F0F0*&)F(,*\"\"$F0F*F-F+!\")F1F,F0-F36
%,&F1F,F0F0,&F1F0F+F7F,F0F0*&)F(,*F1\"\"%\"#UF0F*F-F+\"#!*F0-F36%F@F6F
,F0F0*&)F(,*FEF0F*F-F+F=F1F,F0F>F0F0*&)F(,*\"#_F0F*F-F+\"$/\"F1F,F0-F3
6%F5,(F1F0F7F0F+F7F,F0!\"\"*&F'F0-F36%F@,(F1F0\"\"&F0F+F7F,F0FU*&)F(,*
F*F-F+FQ\"#^F0F1F,F0FRF0FU" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
17 "b23:= eG1(1,b22);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b23G,.*&)%
\"qG,**$%\"jG\"\"#\"#cF+\"#!*\"#T\"\"\"%\"mG\"\"%F0-%#gpG6%,&F1F,F0F0,
(F1F0F+\"\"(\"\"'F0F,F0F0*&)F(,*\"\"$F0F*F-F+!\")F1F,F0-F46%F6,&F1F0F+
F8F,F0F0*&)F(,*F1F2\"#UF0F*F-F+F.F0F3F0F0*&)F(,*F2F0F*F-F+F>F1F,F0F?F0
F0*&)F(,*\"#_F0F*F-F+\"$/\"F1F,F0-F46%,&F1F,F,F0,(F1F0F8F0F+F8F,F0!\"
\"*&)F(,*F*F-F+FM\"#^F0F1F,F0FNF0FR" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 23 "b24:= shiftdown(5,b23);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%$b24G,.*&)%\"qG,**$%\"jG\"\"#\"#cF+\"#!*\"#T\"\"\"%\"mG\"\"%F0
-%#gpG6%,&F1F,F0F0,(F1F0F+\"\"(\"\"'F0F,F0F0*&)F(,*\"\"$F0F*F-F+!\")F1
F,F0-F46%F6,&F1F0F+F8F,F0F0*&)F(,*F1F2\"#UF0F*F-F+F.F0F3F0F0*&)F(,*F2F
0F*F-F+F>F1F,F0F?F0F0*&FGF0-F46%,&F1F,F,F0FAF,F0!\"\"*&)F(,*F*F-F+\"$/
\"\"#^F0F1F,F0-F46%FL,(F1F0F8F0F+F8F,F0FM" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 17 "b25:= eG0(5,b24);" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>%$b25G,,*&)%\"qG,**$%\"jG\"\"#\"#cF+\"#!*\"#T\"\"\"%\"mG\"\"%F0-%#g
pG6%,&F1F,F0F0,(F1F0F+\"\"(\"\"'F0F,F0F0*&)F(,*\"\"$F0F*F-F+!\")F1F,F0
-F46%F6,&F1F0F+F8F,F0F0*&)F(,*F1F2\"#UF0F*F-F+F.F0F3F0F0*&)F(,*\"\")F0
F*F-F+!#AF1F2F0-F46%F6,(F1F0F+F8!\"\"F0F,F0FN*&)F(,*F*F-F+\"$/\"\"#^F0
F1F,F0-F46%,&F1F,F,F0,(F1F0F8F0F+F8F,F0FN" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 23 "b26:= shiftdown(5,b25);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$b26G,,*&)%\"qG,**$%\"jG\"\"#\"#cF+\"#!*\"#T\"\"\"%\"
mG\"\"%F0-%#gpG6%,&F1F,F0F0,(F1F0F+\"\"(\"\"'F0F,F0F0*&)F(,*\"\"$F0F*F
-F+!\")F1F,F0-F46%F6,&F1F0F+F8F,F0F0*&)F(,*F1F2\"#UF0F*F-F+F.F0F3F0F0*
&)F(,*\"\")F0F*F-F+!#AF1F2F0-F46%F6,(F1F0F+F8!\"\"F0F,F0FN*&F;F0-F46%,
&F1F,F,F0FAF,F0FN" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b27:= \+
eG0(5,b26);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b27G,**&)%\"qG,**$%
\"jG\"\"#\"#cF+\"#!*\"#T\"\"\"%\"mG\"\"%F0-%#gpG6%,&F1F,F0F0,(F1F0F+\"
\"(\"\"'F0F,F0F0*&)F(,*F1F2\"#UF0F*F-F+F.F0F3F0F0*&)F(,*\"\")F0F*F-F+!
#AF1F2F0-F46%F6,(F1F0F+F8!\"\"F0F,F0FF*&)F(,*F8F0F*F-F+FBF1F2F0FCF0FF
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "b28:= shiftdown(1,b27);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b28G,&*&)%\"qG,*%\"mG\"\"%\"#U
\"\"\"*$%\"jG\"\"#\"#cF/\"#!*F--%#gpG6%,&F*F0F-F-,(F*F-F/\"\"(\"\"'F-F
0F-F-*&)F(,*\"\")F-F.F1F/!#AF*F+F--F46%F6,(F*F-F/F8!\"\"F-F0F-FB" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "b29:= shiftdown(1,b28);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$b29G\"\"!" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "2 0 0" 19 }{VIEWOPTS 1 1 0 1 1 1803 
}