{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 17 "########### 3.120" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 99 "op1:= annihiloper( q^(j^2+
j) * qfac(-q^2,q^2,j-1) / qfac(q,q^2,j) / spqfac(q^2,q^2,j), 1, forwar
d);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$op1G,,*$%\"NG\"\"$\"\"\"*&,*
)%\"qG,&%\"nG\"\"#\"\"'F)!\"\"F2F)F-F2*$F-F0F2F)F'F0F)*&,(*$F-F(F)F-F)
F3F)F)F'F)F)F6F2F,F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 52 "op1
:= annops0(0,[-1,2,2,-1], [1,1,2,0], 2, 1, 1)[2];" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%$op1G,,*$%\"NG\"\"$\"\"\"*&,*)%\"qG,&%\"nG\"\"#\"\"'F
)!\"\"F2F)F-F2*$F-F0F2F)F'F0F)*&,(*$F-F(F)F-F)F3F)F)F'F)F)F6F2F,F)" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 136 "a1:= applyshiftop(op1, q^(
24*j^2 +  2*j)     * gp(2*n+1,n+6*j+1,1) \n                     - q^(2
4*j^2 + 10*j + 1) * gp(2*n+1,n+6*j+2,1));" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%#a1G,J*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F
-F-F-F-)%\"qG,(\"\"$F-*$F/F,\"#CF/F,F-!\"\"*&-F(6%F*,(F+F-F/F0F,F-F-F-
)F2,(\"\"%F-F5F6F/\"#5F-F-*&F'F-)F2,*F+F,F0F-F5F6F/F,F-F-*&F9F-)F2,*F+
F,\"\"(F-F5F6F/F?F-F7*&F1F--F(6%,&F+F,F4F-F;F-F-F-*&F<F--F(6%FJ,(F+F-F
4F-F/F0F-F-F7*&)F2,(F-F-F5F6F/F,F-FHF-F-*&)F2,(F5F6F/F?F,F-F-FLF-F7*&)
F2,(F,F-F5F6F/F,F-FHF-F-*&)F2,(F4F-F5F6F/F?F-FLF-F7*&FAF--F(6%,&F+F,\"
\"&F-FNF-F-F7*&FDF--F(6%Fhn,(F+F-F>F-F/F0F-F-F-*&)F2,&F5F6F/F,F-FfnF-F
7*&)F2,(F5F6F/F?F-F-F-F[oF-F-*&FPF-FfnF-F7*&FSF-F[oF-F-*&FVF-FfnF-F7*&
FYF-F[oF-F-*&F_oF--F(6%,&F+F,FFF-F]oF-F-F-*&FboF--F(6%F[p,(F+F-FinF-F/
F0F-F-F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a2:= eG1(5,a1);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a2G,L*&-%#gpG6%,&%\"nG\"\"#\"\"
\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,(\"\"$F-*$F/F,\"#CF/F,F-!\"\"*&-F(6
%F*,(F+F-F/F0F,F-F-F-)F2,(\"\"%F-F5F6F/\"#5F-F-*&F'F-)F2,*F+F,F0F-F5F6
F/F,F-F-*&F9F-)F2,*F+F,\"\"(F-F5F6F/F?F-F7*&F1F--F(6%,&F+F,F,F-F.F-F-F
-*&)F2,*\"\"&F-F5F6F/\"\")F+F-F--F(6%FJF;F-F-F-*&F<F--F(6%,&F+F,F4F-,(
F+F-F4F-F/F0F-F-F7*&)F2,(F-F-F5F6F/F,F--F(6%FUF;F-F-F-*&)F2,(F5F6F/F?F
,F-F-FSF-F7*&)F2,(F,F-F5F6F/F,F-FZF-F-*&)F2,(F4F-F5F6F/F?F-FSF-F7*&FAF
--F(6%,&F+F,FNF-FVF-F-F7*&FDF--F(6%Fbo,(F+F-F>F-F/F0F-F-F-*&)F2,&F5F6F
/F,F-F`oF-F7*&)F2,(F5F6F/F?F-F-F-FdoF-F-*&FXF-F`oF-F7*&FgnF-FdoF-F-*&F
jnF-F`oF-F7*&F]oF-FdoF-F-*&FhoF--F(6%,&F+F,FFF-FfoF-F-F-*&F[pF--F(6%Fd
p,(F+F-FNF-F/F0F-F-F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a3
:= eG0(5,a2);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a3G,J*&-%#gpG6%,&%
\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F,F-F-F-)%\"qG,(\"\"%F-*$F/F,\"#CF/\"
#5F-F-*&-F(6%F*,(F+F-F/F0F-F-F-F-)F2,*F+F,F0F-F5F6F/F,F-F-*&F'F-)F2,*F
+F,\"\"(F-F5F6F/F7F-!\"\"*&)F2,*F4F-F5F6F/!\"%F+F-F--F(6%F*,&F+F-F/F0F
-F-F-*&)F2,*\"\"&F-F5F6F/\"\")F+F-F--F(6%,&F+F,F,F-F.F-F-F-*&F1F--F(6%
,&F+F,\"\"$F-,(F+F-FVF-F/F0F-F-FB*&)F2,(F-F-F5F6F/F,F--F(6%FUF.F-F-F-*
&)F2,(F5F6F/F7F,F-F-FSF-FB*&)F2,(F,F-F5F6F/F,F-FenF-F-*&)F2,(FVF-F5F6F
/F7F-FSF-FB*&F<F--F(6%,&F+F,FMF-FWF-F-FB*&F?F--F(6%Fco,(F+F-F4F-F/F0F-
F-F-*&)F2,&F5F6F/F,F-FaoF-FB*&)F2,(F5F6F/F7F-F-F-FeoF-F-*&FYF-FaoF-FB*
&FhnF-FeoF-F-*&F[oF-FaoF-FB*&F^oF-FeoF-F-*&FioF--F(6%,&F+F,FAF-FgoF-F-
F-*&F\\pF--F(6%Fep,(F+F-FMF-F/F0F-F-FB" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "a4:= eG0(6,a3);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%
#a4G,L*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F,F-F-F-)%\"qG,(\"
\"%F-*$F/F,\"#CF/\"#5F-F-*&-F(6%F*,(F+F-F/F0F-F-F-F-)F2,*F+F,F0F-F5F6F
/F,F-F-*&F'F-)F2,*F+F,\"\"(F-F5F6F/F7F-!\"\"*&)F2,*F4F-F5F6F/!\"%F+F-F
--F(6%F*,&F+F-F/F0F-F-F-*&)F2,*\"\"&F-F5F6F/\"\")F+F-F--F(6%,&F+F,F,F-
F.F-F-F-*&F1F--F(6%FQ,(F+F-\"\"$F-F/F0F-F-FB*&)F2,*F4F-F5F6F/F4F+F-F-F
OF-FB*&)F2,(F-F-F5F6F/F,F--F(6%,&F+F,FVF-F.F-F-F-*&)F2,(F5F6F/F7F,F-F-
-F(6%FinFUF-F-FB*&)F2,(F,F-F5F6F/F,F-FgnF-F-*&)F2,(FVF-F5F6F/F7F-F]oF-
FB*&F<F--F(6%,&F+F,FMF-FUF-F-FB*&F?F--F(6%Fho,(F+F-F4F-F/F0F-F-F-*&)F2
,&F5F6F/F,F-FfoF-FB*&)F2,(F5F6F/F7F-F-F-FjoF-F-*&FenF-FfoF-FB*&F[oF-Fj
oF-F-*&F`oF-FfoF-FB*&FcoF-FjoF-F-*&F^pF--F(6%,&F+F,FAF-F\\pF-F-F-*&Fap
F--F(6%Fjp,(F+F-FMF-F/F0F-F-FB" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 15 "a5:= eG1(6,a4);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a5G,J*&-
%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F
/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-
!\"\"*&)F2,*\"\"%F-F4F5F/!\"%F+F-F--F(6%F*,&F+F-F/F0F-F-F-*&)F2,*\"\"&
F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&)F2,*F<F-F4F5F/\"#;F+F-F--
F(6%F*,(F+F-\"\"$F-F/F0F-F-F>*&)F2,*FBF-F4F5F/FBF+F-F-FLF-F>*&)F2,(F-F
-F4F5F/F,F--F(6%,&F+F,FVF-F9F-F-F-*&)F2,(F4F5F/F=F,F-F--F(6%FinFUF-F-F
>*&)F2,(F,F-F4F5F/F,F-FgnF-F-*&)F2,(FVF-F4F5F/F=F-F]oF-F>*&F1F--F(6%,&
F+F,FJF-FUF-F-F>*&F:F--F(6%Fho,(F+F-FBF-F/F0F-F-F-*&)F2,&F4F5F/F,F-Ffo
F-F>*&)F2,(F4F5F/F=F-F-F-FjoF-F-*&FenF-FfoF-F>*&F[oF-FjoF-F-*&F`oF-Ffo
F-F>*&FcoF-FjoF-F-*&F^pF--F(6%,&F+F,F<F-F\\pF-F-F-*&FapF--F(6%Fjp,(F+F
-FJF-F/F0F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a6:= gps
ym(3,a5);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a6G,J*&-%#gpG6%,&%\"nG
\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F
-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"
\"%F-F4F5F/!\"%F+F-F--F(6%F*,(F+F-F-F-F/!\"'F-F-F-*&)F2,*\"\"&F-F4F5F/
\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&)F2,*F<F-F4F5F/\"#;F+F-F--F(6%F*,(
F+F-\"\"$F-F/F0F-F-F>*&)F2,*FBF-F4F5F/FBF+F-F-FMF-F>*&)F2,(F-F-F4F5F/F
,F--F(6%,&F+F,FWF-F9F-F-F-*&)F2,(F4F5F/F=F,F-F--F(6%FjnFVF-F-F>*&)F2,(
F,F-F4F5F/F,F-FhnF-F-*&)F2,(FWF-F4F5F/F=F-F^oF-F>*&F1F--F(6%,&F+F,FKF-
FVF-F-F>*&F:F--F(6%Fio,(F+F-FBF-F/F0F-F-F-*&)F2,&F4F5F/F,F-FgoF-F>*&)F
2,(F4F5F/F=F-F-F-F[pF-F-*&FfnF-FgoF-F>*&F\\oF-F[pF-F-*&FaoF-FgoF-F>*&F
doF-F[pF-F-*&F_pF--F(6%,&F+F,F<F-F]pF-F-F-*&FbpF--F(6%F[q,(F+F-FKF-F/F
0F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a7:= negate(3,a6
);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a7G,J*&-%#gpG6%,&%\"nG\"\"#\"
\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6
%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"%F-F4
F5F/FBF+F-F-F'F-F-*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-
F-*&)F2,*F<F-F4F5F/\"#;F+F-F--F(6%F*,(F+F-\"\"$F-F/F0F-F-F>*&F@F-FHF-F
>*&)F2,(F-F-F4F5F/F,F--F(6%,&F+F,FRF-F9F-F-F-*&)F2,(F4F5F/F=F,F-F--F(6
%FYFQF-F-F>*&)F2,(F,F-F4F5F/F,F-FWF-F-*&)F2,(FRF-F4F5F/F=F-FgnF-F>*&F1
F--F(6%,&F+F,FFF-FQF-F-F>*&F:F--F(6%Fbo,(F+F-FBF-F/F0F-F-F-*&)F2,&F4F5
F/F,F-F`oF-F>*&)F2,(F4F5F/F=F-F-F-FdoF-F-*&FUF-F`oF-F>*&FenF-FdoF-F-*&
FjnF-F`oF-F>*&F]oF-FdoF-F-*&FhoF--F(6%,&F+F,F<F-FfoF-F-F-*&F[pF--F(6%F
dp,(F+F-FFF-F/F0F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a
8:= eG1(6,a7);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a8G,H*&-%#gpG6%,&
%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/
F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F
2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&)F2,*F<F-F4F5F/\"#
;F+F-F--F(6%F*,(F+F-\"\"$F-F/F0F-F-F>*&)F2,*F0F-F4F5F/F=F+F,F-F7F-F>*&
)F2,(F-F-F4F5F/F,F--F(6%,&F+F,FNF-F9F-F-F-*&)F2,(F4F5F/F=F,F-F--F(6%FW
FMF-F-F>*&)F2,(F,F-F4F5F/F,F-FUF-F-*&)F2,(FNF-F4F5F/F=F-FenF-F>*&F1F--
F(6%,&F+F,FBF-FMF-F-F>*&F:F--F(6%F`o,(F+F-\"\"%F-F/F0F-F-F-*&)F2,&F4F5
F/F,F-F^oF-F>*&)F2,(F4F5F/F=F-F-F-FboF-F-*&FSF-F^oF-F>*&FYF-FboF-F-*&F
hnF-F^oF-F>*&F[oF-FboF-F-*&FgoF--F(6%,&F+F,F<F-FdoF-F-F-*&FjoF--F(6%Fc
p,(F+F-FBF-F/F0F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "a9
:= eG0(19,a8);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a9G,J*&-%#gpG6%,&
%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/
F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F
2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&)F2,*F<F-F4F5F/\"#
;F+F-F--F(6%F*,(F+F-\"\"$F-F/F0F-F-F>*&)F2,*F0F-F4F5F/F=F+F,F-F7F-F>*&
)F2,(F-F-F4F5F/F,F--F(6%,&F+F,FNF-F9F-F-F-*&)F2,(F4F5F/F=F,F-F--F(6%FW
FMF-F-F>*&)F2,(F,F-F4F5F/F,F-FUF-F-*&)F2,(FNF-F4F5F/F=F-FenF-F>*&F1F--
F(6%,&F+F,FBF-FMF-F-F>*&F:F--F(6%F`o,(F+F-\"\"%F-F/F0F-F-F-*&)F2,&F4F5
F/F,F-F^oF-F>*&)F2,(F4F5F/F=F-F-F-FboF-F-*&FSF-F^oF-F>*&FYF-FboF-F-*&F
hnF-F^oF-F>*&F[oF-FboF-F-*&FgoF--F(6%,&F+F,F<F-FdoF-F-F-*&FjoF--F(6%,&
F+F,F0F-,(F+F-FBF-F/F0F-F-F>*&)F2,*F4F5F/FeoFNF-F+F-F--F(6%FgpFdoF-F-F
>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a10:= eG1(19,a9);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a10G,H*&-%#gpG6%,&%\"nG\"\"#\"\"\"F
-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(
F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/
\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&)F2,*F<F-F4F5F/\"#;F+F-F--F(6%F*,(
F+F-\"\"$F-F/F0F-F-F>*&)F2,*F0F-F4F5F/F=F+F,F-F7F-F>*&)F2,(F-F-F4F5F/F
,F--F(6%,&F+F,FNF-F9F-F-F-*&)F2,(F4F5F/F=F,F-F--F(6%FWFMF-F-F>*&)F2,(F
,F-F4F5F/F,F-FUF-F-*&)F2,(FNF-F4F5F/F=F-FenF-F>*&F1F--F(6%,&F+F,FBF-FM
F-F-F>*&F:F--F(6%F`o,(F+F-\"\"%F-F/F0F-F-F-*&)F2,&F4F5F/F,F-F^oF-F>*&F
SF-F^oF-F>*&FYF-FboF-F-*&FhnF-F^oF-F>*&F[oF-FboF-F-*&FgoF--F(6%,&F+F,F
<F-FdoF-F-F-*&)F2,*F4F5F/FJF0F-F+F-F--F(6%F`o,(F+F-FBF-F/F0F-F-F>*&)F2
,*F4F5F/FeoFNF-F+F-F--F(6%,&F+F,F0F-FdoF-F-F>" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 18 "a11:= eG1(17,a10);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%$a11G,J*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)
%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,
\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-
F9F-F-F-*&)F2,*F<F-F4F5F/\"#;F+F-F--F(6%F*,(F+F-\"\"$F-F/F0F-F-F>*&)F2
,*F0F-F4F5F/F=F+F,F-F7F-F>*&)F2,(F-F-F4F5F/F,F--F(6%,&F+F,FNF-F9F-F-F-
*&)F2,(F4F5F/F=F,F-F--F(6%FWFMF-F-F>*&)F2,(F,F-F4F5F/F,F-FUF-F-*&)F2,(
FNF-F4F5F/F=F-FenF-F>*&F1F--F(6%,&F+F,FBF-FMF-F-F>*&F:F--F(6%F`o,(F+F-
\"\"%F-F/F0F-F-F-*&)F2,&F4F5F/F,F-F^oF-F>*&FSF-F^oF-F>*&FYF-FboF-F-*&F
hnF-F^oF-F>*&F[oF-FboF-F-*&FgoF--F(6%,&F+F,F0F-FMF-F-F-*&)F2,*F4F5F/FC
F+F-FeoF-F--F(6%F`pFdoF-F-F-*&)F2,*F4F5F/FJF0F-F+F-F--F(6%F`o,(F+F-FBF
-F/F0F-F-F>*&)F2,*F4F5F/FeoFNF-F+F-F-FdpF-F>" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 18 "a12:= eG0(17,a11);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%$a12G,H*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)
%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,
\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-
F9F-F-F-*&)F2,*F<F-F4F5F/\"#;F+F-F--F(6%F*,(F+F-\"\"$F-F/F0F-F-F>*&)F2
,*F0F-F4F5F/F=F+F,F-F7F-F>*&)F2,(F-F-F4F5F/F,F--F(6%,&F+F,FNF-F9F-F-F-
*&)F2,(F4F5F/F=F,F-F--F(6%FWFMF-F-F>*&)F2,(F,F-F4F5F/F,F-FUF-F-*&)F2,(
FNF-F4F5F/F=F-FenF-F>*&F1F--F(6%,&F+F,FBF-FMF-F-F>*&F:F--F(6%F`o,(F+F-
\"\"%F-F/F0F-F-F-*&FSF-F^oF-F>*&FYF-FboF-F-*&FhnF-F^oF-F>*&F[oF-FboF-F
-*&)F2,*F4F5F/!\"%F+F-FNF-F--F(6%F`oF9F-F-F-*&)F2,*F4F5F/FCF+F-FeoF-F-
-F(6%,&F+F,F0F-FdoF-F-F-*&)F2,*F4F5F/FJF0F-F+F-F--F(6%F`o,(F+F-FBF-F/F
0F-F-F>*&)F2,*F4F5F/FeoFNF-F+F-F-FcpF-F>" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 20 "a13:= gpsym(19,a12);" }}{PARA 12 "" 1 "" {XPPMATH 20 
"6#>%$a13G,H*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"
qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"
(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-
F-F-*&)F2,*F<F-F4F5F/\"#;F+F-F--F(6%F*,(F+F-\"\"$F-F/F0F-F-F>*&)F2,*F0
F-F4F5F/F=F+F,F-F7F-F>*&)F2,(F-F-F4F5F/F,F--F(6%,&F+F,FNF-F9F-F-F-*&)F
2,(F4F5F/F=F,F-F--F(6%FWFMF-F-F>*&)F2,(F,F-F4F5F/F,F-FUF-F-*&)F2,(FNF-
F4F5F/F=F-FenF-F>*&F1F--F(6%,&F+F,FBF-FMF-F-F>*&F:F--F(6%F`o,(F+F-\"\"
%F-F/F0F-F-F-*&FSF-F^oF-F>*&FYF-FboF-F-*&FhnF-F^oF-F>*&F[oF-FboF-F-*&)
F2,*F4F5F/!\"%F+F-FNF-F--F(6%F`oF9F-F-F-*&)F2,*F4F5F/FCF+F-FeoF-F--F(6
%,&F+F,F0F-FdoF-F-F-*&)F2,*F4F5F/FJF0F-F+F-F--F(6%F`o,(F+F-FBF-F/F0F-F
-F>*&)F2,*F4F5F/FeoFNF-F+F-F--F(6%Fep,(F+F-F,F-F/!\"'F-F-F>" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "a14:= negate(19,a13);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a14G,H*&-%#gpG6%,&%\"nG\"\"#\"\"\"F
-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(
F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/
\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&)F2,*F<F-F4F5F/\"#;F+F-F--F(6%F*,(
F+F-\"\"$F-F/F0F-F-F>*&)F2,*F0F-F4F5F/F=F+F,F-F7F-F>*&)F2,(F-F-F4F5F/F
,F--F(6%,&F+F,FNF-F9F-F-F-*&)F2,(F4F5F/F=F,F-F--F(6%FWFMF-F-F>*&)F2,(F
,F-F4F5F/F,F-FUF-F-*&)F2,(FNF-F4F5F/F=F-FenF-F>*&F1F--F(6%,&F+F,FBF-FM
F-F-F>*&F:F--F(6%F`o,(F+F-\"\"%F-F/F0F-F-F-*&FSF-F^oF-F>*&FYF-FboF-F-*
&FhnF-F^oF-F>*&F[oF-FboF-F-*&)F2,*F4F5F/!\"%F+F-FNF-F--F(6%F`oF9F-F-F-
*&)F2,*F4F5F/FCF+F-FeoF-F--F(6%,&F+F,F0F-FdoF-F-F-*&)F2,*F4F5F/FJF0F-F
+F-F--F(6%F`o,(F+F-FBF-F/F0F-F-F>*&F[pF--F(6%FepF9F-F-F>" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a15:= eG0(19,a14);" }}{PARA 12 "" 
1 "" {XPPMATH 20 "6#>%$a15G,F*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG
\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-
F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F
(6%,&F+F,F,F-F9F-F-F-*&)F2,*F<F-F4F5F/\"#;F+F-F--F(6%F*,(F+F-\"\"$F-F/
F0F-F-F>*&)F2,*F0F-F4F5F/F=F+F,F-F7F-F>*&)F2,(F-F-F4F5F/F,F--F(6%,&F+F
,FNF-F9F-F-F-*&)F2,(F4F5F/F=F,F-F--F(6%FWFMF-F-F>*&)F2,(F,F-F4F5F/F,F-
FUF-F-*&)F2,(FNF-F4F5F/F=F-FenF-F>*&F1F--F(6%,&F+F,FBF-FMF-F-F>*&F:F--
F(6%F`o,(F+F-\"\"%F-F/F0F-F-F-*&FSF-F^oF-F>*&FYF-FboF-F-*&FhnF-F^oF-F>
*&F[oF-FboF-F-*&)F2,*F4F5F/FCF+F-FeoF-F--F(6%,&F+F,F0F-FdoF-F-F-*&)F2,
*F4F5F/FJF0F-F+F-F--F(6%F`o,(F+F-FBF-F/F0F-F-F>*&)F2,*F4F5F/!#5F+F,F<F
-F--F(6%F`oF.F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a16:
= eG0(15,a15);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a16G,H*&-%#gpG6%,
&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF
/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)
F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&)F2,*F<F-F4F5F/\"
#;F+F-F--F(6%F*,(F+F-\"\"$F-F/F0F-F-F>*&)F2,*F0F-F4F5F/F=F+F,F-F7F-F>*
&)F2,(F-F-F4F5F/F,F--F(6%,&F+F,FNF-F9F-F-F-*&)F2,(F4F5F/F=F,F-F--F(6%F
WFMF-F-F>*&)F2,(F,F-F4F5F/F,F-FUF-F-*&)F2,(FNF-F4F5F/F=F-FenF-F>*&F1F-
-F(6%,&F+F,FBF-FMF-F-F>*&F:F--F(6%F`o,(F+F-\"\"%F-F/F0F-F-F-*&FSF-F^oF
-F>*&FYF-FboF-F-*&FhnF-F^oF-F>*&F[oF--F(6%,&F+F,FeoF-FdoF-F-F-*&)F2,*F
eoF-F4F5F/FeoF+F-F--F(6%F\\pFMF-F-F-*&)F2,*F4F5F/FCF+F-FeoF-F--F(6%,&F
+F,F0F-FdoF-F-F-*&)F2,*F4F5F/FJF0F-F+F-F--F(6%F`o,(F+F-FBF-F/F0F-F-F>*
&)F2,*F4F5F/!#5F+F,F<F-F--F(6%F`oF.F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 18 "a17:= eG1(15,a16);" }}{PARA 12 "" 1 "" {XPPMATH 20 
"6#>%$a17G,F*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"
qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"
(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-
F-F-*&)F2,*F<F-F4F5F/\"#;F+F-F--F(6%F*,(F+F-\"\"$F-F/F0F-F-F>*&)F2,*F0
F-F4F5F/F=F+F,F-F7F-F>*&)F2,(F-F-F4F5F/F,F--F(6%,&F+F,FNF-F9F-F-F-*&)F
2,(F4F5F/F=F,F-F--F(6%FWFMF-F-F>*&)F2,(F,F-F4F5F/F,F-FUF-F-*&F1F--F(6%
,&F+F,FBF-FMF-F-F>*&F:F--F(6%F]o,(F+F-\"\"%F-F/F0F-F-F-*&FSF-F[oF-F>*&
FYF-F_oF-F-*&FhnF-F[oF-F>*&FHF--F(6%FWFaoF-F-F-*&)F2,*FboF-F4F5F/FboF+
F-F--F(6%,&F+F,FboF-FMF-F-F-*&)F2,*F4F5F/FCF+F-FboF-F--F(6%,&F+F,F0F-F
aoF-F-F-*&)F2,*F4F5F/FJF0F-F+F-F--F(6%F]o,(F+F-FBF-F/F0F-F-F>*&)F2,*F4
F5F/!#5F+F,F<F-F--F(6%F]oF.F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 18 "a18:= eG1(11,a17);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6
#>%$a18G,H*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG
,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F
-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-
F-*&)F2,*F<F-F4F5F/\"#;F+F-F--F(6%F*,(F+F-\"\"$F-F/F0F-F-F>*&)F2,*F0F-
F4F5F/F=F+F,F-F7F-F>*&)F2,(F-F-F4F5F/F,F--F(6%,&F+F,FNF-F9F-F-F-*&)F2,
(F4F5F/F=F,F-F--F(6%FWFMF-F-F>*&)F2,(F,F-F4F5F/F,F-FUF-F-*&F1F--F(6%,&
F+F,FBF-FMF-F-F>*&F:F--F(6%F]o,(F+F-\"\"%F-F/F0F-F-F-*&FSF--F(6%,&F+F,
FboF-F9F-F-F>*&)F2,*F4F5F/FCF+F-FboF-F--F(6%FfoFMF-F-F>*&FYF-F_oF-F-*&
FhnF-F[oF-F>*&FHF--F(6%FWFaoF-F-F-*&)F2,*FboF-F4F5F/FboF+F-F-FjoF-F-*&
FhoF--F(6%,&F+F,F0F-FaoF-F-F-*&)F2,*F4F5F/FJF0F-F+F-F--F(6%F]o,(F+F-FB
F-F/F0F-F-F>*&)F2,*F4F5F/!#5F+F,F<F-F--F(6%F]oF.F-F-F>" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a19:= eG0(11,a18);" }}{PARA 12 "" 
1 "" {XPPMATH 20 "6#>%$a19G,F*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG
\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-
F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F
(6%,&F+F,F,F-F9F-F-F-*&)F2,*F<F-F4F5F/\"#;F+F-F--F(6%F*,(F+F-\"\"$F-F/
F0F-F-F>*&)F2,*F0F-F4F5F/F=F+F,F-F7F-F>*&)F2,(F4F5F/F=F,F-F--F(6%,&F+F
,FNF-FMF-F-F>*&)F2,(F,F-F4F5F/F,F--F(6%FWF9F-F-F-*&F1F--F(6%,&F+F,FBF-
FMF-F-F>*&F:F--F(6%Fjn,(F+F-\"\"%F-F/F0F-F-F-*&)F2,*F4F5F/!\"%F+F-FNF-
F--F(6%FWF.F-F-F>*&)F2,*F4F5F/FCF+F-F_oF-F--F(6%,&F+F,F_oF-FMF-F-F>*&F
SF-F\\oF-F-*&FYF-FhnF-F>*&FHF--F(6%FWF^oF-F-F-*&)F2,*F_oF-F4F5F/F_oF+F
-F-FioF-F-*&FgoF--F(6%,&F+F,F0F-F^oF-F-F-*&)F2,*F4F5F/FJF0F-F+F-F--F(6
%Fjn,(F+F-FBF-F/F0F-F-F>*&)F2,*F4F5F/!#5F+F,F<F-F--F(6%FjnF.F-F-F>" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a20:= eG0(16,a19);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a20G,D*&-%#gpG6%,&%\"nG\"\"#\"\"\"F
-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(
F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/
\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&)F2,*F<F-F4F5F/\"#;F+F-F--F(6%F*,(
F+F-\"\"$F-F/F0F-F-F>*&)F2,*F0F-F4F5F/F=F+F,F-F7F-F>*&)F2,(F4F5F/F=F,F
-F--F(6%,&F+F,FNF-FMF-F-F>*&)F2,(F,F-F4F5F/F,F--F(6%FWF9F-F-F-*&F:F--F
(6%,&F+F,FBF-,(F+F-\"\"%F-F/F0F-F-F-*&)F2,*F4F5F/!\"%F+F-FNF-F--F(6%FW
F.F-F-F>*&)F2,*F4F5F/FCF+F-F\\oF-F--F(6%,&F+F,F\\oF-FMF-F-F>*&FSF-FhnF
-F-*&FYF--F(6%FjnFMF-F-F>*&FHF--F(6%FWF[oF-F-F-*&)F2,*F\\oF-F4F5F/F\\o
F+F-F-FfoF-F-*&FdoF-FhnF-F-*&)F2,*F4F5F/FJF0F-F+F-F--F(6%Fjn,(F+F-FBF-
F/F0F-F-F>*&)F2,*F4F5F/!#5F+F,F<F-F--F(6%FjnF.F-F-F>" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 18 "a21:= eG1(15,a20);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$a21G,B*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'
F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)
F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&
F+F,F,F-F9F-F-F-*&)F2,*F<F-F4F5F/\"#;F+F-F--F(6%F*,(F+F-\"\"$F-F/F0F-F
-F>*&)F2,*F0F-F4F5F/F=F+F,F-F7F-F>*&)F2,(F4F5F/F=F,F-F--F(6%,&F+F,FNF-
FMF-F-F>*&)F2,(F,F-F4F5F/F,F--F(6%FWF9F-F-F-*&F:F--F(6%,&F+F,FBF-,(F+F
-\"\"%F-F/F0F-F-F-*&)F2,*F4F5F/!\"%F+F-FNF-F--F(6%FWF.F-F-F>*&FSF-FhnF
-F-*&FYF--F(6%FjnFMF-F-F>*&FHF--F(6%FWF[oF-F-F-*&)F2,*F\\oF-F4F5F/F\\o
F+F-F--F(6%,&F+F,F\\oF-FMF-F-F-*&)F2,*F4F5F/\"#9F+F,FCF-F--F(6%F_pF[oF
-F-F-*&)F2,*F4F5F/FJF0F-F+F-F--F(6%Fjn,(F+F-FBF-F/F0F-F-F>*&)F2,*F4F5F
/!#5F+F,F<F-F--F(6%FjnF.F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 18 "a22:= eG0(12,a21);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a22G,
D*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F
-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"
#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&)F2,*
F<F-F4F5F/\"#;F+F-F--F(6%F*,(F+F-\"\"$F-F/F0F-F-F>*&)F2,*F0F-F4F5F/F=F
+F,F-F7F-F>*&)F2,(F4F5F/F=F,F-F--F(6%,&F+F,FNF-FMF-F-F>*&)F2,(F,F-F4F5
F/F,F--F(6%FWF9F-F-F-*&F:F--F(6%,&F+F,FBF-,(F+F-\"\"%F-F/F0F-F-F-*&)F2
,*F4F5F/!\"%F+F-FNF-F--F(6%FWF.F-F-F>*&FSF-FhnF-F-*&FYF--F(6%FjnFMF-F-
F>*&FHF--F(6%FFF[oF-F-F-*&FPF--F(6%FFFMF-F-F-*&)F2,*F\\oF-F4F5F/F\\oF+
F-F--F(6%,&F+F,F\\oF-FMF-F-F-*&)F2,*F4F5F/\"#9F+F,FCF-F--F(6%FbpF[oF-F
-F-*&)F2,*F4F5F/FJF0F-F+F-F--F(6%Fjn,(F+F-FBF-F/F0F-F-F>*&)F2,*F4F5F/!
#5F+F,F<F-F--F(6%FjnF.F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 18 "a23:= eG1(12,a22);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a23G,B*
&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*
$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5
F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&)F2,*F0
F-F4F5F/F=F+F,F-F7F-F>*&)F2,(F4F5F/F=F,F-F--F(6%,&F+F,\"\"$F-,(F+F-FPF
-F/F0F-F-F>*&)F2,(F,F-F4F5F/F,F--F(6%FOF9F-F-F-*&F:F--F(6%,&F+F,FBF-,(
F+F-\"\"%F-F/F0F-F-F-*&)F2,*F4F5F/!\"%F+F-FPF-F--F(6%FOF.F-F-F>*&FKF-F
XF-F-*&FSF--F(6%FZFQF-F-F>*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*FenF-F-F
-*&FHF--F(6%FFFQF-F-F-*&)F2,*FfnF-F4F5F/FfnF+F-F--F(6%,&F+F,FfnF-FQF-F
-F-*&)F2,*F4F5F/\"#9F+F,FCF-F--F(6%F`pFenF-F-F-*&)F2,*F4F5F/\"#;F0F-F+
F-F--F(6%FZ,(F+F-FBF-F/F0F-F-F>*&)F2,*F4F5F/!#5F+F,F<F-F--F(6%FZF.F-F-
F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a24:= eG1(12,a23);" }
}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a24G,@*&-%#gpG6%,&%\"nG\"\"#\"\"\"
F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,
(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/
\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&)F2,(F4F5F/F=F,F-F--F(6%,&F+F,\"\"
$F-,(F+F-FMF-F/F0F-F-F>*&)F2,(F,F-F4F5F/F,F--F(6%FLF9F-F-F-*&F:F--F(6%
,&F+F,FBF-,(F+F-\"\"%F-F/F0F-F-F-*&)F2,*F4F5F/!\"%F+F-FMF-F--F(6%FLF.F
-F-F>*&FHF-FUF-F-*&FPF--F(6%FWFNF-F-F>*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(
6%F*FXF-F-F-*&)F2,*\"\"*F-F4F5F/\"#;F+FMF--F(6%F*FNF-F-F-*&)F2,*FYF-F4
F5F/FYF+F-F--F(6%,&F+F,FYF-FNF-F-F-*&)F2,*F4F5F/\"#9F+F,FCF-F--F(6%Fap
FXF-F-F-*&)F2,*F4F5F/FioF0F-F+F-F--F(6%FW,(F+F-FBF-F/F0F-F-F>*&)F2,*F4
F5F/!#5F+F,F<F-F--F(6%FWF.F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "a25:= eG0(8,a24);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%$a25G,B*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,
*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-
F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F
-*&)F2,(F4F5F/F=F,F-F--F(6%,&F+F,\"\"$F-,(F+F-FMF-F/F0F-F-F>*&)F2,(F,F
-F4F5F/F,F--F(6%FLF9F-F-F-*&F:F--F(6%,&F+F,FBF-,(F+F-\"\"%F-F/F0F-F-F-
*&)F2,*F4F5F/!\"%F+F-FMF-F--F(6%FLF.F-F-F>*&FHF--F(6%,&F+F,FYF-FXF-F-F
-*&)F2,*F4F5F/FYFMF-F+F-F--F(6%F]oFNF-F-F-*&FPF--F(6%FWFNF-F-F>*&)F2,*
\"#6F-F4F5F/\"#AF+F,F--F(6%F*FXF-F-F-*&)F2,*\"\"*F-F4F5F/\"#;F+FMF--F(
6%F*FNF-F-F-*&)F2,*FYF-F4F5F/FYF+F-F-FaoF-F-*&)F2,*F4F5F/\"#9F+F,FCF-F
-F[oF-F-*&)F2,*F4F5F/FapF0F-F+F-F--F(6%FW,(F+F-FBF-F/F0F-F-F>*&)F2,*F4
F5F/!#5F+F,F<F-F--F(6%FWF.F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "a26:= eG1(8,a25);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%$a26G,@*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,
*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-
F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F
-*&)F2,(F,F-F4F5F/F,F--F(6%,&F+F,\"\"$F-F9F-F-F-*&F:F--F(6%,&F+F,FBF-,
(F+F-\"\"%F-F/F0F-F-F-*&)F2,*F4F5F/!\"%F+F-FMF-F--F(6%FLF.F-F-F>*&)F2,
*F4F5F/\"#;F0F-F+F-F--F(6%FLFRF-F-F-*&)F2,*F4F5F/FSFMF-F+F-F--F(6%,&F+
F,FSF-,(F+F-FMF-F/F0F-F-F-*&FHF--F(6%FQF`oF-F-F>*&)F2,*\"#6F-F4F5F/\"#
AF+F,F--F(6%F*FRF-F-F-*&)F2,*\"\"*F-F4F5F/FgnF+FMF--F(6%F*F`oF-F-F-*&)
F2,*FSF-F4F5F/FSF+F-F-F]oF-F-*&)F2,*F4F5F/\"#9F+F,FCF-F--F(6%F_oFRF-F-
F-*&FenF--F(6%FQ,(F+F-FBF-F/F0F-F-F>*&)F2,*F4F5F/!#5F+F,F<F-F--F(6%FQF
.F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "a27:= gpsym(5,a2
6);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a27G,@*&-%#gpG6%,&%\"nG\"\"#
\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F
(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-
F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&)F2,(F,F-F4F5F/F,F--F(6%,&F+
F,\"\"$F-F9F-F-F-*&F:F--F(6%,&F+F,FBF-,(F+F-F-F-F/!\"'F-F-F-*&)F2,*F4F
5F/!\"%F+F-FMF-F--F(6%FLF.F-F-F>*&)F2,*F4F5F/\"#;F0F-F+F-F--F(6%FL,(F+
F-\"\"%F-F/F0F-F-F-*&)F2,*F4F5F/F[oFMF-F+F-F--F(6%,&F+F,F[oF-,(F+F-FMF
-F/F0F-F-F-*&FHF--F(6%FQFboF-F-F>*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*F
jnF-F-F-*&)F2,*\"\"*F-F4F5F/FgnF+FMF--F(6%F*FboF-F-F-*&)F2,*F[oF-F4F5F
/F[oF+F-F-F_oF-F-*&)F2,*F4F5F/\"#9F+F,FCF-F--F(6%FaoFjnF-F-F-*&FenF--F
(6%FQ,(F+F-FBF-F/F0F-F-F>*&)F2,*F4F5F/!#5F+F,F<F-F--F(6%FQF.F-F-F>" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "a28:= negate(5,a27);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a28G,<*&-%#gpG6%,&%\"nG\"\"#\"\"\"F
-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(
F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/
\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&)F2,(F,F-F4F5F/F,F--F(6%,&F+F,\"\"
$F-F9F-F-F-*&)F2,*F4F5F/!\"%F+F-FMF-F--F(6%FLF.F-F-F>*&)F2,*F4F5F/\"#;
F0F-F+F-F--F(6%FL,(F+F-\"\"%F-F/F0F-F-F-*&)F2,*F4F5F/FenFMF-F+F-F--F(6
%,&F+F,FenF-,(F+F-FMF-F/F0F-F-F-*&FHF--F(6%,&F+F,FBF-F\\oF-F-F>*&)F2,*
\"#6F-F4F5F/\"#AF+F,F--F(6%F*FZF-F-F-*&)F2,*\"\"*F-F4F5F/FWF+FMF--F(6%
F*F\\oF-F-F-*&)F2,*FenF-F4F5F/FenF+F-F-FinF-F-*&)F2,*F4F5F/\"#9F+F,FCF
-F--F(6%F[oFZF-F-F-*&FUF--F(6%F`o,(F+F-FBF-F/F0F-F-F>" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "a29:= gpsym(5,a28);" }}{PARA 12 "" 
1 "" {XPPMATH 20 "6#>%$a29G,<*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG
\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-
F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F
(6%,&F+F,F,F-F9F-F-F-*&)F2,(F,F-F4F5F/F,F--F(6%,&F+F,\"\"$F-F9F-F-F-*&
)F2,*F4F5F/!\"%F+F-FMF-F--F(6%FL,(F+F-F,F-F/!\"'F-F-F>*&)F2,*F4F5F/\"#
;F0F-F+F-F--F(6%FL,(F+F-\"\"%F-F/F0F-F-F-*&)F2,*F4F5F/FgnFMF-F+F-F--F(
6%,&F+F,FgnF-,(F+F-FMF-F/F0F-F-F-*&FHF--F(6%,&F+F,FBF-F^oF-F-F>*&)F2,*
\"#6F-F4F5F/\"#AF+F,F--F(6%F*FfnF-F-F-*&)F2,*\"\"*F-F4F5F/FYF+FMF--F(6
%F*F^oF-F-F-*&)F2,*FgnF-F4F5F/FgnF+F-F-F[oF-F-*&)F2,*F4F5F/\"#9F+F,FCF
-F--F(6%F]oFfnF-F-F-*&FWF--F(6%Fbo,(F+F-FBF-F/F0F-F-F>" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "a30:= negate(5,a29);" }}{PARA 12 "
" 1 "" {XPPMATH 20 "6#>%$a30G,<*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"
jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,
F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F-
-F(6%,&F+F,F,F-F9F-F-F-*&)F2,(F,F-F4F5F/F,F--F(6%,&F+F,\"\"$F-F9F-F-F-
*&)F2,*F4F5F/\"\"%FMF-F+F-F-FJF-F>*&)F2,*F4F5F/\"#;F0F-F+F-F--F(6%FL,(
F+F-FQF-F/F0F-F-F-*&FOF--F(6%,&F+F,FQF-,(F+F-FMF-F/F0F-F-F-*&FHF--F(6%
,&F+F,FBF-FgnF-F-F>*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*FXF-F-F-*&)F2,*
\"\"*F-F4F5F/FUF+FMF--F(6%F*FgnF-F-F-*&)F2,*FQF-F4F5F/FQF+F-F-FZF-F-*&
)F2,*F4F5F/\"#9F+F,FCF-F--F(6%FfnFXF-F-F-*&FSF--F(6%F[o,(F+F-FBF-F/F0F
-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a31:= eG1(7,a30);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a31G,:*&-%#gpG6%,&%\"nG\"\"#\"
\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6
%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4
F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&)F2,(F,F-F4F5F/F,F--F(6%,&F+F,
\"\"$F-F9F-F-F-*&)F2,*F4F5F/\"#;F0F-F+F-F--F(6%FL,(F+F-\"\"%F-F/F0F-F-
F-*&)F2,*F0F-F4F5F/F=F+F,F--F(6%FL,(F+F-FMF-F/F0F-F-F-*&FHF--F(6%,&F+F
,FBF-FenF-F-F>*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*FTF-F-F-*&)F2,*\"\"*
F-F4F5F/FQF+FMF--F(6%F*FenF-F-F-*&)F2,*FUF-F4F5F/FUF+F-F--F(6%,&F+F,FU
F-FenF-F-F-*&)F2,*F4F5F/\"#9F+F,FCF-F--F(6%F\\pFTF-F-F-*&FOF--F(6%Fin,
(F+F-FBF-F/F0F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a32:
= eG1(12,a31);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a32G,<*&-%#gpG6%,
&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF
/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)
F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&)F2,(F,F-F4F5F/F,
F--F(6%,&F+F,\"\"$F-F9F-F-F-*&)F2,*F4F5F/\"#;F0F-F+F-F--F(6%FL,(F+F-\"
\"%F-F/F0F-F-F-*&)F2,*F0F-F4F5F/F=F+F,F--F(6%FL,(F+F-FMF-F/F0F-F-F-*&F
HF--F(6%,&F+F,FBF-FenF-F-F>*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*FTF-F-F
-*&)F2,*\"\"*F-F4F5F/FQF+FMF--F(6%F*FenF-F-F-*&)F2,*FUF-F4F5F/FUF+F-F-
-F(6%,&F+F,FUF-FenF-F-F-*&)F2,*F4F5F/\"#9F+F,FCF-F--F(6%F\\pFTF-F-F-*&
FOF-FapF-F>*&F[oF--F(6%F\\p,(F+F-FBF-F/F0F-F-F>" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 18 "a33:= eG0(12,a32);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$a33G,6*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'
F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)
F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&
F+F,F,F-F9F-F-F-*&)F2,(F,F-F4F5F/F,F--F(6%,&F+F,\"\"$F-F9F-F-F-*&FHF--
F(6%,&F+F,FBF-,(F+F-FMF-F/F0F-F-F>*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*
,(F+F-\"\"%F-F/F0F-F-F-*&)F2,*\"\"*F-F4F5F/\"#;F+FMF--F(6%F*FRF-F-F-*&
)F2,*FenF-F4F5F/FenF+F-F--F(6%,&F+F,FenF-FRF-F-F-*&)F2,*F4F5F/\"#9F+F,
FCF-F--F(6%FboFZF-F-F-*&FTF--F(6%Fbo,(F+F-FBF-F/F0F-F-F>" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a34:= eG0(5,a33);" }}{PARA 12 "" 1 
"" {XPPMATH 20 "6#>%$a34G,8*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"
\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-
F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6
%,&F+F,F,F-F9F-F-F-*&)F2,(F,F-F4F5F/F,F--F(6%,&F+F,\"\"$F-F9F-F-F-*&FH
F--F(6%,&F+F,\"\"%F-,(F+F-FMF-F/F0F-F-F>*&)F2,*FRF-F4F5F/!\"%F+F-F--F(
6%FQF9F-F-F>*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*,(F+F-FRF-F/F0F-F-F-*&
)F2,*\"\"*F-F4F5F/\"#;F+FMF--F(6%F*FSF-F-F-*&)F2,*FRF-F4F5F/FRF+F-F-FO
F-F-*&)F2,*F4F5F/\"#9F+F,FCF-F--F(6%FQF[oF-F-F-*&FenF--F(6%FQ,(F+F-FBF
-F/F0F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a35:= eG1(5,
a34);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a35G,6*&-%#gpG6%,&%\"nG\"
\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*
&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"
&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&F@F--F(6%,&F+F,\"\"$F-,(F
+F-FKF-F/F0F-F-F>*&)F2,*\"\"%F-F4F5F/!\"%F+F-F--F(6%,&F+F,FPF-F9F-F-F>
*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*,(F+F-FPF-F/F0F-F-F-*&)F2,*\"\"*F-
F4F5F/\"#;F+FKF--F(6%F*FLF-F-F-*&)F2,*FPF-F4F5F/FPF+F-F--F(6%FTFLF-F-F
-*&)F2,*F4F5F/\"#9F+F,FCF-F--F(6%FTFfnF-F-F-*&FVF--F(6%FT,(F+F-FBF-F/F
0F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "a36:= gpsym(5,a3
5);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a36G,6*&-%#gpG6%,&%\"nG\"\"#
\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F
(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-
F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&F@F--F(6%,&F+F,\"\"$F-,(F+F-
FKF-F/F0F-F-F>*&)F2,*\"\"%F-F4F5F/!\"%F+F-F--F(6%,&F+F,FPF-,(F+F-F,F-F
/!\"'F-F-F>*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*,(F+F-FPF-F/F0F-F-F-*&)
F2,*\"\"*F-F4F5F/\"#;F+FKF--F(6%F*FLF-F-F-*&)F2,*FPF-F4F5F/FPF+F-F--F(
6%FTFLF-F-F-*&)F2,*F4F5F/\"#9F+F,FCF-F--F(6%FTFhnF-F-F-*&FXF--F(6%FT,(
F+F-FBF-F/F0F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "a37:=
 negate(5,a36);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a37G,6*&-%#gpG6%
,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#C
F/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&
)F2,*\"\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&F@F--F(6%,&F+F,
\"\"$F-,(F+F-FKF-F/F0F-F-F>*&)F2,*\"\"%F-F4F5F/FPF+F-F--F(6%,&F+F,FPF-
F9F-F-F>*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*,(F+F-FPF-F/F0F-F-F-*&)F2,
*\"\"*F-F4F5F/\"#;F+FKF--F(6%F*FLF-F-F-*&FNF--F(6%FSFLF-F-F-*&)F2,*F4F
5F/\"#9F+F,FCF-F--F(6%FSFenF-F-F-*&FUF--F(6%FS,(F+F-FBF-F/F0F-F-F>" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a38:= eG0(5,a37);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$a38G,8*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F
-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/
F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"\"&F-F4F5F/\"\")F+
F-F--F(6%,&F+F,F,F-F9F-F-F-*&F@F--F(6%,&F+F,\"\"$F-,(F+F-FKF-F/F0F-F-F
>*&)F2,*\"\"%F-F4F5F/FPF+F-F--F(6%FJF9F-F-F>*&)F2,*F0F-F4F5F/!\"#F+F,F
--F(6%FJF.F-F-F>*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*,(F+F-FPF-F/F0F-F-
F-*&)F2,*\"\"*F-F4F5F/\"#;F+FKF--F(6%F*FLF-F-F-*&FNF--F(6%,&F+F,FPF-FL
F-F-F-*&)F2,*F4F5F/\"#9F+F,FCF-F--F(6%FeoFjnF-F-F-*&FZF--F(6%Feo,(F+F-
FBF-F/F0F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a39:= eG1
(9,a38);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a39G,6*&-%#gpG6%,&%\"nG
\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F
-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*\"
\"&F-F4F5F/\"\")F+F-F--F(6%,&F+F,F,F-F9F-F-F-*&F@F--F(6%,&F+F,\"\"$F-,
(F+F-FKF-F/F0F-F-F>*&)F2,*F0F-F4F5F/!\"#F+F,F--F(6%FJF.F-F-F>*&)F2,*\"
#6F-F4F5F/\"#AF+F,F--F(6%F*,(F+F-\"\"%F-F/F0F-F-F-*&)F2,*\"\"*F-F4F5F/
\"#;F+FKF--F(6%F*FLF-F-F-*&F:F-FHF-F-*&)F2,*F4F5F/\"#9F+F,FCF-F--F(6%,
&F+F,FenF-FZF-F-F-*&FTF--F(6%Fdo,(F+F-FBF-F/F0F-F-F>" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 17 "a40:= eG1(4,a39);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$a40G,4*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'
F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)
F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*F4F5F/\"#9F+F,\"\")F-F--F(6%,&F
+F,F,F-,(F+F-\"\"$F-F/F0F-F-F>*&)F2,*F0F-F4F5F/!\"#F+F,F--F(6%,&F+F,FH
F-F.F-F-F>*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*,(F+F-\"\"%F-F/F0F-F-F-*
&)F2,*\"\"*F-F4F5F/\"#;F+FHF--F(6%F*FGF-F-F-*&F:F--F(6%FOFGF-F-F-*&F@F
--F(6%,&F+F,FXF-FWF-F-F-*&FQF--F(6%F`o,(F+F-\"\"&F-F/F0F-F-F>" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "nops(a40);" }}{PARA 11 "" 1 
"" {XPPMATH 20 "6#\"\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "
a41:= eG1(7,a40);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a41G,6*&-%#gpG
6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"
#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"
*&)F2,*F4F5F/\"#9F+F,\"\")F-F--F(6%,&F+F,F,F-,(F+F-\"\"$F-F/F0F-F-F>*&
)F2,*F0F-F4F5F/!\"#F+F,F--F(6%,&F+F,FHF-F.F-F-F>*&)F2,*\"#6F-F4F5F/\"#
AF+F,F--F(6%F*,(F+F-\"\"%F-F/F0F-F-F-*&)F2,*\"\"*F-F4F5F/\"#;F+FHF--F(
6%F*FGF-F-F-*&F:F--F(6%FFF9F-F-F-*&)F2,*F+FHF=F-F4F5F/FgnF-FDF-F-*&F@F
--F(6%,&F+F,FXF-FWF-F-F-*&FQF--F(6%Fco,(F+F-\"\"&F-F/F0F-F-F>" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a42:= eG0(7,a40);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$a42G,6*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F
-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/
F0F,F-F-F-)F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*F4F5F/\"#9F+F,\"\")F
-F--F(6%,&F+F,F,F-,(F+F-\"\"$F-F/F0F-F-F>*&)F2,*F0F-F4F5F/!\"#F+F,F--F
(6%,&F+F,FHF-F.F-F-F>*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*,(F+F-\"\"%F-
F/F0F-F-F-*&)F2,*\"\"*F-F4F5F/\"#;F+FHF--F(6%F*FGF-F-F-*&F:F-FDF-F-*&)
F2,*F+FHF<F-F4F5F/FXF--F(6%FFF9F-F-F-*&F@F--F(6%,&F+F,FXF-FWF-F-F-*&FQ
F--F(6%Fco,(F+F-\"\"&F-F/F0F-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "a43:= eG1(9,a42);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%$a43G,8*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,
*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)F2,*F+F,\"\"(F-
F4F5F/\"#5F-!\"\"*&)F2,*F4F5F/\"#9F+F,\"\")F-F--F(6%,&F+F,F,F-,(F+F-\"
\"$F-F/F0F-F-F>*&)F2,*F0F-F4F5F/!\"#F+F,F--F(6%,&F+F,FHF-F.F-F-F>*&)F2
,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*,(F+F-\"\"%F-F/F0F-F-F-*&)F2,*\"\"*F-F4
F5F/\"#;F+FHF--F(6%F*FGF-F-F-*&F:F-FDF-F-*&)F2,*F+FHF<F-F4F5F/FXF--F(6
%FFF9F-F-F-*&F@F--F(6%FOFGF-F-F-*&)F2,*F4F5F/\"#?F+FH\"#7F-F--F(6%FOFW
F-F-F-*&FQF--F(6%,&F+F,FXF-,(F+F-\"\"&F-F/F0F-F-F>" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 17 "a44:= eG0(9,a43);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$a44G,6*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'
F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&-F(6%F*,(F+F-F/F0F,F-F-F-)
F2,*F+F,\"\"(F-F4F5F/\"#5F-!\"\"*&)F2,*F0F-F4F5F/!\"#F+F,F--F(6%,&F+F,
\"\"$F-F.F-F-F>*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*,(F+F-\"\"%F-F/F0F-
F-F-*&)F2,*\"\"*F-F4F5F/\"#;F+FFF--F(6%F*,(F+F-FFF-F/F0F-F-F-*&F:F--F(
6%,&F+F,F,F-FWF-F-F-*&)F2,*F+FFF<F-F4F5F/FOF--F(6%FenF9F-F-F-*&)F2,*F4
F5F/\"\")F+FFF^oF-F-FinF-F-*&)F2,*F4F5F/\"#?F+FF\"#7F-F--F(6%FEFNF-F-F
-*&FHF--F(6%,&F+F,FOF-,(F+F-\"\"&F-F/F0F-F-F>" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 17 "a45:= eG1(6,a44);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%$a45G,4*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)
%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&)F2,*F0F-F4F5F/!\"#F+F,F--F(6%,&F+F
,\"\"$F-F.F-F-!\"\"*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*,(F+F-\"\"%F-F/
F0F-F-F-*&)F2,*\"\"*F-F4F5F/\"#;F+F=F--F(6%F*,(F+F-F=F-F/F0F-F-F-*&)F2
,*F+F=\"#5F-F4F5F/FLF-FMF-F-*&)F2,*F+F=\"\"(F-F4F5F/FGF--F(6%,&F+F,F,F
-,(F+F-F/F0F,F-F-F-F-*&)F2,*F4F5F/\"\")F+F=FinF-F-FXF-F-*&)F2,*F4F5F/
\"#?F+F=\"#7F-F--F(6%F<FFF-F-F-*&F@F--F(6%,&F+F,FGF-,(F+F-\"\"&F-F/F0F
-F-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a46:= eG0(9,a45);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a46G,6*&-%#gpG6%,&%\"nG\"\"#\"
\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&)F2,
*F0F-F4F5F/!\"#F+F,F--F(6%,&F+F,\"\"$F-F.F-F-!\"\"*&)F2,*\"#6F-F4F5F/
\"#AF+F,F--F(6%F*,(F+F-\"\"%F-F/F0F-F-F-*&)F2,*\"\"*F-F4F5F/\"#;F+F=F-
-F(6%F*,(F+F-F=F-F/F0F-F-F-*&)F2,*F+F=\"#5F-F4F5F/FLF-FMF-F-*&)F2,*F+F
=\"\"(F-F4F5F/FGF--F(6%,&F+F,F,F-,(F+F-F/F0F,F-F-F-F-*&)F2,*F4F5F/\"\"
)F+F=FinF-F-FXF-F-*&)F2,*F4F5F/\"#?F+F=\"#7F-F--F(6%F<FFF-F-F-*&F@F--F
(6%F<,(F+F-\"\"&F-F/F0F-F-F>*&FQF-F_oF-F>" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 17 "a47:= eG0(9,a46);" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>%$a47G,8*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"q
G,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&)F2,*F0F-F4F5F/!\"#F+F,F--F(6%,&F+F,\"
\"$F-F.F-F-!\"\"*&)F2,*\"#6F-F4F5F/\"#AF+F,F--F(6%F*,(F+F-\"\"%F-F/F0F
-F-F-*&)F2,*\"\"*F-F4F5F/\"#;F+F=F--F(6%F*,(F+F-F=F-F/F0F-F-F-*&)F2,*F
+F=\"#5F-F4F5F/FLF-FMF-F-*&)F2,*F+F=\"\"(F-F4F5F/FGF--F(6%,&F+F,F,F-,(
F+F-F/F0F,F-F-F-F-*&)F2,*F4F5F/\"\")F+F=FinF-F-FXF-F-*&)F2,*F4F5F/\"#?
F+F=\"#7F-F--F(6%F<FFF-F-F-*&F@F--F(6%FZ,(F+F-\"\"&F-F/F0F-F-F>*&FIF--
F(6%FZFFF-F-F>*&FQF-F_oF-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
17 "a48:= eG1(9,a47);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a48G,6*&-%
#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/
F,\"#CF/F,F-F-*&)F2,*F0F-F4F5F/!\"#F+F,F--F(6%,&F+F,\"\"$F-F.F-F-!\"\"
*&)F2,*\"\"*F-F4F5F/\"#;F+F=F--F(6%F*,(F+F-F=F-F/F0F-F-F-*&)F2,*F+F=\"
#5F-F4F5F/FCF-FDF-F-*&)F2,*F+F=\"\"(F-F4F5F/\"\"%F--F(6%,&F+F,F,F-,(F+
F-F/F0F,F-F-F-F-*&)F2,*F4F5F/\"\")F+F=FWF-F-FPF-F-*&)F2,*F4F5F/\"#?F+F
=\"#7F-F--F(6%F<,(F+F-FOF-F/F0F-F-F-*&)F2,*FCF-F4F5F/\"#GF+F=F--F(6%F*
,(F+F-\"\"&F-F/F0F-F-F>*&F@F--F(6%FRFinF-F-F>*&FHF-FgnF-F>" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a49:= eG1(9,a48);" }}{PARA 12 "" 1 
"" {XPPMATH 20 "6#>%$a49G,4*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"
\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&)F2,*F0F-F4F5F/!\"#F+F,
F--F(6%,&F+F,\"\"$F-F.F-F-!\"\"*&)F2,*F+F=\"#5F-F4F5F/\"#;F--F(6%F*,(F
+F-F=F-F/F0F-F-F-*&)F2,*F+F=\"\"(F-F4F5F/\"\"%F--F(6%,&F+F,F,F-,(F+F-F
/F0F,F-F-F-F-*&)F2,*F4F5F/\"\")F+F=FSF-F-FLF-F-*&)F2,*F4F5F/\"#?F+F=\"
#7F-F--F(6%F<,(F+F-FKF-F/F0F-F-F-*&)F2,*FCF-F4F5F/\"#GF+F=F--F(6%F*,(F
+F-\"\"&F-F/F0F-F-F>*&)F2,*\"#8F-F4F5F/\"#AF+FKF--F(6%F*FenF-F-F>*&F@F
-FYF-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "a50:= shiftdown(
7,a49);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a50G,4*&-%#gpG6%,&%\"nG
\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F
-*&)F2,*F0F-F4F5F/!\"#F+F,F--F(6%,&F+F,\"\"$F-F.F-F-!\"\"*&)F2,*F+F=\"
#5F-F4F5F/\"#;F--F(6%F*,(F+F-F=F-F/F0F-F-F-*&)F2,*F+F=\"\"(F-F4F5F/\"
\"%F--F(6%,&F+F,F,F-,(F+F-F/F0F,F-F-F-F-*&)F2,*F4F5F/\"\")F+F=FSF-F-FL
F-F-*&)F2,*F4F5F/\"#?F+F=\"#7F-F--F(6%F<,(F+F-FKF-F/F0F-F-F-*&)F2,*FXF
-F4F5F/!#?F+F=F--F(6%F*,(F+F-F>F-F/F0F-F-F>*&)F2,*\"#8F-F4F5F/\"#AF+FK
F--F(6%F*FenF-F-F>*&F@F-FYF-F>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 19 "a51:= gpsym(2,a50);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a51G
,4*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0
F-*$F/F,\"#CF/F,F-F-*&)F2,*F0F-F4F5F/!\"#F+F,F--F(6%,&F+F,\"\"$F-,(F+F
-F,F-F/!\"'F-F-!\"\"*&)F2,*F+F=\"#5F-F4F5F/\"#;F--F(6%F*,(F+F-F=F-F/F0
F-F-F-*&)F2,*F+F=\"\"(F-F4F5F/\"\"%F--F(6%,&F+F,F,F-,(F+F-F/F0F,F-F-F-
F-*&)F2,*F4F5F/\"\")F+F=FUF-F-FNF-F-*&)F2,*F4F5F/\"#?F+F=\"#7F-F--F(6%
F<,(F+F-FMF-F/F0F-F-F-*&)F2,*FZF-F4F5F/!#?F+F=F--F(6%F*,(F+F-F@F-F/F0F
-F-F@*&)F2,*\"#8F-F4F5F/\"#AF+FMF--F(6%F*FgnF-F-F@*&FBF-FenF-F@" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "a52:= negate(2,a51);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a52G,4*&-%#gpG6%,&%\"nG\"\"#\"\"\"F
-,(F+F-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&F1F--F(6%
,&F+F,\"\"$F-,(F+F-F/F0F,F-F-F-!\"\"*&)F2,*F+F:\"#5F-F4F5F/\"#;F--F(6%
F*,(F+F-F:F-F/F0F-F-F-*&)F2,*F+F:\"\"(F-F4F5F/\"\"%F--F(6%,&F+F,F,F-F;
F-F-F-*&)F2,*F4F5F/\"\")F+F:FPF-F-FJF-F-*&)F2,*F4F5F/\"#?F+F:\"#7F-F--
F(6%F9,(F+F-FIF-F/F0F-F-F-*&)F2,*FUF-F4F5F/!#?F+F:F--F(6%F*,(F+F-F<F-F
/F0F-F-F<*&)F2,*\"#8F-F4F5F/\"#AF+FIF--F(6%F*FXF-F-F<*&F>F-FVF-F<" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a53:= eG1(2,a52);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$a53G,2*&-%#gpG6%,&%\"nG\"\"#\"\"\"F-,(F+F
-%\"jG\"\"'F-F-F-F-)%\"qG,*F+F,F0F-*$F/F,\"#CF/F,F-F-*&F1F--F(6%,&F+F,
F,F-F.F-F-!\"\"*&)F2,*F+\"\"$\"#5F-F4F5F/\"#;F--F(6%F*,(F+F-F>F-F/F0F-
F-F-*&)F2,*F+F>\"\"(F-F4F5F/\"\"%F--F(6%F9,(F+F-F/F0F,F-F-F-F-*&)F2,*F
4F5F/\"#?F+F>\"#7F-F--F(6%,&F+F,F>F-,(F+F-FHF-F/F0F-F-F-*&)F2,*FPF-F4F
5F/!#?F+F>F--F(6%F*,(F+F-F:F-F/F0F-F-F:*&)F2,*\"#8F-F4F5F/\"#AF+FHF--F
(6%F*FTF-F-F:*&F<F-FQF-F:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
17 "a54:= eG0(2,a53);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a54G,0*&)%
\"qG,*%\"nG\"\"$\"\"(\"\"\"*$%\"jG\"\"#\"#CF/!\"%F--%#gpG6%,&F*F0F-F-,
&F*F-F/\"\"'F-F-!\"\"*&)F(,*F*F+\"#5F-F.F1F/\"#;F--F46%F6,(F*F-F+F-F/F
8F-F-F-*&)F(,*F*F+F,F-F.F1F/\"\"%F--F46%,&F*F0F0F-,(F*F-F/F8F0F-F-F-F-
*&)F(,*F.F1F/\"#?F*F+\"#7F-F--F46%,&F*F0F+F-,(F*F-FEF-F/F8F-F-F-*&)F(,
*FNF-F.F1F/!#?F*F+F--F46%F6,(F*F-F9F-F/F8F-F-F9*&)F(,*\"#8F-F.F1F/\"#A
F*FEF--F46%F6FRF-F-F9*&F;F-FOF-F9" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 19 "a55:= gpsym(3,a54);" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>%$a55G,0*&)%\"qG,*%\"nG\"\"$\"\"(\"\"\"*$%\"jG\"\"#\"#CF/!\"%F--%#g
pG6%,&F*F0F-F-,&F*F-F/\"\"'F-F-!\"\"*&)F(,*F*F+\"#5F-F.F1F/\"#;F--F46%
F6,(F*F-F+F-F/F8F-F-F-*&)F(,*F*F+F,F-F.F1F/\"\"%F--F46%,&F*F0F0F-,&F*F
-F/!\"'F-F-F-*&)F(,*F.F1F/\"#?F*F+\"#7F-F--F46%,&F*F0F+F-,(F*F-FEF-F/F
8F-F-F-*&)F(,*FOF-F.F1F/!#?F*F+F--F46%F6,(F*F-F9F-F/F8F-F-F9*&)F(,*\"#
8F-F.F1F/\"#AF*FEF--F46%F6FSF-F-F9*&F;F-FPF-F9" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 20 "a56:= negate(3,a55);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$a56G,0*&)%\"qG,*%\"nG\"\"$\"\"(\"\"\"*$%\"jG\"\"#\"#
CF/!\"%F--%#gpG6%,&F*F0F-F-,&F*F-F/\"\"'F-F-!\"\"*&)F(,*F*F+\"#5F-F.F1
F/\"#;F--F46%F6,(F*F-F+F-F/F8F-F-F-*&F'F--F46%,&F*F0F0F-F7F-F-F-*&)F(,
*F.F1F/\"#?F*F+\"#7F-F--F46%,&F*F0F+F-,(F*F-\"\"%F-F/F8F-F-F-*&)F(,*FJ
F-F.F1F/!#?F*F+F--F46%F6,(F*F-F9F-F/F8F-F-F9*&)F(,*\"#8F-F.F1F/\"#AF*F
OF--F46%F6FNF-F-F9*&F;F-FKF-F9" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 17 "a57:= eG0(3,a56);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a57G,.
*&)%\"qG,*%\"nG\"\"$\"#5\"\"\"*$%\"jG\"\"#\"#CF/\"#;F--%#gpG6%,&F*F0F-
F-,(F*F-F+F-F/\"\"'F-F-F-*&)F(,*F*\"\"%\"\"*F-F.F1F/!#5F--F46%F6,(F*F-
!\"\"F-F/F8F-F-F-*&)F(,*F.F1F/\"#?F*F+\"#7F-F--F46%,&F*F0F+F-,(F*F-F<F
-F/F8F-F-F-*&)F(,*FGF-F.F1F/!#?F*F+F-F?F-FB*&)F(,*\"#8F-F.F1F/\"#AF*F<
F--F46%F6FKF-F-FB*&F'F-FHF-FB" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 19 "a58:= gpsym(4,a57);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a58G,.
*&)%\"qG,*%\"nG\"\"$\"#5\"\"\"*$%\"jG\"\"#\"#CF/\"#;F--%#gpG6%,&F*F0F-
F-,(F*F-F+F-F/\"\"'F-F-F-*&)F(,*F*\"\"%\"\"*F-F.F1F/!#5F--F46%F6,(F*F-
!\"\"F-F/F8F-F-F-*&)F(,*F.F1F/\"#?F*F+\"#7F-F--F46%,&F*F0F+F-,(F*F-F<F
-F/F8F-F-F-*&)F(,*FGF-F.F1F/!#?F*F+F--F46%F6,(F*F-F0F-F/!\"'F-F-FB*&)F
(,*\"#8F-F.F1F/\"#AF*F<F--F46%F6FKF-F-FB*&F'F-FHF-FB" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 20 "a59:= negate(4,a58);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$a59G,.*&)%\"qG,*%\"nG\"\"$\"#5\"\"\"*$%\"jG\"\"#\"#C
F/\"#;F--%#gpG6%,&F*F0F-F-,(F*F-F+F-F/\"\"'F-F-F-*&)F(,*F*\"\"%\"\"*F-
F.F1F/!#5F--F46%F6,(F*F-!\"\"F-F/F8F-F-F-*&)F(,*F.F1F/\"#?F*F+\"#7F-F-
-F46%,&F*F0F+F-,(F*F-F<F-F/F8F-F-F-*&FDF--F46%F6,(F*F-F/F8F0F-F-F-FB*&
)F(,*\"#8F-F.F1F/\"#AF*F<F--F46%F6FKF-F-FB*&F'F-FHF-FB" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a60:= eG1(3,a59);" }}{PARA 12 "" 1 
"" {XPPMATH 20 "6#>%$a60G,0*&)%\"qG,*%\"nG\"\"$\"#5\"\"\"*$%\"jG\"\"#
\"#CF/\"#;F--%#gpG6%,&F*F0F-F-,(F*F-F+F-F/\"\"'F-F-F-*&)F(,*F*\"\"%\"
\"*F-F.F1F/!#5F--F46%F6,(F*F-!\"\"F-F/F8F-F-F-*&)F(,*F.F1F/\"#?F*F+\"#
7F-F--F46%,&F*F0F0F-F7F-F-F-*&)F(,*F.F1F/\"#EF*F<F2F-F--F46%FJ,(F*F-F<
F-F/F8F-F-F-*&FDF--F46%F6,(F*F-F/F8F0F-F-F-FB*&)F(,*\"#8F-F.F1F/\"#AF*
F<F--F46%F6FQF-F-FB*&F'F--F46%,&F*F0F+F-FQF-F-FB" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 17 "a61:= eG1(3,a60);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$a61G,.*&)%\"qG,*%\"nG\"\"$\"#5\"\"\"*$%\"jG\"\"#\"#C
F/\"#;F--%#gpG6%,&F*F0F-F-,(F*F-F+F-F/\"\"'F-F-F-*&)F(,*F*\"\"%\"\"*F-
F.F1F/!#5F--F46%F6,(F*F-!\"\"F-F/F8F-F-F-*&)F(,*F.F1F/\"#EF*F<\"#:F-F-
F3F-F-*&)F(,*F.F1F/FFF*F<F2F-F--F46%,&F*F0F0F-,(F*F-F<F-F/F8F-F-F-*&)F
(,*\"#8F-F.F1F/\"#AF*F<F--F46%F6FNF-F-FB*&F'F--F46%,&F*F0F+F-FNF-F-FB
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a62:= eG0(6,a61);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a62G,0*&)%\"qG,*%\"nG\"\"$\"#5\"\"
\"*$%\"jG\"\"#\"#CF/\"#;F--%#gpG6%,&F*F0F-F-,(F*F-F+F-F/\"\"'F-F-F-*&)
F(,*F*\"\"%\"\"*F-F.F1F/!#5F--F46%F6,(F*F-!\"\"F-F/F8F-F-F-*&)F(,*F.F1
F/\"#EF*F<\"#:F-F-F3F-F-*&)F(,*F.F1F/FFF*F<F2F-F--F46%,&F*F0F0F-,(F*F-
F<F-F/F8F-F-F-*&)F(,*\"#8F-F.F1F/\"#AF*F<F--F46%F6FNF-F-FB*&F'F-FKF-FB
*&)F(,*F*F<F=F-F.F1F/F,F--F46%FMF7F-F-FB" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "a63:= eG1(6,a62);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%$a63G,.*&)%\"qG,*%\"nG\"\"%\"\"*\"\"\"*$%\"jG\"\"#\"#CF/!#5F--%#gpG6
%,&F*F0F-F-,(F*F-!\"\"F-F/\"\"'F-F-F-*&)F(,*F.F1F/\"#EF*F+\"#:F-F--F46
%F6,(F*F-\"\"$F-F/F9F-F-F-*&)F(,*F.F1F/F=F*F+\"#;F-F--F46%,&F*F0F0F-,(
F*F-F+F-F/F9F-F-F-*&)F(,*\"#8F-F.F1F/\"#AF*F+F--F46%F6FJF-F-F8*&)F(,*F
*F+\"#9F-F.F1F/FOF-FPF-F8*&)F(,*F*F+F,F-F.F1F/\"#5F--F46%FIFAF-F-F8" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "a64:= gpsym(1,a63);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a64G,.*&)%\"qG,*%\"nG\"\"%\"\"*\"\"
\"*$%\"jG\"\"#\"#CF/!#5F--%#gpG6%,&F*F0F-F-,(F*F-F0F-F/!\"'F-F-F-*&)F(
,*F.F1F/\"#EF*F+\"#:F-F--F46%F6,(F*F-\"\"$F-F/\"\"'F-F-F-*&)F(,*F.F1F/
F<F*F+\"#;F-F--F46%,&F*F0F0F-,(F*F-F+F-F/FBF-F-F-*&)F(,*\"#8F-F.F1F/\"
#AF*F+F--F46%F6FJF-F-!\"\"*&)F(,*F*F+\"#9F-F.F1F/FOF-FPF-FR*&)F(,*F*F+
F,F-F.F1F/\"#5F--F46%FIF@F-F-FR" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 20 "a65:= negate(1,a64);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a65
G,.*&)%\"qG,*%\"nG\"\"%\"\"*\"\"\"*$%\"jG\"\"#\"#CF/\"#5F--%#gpG6%,&F*
F0F-F-,(F*F-F/\"\"'F0F-F-F-F-*&)F(,*F.F1F/\"#EF*F+\"#:F-F--F46%F6,(F*F
-\"\"$F-F/F8F-F-F-*&)F(,*F.F1F/F<F*F+\"#;F-F--F46%,&F*F0F0F-,(F*F-F+F-
F/F8F-F-F-*&)F(,*\"#8F-F.F1F/\"#AF*F+F--F46%F6FIF-F-!\"\"*&)F(,*F*F+\"
#9F-F.F1F/FNF-FOF-FQ*&F'F--F46%FHF@F-F-FQ" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 17 "a66:= eG1(6,a65);" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>%$a66G,,*&)%\"qG,**$%\"jG\"\"#\"#CF+\"#E%\"nG\"\"%\"#:\"\"\"F2-%#gp
G6%,&F/F,F2F2,(F/F2\"\"$F2F+\"\"'F2F2F2*&)F(,*F*F-F+F.F/F0\"#;F2F2-F46
%,&F/F,F,F2,(F/F2F0F2F+F9F2F2F2*&)F(,*\"#8F2F*F-F+\"#AF/F0F2-F46%F6FAF
2F2!\"\"*&)F(,*F/F0\"#9F2F*F-F+FFF2FGF2FI*&)F(,*F/\"\"&\"#7F2F*F-F+F=F
2F3F2FI" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "a67:= shiftdown(
2,a66);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a67G,,*&)%\"qG,**$%\"jG
\"\"#\"#CF+\"#E%\"nG\"\"%\"#:\"\"\"F2-%#gpG6%,&F/F,F2F2,(F/F2\"\"$F2F+
\"\"'F2F2F2*&)F(,*F*F-F+!#A\"#9F2F/F0F2-F46%,&F/F,F,F2,(F/F2!\"#F2F+F9
F2F2F2*&)F(,*\"#8F2F*F-F+\"#AF/F0F2-F46%F6,(F/F2F0F2F+F9F2F2!\"\"*&)F(
,*F/F0F>F2F*F-F+FHF2FIF2FL*&)F(,*F/\"\"&\"#7F2F*F-F+\"#;F2F3F2FL" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "a68:= gpsym(2,a67);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a68G,,*&)%\"qG,**$%\"jG\"\"#\"#CF+
\"#E%\"nG\"\"%\"#:\"\"\"F2-%#gpG6%,&F/F,F2F2,(F/F2\"\"$F2F+\"\"'F2F2F2
*&)F(,*F*F-F+!#A\"#9F2F/F0F2-F46%,&F/F,F,F2,(F/F2F0F2F+!\"'F2F2F2*&)F(
,*\"#8F2F*F-F+\"#AF/F0F2-F46%F6,(F/F2F0F2F+F9F2F2!\"\"*&)F(,*F/F0F>F2F
*F-F+FHF2FIF2FL*&)F(,*F/\"\"&\"#7F2F*F-F+\"#;F2F3F2FL" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "a69:= negate(2,a68);" }}{PARA 12 "
" 1 "" {XPPMATH 20 "6#>%$a69G,,*&)%\"qG,**$%\"jG\"\"#\"#CF+\"#E%\"nG\"
\"%\"#:\"\"\"F2-%#gpG6%,&F/F,F2F2,(F/F2\"\"$F2F+\"\"'F2F2F2*&)F(,*F/F0
\"#9F2F*F-F+\"#AF2-F46%,&F/F,F,F2,(F/F2F0F2F+F9F2F2F2*&)F(,*\"#8F2F*F-
F+F>F/F0F2-F46%F6FBF2F2!\"\"*&F;F2FGF2FI*&)F(,*F/\"\"&\"#7F2F*F-F+\"#;
F2F3F2FI" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a70:= eG0(2,a69
);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a70G,&*&)%\"qG,**$%\"jG\"\"#
\"#CF+\"#E%\"nG\"\"%\"#:\"\"\"F2-%#gpG6%,&F/F,F2F2,(F/F2\"\"$F2F+\"\"'
F2F2F2*&)F(,*\"#8F2F*F-F+\"#AF/F0F2-F46%F6,(F/F2F0F2F+F9F2F2!\"\"" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "a71:= shiftdown(1,a70);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a71G,&*&)%\"qG,**$%\"jG\"\"#\"#CF+!
#A\"#8\"\"\"%\"nG\"\"%F0-%#gpG6%,&F1F,F0F0,(F1F0!\"$F0F+\"\"'F0F0F0*&)
F(,*F/F0F*F-F+\"#AF1F2F0-F46%F6,(F1F0F2F0F+F9F0F0!\"\"" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "a72:= gpsym(1,a71);" }}{PARA 12 "" 
1 "" {XPPMATH 20 "6#>%$a72G,&*&)%\"qG,**$%\"jG\"\"#\"#CF+!#A\"#8\"\"\"
%\"nG\"\"%F0-%#gpG6%,&F1F,F0F0,(F1F0F2F0F+!\"'F0F0F0*&)F(,*F/F0F*F-F+
\"#AF1F2F0-F46%F6,(F1F0F2F0F+\"\"'F0F0!\"\"" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 20 "a73:= negate(1,a72);" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#>%$a73G\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}
{MARK "2 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }