{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 11 "###### 3.53" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 134 "op53:= annihiloper( qfac(q,
q^4,j) * qfac(q^3,q^4,j) * q^(4*j^2) / qfac( q^4,q^8,j) / qfac(-q^4,q^
4,j) /spqfac(q^4,q^4,j), 0, forward);" }}{PARA 12 "" 1 "" {XPPMATH 20 
"6#>%%op53G,.*$%\"NG\"\"%\"\"\"*&,&*$%\"qGF(F)!\"\"F)F)F'\"\"$F)*&,&)F
-,&%\"nGF(\"#7F)F.F,!\"#F)F'\"\"#F)*&,*)F-,&F4F(\"\"*F)F))F-,&F4F(\"#6
F)F)*$F-\"\")F.F,F)F)F'F)F)F@F))F-,&F4F(FAF)F." }}}{EXCHG {PARA 12 "" 
1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 117 "Aeven:= subs(\{m=n,k=j\},  \+
q^(24*k^2 + 2*k  ) * gp(2*n  , n+ 3*k  , 4) \n  -q^(24*k^2 +22*k+5) * \+
gp(2*n-1, n+ 3*k+1,4));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&AevenG,&
*&)%\"qG,&*$%\"jG\"\"#\"#CF+F,\"\"\"-%#gpG6%,$%\"nGF,,&F3F.F+\"\"$\"\"
%F.F.*&)F(,(F*F-F+\"#A\"\"&F.F.-F06%,&F3F,!\"\"F.,(F3F.F+F5F.F.F6F.F?
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 117 "Aodd:= subs(\{m=n,k=j
\},  q^(24*k^2 + 2*k  ) * gp(2*n  , n+ 3*k  , 4) \n  -q^(24*k^2 +22*k+
5) * gp(2*n+1, n+ 3*k+2, 4));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%Ao
ddG,&*&)%\"qG,&*$%\"jG\"\"#\"#CF+F,\"\"\"-%#gpG6%,$%\"nGF,,&F3F.F+\"\"
$\"\"%F.F.*&)F(,(F*F-F+\"#A\"\"&F.F.-F06%,&F3F,F.F.,(F3F.F+F5F,F.F6F.!
\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "###### n even = 2m
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "a1:= asoe(op53, Aeven, \+
Aodd);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a1G,B*&-%#gpG6%,&%\"mG\"
\"#!\"\"\"\"\",(F+F.%\"jG\"\"$F.F.\"\"%F.)%\"qG,(\"#8F.*$F0F,\"#CF0\"#
AF.F-*&-F(6%,$F+F,,&F+F.F0F1F2F.)F4,*F+\"\")FAF.F7F8F0F,F.F-*&F'F.)F4,
*F+FAF6F.F7F8F0F9F.F.*&-F(6%,&F+F,F,F.F/F2F.)F4,*F+FA\"#7F.F7F8F0F,F.F
-*&-F(6%,&F+F,F.F.,(F+F.F,F.F0F1F2F.)F4,*F+FA\"#<F.F7F8F0F9F.F.*&FFF.)
F4,(F2F.F7F8F0F,F.F-*&FMF.)F4,(\"\"*F.F7F8F0F9F.F.*&)F4,&F7F8F0F,F.-F(
6%,&F+F,F2F.FPF2F.F.*&F;F.)F4,*F+FAFZF.F7F8F0F,F.F.*&FMF.)F4,*F+FA\"#9
F.F7F8F0F9F.F-*&F;F.)F4,*F+FA\"#6F.F7F8F0F,F.F.*&FMF.)F4,*F+FA\"#;F.F7
F8F0F9F.F-*&FMF.F3F.F.*&F;F.FUF.F.*&-F(6%,&F+F,F1F.,(F+F.F1F.F0F1F2F.F
XF.F-*&FfnF.FFF.F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 " simp
lify(add(subs(m=8,a1),j=-3..3));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"
\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "a2:= eG0(13,a1);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a2G,D*&-%#gpG6%,&%\"mG\"\"#!\"\"\"
\"\",(F+F.%\"jG\"\"$F.F.\"\"%F.)%\"qG,(\"#8F.*$F0F,\"#CF0\"#AF.F-*&-F(
6%,$F+F,,&F+F.F0F1F2F.)F4,*F+\"\")FAF.F7F8F0F,F.F-*&F'F.)F4,*F+FAF6F.F
7F8F0F9F.F.*&-F(6%,&F+F,F,F.F/F2F.)F4,*F+FA\"#7F.F7F8F0F,F.F-*&-F(6%,&
F+F,F.F.,(F+F.F,F.F0F1F2F.)F4,*F+FA\"#<F.F7F8F0F9F.F.*&FFF.)F4,(F2F.F7
F8F0F,F.F-*&FMF.)F4,(\"\"*F.F7F8F0F9F.F.*&)F4,&F7F8F0F,F.-F(6%,&F+F,F2
F.FPF2F.F.*&F;F.)F4,*F+FAFZF.F7F8F0F,F.F.*&FMF.)F4,*F+FA\"#9F.F7F8F0F9
F.F-*&F;F.)F4,*F+FA\"#6F.F7F8F0F,F.F.*&FMF.)F4,*F+FA\"#;F.F7F8F0F9F.F-
*&F3F.-F(6%F=FPF2F.F.*&)F4,*FZF.F7F8F0\"#5F+F2F.-F(6%F=F/F2F.F.*&F;F.F
UF.F.*&-F(6%,&F+F,F1F.,(F+F.F1F.F0F1F2F.FXF.F-*&FfnF.FFF.F-" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "a3:= eG1(13,a2);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%#a3G,B*&-%#gpG6%,$%\"mG\"\"#,&F+\"\"\"%\"j
G\"\"$\"\"%F.)%\"qG,*F+\"\")F5F.*$F/F,\"#CF/F,F.!\"\"*&-F(6%,&F+F,F8F.
,(F+F.F/F0F.F.F1F.)F3,*F+F5\"#8F.F6F7F/\"#AF.F.*&-F(6%,&F+F,F,F.F=F1F.
)F3,*F+F5\"#7F.F6F7F/F,F.F8*&-F(6%,&F+F,F.F.,(F+F.F,F.F/F0F1F.)F3,*F+F
5\"#<F.F6F7F/FAF.F.*&FCF.)F3,(F1F.F6F7F/F,F.F8*&FJF.)F3,(\"\"*F.F6F7F/
FAF.F.*&)F3,&F6F7F/F,F.-F(6%,&F+F,F1F.FMF1F.F.*&F'F.)F3,*F+F5FWF.F6F7F
/F,F.F.*&FJF.)F3,*F+F5\"#9F.F6F7F/FAF.F8*&F'F.)F3,*F+F5\"#6F.F6F7F/F,F
.F.*&FJF.)F3,*F+F5\"#;F.F6F7F/FAF.F8*&)F3,*\"#@F.F6F7F/\"#MF+F1F.-F(6%
F<FMF1F.F.*&)F3,*FWF.F6F7F/\"#5F+F1F.-F(6%F*F=F1F.F.*&F'F.FRF.F.*&-F(6
%,&F+F,F0F.,(F+F.F0F.F/F0F1F.FUF.F8*&FYF.FCF.F8" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 15 "a4:= eG1(7,a3);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%#a4G,D*&-%#gpG6%,$%\"mG\"\"#,&F+\"\"\"%\"jG\"\"$\"\"%F.)%\"qG,
*F+\"\")F5F.*$F/F,\"#CF/F,F.!\"\"*&-F(6%,&F+F,F8F.,(F+F.F/F0F.F.F1F.)F
3,*F+F5\"#8F.F6F7F/\"#AF.F.*&-F(6%,&F+F,F,F.F=F1F.)F3,*F+F5\"#7F.F6F7F
/F,F.F8*&-F(6%,&F+F,F.F.,(F+F.F,F.F/F0F1F.)F3,*F+F5\"#<F.F6F7F/FAF.F.*
&FCF.)F3,(F1F.F6F7F/F,F.F8*&FJF.)F3,(\"\"*F.F6F7F/FAF.F.*&)F3,&F6F7F/F
,F.-F(6%,&F+F,F0F.F=F1F.F.*&)F3,*F6F7F/\"#9F+F1F5F.F.-F(6%FgnFMF1F.F.*
&F'F.)F3,*F+F5FWF.F6F7F/F,F.F.*&FJF.)F3,*F+F5F[oF.F6F7F/FAF.F8*&F'F.)F
3,*F+F5\"#6F.F6F7F/F,F.F.*&FJF.)F3,*F+F5\"#;F.F6F7F/FAF.F8*&)F3,*\"#@F
.F6F7F/\"#MF+F1F.-F(6%F<FMF1F.F.*&)F3,*FWF.F6F7F/\"#5F+F1F.-F(6%F*F=F1
F.F.*&F'F.FRF.F.*&-F(6%Fgn,(F+F.F0F.F/F0F1F.FUF.F8*&FYF.FCF.F8" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "a5:= eG0(7, a4);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%#a5G,B*&-%#gpG6%,$%\"mG\"\"#,&F+\"\"\"%\"j
G\"\"$\"\"%F.)%\"qG,*F+\"\")F5F.*$F/F,\"#CF/F,F.!\"\"*&-F(6%,&F+F,F8F.
,(F+F.F/F0F.F.F1F.)F3,*F+F5\"#8F.F6F7F/\"#AF.F.*&-F(6%,&F+F,F,F.F=F1F.
)F3,*F+F5\"#7F.F6F7F/F,F.F8*&-F(6%,&F+F,F.F.,(F+F.F,F.F/F0F1F.)F3,*F+F
5\"#<F.F6F7F/FAF.F.*&FCF.)F3,(F1F.F6F7F/F,F.F8*&FJF.)F3,(\"\"*F.F6F7F/
FAF.F.*&)F3,*F6F7F/!#5F+F1F5F.F.-F(6%FEF-F1F.F.*&)F3,*F6F7F/\"#9F+F1F5
F.F.-F(6%,&F+F,F0F.FMF1F.F.*&F'F.)F3,*F+F5FWF.F6F7F/F,F.F.*&FJF.)F3,*F
+F5F[oF.F6F7F/FAF.F8*&F'F.)F3,*F+F5\"#6F.F6F7F/F,F.F.*&FJF.)F3,*F+F5\"
#;F.F6F7F/FAF.F8*&)F3,*\"#@F.F6F7F/\"#MF+F1F.-F(6%F<FMF1F.F.*&)F3,*FWF
.F6F7F/\"#5F+F1F.-F(6%F*F=F1F.F.*&F'F.FRF.F.*&-F(6%F^o,(F+F.F0F.F/F0F1
F.FUF.F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a6:= eG0(5,a5);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a6G,D*&-%#gpG6%,$%\"mG\"\"#,&F+
\"\"\"%\"jG\"\"$\"\"%F.)%\"qG,*F+\"\")F5F.*$F/F,\"#CF/F,F.!\"\"*&-F(6%
,&F+F,F8F.,(F+F.F/F0F.F.F1F.)F3,*F+F5\"#8F.F6F7F/\"#AF.F.*&-F(6%,&F+F,
F,F.F=F1F.)F3,*F+F5\"#7F.F6F7F/F,F.F8*&-F(6%,&F+F,F.F.,(F+F.F,F.F/F0F1
F.)F3,*F+F5\"#<F.F6F7F/FAF.F.*&)F3,(F1F.F6F7F/F,F.-F(6%FLF=F1F.F8*&)F3
,*F6F7F/!#5F+F1F5F.F.-F(6%FLF-F1F.F8*&FJF.)F3,(\"\"*F.F6F7F/FAF.F.*&FW
F.-F(6%FEF-F1F.F.*&)F3,*F6F7F/\"#9F+F1F5F.F.-F(6%,&F+F,F0F.FMF1F.F.*&F
'F.)F3,*F+F5FinF.F6F7F/F,F.F.*&FJF.)F3,*F+F5F`oF.F6F7F/FAF.F8*&F'F.)F3
,*F+F5\"#6F.F6F7F/F,F.F.*&FJF.)F3,*F+F5\"#;F.F6F7F/FAF.F8*&)F3,*\"#@F.
F6F7F/\"#MF+F1F.-F(6%F<FMF1F.F.*&)F3,*FinF.F6F7F/\"#5F+F1F.-F(6%F*F=F1
F.F.*&F'F.FRF.F.*&-F(6%Fco,(F+F.F0F.F/F0F1F.FgnF.F8" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 15 "a7:= eG1(5,a6);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%#a7G,B*&-%#gpG6%,$%\"mG\"\"#,&F+\"\"\"%\"jG\"\"$\"\"%
F.)%\"qG,*F+\"\")F5F.*$F/F,\"#CF/F,F.!\"\"*&-F(6%,&F+F,F8F.,(F+F.F/F0F
.F.F1F.)F3,*F+F5\"#8F.F6F7F/\"#AF.F.*&-F(6%,&F+F,F,F.F=F1F.)F3,*F+F5\"
#7F.F6F7F/F,F.F8*&-F(6%,&F+F,F.F.,(F+F.F,F.F/F0F1F.)F3,*F+F5\"#<F.F6F7
F/FAF.F.*&)F3,*F6F7F/\"#9F+F1F5F.F.-F(6%F*F=F1F.F8*&)F3,*F6F7F/!#5F+F1
F5F.F.-F(6%FLF-F1F.F8*&FJF.)F3,(\"\"*F.F6F7F/FAF.F.*&FXF.-F(6%FEF-F1F.
F.*&FRF.-F(6%,&F+F,F0F.FMF1F.F.*&F'F.)F3,*F+F5FjnF.F6F7F/F,F.F.*&FJF.)
F3,*F+F5FTF.F6F7F/FAF.F8*&F'F.)F3,*F+F5\"#6F.F6F7F/F,F.F.*&FJF.)F3,*F+
F5\"#;F.F6F7F/FAF.F8*&)F3,*\"#@F.F6F7F/\"#MF+F1F.-F(6%F<FMF1F.F.*&)F3,
*FjnF.F6F7F/\"#5F+F1F.FUF.F.*&-F(6%Fao,(F+F.F0F.F/F0F1F.FhnF.F8" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a8:= eG0(8,a7);" }}{PARA 12 
"" 1 "" {XPPMATH 20 "6#>%#a8G,@*&-%#gpG6%,$%\"mG\"\"#,&F+\"\"\"%\"jG\"
\"$\"\"%F.)%\"qG,*F+\"\")F5F.*$F/F,\"#CF/F,F.!\"\"*&-F(6%,&F+F,F8F.,(F
+F.F/F0F.F.F1F.)F3,*F+F5\"#8F.F6F7F/\"#AF.F.*&-F(6%,&F+F,F,F.F=F1F.)F3
,*F+F5\"#7F.F6F7F/F,F.F8*&-F(6%,&F+F,F.F.,(F+F.F,F.F/F0F1F.)F3,*F+F5\"
#<F.F6F7F/FAF.F.*&)F3,*F6F7F/\"#9F+F1F5F.F.-F(6%F*F=F1F.F8*&FJF.)F3,(
\"\"*F.F6F7F/FAF.F.*&)F3,*F6F7F/!#AF+F5\"#;F.F.-F(6%FL,(F+F.F/F0F8F.F1
F.F.*&FRF.-F(6%,&F+F,F0F.FMF1F.F.*&F'F.)F3,*F+F5FZF.F6F7F/F,F.F.*&FJF.
)F3,*F+F5FTF.F6F7F/FAF.F8*&F'F.)F3,*F+F5\"#6F.F6F7F/F,F.F.*&FJF.)F3,*F
+F5FinF.F6F7F/FAF.F8*&)F3,*\"#@F.F6F7F/\"#MF+F1F.-F(6%F<FMF1F.F.*&)F3,
*FZF.F6F7F/\"#5F+F1F.FUF.F.*&-F(6%F`o,(F+F.F0F.F/F0F1F.FXF.F8" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a9:= eG0(8,a8);" }}{PARA 12 
"" 1 "" {XPPMATH 20 "6#>%#a9G,>*&-%#gpG6%,$%\"mG\"\"#,&F+\"\"\"%\"jG\"
\"$\"\"%F.)%\"qG,*F+\"\")F5F.*$F/F,\"#CF/F,F.!\"\"*&-F(6%,&F+F,F8F.,(F
+F.F/F0F.F.F1F.)F3,*F+F5\"#8F.F6F7F/\"#AF.F.*&-F(6%,&F+F,F.F.,(F+F.F,F
.F/F0F1F.)F3,*F+F5\"#<F.F6F7F/FAF.F.*&)F3,*F6F7F/\"#9F+F1F5F.F.-F(6%F*
F=F1F.F8*&FCF.)F3,(\"\"*F.F6F7F/FAF.F.*&)F3,*F6F7F/!#AF+F5\"#;F.F.-F(6
%FE,(F+F.F/F0F8F.F1F.F.*&FKF.-F(6%,&F+F,F,F.FFF1F.F.*&F'F.)F3,*F+F5FSF
.F6F7F/F,F.F.*&FCF.)F3,*F+F5FMF.F6F7F/FAF.F8*&F'F.)F3,*F+F5\"#6F.F6F7F
/F,F.F.*&FCF.)F3,*F+F5FXF.F6F7F/FAF.F8*&)F3,*\"#@F.F6F7F/\"#MF+F1F.-F(
6%F<FFF1F.F.*&)F3,*FSF.F6F7F/\"#5F+F1F.FNF.F.*&-F(6%,&F+F,F0F.,(F+F.F0
F.F/F0F1F.FQF.F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a10:= e
G1(7,a9); " }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a10G,@*&-%#gpG6%,$%\"
mG\"\"#,&F+\"\"\"%\"jG\"\"$\"\"%F.)%\"qG,*F+\"\")F5F.*$F/F,\"#CF/F,F.!
\"\"*&-F(6%,&F+F,F8F.,(F+F.F/F0F.F.F1F.)F3,*F+F5\"#8F.F6F7F/\"#AF.F.*&
-F(6%,&F+F,F.F.,(F+F.F,F.F/F0F1F.)F3,*F+F5\"#<F.F6F7F/FAF.F.*&)F3,*F6F
7F/\"#9F+F1F5F.F.-F(6%F*F=F1F.F8*&FCF.)F3,(\"\"*F.F6F7F/FAF.F.*&)F3,*F
6F7F/!#AF+F5\"#;F.F.-F(6%FE,(F+F.F/F0F8F.F1F.F.*&FKF.-F(6%FEF=F1F.F.*&
)F3,*F6F7F/\"#EF+F5FXF.F.FCF.F.*&F'F.)F3,*F+F5FSF.F6F7F/F,F.F.*&FCF.)F
3,*F+F5FMF.F6F7F/FAF.F8*&F'F.)F3,*F+F5\"#6F.F6F7F/F,F.F.*&FCF.)F3,*F+F
5FXF.F6F7F/FAF.F8*&)F3,*\"#@F.F6F7F/\"#MF+F1F.-F(6%F<FFF1F.F.*&)F3,*FS
F.F6F7F/\"#5F+F1F.FNF.F.*&-F(6%,&F+F,F0F.,(F+F.F0F.F/F0F1F.FQF.F8" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a11:= eG0(7,a10);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$a11G,:*&-%#gpG6%,&%\"mG\"\"#!\"\"\"\"\",(
F+F.%\"jG\"\"$F.F.\"\"%F.)%\"qG,*F+\"\")\"#8F.*$F0F,\"#CF0\"#AF.F.*&-F
(6%,&F+F,F.F.,(F+F.F,F.F0F1F2F.)F4,*F+F6\"#<F.F8F9F0F:F.F.*&F<F.)F4,(
\"\"*F.F8F9F0F:F.F.*&)F4,*F8F9F0!#AF+F6\"#;F.F.-F(6%F>,(F+F.F0F1F-F.F2
F.F.*&)F4,*F8F9F0\"#EF+F6FKF.F.F<F.F.*&-F(6%,$F+F,,&F+F.F0F1F2F.)F4,*F
+F6FFF.F8F9F0F,F.F.*&F<F.)F4,*F+F6\"#9F.F8F9F0F:F.F-*&FTF.)F4,*F+F6\"#
6F.F8F9F0F,F.F.*&F<F.)F4,*F+F6FKF.F8F9F0F:F.F-*&)F4,*\"#@F.F8F9F0\"#MF
+F2F.-F(6%F*F?F2F.F.*&)F4,*FFF.F8F9F0\"#5F+F2F.-F(6%FVF/F2F.F.*&-F(6%,
&F+F,F1F.,(F+F.F1F.F0F1F2F.FDF.F-" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 18 "a12:= eG1(12,a11);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6
#>%$a12G,<*&-%#gpG6%,&%\"mG\"\"#!\"\"\"\"\",(F+F.%\"jG\"\"$F.F.\"\"%F.
)%\"qG,*F+\"\")\"#8F.*$F0F,\"#CF0\"#AF.F.*&-F(6%,&F+F,F.F.,(F+F.F,F.F0
F1F2F.)F4,*F+F6\"#<F.F8F9F0F:F.F.*&F<F.)F4,(\"\"*F.F8F9F0F:F.F.*&)F4,*
F8F9F0!#AF+F6\"#;F.F.-F(6%F>,(F+F.F0F1F-F.F2F.F.*&)F4,*F8F9F0\"#EF+F6F
KF.F.F<F.F.*&-F(6%,$F+F,,&F+F.F0F1F2F.)F4,*F+F6FFF.F8F9F0F,F.F.*&F<F.)
F4,*F+F6\"#9F.F8F9F0F:F.F-*&FTF.)F4,*F+F6\"#6F.F8F9F0F,F.F.*&F<F.)F4,*
F+F6FKF.F8F9F0F:F.F-*&)F4,*\"#@F.F8F9F0\"#MF+F2F.-F(6%F*F?F2F.F.*&)F4,
*FFF.F8F9F0\"#5F+F2F.-F(6%FVF/F2F.F.*&FDF.-F(6%,&F+F,F,F.F?F2F.F-*&F`o
F.-F(6%F_p,(F+F.F1F.F0F1F2F.F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 18 "a13:= eG0(12,a12);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a13G,
:*&-%#gpG6%,&%\"mG\"\"#!\"\"\"\"\",(F+F.%\"jG\"\"$F.F.\"\"%F.)%\"qG,*F
+\"\")\"#8F.*$F0F,\"#CF0\"#AF.F.*&-F(6%,&F+F,F.F.,(F+F.F,F.F0F1F2F.)F4
,*F+F6\"#<F.F8F9F0F:F.F.*&)F4,*F8F9F0!#AF+F6\"#;F.F.-F(6%F>,(F+F.F0F1F
-F.F2F.F.*&)F4,*F8F9F0\"#EF+F6FGF.F.F<F.F.*&-F(6%,$F+F,,&F+F.F0F1F2F.)
F4,*F+F6\"\"*F.F8F9F0F,F.F.*&F<F.)F4,*F+F6\"#9F.F8F9F0F:F.F-*&FPF.)F4,
*F+F6\"#6F.F8F9F0F,F.F.*&F<F.)F4,*F+F6FGF.F8F9F0F:F.F-*&)F4,*\"#@F.F8F
9F0\"#MF+F2F.-F(6%F*F?F2F.F.*&)F4,*FVF.F8F9F0\"#5F+F2F.-F(6%FRF/F2F.F.
*&FdoF.-F(6%F>F/F2F.F-*&F]oF.-F(6%,&F+F,F,F.,(F+F.F1F.F0F1F2F.F-" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a14:= eG0(11,a13);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$a14G,8*&-%#gpG6%,&%\"mG\"\"#!\"\"\"\"\",(
F+F.%\"jG\"\"$F.F.\"\"%F.)%\"qG,*F+\"\")\"#8F.*$F0F,\"#CF0\"#AF.F.*&-F
(6%,&F+F,F.F.,(F+F.F,F.F0F1F2F.)F4,*F+F6\"#<F.F8F9F0F:F.F.*&)F4,*F8F9F
0!#AF+F6\"#;F.F.-F(6%F>,(F+F.F0F1F-F.F2F.F.*&)F4,*F8F9F0\"#EF+F6FGF.F.
F<F.F.*&-F(6%,$F+F,,&F+F.F0F1F2F.)F4,*F+F6\"\"*F.F8F9F0F,F.F.*&F<F.)F4
,*F+F6\"#9F.F8F9F0F:F.F-*&FPF.)F4,*F+F6\"#6F.F8F9F0F,F.F.*&F<F.)F4,*F+
F6FGF.F8F9F0F:F.F-*&)F4,*\"#@F.F8F9F0\"#MF+F2F.-F(6%F*F?F2F.F.*&)F4,*F
VF.F8F9F0!\"#F+F6F.FPF.F-*&F]oF.-F(6%,&F+F,F,F.,(F+F.F1F.F0F1F2F.F-" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a15:= eG0(11,a14);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a15G,6*&-%#gpG6%,&%\"mG\"\"#!\"\"\"
\"\",(F+F.%\"jG\"\"$F.F.\"\"%F.)%\"qG,*F+\"\")\"#8F.*$F0F,\"#CF0\"#AF.
F.*&)F4,*F8F9F0!#AF+F6\"#;F.F.-F(6%,&F+F,F.F.,(F+F.F0F1F-F.F2F.F.*&)F4
,*F8F9F0\"#EF+F6F?F.F.-F(6%FB,(F+F.F,F.F0F1F2F.F.*&-F(6%,$F+F,,&F+F.F0
F1F2F.)F4,*F+F6\"\"*F.F8F9F0F,F.F.*&FHF.)F4,*F+F6\"#9F.F8F9F0F:F.F-*&F
LF.)F4,*F+F6\"#6F.F8F9F0F,F.F.*&FHF.)F4,*F+F6F?F.F8F9F0F:F.F-*&)F4,*\"
#@F.F8F9F0\"#MF+F2F.-F(6%F*FJF2F.F.*&)F4,*FRF.F8F9F0!\"#F+F6F.FLF.F-*&
FinF.-F(6%FB,(F+F.F1F.F0F1F2F.F-" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 18 "a16:= eG1(10,a15);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6
#>%$a16G,8*&-%#gpG6%,&%\"mG\"\"#!\"\"\"\"\",(F+F.%\"jG\"\"$F.F.\"\"%F.
)%\"qG,*F+\"\")\"#8F.*$F0F,\"#CF0\"#AF.F.*&)F4,*F8F9F0!#AF+F6\"#;F.F.-
F(6%,&F+F,F.F.,(F+F.F0F1F-F.F2F.F.*&)F4,*F8F9F0\"#EF+F6F?F.F.-F(6%FB,(
F+F.F,F.F0F1F2F.F.*&-F(6%,$F+F,,&F+F.F0F1F2F.)F4,*F+F6\"\"*F.F8F9F0F,F
.F.*&FHF.)F4,*F+F6\"#9F.F8F9F0F:F.F-*&FLF.)F4,*F+F6\"#6F.F8F9F0F,F.F.*
&FHF.)F4,*F+F6F?F.F8F9F0F:F.F-*&)F4,*\"#@F.F8F9F0\"#MF+F2F.-F(6%F*FJF2
F.F.*&)F4,*FRF.F8F9F0!\"#F+F6F.FLF.F-*&FinF.-F(6%FNFJF2F.F-*&)F4,*\"#L
F.F8F9F0\"#YF+F6F.-F(6%FN,(F+F.F1F.F0F1F2F.F-" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 18 "a17:= eG0(10,a16);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%$a17G,2*&)%\"qG,**$%\"jG\"\"#\"#CF+!#A%\"mG\"\")\"#;\"\"\"F2-%
#gpG6%,&F/F,F2F2,(F/F2F+\"\"$!\"\"F2\"\"%F2F2*&)F(,*F*F-F+\"#EF/F0F1F2
F2-F46%F6,(F/F2F,F2F+F8F:F2F2*&-F46%,$F/F,,&F/F2F+F8F:F2)F(,*F/F0\"\"*
F2F*F-F+F,F2F2*&F?F2)F(,*F/F0\"#9F2F*F-F+\"#AF2F9*&FCF2)F(,*F/F0\"#6F2
F*F-F+F,F2F2*&F?F2)F(,*F/F0F1F2F*F-F+FNF2F9*&)F(,*FIF2F*F-F+!\"#F/F0F2
FCF2F9*&)F(,*\"#LF2F*F-F+\"#YF/F0F2-F46%FE,(F/F2F8F2F+F8F:F2F9" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "a18:= shiftdown(2,a17);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a18G,2*&)%\"qG,**$%\"jG\"\"#\"#CF+!
#A%\"mG\"\")\"#;\"\"\"F2-%#gpG6%,&F/F,F2F2,(F/F2F+\"\"$!\"\"F2\"\"%F2F
2*&)F(,*F*F-F+F.\"#9F2F/F0F2F3F2F2*&-F46%,$F/F,,&F/F2F+F8F:F2)F(,*F/F0
\"\"*F2F*F-F+F,F2F2*&-F46%F6,(F/F2F,F2F+F8F:F2)F(,*F/F0F>F2F*F-F+\"#AF
2F9*&F@F2)F(,*F/F0\"#6F2F*F-F+F,F2F2*&FHF2)F(,*F/F0F1F2F*F-F+FMF2F9*&)
F(,*FFF2F*F-F+!\"#F/F0F2F@F2F9*&)F(,*\"#LF2F*F-F+\"#YF/F0F2-F46%FB,(F/
F2F8F2F+F8F:F2F9" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "a19:= g
psym(2,a18);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a19G,2*&)%\"qG,**$%
\"jG\"\"#\"#CF+!#A%\"mG\"\")\"#;\"\"\"F2-%#gpG6%,&F/F,F2F2,(F/F2F+\"\"
$!\"\"F2\"\"%F2F2*&)F(,*F*F-F+F.\"#9F2F/F0F2-F46%F6,(F/F2F,F2F+!\"$F:F
2F2*&-F46%,$F/F,,&F/F2F+F8F:F2)F(,*F/F0\"\"*F2F*F-F+F,F2F2*&-F46%F6,(F
/F2F,F2F+F8F:F2)F(,*F/F0F>F2F*F-F+\"#AF2F9*&FDF2)F(,*F/F0\"#6F2F*F-F+F
,F2F2*&FLF2)F(,*F/F0F1F2F*F-F+FQF2F9*&)F(,*FJF2F*F-F+!\"#F/F0F2FDF2F9*
&)F(,*\"#LF2F*F-F+\"#YF/F0F2-F46%FF,(F/F2F8F2F+F8F:F2F9" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "a20:= negate(2,a19);" }}{PARA 12 "
" 1 "" {XPPMATH 20 "6#>%$a20G,.*&)%\"qG,**$%\"jG\"\"#\"#CF+!#A%\"mG\"
\")\"#;\"\"\"F2-%#gpG6%,&F/F,F2F2,(F/F2F+\"\"$!\"\"F2\"\"%F2F2*&-F46%,
$F/F,,&F/F2F+F8F:F2)F(,*F/F0\"\"*F2F*F-F+F,F2F2*&F<F2)F(,*F/F0\"#6F2F*
F-F+F,F2F2*&-F46%F6,(F/F2F,F2F+F8F:F2)F(,*F/F0F1F2F*F-F+\"#AF2F9*&)F(,
*FBF2F*F-F+!\"#F/F0F2F<F2F9*&)F(,*\"#LF2F*F-F+\"#YF/F0F2-F46%F>,(F/F2F
8F2F+F8F:F2F9" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "a21:= gpsy
m(1,a20);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a21G,.*&)%\"qG,**$%\"j
G\"\"#\"#CF+!#A%\"mG\"\")\"#;\"\"\"F2-%#gpG6%,&F/F,F2F2,(F/F2F,F2F+!\"
$\"\"%F2F2*&-F46%,$F/F,,&F/F2F+\"\"$F9F2)F(,*F/F0\"\"*F2F*F-F+F,F2F2*&
F;F2)F(,*F/F0\"#6F2F*F-F+F,F2F2*&-F46%F6,(F/F2F,F2F+F?F9F2)F(,*F/F0F1F
2F*F-F+\"#AF2!\"\"*&)F(,*FBF2F*F-F+!\"#F/F0F2F;F2FN*&)F(,*\"#LF2F*F-F+
\"#YF/F0F2-F46%F=,(F/F2F?F2F+F?F9F2FN" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 20 "a22:= negate(1,a21);" }}{PARA 12 "" 1 "" {XPPMATH 20 
"6#>%$a22G,**&-%#gpG6%,$%\"mG\"\"#,&F+\"\"\"%\"jG\"\"$\"\"%F.)%\"qG,*F
+\"\")\"\"*F.*$F/F,\"#CF/F,F.F.*&F'F.)F3,*F+F5\"#6F.F7F8F/F,F.F.*&)F3,
*F6F.F7F8F/!\"#F+F5F.F'F.!\"\"*&)F3,*\"#LF.F7F8F/\"#YF+F5F.-F(6%F*,(F+
F.F0F.F/F0F1F.FA" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "a23:= s
hiftdown(4,a22);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a23G,**&-%#gpG6
%,$%\"mG\"\"#,&F+\"\"\"%\"jG\"\"$\"\"%F.)%\"qG,*F+\"\")\"\"*F.*$F/F,\"
#CF/F,F.F.*&F'F.)F3,*F+F5\"#6F.F7F8F/F,F.F.*&)F3,*F6F.F7F8F/!\"#F+F5F.
F'F.!\"\"*&)F3,*F<F.F7F8F/F@F+F5F.F'F.FA" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 19 "a24:= gpsym(3,a23);" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>%$a24G,**&-%#gpG6%,$%\"mG\"\"#,&F+\"\"\"%\"jG\"\"$\"\"%F.)%\"qG,*F+
\"\")\"\"*F.*$F/F,\"#CF/F,F.F.*&F'F.)F3,*F+F5\"#6F.F7F8F/F,F.F.*&)F3,*
F6F.F7F8F/!\"#F+F5F.-F(6%F*,&F+F.F/!\"$F1F.!\"\"*&)F3,*F<F.F7F8F/F@F+F
5F.F'F.FE" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "a25:= negate(3
,a24);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$a25G,&*&-%#gpG6%,$%\"mG\"
\"#,&F+\"\"\"%\"jG\"\"$\"\"%F.)%\"qG,*F+\"\")\"#6F.*$F/F,\"#CF/F,F.F.*
&)F3,*F6F.F7F8F/!\"#F+F5F.F'F.!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 19 "a26:= gpsym(2,a25);" }}{PARA 11 "" 1 "" {XPPMATH 20 "
6#>%$a26G,&*&-%#gpG6%,$%\"mG\"\"#,&F+\"\"\"%\"jG\"\"$\"\"%F.)%\"qG,*F+
\"\")\"#6F.*$F/F,\"#CF/F,F.F.*&)F3,*F6F.F7F8F/!\"#F+F5F.-F(6%F*,&F+F.F
/!\"$F1F.!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "a27:= neg
ate(2,a26);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$a27G\"\"!" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "#####
### n odd = 2m+1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "b1:= as
oo( op53, Aeven, Aodd);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b1G,B*&-
%#gpG6%,$%\"mG\"\"#,&F+\"\"\"%\"jG\"\"$\"\"%F.)%\"qG,(\"\")F.*$F/F,\"#
CF/F,F.F.*&F'F.)F3,*F+F5\"#7F.F6F7F/F,F.!\"\"*&-F(6%,&F+F,F.F.,(F+F.F,
F.F/F0F1F.)F3,*F+F5\"#<F.F6F7F/\"#AF.F.*&-F(6%,&F+F,F,F.,(F+F.F/F0F.F.
F1F.)F3,*F+F5\"#;F.F6F7F/F,F.F<*&-F(6%,&F+F,F0F.,(F+F.F0F.F/F0F1F.)F3,
*F+F5\"#@F.F6F7F/FEF.F.*&FGF.)F3,(F1F.F6F7F/F,F.F<*&FOF.)F3,(\"\"*F.F6
F7F/FEF.F.*&)F3,(F6F7F/FE\"\"&F.F.-F(6%,&F+F,FjnF.,(F+F.F1F.F/F0F1F.F<
*&FGF.)F3,*F+F5\"#8F.F6F7F/F,F.F.*&F>F.)F3,*F+F5\"#=F.F6F7F/FEF.F<*&FG
F.)F3,*F+F5\"#:F.F6F7F/F,F.F.*&F>F.)F3,*F+F5\"#?F.F6F7F/FEF.F<*&FGF.F2
F.F<*&F>F.FZF.F<*&-F(6%,&F+F,F1F.FAF1F.FWF.F.*&FhnF.FOF.F." }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b2:= eG1(13,b1);" }}{PARA 12 "" 1 "
" {XPPMATH 20 "6#>%#b2G,D*&-%#gpG6%,$%\"mG\"\"#,&F+\"\"\"%\"jG\"\"$\"
\"%F.)%\"qG,(\"\")F.*$F/F,\"#CF/F,F.F.*&F'F.)F3,*F+F5\"#7F.F6F7F/F,F.!
\"\"*&-F(6%,&F+F,F.F.,(F+F.F,F.F/F0F1F.)F3,*F+F5\"#<F.F6F7F/\"#AF.F.*&
-F(6%,&F+F,F,F.,(F+F.F/F0F.F.F1F.)F3,*F+F5\"#;F.F6F7F/F,F.F<*&-F(6%,&F
+F,F0F.,(F+F.F0F.F/F0F1F.)F3,*F+F5\"#@F.F6F7F/FEF.F.*&FGF.)F3,(F1F.F6F
7F/F,F.F<*&FOF.)F3,(\"\"*F.F6F7F/FEF.F.*&)F3,(F6F7F/FE\"\"&F.F.-F(6%,&
F+F,FjnF.,(F+F.F1F.F/F0F1F.F<*&FGF.)F3,*F+F5\"#8F.F6F7F/F,F.F.*&F>F.)F
3,*F+F5\"#=F.F6F7F/FEF.F<*&FGF.)F3,*F+F5\"#:F.F6F7F/F,F.F.*&F>F.)F3,*F
+F5\"#?F.F6F7F/FEF.F<*&F2F.-F(6%F@F-F1F.F<*&)F3,*F;F.F6F7F/\"#9F+F1F.-
F(6%F@FJF1F.F<*&F>F.FZF.F<*&-F(6%,&F+F,F1F.FAF1F.FWF.F.*&FhnF.FOF.F." 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b3:= eG0(13,b2);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b3G,B*&-%#gpG6%,$%\"mG\"\"#,&F+\"\"
\"%\"jG\"\"$\"\"%F.)%\"qG,*F+\"\")\"#7F.*$F/F,\"#CF/F,F.!\"\"*&-F(6%,&
F+F,F.F.,(F+F.F,F.F/F0F1F.)F3,*F+F5\"#<F.F7F8F/\"#AF.F.*&-F(6%,&F+F,F,
F.,(F+F.F/F0F.F.F1F.)F3,*F+F5\"#;F.F7F8F/F,F.F9*&-F(6%,&F+F,F0F.,(F+F.
F0F.F/F0F1F.)F3,*F+F5\"#@F.F7F8F/FBF.F.*&FDF.)F3,(F1F.F7F8F/F,F.F9*&FL
F.)F3,(\"\"*F.F7F8F/FBF.F.*&)F3,(F7F8F/FB\"\"&F.F.-F(6%,&F+F,FgnF.,(F+
F.F1F.F/F0F1F.F9*&FDF.)F3,*F+F5\"#8F.F7F8F/F,F.F.*&F;F.)F3,*F+F5\"#=F.
F7F8F/FBF.F9*&FDF.)F3,*F+F5\"#:F.F7F8F/F,F.F.*&F;F.)F3,*F+F5\"#?F.F7F8
F/FBF.F9*&)F3,*F6F.F7F8F/!#5F+F1F.-F(6%F*,(F+F.F/F0F9F.F1F.F9*&)F3,*F6
F.F7F8F/\"#9F+F1F.-F(6%F=FGF1F.F9*&F;F.FWF.F9*&-F(6%,&F+F,F1F.F>F1F.FT
F.F.*&FenF.FLF.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b4:= e
G0(15,b3);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b4G,D*&-%#gpG6%,$%\"m
G\"\"#,&F+\"\"\"%\"jG\"\"$\"\"%F.)%\"qG,*F+\"\")\"#7F.*$F/F,\"#CF/F,F.
!\"\"*&-F(6%,&F+F,F.F.,(F+F.F,F.F/F0F1F.)F3,*F+F5\"#<F.F7F8F/\"#AF.F.*
&-F(6%,&F+F,F,F.,(F+F.F/F0F.F.F1F.)F3,*F+F5\"#;F.F7F8F/F,F.F9*&-F(6%,&
F+F,F0F.,(F+F.F0F.F/F0F1F.)F3,*F+F5\"#@F.F7F8F/FBF.F.*&FDF.)F3,(F1F.F7
F8F/F,F.F9*&FLF.)F3,(\"\"*F.F7F8F/FBF.F.*&)F3,(F7F8F/FB\"\"&F.F.-F(6%,
&F+F,FgnF.,(F+F.F1F.F/F0F1F.F9*&FDF.)F3,*F+F5\"#8F.F7F8F/F,F.F.*&F;F.)
F3,*F+F5\"#=F.F7F8F/FBF.F9*&FDF.)F3,*F+F5\"#:F.F7F8F/F,F.F.*&F;F.)F3,*
F+F5\"#?F.F7F8F/FBF.F9*&)F3,*F6F.F7F8F/!#5F+F1F.-F(6%F*,(F+F.F/F0F9F.F
1F.F9*&)F3,*F6F.F7F8F/\"#9F+F1F.-F(6%F=FGF1F.F9*&F;F.FWF.F9*&FTF.-F(6%
FNF>F1F.F.*&F]pF.-F(6%FNFGF1F.F.*&FenF.FLF.F." }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 16 "b5:= eG1(15,b4);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%#b5G,B*&-%#gpG6%,$%\"mG\"\"#,&F+\"\"\"%\"jG\"\"$\"\"%F.)%\"qG,
*F+\"\")\"#7F.*$F/F,\"#CF/F,F.!\"\"*&-F(6%,&F+F,F.F.,(F+F.F,F.F/F0F1F.
)F3,*F+F5\"#<F.F7F8F/\"#AF.F.*&-F(6%,&F+F,F,F.,(F+F.F/F0F.F.F1F.)F3,*F
+F5\"#;F.F7F8F/F,F.F9*&-F(6%,&F+F,F0F.,(F+F.F0F.F/F0F1F.)F3,*F+F5\"#@F
.F7F8F/FBF.F.*&FLF.)F3,(\"\"*F.F7F8F/FBF.F.*&)F3,(F7F8F/FB\"\"&F.F.-F(
6%,&F+F,FZF.,(F+F.F1F.F/F0F1F.F9*&FDF.)F3,*F+F5\"#8F.F7F8F/F,F.F.*&F;F
.)F3,*F+F5\"#=F.F7F8F/FBF.F9*&FDF.)F3,*F+F5\"#:F.F7F8F/F,F.F.*&F;F.)F3
,*F+F5\"#?F.F7F8F/FBF.F9*&)F3,*F6F.F7F8F/!#5F+F1F.-F(6%F*,(F+F.F/F0F9F
.F1F.F9*&)F3,*F6F.F7F8F/\"#9F+F1F.-F(6%F=FGF1F.F9*&F;F.FTF.F9*&FapF.-F
(6%FFF>F1F.F.*&FjoF.-F(6%FNFGF1F.F.*&FXF.FLF.F." }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 16 "b6:= eG1(15,b5);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%#b6G,@*&-%#gpG6%,$%\"mG\"\"#,&F+\"\"\"%\"jG\"\"$\"\"%F.)%\"qG,
*F+\"\")\"#7F.*$F/F,\"#CF/F,F.!\"\"*&-F(6%,&F+F,F.F.,(F+F.F,F.F/F0F1F.
)F3,*F+F5\"#<F.F7F8F/\"#AF.F.*&-F(6%,&F+F,F0F.,(F+F.F0F.F/F0F1F.)F3,*F
+F5\"#@F.F7F8F/FBF.F.*&FDF.)F3,(\"\"*F.F7F8F/FBF.F.*&)F3,(F7F8F/FB\"\"
&F.F.-F(6%,&F+F,FRF.,(F+F.F1F.F/F0F1F.F9*&-F(6%,&F+F,F,F.,(F+F.F/F0F.F
.F1F.)F3,*F+F5\"#8F.F7F8F/F,F.F.*&F;F.)F3,*F+F5\"#=F.F7F8F/FBF.F9*&FXF
.)F3,*F+F5\"#:F.F7F8F/F,F.F.*&F;F.)F3,*F+F5\"#?F.F7F8F/FBF.F9*&)F3,*F6
F.F7F8F/!#5F+F1F.-F(6%F*,(F+F.F/F0F9F.F1F.F9*&)F3,*F6F.F7F8F/\"#9F+F1F
.-F(6%F=FenF1F.F9*&F;F.FLF.F9*&F]pF.-F(6%FZF>F1F.F.*&FfoF.-F(6%FZF-F1F
.F.*&FPF.FDF.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b7:= eG0
(14,b6);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b7G,B*&-%#gpG6%,$%\"mG
\"\"#,&F+\"\"\"%\"jG\"\"$\"\"%F.)%\"qG,*F+\"\")\"#7F.*$F/F,\"#CF/F,F.!
\"\"*&-F(6%,&F+F,F.F.,(F+F.F,F.F/F0F1F.)F3,*F+F5\"#<F.F7F8F/\"#AF.F.*&
-F(6%,&F+F,F0F.,(F+F.F0F.F/F0F1F.)F3,*F+F5\"#@F.F7F8F/FBF.F.*&FDF.)F3,
(\"\"*F.F7F8F/FBF.F.*&)F3,(F7F8F/FB\"\"&F.F.-F(6%,&F+F,FRF.,(F+F.F1F.F
/F0F1F.F9*&-F(6%,&F+F,F,F.,(F+F.F/F0F.F.F1F.)F3,*F+F5\"#8F.F7F8F/F,F.F
.*&F;F.)F3,*F+F5\"#=F.F7F8F/FBF.F9*&FXF.)F3,*F+F5\"#:F.F7F8F/F,F.F.*&F
;F.)F3,*F+F5\"#?F.F7F8F/FBF.F9*&)F3,*F6F.F7F8F/!#5F+F1F.-F(6%F*,(F+F.F
/F0F9F.F1F.F9*&)F3,*F6F.F7F8F/\"#9F+F1F.-F(6%F=FenF1F.F9*&F;F.FLF.F9*&
F]pF.-F(6%FZF>F1F.F.*&FfoF.-F(6%F=F-F1F.F.*&)F3,*FdoF.F7F8F/!#AF+F5F.-
F(6%F=F[pF1F.F.*&FPF.FDF.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
16 "b8:= eG1(14,b7);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b8G,<*&-%#g
pG6%,&%\"mG\"\"#\"\"\"F-,(F+F-F,F-%\"jG\"\"$\"\"%F-)%\"qG,*F+\"\")\"#<
F-*$F/F,\"#CF/\"#AF-F-*&-F(6%,&F+F,F0F-,(F+F-F0F-F/F0F1F-)F3,*F+F5\"#@
F-F7F8F/F9F-F-*&F;F-)F3,(\"\"*F-F7F8F/F9F-F-*&)F3,(F7F8F/F9\"\"&F-F--F
(6%,&F+F,FIF-,(F+F-F1F-F/F0F1F-!\"\"*&-F(6%,&F+F,F,F-,(F+F-F/F0F-F-F1F
-)F3,*F+F5\"#8F-F7F8F/F,F-F-*&F'F-)F3,*F+F5\"#=F-F7F8F/F9F-FN*&FPF-)F3
,*F+F5\"#:F-F7F8F/F,F-F-*&F'F-)F3,*F+F5\"#?F-F7F8F/F9F-FN*&)F3,*\"#7F-
F7F8F/\"#9F+F1F--F(6%F*FSF1F-FN*&F'F-FCF-FN*&F^oF--F(6%FRF.F1F-F-*&)F3
,*F\\oF-F7F8F/!#AF+F5F--F(6%F*,(F+F-F/F0FNF-F1F-F-*&FGF-F;F-F-" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b9:= eG1(11,b8);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%#b9G,:*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-
F,F-%\"jG\"\"$\"\"%F-)%\"qG,*F+\"\")\"#<F-*$F/F,\"#CF/\"#AF-F-*&-F(6%,
&F+F,F0F-,(F+F-F0F-F/F0F1F-)F3,*F+F5\"#@F-F7F8F/F9F-F-*&F;F-)F3,(\"\"*
F-F7F8F/F9F-F-*&)F3,(F7F8F/F9\"\"&F-F--F(6%,&F+F,FIF-,(F+F-F1F-F/F0F1F
-!\"\"*&-F(6%,&F+F,F,F-,(F+F-F/F0F-F-F1F-)F3,*F+F5\"#8F-F7F8F/F,F-F-*&
F'F-)F3,*F+F5\"#=F-F7F8F/F9F-FN*&FPF-)F3,*F+F5\"#:F-F7F8F/F,F-F-*&F'F-
)F3,*F+F5\"#?F-F7F8F/F9F-FN*&F'F-FCF-FN*&)F3,*F\\oF-F7F8F/\"#EF+F5F-F'
F-F-*&)F3,*F\\oF-F7F8F/!#AF+F5F--F(6%F*,(F+F-F/F0FNF-F1F-F-*&FGF-F;F-F
-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b10:= eG0(4,b9);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b10G,<*&-%#gpG6%,&%\"mG\"\"#\"\"\"F
-,(F+F-F,F-%\"jG\"\"$\"\"%F-)%\"qG,*F+\"\")\"#<F-*$F/F,\"#CF/\"#AF-F-*
&-F(6%,&F+F,F0F-,(F+F-F0F-F/F0F1F-)F3,*F+F5\"#@F-F7F8F/F9F-F-*&F;F-)F3
,(\"\"*F-F7F8F/F9F-F-*&)F3,(F7F8F/F9\"\"&F-F--F(6%,&F+F,F1F-,(F+F-F1F-
F/F0F1F-!\"\"*&)F3,*FEF-F7F8F/\"#5F+F1F--F(6%FLF>F1F-FN*&-F(6%,&F+F,F,
F-,(F+F-F/F0F-F-F1F-)F3,*F+F5\"#8F-F7F8F/F,F-F-*&F'F-)F3,*F+F5\"#=F-F7
F8F/F9F-FN*&FVF-)F3,*F+F5\"#:F-F7F8F/F,F-F-*&F'F-)F3,*F+F5\"#?F-F7F8F/
F9F-FN*&F'F-FCF-FN*&)F3,*FboF-F7F8F/\"#EF+F5F-F'F-F-*&)F3,*FboF-F7F8F/
!#AF+F5F--F(6%F*,(F+F-F/F0FNF-F1F-F-*&FGF-F;F-F-" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 17 "b11:= eG1(4,b10);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$b11G,:*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-F,F-%\"jG
\"\"$\"\"%F-)%\"qG,*F+\"\")\"#<F-*$F/F,\"#CF/\"#AF-F-*&-F(6%,&F+F,F0F-
,(F+F-F0F-F/F0F1F-)F3,*F+F5\"#@F-F7F8F/F9F-F-*&F;F-)F3,(\"\"*F-F7F8F/F
9F-F-*&)F3,*FAF-F7F8F/\"#MF+F1F--F(6%F=,(F+F-F1F-F/F0F1F-!\"\"*&)F3,*F
EF-F7F8F/\"#5F+F1F--F(6%,&F+F,F1F-F>F1F-FM*&-F(6%,&F+F,F,F-,(F+F-F/F0F
-F-F1F-)F3,*F+F5\"#8F-F7F8F/F,F-F-*&F'F-)F3,*F+F5\"#=F-F7F8F/F9F-FM*&F
VF-)F3,*F+F5\"#:F-F7F8F/F,F-F-*&F'F-)F3,*F+F5\"#?F-F7F8F/F9F-FM*&F'F-F
CF-FM*&)F3,*FboF-F7F8F/\"#EF+F5F-F'F-F-*&)F3,*FboF-F7F8F/!#AF+F5F--F(6
%F*,(F+F-F/F0FMF-F1F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "
b12:= gpsym(12,b11);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b12G,:*&-%#
gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-F,F-%\"jG\"\"$\"\"%F-)%\"qG,*F+\"\")\"#
<F-*$F/F,\"#CF/\"#AF-F-*&-F(6%,&F+F,F0F-,(F+F-F0F-F/F0F1F-)F3,*F+F5\"#
@F-F7F8F/F9F-F-*&F;F-)F3,(\"\"*F-F7F8F/F9F-F-*&)F3,*FAF-F7F8F/\"#MF+F1
F--F(6%F=,(F+F-F1F-F/F0F1F-!\"\"*&)F3,*FEF-F7F8F/\"#5F+F1F--F(6%,&F+F,
F1F-F>F1F-FM*&-F(6%,&F+F,F,F-,(F+F-F/F0F-F-F1F-)F3,*F+F5\"#8F-F7F8F/F,
F-F-*&F'F-)F3,*F+F5\"#=F-F7F8F/F9F-FM*&FVF-)F3,*F+F5\"#:F-F7F8F/F,F-F-
*&F'F-)F3,*F+F5\"#?F-F7F8F/F9F-FM*&F'F-FCF-FM*&)F3,*FboF-F7F8F/\"#EF+F
5F-F'F-F-*&)F3,*FboF-F7F8F/!#AF+F5F--F(6%F*,(F+F-F,F-F/!\"$F1F-F-" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "b13:= negate(12,b12);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b13G,6*&-%#gpG6%,&%\"mG\"\"#\"\"\"F
-,(F+F-F,F-%\"jG\"\"$\"\"%F-)%\"qG,*F+\"\")\"#<F-*$F/F,\"#CF/\"#AF-F-*
&-F(6%,&F+F,F0F-,(F+F-F0F-F/F0F1F-)F3,*F+F5\"#@F-F7F8F/F9F-F-*&F;F-)F3
,(\"\"*F-F7F8F/F9F-F-*&)F3,*FAF-F7F8F/\"#MF+F1F--F(6%F=,(F+F-F1F-F/F0F
1F-!\"\"*&)F3,*FEF-F7F8F/\"#5F+F1F--F(6%,&F+F,F1F-F>F1F-FM*&-F(6%,&F+F
,F,F-,(F+F-F/F0F-F-F1F-)F3,*F+F5\"#8F-F7F8F/F,F-F-*&F'F-)F3,*F+F5\"#=F
-F7F8F/F9F-FM*&FVF-)F3,*F+F5\"#:F-F7F8F/F,F-F-*&F'F-FCF-FM*&)F3,*\"#?F
-F7F8F/\"#EF+F5F-F'F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "
b14:= shiftdown(7,b13);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b14G,6*&
-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-F,F-%\"jG\"\"$\"\"%F-)%\"qG,*F+\"\")
\"#<F-*$F/F,\"#CF/\"#AF-F-*&-F(6%,&F+F,F0F-,(F+F-F0F-F/F0F1F-)F3,*F+F5
\"#@F-F7F8F/F9F-F-*&F;F-)F3,(\"\"*F-F7F8F/F9F-F-*&)F3,*FAF-F7F8F/\"#MF
+F1F--F(6%F=,(F+F-F1F-F/F0F1F-!\"\"*&)F3,*FEF-F7F8F/\"#5F+F1F--F(6%,&F
+F,F1F-F>F1F-FM*&-F(6%,&F+F,F,F-,(F+F-F/F0F-F-F1F-)F3,*F+F5\"#8F-F7F8F
/F,F-F-*&)F3,*F+F5\"#?F-F7F8F/!#EF--F(6%F*,(F+F-F/F0FMF-F1F-FM*&FVF-)F
3,*F+F5\"#:F-F7F8F/F,F-F-*&F'F-FCF-FM*&)F3,*FjnF-F7F8F/\"#EF+F5F-F'F-F
-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "b15:= gpsym(7,b14);" }
}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b15G,6*&-%#gpG6%,&%\"mG\"\"#\"\"\"
F-,(F+F-F,F-%\"jG\"\"$\"\"%F-)%\"qG,*F+\"\")\"#<F-*$F/F,\"#CF/\"#AF-F-
*&-F(6%,&F+F,F0F-,(F+F-F0F-F/F0F1F-)F3,*F+F5\"#@F-F7F8F/F9F-F-*&F;F-)F
3,(\"\"*F-F7F8F/F9F-F-*&)F3,*FAF-F7F8F/\"#MF+F1F--F(6%F=,(F+F-F1F-F/F0
F1F-!\"\"*&)F3,*FEF-F7F8F/\"#5F+F1F--F(6%,&F+F,F1F-F>F1F-FM*&-F(6%,&F+
F,F,F-,(F+F-F/F0F-F-F1F-)F3,*F+F5\"#8F-F7F8F/F,F-F-*&)F3,*F+F5\"#?F-F7
F8F/!#EF--F(6%F*,(F+F-F,F-F/!\"$F1F-FM*&FVF-)F3,*F+F5\"#:F-F7F8F/F,F-F
-*&F'F-FCF-FM*&)F3,*FjnF-F7F8F/\"#EF+F5F-F'F-F-" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 20 "b16:= negate(7,b15);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$b16G,2*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-F,F-%\"jG
\"\"$\"\"%F-)%\"qG,*F+\"\")\"#<F-*$F/F,\"#CF/\"#AF-F-*&-F(6%,&F+F,F0F-
,(F+F-F0F-F/F0F1F-)F3,*F+F5\"#@F-F7F8F/F9F-F-*&F;F-)F3,(\"\"*F-F7F8F/F
9F-F-*&)F3,*FAF-F7F8F/\"#MF+F1F--F(6%F=,(F+F-F1F-F/F0F1F-!\"\"*&)F3,*F
EF-F7F8F/\"#5F+F1F--F(6%,&F+F,F1F-F>F1F-FM*&-F(6%,&F+F,F,F-,(F+F-F/F0F
-F-F1F-)F3,*F+F5\"#8F-F7F8F/F,F-F-*&FVF-)F3,*F+F5\"#:F-F7F8F/F,F-F-*&F
'F-FCF-FM" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b17:= eG1(3,b1
6);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b17G,4*&-%#gpG6%,&%\"mG\"\"#
\"\"\"F-,(F+F-F,F-%\"jG\"\"$\"\"%F-)%\"qG,*F+\"\")\"#<F-*$F/F,\"#CF/\"
#AF-F-*&-F(6%,&F+F,F0F-,(F+F-F0F-F/F0F1F-)F3,*F+F5\"#@F-F7F8F/F9F-F-*&
)F3,(\"\"*F-F7F8F/F9F--F(6%,&F+F,F,F-F.F1F-F-*&)F3,*FAF-F7F8F/\"#MF+F1
F--F(6%FHF>F1F-F-*&FJF--F(6%F=,(F+F-F1F-F/F0F1F-!\"\"*&)F3,*FEF-F7F8F/
\"#5F+F1F--F(6%,&F+F,F1F-F>F1F-FS*&-F(6%FH,(F+F-F/F0F-F-F1F-)F3,*F+F5
\"#8F-F7F8F/F,F-F-*&FfnF-)F3,*F+F5\"#:F-F7F8F/F,F-F-*&F'F-FCF-FS" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b18:= eG0(3,b17);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$b18G,2*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F
-F,F-%\"jG\"\"$\"\"%F-)%\"qG,*F+\"\")\"#<F-*$F/F,\"#CF/\"#AF-F-*&-F(6%
,&F+F,F0F-,(F+F-F0F-F/F0F1F-)F3,*F+F5\"#@F-F7F8F/F9F-F-*&)F3,*\"\"*F-F
7F8F/\"#5F+F1F--F(6%F*,(F+F-F/F0F-F-F1F-F-*&)F3,*FAF-F7F8F/\"#MF+F1F--
F(6%,&F+F,F,F-F>F1F-F-*&FKF--F(6%F=,(F+F-F1F-F/F0F1F-!\"\"*&FCF--F(6%,
&F+F,F1F-F>F1F-FU*&-F(6%FPFIF1F-)F3,*F+F5\"#8F-F7F8F/F,F-F-*&FenF-)F3,
*F+F5\"#:F-F7F8F/F,F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "
b19:= eG1(5,b18);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b19G,0*&-%#gpG
6%,&%\"mG\"\"#\"\"\"F-,(F+F-F,F-%\"jG\"\"$\"\"%F-)%\"qG,*F+\"\")\"#<F-
*$F/F,\"#CF/\"#AF-F-*&-F(6%,&F+F,F0F-,(F+F-F0F-F/F0F1F-)F3,*F+F5\"#@F-
F7F8F/F9F-F-*&)F3,*\"\"*F-F7F8F/\"#5F+F1F--F(6%F*,(F+F-F/F0F-F-F1F-F-*
&)F3,*\"#PF-F7F8F/\"#YF+F5F--F(6%,&F+F,F,F-,(F+F-F1F-F/F0F1F-!\"\"*&FC
F--F(6%,&F+F,F1F-F>F1F-FS*&-F(6%FQFIF1F-)F3,*F+F5\"#8F-F7F8F/F,F-F-*&F
YF-)F3,*F+F5\"#:F-F7F8F/F,F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 17 "b20:= eG1(5,b19);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b20G,.
*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-F,F-%\"jG\"\"$\"\"%F-)%\"qG,*F+\"
\")\"#<F-*$F/F,\"#CF/\"#AF-F-*&)F3,*\"\"*F-F7F8F/\"#5F+F1F--F(6%F*,(F+
F-F/F0F-F-F1F-F-*&)F3,*\"#PF-F7F8F/\"#YF+F5F--F(6%,&F+F,F,F-,(F+F-F1F-
F/F0F1F-!\"\"*&F;F--F(6%,&F+F,F0F-F.F1F-FK*&-F(6%FIFAF1F-)F3,*F+F5\"#8
F-F7F8F/F,F-F-*&FQF-)F3,*F+F5\"#:F-F7F8F/F,F-F-" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 17 "b21:= eG0(4,b20);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$b21G,0*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-F,F-%\"jG
\"\"$\"\"%F-)%\"qG,*F+\"\")\"#<F-*$F/F,\"#CF/\"#AF-F-*&)F3,*\"\"*F-F7F
8F/\"#5F+F1F--F(6%F*,(F+F-F/F0F-F-F1F-F-*&)F3,*\"#PF-F7F8F/\"#YF+F5F--
F(6%,&F+F,F,F-,(F+F-F1F-F/F0F1F-!\"\"*&F;F--F(6%FIF.F1F-FK*&)F3,*\"#8F
-F7F8F/!\"#F+F5F--F(6%FIFAF1F-FK*&FTF-)F3,*F+F5FRF-F7F8F/F,F-F-*&FTF-)
F3,*F+F5\"#:F-F7F8F/F,F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
17 "b22:= eG1(4,b21);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b22G,**&)%
\"qG,*\"#P\"\"\"*$%\"jG\"\"#\"#CF-\"#Y%\"mG\"\")F+-%#gpG6%,&F1F.F.F+,(
F1F+\"\"%F+F-\"\"$F8F+!\"\"*&)F(,*\"#8F+F,F/F-!\"#F1F2F+-F46%F6,(F1F+F
-F9F+F+F8F+F:*&F@F+)F(,*F1F2F>F+F,F/F-F.F+F+*&F@F+)F(,*F1F2\"#:F+F,F/F
-F.F+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "b23:= shiftdown(
1,b22);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b23G,**&)%\"qG,*\"#:\"\"
\"*$%\"jG\"\"#\"#CF-!\"#%\"mG\"\")F+-%#gpG6%,&F1F.F.F+,(F1F+F-\"\"$F+F
+\"\"%F+!\"\"*&)F(,*\"#8F+F,F/F-F0F1F2F+F3F+F:*&F3F+)F(,*F1F2F>F+F,F/F
-F.F+F+*&F3F+)F(,*F1F2F*F+F,F/F-F.F+F+" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 19 "b24:= gpsym(1,b23);" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>%$b24G,**&)%\"qG,*\"#:\"\"\"*$%\"jG\"\"#\"#CF-!\"#%\"mG\"\")F+-%#gp
G6%,&F1F.F.F+,(F1F+F+F+F-!\"$\"\"%F+!\"\"*&)F(,*\"#8F+F,F/F-F0F1F2F+-F
46%F6,(F1F+F-\"\"$F+F+F9F+F:*&F?F+)F(,*F1F2F>F+F,F/F-F.F+F+*&F?F+)F(,*
F1F2F*F+F,F/F-F.F+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "b25
:= negate(1,b24);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b25G,&*&)%\"qG
,*\"#8\"\"\"*$%\"jG\"\"#\"#CF-!\"#%\"mG\"\")F+-%#gpG6%,&F1F.F.F+,(F1F+
F-\"\"$F+F+\"\"%F+!\"\"*&F3F+)F(,*F1F2F*F+F,F/F-F.F+F+" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "b26:= gpsym(1,b25);" }}{PARA 12 "" 
1 "" {XPPMATH 20 "6#>%$b26G,&*&)%\"qG,*\"#8\"\"\"*$%\"jG\"\"#\"#CF-!\"
#%\"mG\"\")F+-%#gpG6%,&F1F.F.F+,(F1F+F+F+F-!\"$\"\"%F+!\"\"*&-F46%F6,(
F1F+F-\"\"$F+F+F9F+)F(,*F1F2F*F+F,F/F-F.F+F+" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 20 "b27:= negate(1,b26);" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%$b27G\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
0 "" }}}}{MARK "2 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }