{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.40 " }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 141 "op1:= annihiloper( qfac(q,q
^3,j+1) * qfac(q^2,q^3,j) * q^(3*j^2+3*j) / qfac(q^3,q^6,j+1) / qfac(-
q^3,q^3,j) / spqfac(q^3,q^3,j), 0, forward);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$op1G,.*$%\"NG\"\"%\"\"\"*&,&!\"\"F)*$%\"qG\"\"$F)F)F
'F/F)*&,&)F.,&%\"nGF/\"#7F)F,F-!\"#F)F'\"\"#F)*&,*)F.,&F4F/\"#5F)F))F.
,&F4F/\"#6F)F)*$F.\"\"'F,F-F)F)F'F)F)F@F))F.,&F4F/\"\"*F)F," }}}
{EXCHG {PARA 12 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 128 "### 40 even\n#     q^(18*j^2 +  7*j    ) * gp(2*m + \+
1, m + 3*j + 1, 3) \n#    -q^(18*j^2 + 11*j + 1) * gp(2*m    , m + 3*j
 + 1, 3)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 127 "### 40 odd\n# \+
    q^(18*j^2 +  7*j    ) * gp(2*m + 1, m + 3*j + 1, 3) \n#    -q^(18*
j^2 + 11*j + 1) * gp(2*m + 2, m + 3*j + 2, 3)" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 140 "Aeven:= expandall(subs(m=
n, q^(18*j^2 +  7*j    ) * gp(2*m + 1, m + 3*j + 1, 3) \n    -q^(18*j^
2 + 11*j + 1) * gp(2*m    , m + 3*j +1 ,3))); " }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%&AevenG,&*&)%\"qG,&*$%\"jG\"\"#\"#=F+\"\"(\"\"\"-%#gp
G6%,&%\"nGF,F/F/,(F4F/F+\"\"$F/F/F6F/F/*&)F(,(F*F-F+\"#6F/F/F/-F16%,$F
4F,F5F6F/!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 138 "Aodd:= e
xpandall(subs(m=n,q^(18*j^2 +  7*j    ) * gp(2*m + 1, m + 3*j + 1, 3) \+
\n    -q^(18*j^2 + 11*j + 1) * gp(2*m + 2, m + 3*j +2, 3))) ;" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%AoddG,&*&)%\"qG,&*$%\"jG\"\"#\"#=F+
\"\"(\"\"\"-%#gpG6%,&%\"nGF,F/F/,(F4F/F+\"\"$F/F/F6F/F/*&)F(,(F*F-F+\"
#6F/F/F/-F16%,&F4F,F,F/,(F4F/F+F6F,F/F6F/!\"\"" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 27 "a1:= asoe(op1, Aeven,Aodd);" }}{PARA 12 "" 1 "
" {XPPMATH 20 "6#>%#a1G,B*&-%#gpG6%,$%\"mG\"\"#,(F+\"\"\"%\"jG\"\"$F.F
.F0F.)%\"qG,(\"\"(F.*$F/F,\"#=F/\"#6F.!\"\"*&-F(6%,&F+F,F.F.F-F0F.)F2,
*F+\"\"'\"\"*F.F5F6F/F4F.F8*&F'F.)F2,*F+F?\"#5F.F5F6F/F7F.F.*&-F(6%,&F
+F,F0F.,(F+F.F/F0F,F.F0F.)F2,*F+F?\"#7F.F5F6F/F4F.F8*&-F(6%,&F+F,F,F.F
IF0F.)F2,*F+F?\"#8F.F5F6F/F7F.F.*&FFF.)F2,(F0F.F5F6F/F4F.F8*&FNF.)F2,(
\"\"%F.F5F6F/F7F.F.*&)F2,&F5F6F/F4F.-F(6%,&F+F,\"\"&F.,(F+F.F0F.F/F0F0
F.F.*&F:F.)F2,*F+F?FDF.F5F6F/F4F.F.*&FNF.)F2,*F+F?F7F.F5F6F/F7F.F8*&F:
F.)F2,*F+F?F7F.F5F6F/F4F.F.*&FNF.)F2,*F+F?FLF.F5F6F/F7F.F8*&FNF.F1F.F.
*&F:F.FUF.F.*&-F(6%,&F+F,FZF.F\\oF0F.FXF.F8*&FfnF.FFF.F8" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 41 " simplify( add(subs(\{m=8\}, a1),j=
-3..3));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 16 "a2:= eG1(13,a1);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%#a2G,D*&-%#gpG6%,$%\"mG\"\"#,(F+\"\"\"%\"jG\"\"$F.F.F
0F.)%\"qG,(\"\"(F.*$F/F,\"#=F/\"#6F.!\"\"*&-F(6%,&F+F,F.F.F-F0F.)F2,*F
+\"\"'\"\"*F.F5F6F/F4F.F8*&F'F.)F2,*F+F?\"#5F.F5F6F/F7F.F.*&-F(6%,&F+F
,F0F.,(F+F.F/F0F,F.F0F.)F2,*F+F?\"#7F.F5F6F/F4F.F8*&-F(6%,&F+F,F,F.FIF
0F.)F2,*F+F?\"#8F.F5F6F/F7F.F.*&FFF.)F2,(F0F.F5F6F/F4F.F8*&FNF.)F2,(\"
\"%F.F5F6F/F7F.F.*&)F2,&F5F6F/F4F.-F(6%,&F+F,\"\"&F.,(F+F.F0F.F/F0F0F.
F.*&F:F.)F2,*F+F?FDF.F5F6F/F4F.F.*&FNF.)F2,*F+F?F7F.F5F6F/F7F.F8*&F:F.
)F2,*F+F?F7F.F5F6F/F4F.F.*&FNF.)F2,*F+F?FLF.F5F6F/F7F.F8*&F1F.F:F.F.*&
)F2,*FSF.F5F6F/\"#?F+F0F.-F(6%F<FIF0F.F.*&F:F.FUF.F.*&-F(6%,&F+F,FZF.F
\\oF0F.FXF.F8*&FfnF.FFF.F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
16 "a3:= eG0(13,a2);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a3G,B*&-%#g
pG6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,*F+\"\"'\"\"*F-
*$F/F,\"#=F/\"\"(F-!\"\"*&-F(6%,$F+F,F.F0F-)F2,*F+F4\"#5F-F6F7F/\"#6F-
F-*&-F(6%,&F+F,F0F-,(F+F-F/F0F,F-F0F-)F2,*F+F4\"#7F-F6F7F/F8F-F9*&-F(6
%,&F+F,F,F-FFF0F-)F2,*F+F4\"#8F-F6F7F/FAF-F-*&FCF-)F2,(F0F-F6F7F/F8F-F
9*&FKF-)F2,(\"\"%F-F6F7F/FAF-F-*&)F2,&F6F7F/F8F--F(6%,&F+F,\"\"&F-,(F+
F-F0F-F/F0F0F-F-*&F'F-)F2,*F+F4F@F-F6F7F/F8F-F-*&FKF-)F2,*F+F4FAF-F6F7
F/FAF-F9*&F'F-)F2,*F+F4FAF-F6F7F/F8F-F-*&FKF-)F2,*F+F4FIF-F6F7F/FAF-F9
*&)F2,*F8F-F6F7F/F,F+F0F--F(6%F=,&F+F-F/F0F0F-F-*&)F2,*FPF-F6F7F/\"#?F
+F0F--F(6%F*FFF0F-F-*&F'F-FRF-F-*&-F(6%,&F+F,FWF-FinF0F-FUF-F9*&FYF-FC
F-F9" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a4:= eG0(5,a3);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a4G,D*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-
,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,*F+\"\"'\"\"*F-*$F/F,\"#=F/\"\"(F-!\"\"
*&-F(6%,$F+F,F.F0F-)F2,*F+F4\"#5F-F6F7F/\"#6F-F-*&-F(6%,&F+F,F0F-,(F+F
-F/F0F,F-F0F-)F2,*F+F4\"#7F-F6F7F/F8F-F9*&-F(6%,&F+F,F,F-FFF0F-)F2,*F+
F4\"#8F-F6F7F/FAF-F-*&)F2,(F0F-F6F7F/F8F-FKF-F9*&)F2,*F4F-F6F7F/!\"#F+
F0F--F(6%FMF.F0F-F9*&FKF-)F2,(\"\"%F-F6F7F/FAF-F-*&)F2,&F6F7F/F8F--F(6
%,&F+F,\"\"&F-,(F+F-F0F-F/F0F0F-F-*&F'F-)F2,*F+F4F@F-F6F7F/F8F-F-*&FKF
-)F2,*F+F4FAF-F6F7F/FAF-F9*&F'F-)F2,*F+F4FAF-F6F7F/F8F-F-*&FKF-)F2,*F+
F4FIF-F6F7F/FAF-F9*&)F2,*F8F-F6F7F/F,F+F0F--F(6%F=,&F+F-F/F0F0F-F-*&)F
2,*FPF-F6F7F/\"#?F+F0F--F(6%F*FFF0F-F-*&F'F-FRF-F-*&-F(6%,&F+F,FgnF-F_
oF0F-FenF-F9*&FinF-FCF-F9" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
15 "a5:= eG1(5,a4);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a5G,B*&-%#gp
G6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,*F+\"\"'\"\"*F-*
$F/F,\"#=F/\"\"(F-!\"\"*&-F(6%,$F+F,F.F0F-)F2,*F+F4\"#5F-F6F7F/\"#6F-F
-*&-F(6%,&F+F,F0F-,(F+F-F/F0F,F-F0F-)F2,*F+F4\"#7F-F6F7F/F8F-F9*&-F(6%
,&F+F,F,F-FFF0F-)F2,*F+F4\"#8F-F6F7F/FAF-F-*&)F2,*F5F-F6F7F/\"#;F+F0F-
-F(6%F*FFF0F-F9*&)F2,*F4F-F6F7F/!\"#F+F0F--F(6%FMF.F0F-F9*&FKF-)F2,(\"
\"%F-F6F7F/FAF-F-*&)F2,&F6F7F/F8F--F(6%,&F+F,\"\"&F-,(F+F-F0F-F/F0F0F-
F-*&F'F-)F2,*F+F4F@F-F6F7F/F8F-F-*&FKF-)F2,*F+F4FAF-F6F7F/FAF-F9*&F'F-
)F2,*F+F4FAF-F6F7F/F8F-F-*&FKF-)F2,*F+F4FIF-F6F7F/FAF-F9*&)F2,*F8F-F6F
7F/F,F+F0F--F(6%F=,&F+F-F/F0F0F-F-*&)F2,*FPF-F6F7F/\"#?F+F0F-FUF-F-*&-
F(6%,&F+F,FjnF-FboF0F-FhnF-F9*&F\\oF-FCF-F9" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 15 "a6:= eG1(8,a5);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6
#>%#a6G,D*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,
*F+\"\"'\"\"*F-*$F/F,\"#=F/\"\"(F-!\"\"*&-F(6%,$F+F,F.F0F-)F2,*F+F4\"#
5F-F6F7F/\"#6F-F-*&-F(6%,&F+F,F0F-,(F+F-F/F0F,F-F0F-)F2,*F+F4\"#7F-F6F
7F/F8F-F9*&-F(6%,&F+F,F,F-FFF0F-)F2,*F+F4\"#8F-F6F7F/FAF-F-*&)F2,*F5F-
F6F7F/\"#;F+F0F--F(6%F*FFF0F-F9*&)F2,*F4F-F6F7F/!\"#F+F0F--F(6%FMF.F0F
-F9*&FKF-)F2,(\"\"%F-F6F7F/FAF-F-*&)F2,&F6F7F/F8F--F(6%,&F+F,FjnF-FFF0
F-F-*&FRF--F(6%F`o,(F+F-F0F-F/F0F0F-F-*&F'F-)F2,*F+F4F@F-F6F7F/F8F-F-*
&FKF-)F2,*F+F4FAF-F6F7F/FAF-F9*&F'F-)F2,*F+F4FAF-F6F7F/F8F-F-*&FKF-)F2
,*F+F4FIF-F6F7F/FAF-F9*&)F2,*F8F-F6F7F/F,F+F0F--F(6%F=,&F+F-F/F0F0F-F-
*&)F2,*FPF-F6F7F/\"#?F+F0F-FUF-F-*&FboF-FhnF-F9*&F\\oF-FCF-F9" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a7:= eG0(8,a6);" }}{PARA 12 
"" 1 "" {XPPMATH 20 "6#>%#a7G,B*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"
jG\"\"$F-F-F0F-)%\"qG,*F+\"\"'\"\"*F-*$F/F,\"#=F/\"\"(F-!\"\"*&-F(6%,$
F+F,F.F0F-)F2,*F+F4\"#5F-F6F7F/\"#6F-F-*&-F(6%,&F+F,F0F-,(F+F-F/F0F,F-
F0F-)F2,*F+F4\"#7F-F6F7F/F8F-F9*&-F(6%,&F+F,F,F-FFF0F-)F2,*F+F4\"#8F-F
6F7F/FAF-F-*&)F2,*F5F-F6F7F/\"#;F+F0F--F(6%F*FFF0F-F9*&)F2,*F4F-F6F7F/
!\"#F+F0F--F(6%FMF.F0F-F9*&FKF-)F2,(\"\"%F-F6F7F/FAF-F-*&FXF--F(6%FEF.
F0F-F-*&FRF--F(6%,&F+F,FjnF-,(F+F-F0F-F/F0F0F-F-*&F'F-)F2,*F+F4F@F-F6F
7F/F8F-F-*&FKF-)F2,*F+F4FAF-F6F7F/FAF-F9*&F'F-)F2,*F+F4FAF-F6F7F/F8F-F
-*&FKF-)F2,*F+F4FIF-F6F7F/FAF-F9*&)F2,*F8F-F6F7F/F,F+F0F--F(6%F=,&F+F-
F/F0F0F-F-*&)F2,*FPF-F6F7F/\"#?F+F0F-FUF-F-*&F_oF-FhnF-F9" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "a8:= eG0(16,a7);" }}{PARA 12 "" 1 "
" {XPPMATH 20 "6#>%#a8G,D*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"jG\"\"
$F-F-F0F-)%\"qG,*F+\"\"'\"\"*F-*$F/F,\"#=F/\"\"(F-!\"\"*&-F(6%,$F+F,F.
F0F-)F2,*F+F4\"#5F-F6F7F/\"#6F-F-*&-F(6%,&F+F,F0F-,(F+F-F/F0F,F-F0F-)F
2,*F+F4\"#7F-F6F7F/F8F-F9*&-F(6%,&F+F,F,F-FFF0F-)F2,*F+F4\"#8F-F6F7F/F
AF-F-*&)F2,*F5F-F6F7F/\"#;F+F0F--F(6%F*FFF0F-F9*&)F2,*F4F-F6F7F/!\"#F+
F0F--F(6%FMF.F0F-F9*&FKF-)F2,(\"\"%F-F6F7F/FAF-F-*&FXF--F(6%FEF.F0F-F-
*&FRF--F(6%,&F+F,FjnF-,(F+F-F0F-F/F0F0F-F-*&F'F-)F2,*F+F4F@F-F6F7F/F8F
-F-*&FKF-)F2,*F+F4FAF-F6F7F/FAF-F9*&F'F-)F2,*F+F4FAF-F6F7F/F8F-F-*&FKF
-)F2,*F+F4FIF-F6F7F/FAF-F9*&)F2,*F8F-F6F7F/F,F+F0F--F(6%F=,&F+F-F/F0F0
F-F-*&)F2,*FPF-F6F7F/\"#?F+F0F-FUF-F-*&FhnF--F(6%FEFboF0F-F9*&F`pF-FCF
-F9" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "a9:= eG1(16,a8);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a9G,B*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-
,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,*F+\"\"'\"\"*F-*$F/F,\"#=F/\"\"(F-!\"\"
*&-F(6%,$F+F,F.F0F-)F2,*F+F4\"#5F-F6F7F/\"#6F-F-*&-F(6%,&F+F,F0F-,(F+F
-F/F0F,F-F0F-)F2,*F+F4\"#7F-F6F7F/F8F-F9*&-F(6%,&F+F,F,F-FFF0F-)F2,*F+
F4\"#8F-F6F7F/FAF-F-*&)F2,*F5F-F6F7F/\"#;F+F0F--F(6%F*FFF0F-F9*&)F2,*F
4F-F6F7F/!\"#F+F0F--F(6%FMF.F0F-F9*&FXF--F(6%FEF.F0F-F-*&FRF--F(6%,&F+
F,\"\"%F-,(F+F-F0F-F/F0F0F-F-*&F'F-)F2,*F+F4F@F-F6F7F/F8F-F-*&FKF-)F2,
*F+F4FAF-F6F7F/FAF-F9*&F'F-)F2,*F+F4FAF-F6F7F/F8F-F-*&FKF-)F2,*F+F4FIF
-F6F7F/FAF-F9*&)F2,*F8F-F6F7F/F,F+F0F--F(6%F=,&F+F-F/F0F0F-F-*&)F2,*FP
F-F6F7F/\"#?F+F0F-FUF-F-*&FcpF--F(6%FMF_oF0F-F9*&F]pF-FCF-F9" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "a10:= eG0(7,a9);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$a10G,@*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F
-%\"jG\"\"$F-F-F0F-)%\"qG,*F+\"\"'\"\"*F-*$F/F,\"#=F/\"\"(F-!\"\"*&-F(
6%,$F+F,F.F0F-)F2,*F+F4\"#5F-F6F7F/\"#6F-F-*&-F(6%,&F+F,F0F-,(F+F-F/F0
F,F-F0F-)F2,*F+F4\"#7F-F6F7F/F8F-F9*&-F(6%,&F+F,F,F-FFF0F-)F2,*F+F4\"#
8F-F6F7F/FAF-F-*&)F2,*F5F-F6F7F/\"#;F+F0F--F(6%F*FFF0F-F9*&)F2,*FIF-F6
F7F/!#6F+F4F--F(6%FM,&F+F-F/F0F0F-F-*&FRF--F(6%,&F+F,\"\"%F-,(F+F-F0F-
F/F0F0F-F-*&F'F-)F2,*F+F4F@F-F6F7F/F8F-F-*&FKF-)F2,*F+F4FAF-F6F7F/FAF-
F9*&F'F-)F2,*F+F4FAF-F6F7F/F8F-F-*&FKF-)F2,*F+F4FIF-F6F7F/FAF-F9*&)F2,
*F8F-F6F7F/F,F+F0F--F(6%F=FgnF0F-F-*&)F2,*FPF-F6F7F/\"#?F+F0F-FUF-F-*&
F`pF--F(6%FMF]oF0F-F9*&F[pF-FCF-F9" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "a11:= eG0(7,a10);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%$a11G,>*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,
*F+\"\"'\"\"*F-*$F/F,\"#=F/\"\"(F-!\"\"*&-F(6%,$F+F,F.F0F-)F2,*F+F4\"#
5F-F6F7F/\"#6F-F-*&-F(6%,&F+F,F,F-,(F+F-F/F0F,F-F0F-)F2,*F+F4\"#8F-F6F
7F/FAF-F-*&)F2,*F5F-F6F7F/\"#;F+F0F--F(6%F*FFF0F-F9*&)F2,*\"#7F-F6F7F/
!#6F+F4F--F(6%FE,&F+F-F/F0F0F-F-*&FKF--F(6%,&F+F,F0F-,(F+F-F0F-F/F0F0F
-F-*&F'F-)F2,*F+F4F@F-F6F7F/F8F-F-*&FCF-)F2,*F+F4FAF-F6F7F/FAF-F9*&F'F
-)F2,*F+F4FAF-F6F7F/F8F-F-*&FCF-)F2,*F+F4FSF-F6F7F/FAF-F9*&)F2,*F8F-F6
F7F/F,F+F0F--F(6%F=FWF0F-F-*&)F2,*FIF-F6F7F/\"#?F+F0F-FNF-F-*&FioF--F(
6%FEFfnF0F-F9*&FdoF--F(6%FenFFF0F-F9" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "a12:= eG1(6,a11);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%$a12G,@*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,
*F+\"\"'\"\"*F-*$F/F,\"#=F/\"\"(F-!\"\"*&-F(6%,$F+F,F.F0F-)F2,*F+F4\"#
5F-F6F7F/\"#6F-F-*&-F(6%,&F+F,F,F-,(F+F-F/F0F,F-F0F-)F2,*F+F4\"#8F-F6F
7F/FAF-F-*&)F2,*F5F-F6F7F/\"#;F+F0F--F(6%F*FFF0F-F9*&)F2,*\"#7F-F6F7F/
!#6F+F4F--F(6%FE,&F+F-F/F0F0F-F-*&FKF-FCF-F-*&)F2,*F7F-F6F7F/\"#DF+F4F
--F(6%FE,(F+F-F0F-F/F0F0F-F-*&F'F-)F2,*F+F4F@F-F6F7F/F8F-F-*&FCF-)F2,*
F+F4FAF-F6F7F/FAF-F9*&F'F-)F2,*F+F4FAF-F6F7F/F8F-F-*&FCF-)F2,*F+F4FSF-
F6F7F/FAF-F9*&)F2,*F8F-F6F7F/F,F+F0F--F(6%F=FWF0F-F-*&)F2,*FIF-F6F7F/
\"#?F+F0F-FNF-F-*&F\\pF-FgnF-F9*&FgoF--F(6%,&F+F,F0F-FFF0F-F9" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "a13:=eG0(6,a12);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$a13G,:*&-%#gpG6%,$%\"mG\"\"#,(F+\"\"\"%\"
jG\"\"$F.F.F0F.)%\"qG,*F+\"\"'\"#5F.*$F/F,\"#=F/\"#6F.F.*&-F(6%,&F+F,F
,F.,(F+F.F/F0F,F.F0F.)F2,*F+F4\"#8F.F6F7F/F8F.F.*&)F2,*\"#7F.F6F7F/!#6
F+F4F.-F(6%F<,&F+F.F/F0F0F.F.*&)F2,*F7F.F6F7F/\"#DF+F4F.-F(6%F<,(F+F.F
0F.F/F0F0F.F.*&-F(6%,&F+F,F.F.F-F0F.)F2,*F+F4F5F.F6F7F/\"\"(F.F.*&F:F.
)F2,*F+F4F8F.F6F7F/F8F.!\"\"*&FQF.)F2,*F+F4F8F.F6F7F/FVF.F.*&F:F.)F2,*
F+F4FDF.F6F7F/F8F.FZ*&)F2,*FVF.F6F7F/F,F+F0F.-F(6%F*FHF0F.F.*&)F2,*F@F
.F6F7F/\"#?F+F0F.-F(6%FSF=F0F.F.*&FaoF.FMF.FZ*&F\\oF.-F(6%,&F+F,F0F.F=
F0F.FZ" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "a14:= shiftdown(4
,a13);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a14G,:*&-%#gpG6%,$%\"mG\"
\"#,(F+\"\"\"%\"jG\"\"$F.F.F0F.)%\"qG,*F+\"\"'\"#5F.*$F/F,\"#=F/\"#6F.
F.*&-F(6%,&F+F,F,F.,(F+F.F/F0F,F.F0F.)F2,*F+F4\"#8F.F6F7F/F8F.F.*&)F2,
*\"#7F.F6F7F/!#6F+F4F.-F(6%F<,&F+F.F/F0F0F.F.*&)F2,*F8F.F6F7F/FEF+F4F.
FFF.F.*&-F(6%,&F+F,F.F.F-F0F.)F2,*F+F4F5F.F6F7F/\"\"(F.F.*&F:F.)F2,*F+
F4F8F.F6F7F/F8F.!\"\"*&FMF.)F2,*F+F4F8F.F6F7F/FRF.F.*&F:F.)F2,*F+F4FDF
.F6F7F/F8F.FV*&)F2,*FRF.F6F7F/F,F+F0F.-F(6%F*FHF0F.F.*&)F2,*F@F.F6F7F/
\"#?F+F0F.-F(6%FOF=F0F.F.*&F]oF.-F(6%F<,(F+F.F0F.F/F0F0F.FV*&FhnF.-F(6
%,&F+F,F0F.F=F0F.FV" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a15:
= eG1(11,a14);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a15G,8*&-%#gpG6%,
$%\"mG\"\"#,(F+\"\"\"%\"jG\"\"$F.F.F0F.)%\"qG,*F+\"\"'\"#5F.*$F/F,\"#=
F/\"#6F.F.*&-F(6%,&F+F,F,F.,(F+F.F/F0F,F.F0F.)F2,*F+F4\"#8F.F6F7F/F8F.
F.*&)F2,*\"#7F.F6F7F/!#6F+F4F.-F(6%F<,&F+F.F/F0F0F.F.*&)F2,*F8F.F6F7F/
FEF+F4F.FFF.F.*&-F(6%,&F+F,F.F.F-F0F.)F2,*F+F4F5F.F6F7F/\"\"(F.F.*&F:F
.)F2,*F+F4F8F.F6F7F/F8F.!\"\"*&FMF.)F2,*F+F4F8F.F6F7F/FRF.F.*&F:F.)F2,
*F+F4FDF.F6F7F/F8F.FV*&)F2,*FRF.F6F7F/F,F+F0F.-F(6%F*FHF0F.F.*&)F2,*\"
#AF.F6F7F/\"#HF+F4F.-F(6%FO,(F+F.F0F.F/F0F0F.FV*&FhnF.-F(6%,&F+F,F0F.F
=F0F.FV" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a16:= eG1(11,a15
);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a16G,6*&-%#gpG6%,$%\"mG\"\"#,
(F+\"\"\"%\"jG\"\"$F.F.F0F.)%\"qG,*F+\"\"'\"#5F.*$F/F,\"#=F/\"#6F.F.*&
)F2,*\"#7F.F6F7F/!#6F+F4F.-F(6%,&F+F,F,F.,&F+F.F/F0F0F.F.*&)F2,*F8F.F6
F7F/F=F+F4F.F>F.F.*&-F(6%,&F+F,F.F.F-F0F.)F2,*F+F4F5F.F6F7F/\"\"(F.F.*
&-F(6%F@,(F+F.F/F0F,F.F0F.)F2,*F+F4F8F.F6F7F/F8F.!\"\"*&FFF.)F2,*F+F4F
8F.F6F7F/FKF.F.*&FMF.)F2,*F+F4F<F.F6F7F/F8F.FR*&)F2,*FKF.F6F7F/F,F+F0F
.-F(6%F*FAF0F.F.*&)F2,*\"#AF.F6F7F/\"#HF+F4F.-F(6%FH,(F+F.F0F.F/F0F0F.
FR*&FZF.-F(6%F@F-F0F.FR" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "
a17:= eG1(10,a16);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a17G,8*&-%#gp
G6%,$%\"mG\"\"#,(F+\"\"\"%\"jG\"\"$F.F.F0F.)%\"qG,*F+\"\"'\"#5F.*$F/F,
\"#=F/\"#6F.F.*&)F2,*\"#7F.F6F7F/!#6F+F4F.-F(6%,&F+F,F,F.,&F+F.F/F0F0F
.F.*&)F2,*F8F.F6F7F/F=F+F4F.F>F.F.*&-F(6%,&F+F,F.F.F-F0F.)F2,*F+F4F5F.
F6F7F/\"\"(F.F.*&-F(6%F@,(F+F.F/F0F,F.F0F.)F2,*F+F4F8F.F6F7F/F8F.!\"\"
*&FFF.)F2,*F+F4F8F.F6F7F/FKF.F.*&FMF.)F2,*F+F4F<F.F6F7F/F8F.FR*&)F2,*F
KF.F6F7F/F,F+F0F.-F(6%F*FAF0F.F.*&)F2,*\"#AF.F6F7F/\"#HF+F4F.-F(6%FH,(
F+F.F0F.F/F0F0F.FR*&FZF.-F(6%FHFAF0F.FR*&F1F.FFF.FR" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 18 "a18:= eG0(10,a17);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$a18G,6*&-%#gpG6%,$%\"mG\"\"#,(F+\"\"\"%\"jG\"\"$F.F.
F0F.)%\"qG,*F+\"\"'\"#5F.*$F/F,\"#=F/\"#6F.F.*&)F2,*\"#7F.F6F7F/!#6F+F
4F.-F(6%,&F+F,F,F.,&F+F.F/F0F0F.F.*&)F2,*F8F.F6F7F/F=F+F4F.F>F.F.*&-F(
6%,&F+F,F.F.F-F0F.)F2,*F+F4F5F.F6F7F/\"\"(F.F.*&-F(6%F@,(F+F.F/F0F,F.F
0F.)F2,*F+F4F8F.F6F7F/F8F.!\"\"*&FFF.)F2,*F+F4F8F.F6F7F/FKF.F.*&FMF.)F
2,*F+F4F<F.F6F7F/F8F.FR*&)F2,*\"#AF.F6F7F/\"#HF+F4F.-F(6%FH,(F+F.F0F.F
/F0F0F.FR*&)F2,*F5F.F6F7F/!\"(F+F4F.-F(6%F*,(F+F.F/F0FRF.F0F.FR*&F1F.F
FF.FR" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a19:= eG0(10,a18);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a19G,4*&)%\"qG,*\"#7\"\"\"*$%\"
jG\"\"#\"#=F-!#6%\"mG\"\"'F+-%#gpG6%,&F1F.F.F+,&F1F+F-\"\"$F8F+F+*&)F(
,*\"#6F+F,F/F-F0F1F2F+F3F+F+*&-F46%,&F1F.F+F+,(F1F+F-F8F+F+F8F+)F(,*F1
F2\"#5F+F,F/F-\"\"(F+F+*&-F46%F6,(F1F+F-F8F.F+F8F+)F(,*F1F2F<F+F,F/F-F
<F+!\"\"*&F>F+)F(,*F1F2F<F+F,F/F-FEF+F+*&FGF+)F(,*F1F2F*F+F,F/F-F<F+FL
*&)F(,*\"#AF+F,F/F-\"#HF1F2F+-F46%F@,(F1F+F8F+F-F8F8F+FL*&)F(,*FDF+F,F
/F-!\"(F1F2F+-F46%,$F1F.,(F1F+F-F8FLF+F8F+FL*&)F(,*F1\"\"*FDF+F,F/F-F.
F+-F46%F[oF7F8F+FL" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 " simp
lify(add(  subs(\{m=7,a=1\},a19),j=-3..3));" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "a20
:= shiftdown(7,a19);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a20G,4*&)%
\"qG,*\"#7\"\"\"*$%\"jG\"\"#\"#=F-!#6%\"mG\"\"'F+-%#gpG6%,&F1F.F.F+,&F
1F+F-\"\"$F8F+F+*&)F(,*\"#6F+F,F/F-F0F1F2F+F3F+F+*&-F46%,&F1F.F+F+,(F1
F+F-F8F+F+F8F+)F(,*F1F2\"#5F+F,F/F-\"\"(F+F+*&-F46%F6,(F1F+F-F8F.F+F8F
+)F(,*F1F2F<F+F,F/F-F<F+!\"\"*&F>F+)F(,*F1F2F<F+F,F/F-FEF+F+*&FGF+)F(,
*F1F2F*F+F,F/F-F<F+FL*&)F(,*F<F+F,F/F-!\"(F1F2F+-F46%F@F7F8F+FL*&)F(,*
FDF+F,F/F-FVF1F2F+-F46%,$F1F.,(F1F+F-F8FLF+F8F+FL*&)F(,*F1\"\"*FDF+F,F
/F-F.F+-F46%FhnF7F8F+FL" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "
a21:= gpsym(7,a20);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a21G,4*&)%\"
qG,*\"#7\"\"\"*$%\"jG\"\"#\"#=F-!#6%\"mG\"\"'F+-%#gpG6%,&F1F.F.F+,&F1F
+F-\"\"$F8F+F+*&)F(,*\"#6F+F,F/F-F0F1F2F+F3F+F+*&-F46%,&F1F.F+F+,(F1F+
F-F8F+F+F8F+)F(,*F1F2\"#5F+F,F/F-\"\"(F+F+*&-F46%F6,(F1F+F-F8F.F+F8F+)
F(,*F1F2F<F+F,F/F-F<F+!\"\"*&F>F+)F(,*F1F2F<F+F,F/F-FEF+F+*&FGF+)F(,*F
1F2F*F+F,F/F-F<F+FL*&)F(,*F<F+F,F/F-!\"(F1F2F+-F46%F@,(F1F+F+F+F-!\"$F
8F+FL*&)F(,*FDF+F,F/F-FVF1F2F+-F46%,$F1F.,(F1F+F-F8FLF+F8F+FL*&)F(,*F1
\"\"*FDF+F,F/F-F.F+-F46%FjnF7F8F+FL" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 19 "a22:=negate(7,a21);" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>%$a22G,0*&)%\"qG,*\"#7\"\"\"*$%\"jG\"\"#\"#=F-!#6%\"mG\"\"'F+-%#gpG
6%,&F1F.F.F+,&F1F+F-\"\"$F8F+F+*&)F(,*\"#6F+F,F/F-F0F1F2F+F3F+F+*&-F46
%,&F1F.F+F+,(F1F+F-F8F+F+F8F+)F(,*F1F2\"#5F+F,F/F-\"\"(F+F+*&-F46%F6,(
F1F+F-F8F.F+F8F+)F(,*F1F2F<F+F,F/F-F<F+!\"\"*&FGF+)F(,*F1F2F*F+F,F/F-F
<F+FL*&)F(,*FDF+F,F/F-!\"(F1F2F+-F46%,$F1F.,(F1F+F-F8FLF+F8F+FL*&)F(,*
F1\"\"*FDF+F,F/F-F.F+-F46%FVF7F8F+FL" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 19 "a23:= gpsym(1,a22);" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>%$a23G,0*&)%\"qG,*\"#7\"\"\"*$%\"jG\"\"#\"#=F-!#6%\"mG\"\"'F+-%#gpG
6%,&F1F.F.F+,(F1F+F.F+F-!\"$\"\"$F+F+*&)F(,*\"#6F+F,F/F-F0F1F2F+-F46%F
6,&F1F+F-F9F9F+F+*&-F46%,&F1F.F+F+,(F1F+F-F9F+F+F9F+)F(,*F1F2\"#5F+F,F
/F-\"\"(F+F+*&-F46%F6,(F1F+F-F9F.F+F9F+)F(,*F1F2F=F+F,F/F-F=F+!\"\"*&F
KF+)F(,*F1F2F*F+F,F/F-F=F+FP*&)F(,*FHF+F,F/F-!\"(F1F2F+-F46%,$F1F.,(F1
F+F-F9FPF+F9F+FP*&)F(,*F1\"\"*FHF+F,F/F-F.F+-F46%FZF@F9F+FP" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "a24:= negate(1,a23);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a24G,,*&)%\"qG,*\"#6\"\"\"*$%\"jG\"
\"#\"#=F-!#6%\"mG\"\"'F+-%#gpG6%,&F1F.F.F+,&F1F+F-\"\"$F8F+F+*&-F46%,&
F1F.F+F+,(F1F+F-F8F+F+F8F+)F(,*F1F2\"#5F+F,F/F-\"\"(F+F+*&-F46%F6,(F1F
+F-F8F.F+F8F+)F(,*F1F2F*F+F,F/F-F*F+!\"\"*&)F(,*F@F+F,F/F-!\"(F1F2F+-F
46%,$F1F.,(F1F+F-F8FHF+F8F+FH*&)F(,*F1\"\"*F@F+F,F/F-F.F+-F46%FOF7F8F+
FH" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "a25:= gpsym(1,a24);" 
}}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a25G,,*&)%\"qG,*\"#6\"\"\"*$%\"jG
\"\"#\"#=F-!#6%\"mG\"\"'F+-%#gpG6%,&F1F.F.F+,(F1F+F.F+F-!\"$\"\"$F+F+*
&-F46%,&F1F.F+F+,(F1F+F-F9F+F+F9F+)F(,*F1F2\"#5F+F,F/F-\"\"(F+F+*&-F46
%F6,(F1F+F-F9F.F+F9F+)F(,*F1F2F*F+F,F/F-F*F+!\"\"*&)F(,*FAF+F,F/F-!\"(
F1F2F+-F46%,$F1F.,(F1F+F-F9FIF+F9F+FI*&)F(,*F1\"\"*FAF+F,F/F-F.F+-F46%
FP,&F1F+F-F9F9F+FI" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "a26:=
 negate(1,a25);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a26G,(*&-%#gpG6%
,&%\"mG\"\"#\"\"\"F-,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,*F+\"\"'\"#5F-*$F/F
,\"#=F/\"\"(F-F-*&)F2,*F5F-F6F7F/!\"(F+F4F--F(6%,$F+F,,(F+F-F/F0!\"\"F
-F0F-FA*&)F2,*F+\"\"*F5F-F6F7F/F,F--F(6%F?,&F+F-F/F0F0F-FA" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "a27:= gpsym(2,a26);" }}{PARA 12 "" 
1 "" {XPPMATH 20 "6#>%$a27G,(*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"jG
\"\"$F-F-F0F-)%\"qG,*F+\"\"'\"#5F-*$F/F,\"#=F/\"\"(F-F-*&)F2,*F5F-F6F7
F/!\"(F+F4F--F(6%,$F+F,,(F+F-F-F-F/!\"$F0F-!\"\"*&)F2,*F+\"\"*F5F-F6F7
F/F,F--F(6%F?,&F+F-F/F0F0F-FB" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 20 "a28:= negate(2,a27);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a28G,
(*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,*F+\"\"'
\"#5F-*$F/F,\"#=F/\"\"(F-F-*&F1F--F(6%,$F+F,F.F0F-!\"\"*&)F2,*F+\"\"*F
5F-F6F7F/F,F--F(6%F<,&F+F-F/F0F0F-F=" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "a29:= eG0(1,a28);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#
>%$a29G,&*&)%\"qG,*%\"mG\"\"*\"#5\"\"\"*$%\"jG\"\"#\"#=F/!\"#F--%#gpG6
%,$F*F0,&F*F-F/\"\"$F8F-F-*&)F(,*F*F+F,F-F.F1F/F0F-F3F-!\"\"" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "a30:= gpsym(1,a29);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$a30G,&*&)%\"qG,*%\"mG\"\"*\"#5\"\"
\"*$%\"jG\"\"#\"#=F/!\"#F--%#gpG6%,$F*F0,&F*F-F/!\"$\"\"$F-F-*&)F(,*F*
F+F,F-F.F1F/F0F--F46%F6,&F*F-F/F9F9F-!\"\"" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 20 "a31:= negate(1,a30);" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#>%$a31G\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "#####
#####" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 28 "b1:= asoo(op1, Aeven, Aodd);" }}{PARA 12 
"" 1 "" {XPPMATH 20 "6#>%#b1G,B*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"
jG\"\"$F-F-F0F-)%\"qG,(\"\"'F-*$F/F,\"#=F/\"\"(F-F-*&F'F-)F2,*F+F4\"#7
F-F5F6F/F7F-!\"\"*&)F2,*F+F4\"#8F-F5F6F/\"#6F--F(6%,&F+F,F,F-,(F+F-F/F
0F,F-F0F-F-*&)F2,*F+F4\"#:F-F5F6F/F7F--F(6%,&F+F,F0F-FEF0F-F<*&)F2,*F+
F4\"#;F-F5F6F/FAF--F(6%,&F+F,\"\"%F-,(F+F-F0F-F/F0F0F-F-*&)F2,(F0F-F5F
6F/F7F-FJF-F<*&)F2,(FTF-F5F6F/FAF-FQF-F-*&)F2,(F5F6F/FAF-F-F--F(6%,&F+
F,F4F-,(F+F-FTF-F/F0F0F-F<*&)F2,*F+F4F@F-F5F6F/F7F-FJF-F-*&)F2,*F+F4\"
#9F-F5F6F/FAF-FBF-F<*&)F2,*F+F4FcoF-F5F6F/F7F-FJF-F-*&)F2,*F+F4FIF-F5F
6F/FAF-FBF-F<*&F1F-FJF-F<*&FZF-FBF-F<*&FgnF-FQF-F-*&FWF--F(6%,&F+F,\"
\"&F-FUF0F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b2:= eG0(1
3,b1);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b2G,D*&-%#gpG6%,&%\"mG\"
\"#\"\"\"F-,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,(\"\"'F-*$F/F,\"#=F/\"\"(F-F
-*&F'F-)F2,*F+F4\"#7F-F5F6F/F7F-!\"\"*&)F2,*F+F4\"#8F-F5F6F/\"#6F--F(6
%,&F+F,F,F-,(F+F-F/F0F,F-F0F-F-*&)F2,*F+F4\"#:F-F5F6F/F7F--F(6%,&F+F,F
0F-FEF0F-F<*&)F2,*F+F4\"#;F-F5F6F/FAF--F(6%,&F+F,\"\"%F-,(F+F-F0F-F/F0
F0F-F-*&)F2,(F0F-F5F6F/F7F-FJF-F<*&)F2,(FTF-F5F6F/FAF-FQF-F-*&)F2,(F5F
6F/FAF-F-F--F(6%,&F+F,F4F-,(F+F-FTF-F/F0F0F-F<*&)F2,*F+F4F@F-F5F6F/F7F
-FJF-F-*&)F2,*F+F4\"#9F-F5F6F/FAF-FBF-F<*&)F2,*F+F4FcoF-F5F6F/F7F-FJF-
F-*&)F2,*F+F4FIF-F5F6F/FAF-FBF-F<*&F1F-FBF-F<*&)F2,*\"\"*F-F5F6F/!\"#F
+F0F--F(6%FDF.F0F-F<*&FZF-FBF-F<*&FgnF-FQF-F-*&FWF--F(6%,&F+F,\"\"&F-F
UF0F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b3:= eG1(13,b2);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b3G,B*&-%#gpG6%,&%\"mG\"\"#\"\"
\"F-,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,*F+\"\"'\"#7F-*$F/F,\"#=F/\"\"(F-!
\"\"*&)F2,*F+F4\"#8F-F6F7F/\"#6F--F(6%,&F+F,F,F-,(F+F-F/F0F,F-F0F-F-*&
)F2,*F+F4\"#:F-F6F7F/F8F--F(6%,&F+F,F0F-FBF0F-F9*&)F2,*F+F4\"#;F-F6F7F
/F>F--F(6%,&F+F,\"\"%F-,(F+F-F0F-F/F0F0F-F-*&)F2,(F0F-F6F7F/F8F-FGF-F9
*&)F2,(FQF-F6F7F/F>F-FNF-F-*&)F2,(F6F7F/F>F-F-F--F(6%,&F+F,F4F-,(F+F-F
QF-F/F0F0F-F9*&)F2,*F+F4F=F-F6F7F/F8F-FGF-F-*&)F2,*F+F4\"#9F-F6F7F/F>F
-F?F-F9*&)F2,*F+F4F`oF-F6F7F/F8F-FGF-F-*&)F2,*F+F4FFF-F6F7F/F>F-F?F-F9
*&)F2,*F5F-F6F7F/FMF+F0F--F(6%F*FBF0F-F9*&)F2,*\"\"*F-F6F7F/!\"#F+F0F-
-F(6%FAF.F0F-F9*&FWF-F?F-F9*&FZF-FNF-F-*&FTF--F(6%,&F+F,\"\"&F-FRF0F-F
-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b4:= eG1(16,b3);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b4G,D*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-
,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,*F+\"\"'\"#7F-*$F/F,\"#=F/\"\"(F-!\"\"*
&)F2,*F+F4\"#8F-F6F7F/\"#6F--F(6%,&F+F,F,F-,(F+F-F/F0F,F-F0F-F-*&)F2,*
F+F4\"#:F-F6F7F/F8F--F(6%,&F+F,F0F-FBF0F-F9*&)F2,*F+F4\"#;F-F6F7F/F>F-
-F(6%,&F+F,\"\"%F-,(F+F-F0F-F/F0F0F-F-*&)F2,(F0F-F6F7F/F8F-FGF-F9*&)F2
,(FQF-F6F7F/F>F-FNF-F-*&)F2,(F6F7F/F>F-F-F--F(6%,&F+F,F4F-,(F+F-FQF-F/
F0F0F-F9*&)F2,*F+F4F=F-F6F7F/F8F-FGF-F-*&)F2,*F+F4\"#9F-F6F7F/F>F-F?F-
F9*&)F2,*F+F4F`oF-F6F7F/F8F-FGF-F-*&)F2,*F+F4FFF-F6F7F/F>F-F?F-F9*&)F2
,*F5F-F6F7F/FMF+F0F--F(6%F*FBF0F-F9*&)F2,*\"\"*F-F6F7F/!\"#F+F0F--F(6%
FAF.F0F-F9*&FWF-F?F-F9*&FZF-FNF-F-*&FTF--F(6%FPFBF0F-F-*&FhoF-FNF-F-" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b5:= eG0(16,b4);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b5G,B*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-
,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,*F+\"\"'\"#7F-*$F/F,\"#=F/\"\"(F-!\"\"*
&)F2,*F+F4\"#8F-F6F7F/\"#6F--F(6%,&F+F,F,F-,(F+F-F/F0F,F-F0F-F-*&)F2,*
F+F4\"#:F-F6F7F/F8F--F(6%,&F+F,F0F-FBF0F-F9*&)F2,*F+F4\"#;F-F6F7F/F>F-
-F(6%,&F+F,\"\"%F-,(F+F-F0F-F/F0F0F-F-*&)F2,(FQF-F6F7F/F>F-FNF-F-*&)F2
,(F6F7F/F>F-F-F--F(6%,&F+F,F4F-,(F+F-FQF-F/F0F0F-F9*&)F2,*F+F4F=F-F6F7
F/F8F-FGF-F-*&)F2,*F+F4\"#9F-F6F7F/F>F-F?F-F9*&)F2,*F+F4F]oF-F6F7F/F8F
-FGF-F-*&)F2,*F+F4FFF-F6F7F/F>F-F?F-F9*&)F2,*F5F-F6F7F/FMF+F0F--F(6%F*
FBF0F-F9*&)F2,*\"\"*F-F6F7F/!\"#F+F0F--F(6%FAF.F0F-F9*&FTF-F?F-F9*&FWF
-FNF-F-*&FjoF--F(6%FIF.F0F-F-*&FeoF-FNF-F-" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 15 "b6:= eG0(5,b5);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%#b6G,D*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,*
F+\"\"'\"#7F-*$F/F,\"#=F/\"\"(F-!\"\"*&)F2,*F+F4\"#8F-F6F7F/\"#6F--F(6
%,&F+F,F,F-,(F+F-F/F0F,F-F0F-F-*&)F2,*F+F4\"#:F-F6F7F/F8F--F(6%,&F+F,F
0F-FBF0F-F9*&)F2,*F+F4\"#;F-F6F7F/F>F--F(6%,&F+F,\"\"%F-,(F+F-F0F-F/F0
F0F-F-*&)F2,(FQF-F6F7F/F>F--F(6%FIFRF0F-F-*&)F2,*F8F-F6F7F/F,F+F0F-FGF
-F-*&)F2,(F6F7F/F>F-F-F--F(6%,&F+F,F4F-,(F+F-FQF-F/F0F0F-F9*&)F2,*F+F4
F=F-F6F7F/F8F-FGF-F-*&)F2,*F+F4\"#9F-F6F7F/F>F-F?F-F9*&)F2,*F+F4FboF-F
6F7F/F8F-FGF-F-*&)F2,*F+F4FFF-F6F7F/F>F-F?F-F9*&)F2,*F5F-F6F7F/FMF+F0F
--F(6%F*FBF0F-F9*&)F2,*\"\"*F-F6F7F/!\"#F+F0F--F(6%FAF.F0F-F9*&FTF-F?F
-F9*&FfnF-FNF-F-*&F_pF--F(6%FIF.F0F-F-*&FjoF-FNF-F-" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 15 "b7:= eG1(5,b6);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%#b7G,B*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"jG\"\"$F
-F-F0F-)%\"qG,*F+\"\"'\"#7F-*$F/F,\"#=F/\"\"(F-!\"\"*&)F2,*F+F4\"#8F-F
6F7F/\"#6F--F(6%,&F+F,F,F-,(F+F-F/F0F,F-F0F-F-*&)F2,*F+F4\"#:F-F6F7F/F
8F--F(6%,&F+F,F0F-FBF0F-F9*&)F2,*F+F4\"#;F-F6F7F/F>F--F(6%,&F+F,\"\"%F
-,(F+F-F0F-F/F0F0F-F-*&)F2,*F=F-F6F7F/\"#?F+F0F--F(6%FAFRF0F-F-*&)F2,*
F8F-F6F7F/F,F+F0F-FGF-F-*&)F2,(F6F7F/F>F-F-F--F(6%,&F+F,F4F-,(F+F-FQF-
F/F0F0F-F9*&)F2,*F+F4F=F-F6F7F/F8F-FGF-F-*&)F2,*F+F4\"#9F-F6F7F/F>F-F?
F-F9*&)F2,*F+F4FcoF-F6F7F/F8F-FGF-F-*&)F2,*F+F4FFF-F6F7F/F>F-F?F-F9*&)
F2,*F5F-F6F7F/FMF+F0F--F(6%F*FBF0F-F9*&)F2,*\"\"*F-F6F7F/!\"#F+F0F--F(
6%FAF.F0F-F9*&FgnF-FNF-F-*&F`pF--F(6%FIF.F0F-F-*&F[pF-FNF-F-" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b8:= eG0(15,b7);" }}{PARA 0 
"> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b8G,@
*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,*F+\"\"'
\"#7F-*$F/F,\"#=F/\"\"(F-!\"\"*&)F2,*F+F4\"#8F-F6F7F/\"#6F--F(6%,&F+F,
F,F-,(F+F-F/F0F,F-F0F-F-*&)F2,*F+F4\"#:F-F6F7F/F8F--F(6%,&F+F,F0F-FBF0
F-F9*&)F2,*F+F4\"#;F-F6F7F/F>F--F(6%,&F+F,\"\"%F-,(F+F-F0F-F/F0F0F-F-*
&)F2,*F=F-F6F7F/\"#?F+F0F--F(6%FAFRF0F-F-*&)F2,*F8F-F6F7F/F,F+F0F-FGF-
F-*&)F2,(F6F7F/F>F-F-F--F(6%,&F+F,F4F-,(F+F-FQF-F/F0F0F-F9*&)F2,*F+F4F
=F-F6F7F/F8F-FGF-F-*&)F2,*F+F4\"#9F-F6F7F/F>F-F?F-F9*&)F2,*F+F4FcoF-F6
F7F/F8F-FGF-F-*&)F2,*F+F4FFF-F6F7F/F>F-F?F-F9*&)F2,*F5F-F6F7F/FMF+F0F-
-F(6%F*FBF0F-F9*&FgnF-FNF-F-*&)F2,*FFF-F6F7F/!#6F+F4F--F(6%FA,&F+F-F/F
0F0F-F-*&F[pF-FNF-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b9:
= eG0(15,b8);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b9G,>*&-%#gpG6%,&%
\"mG\"\"#\"\"\"F-,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,*F+\"\"'\"#7F-*$F/F,\"
#=F/\"\"(F-!\"\"*&)F2,*F+F4\"#8F-F6F7F/\"#6F--F(6%,&F+F,F,F-,(F+F-F/F0
F,F-F0F-F-*&)F2,*F+F4\"#;F-F6F7F/F>F--F(6%,&F+F,\"\"%F-,(F+F-F0F-F/F0F
0F-F-*&)F2,*F=F-F6F7F/\"#?F+F0F--F(6%FAFKF0F-F-*&)F2,*F8F-F6F7F/F,F+F0
F--F(6%,&F+F,F0F-FBF0F-F-*&)F2,(F6F7F/F>F-F-F--F(6%,&F+F,F4F-,(F+F-FJF
-F/F0F0F-F9*&)F2,*F+F4F=F-F6F7F/F8F-FUF-F-*&)F2,*F+F4\"#9F-F6F7F/F>F-F
?F-F9*&)F2,*F+F4F_oF-F6F7F/F8F-FUF-F-*&)F2,*F+F4\"#:F-F6F7F/F>F-F?F-F9
*&)F2,*F5F-F6F7F/FFF+F0F--F(6%F*FBF0F-F9*&FYF-FGF-F-*&)F2,*FfoF-F6F7F/
!#6F+F4F--F(6%FA,&F+F-F/F0F0F-F-*&FhoF--F(6%FWFKF0F-F-" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b10:= eG0(14,b9);" }}{PARA 12 "" 1 
"" {XPPMATH 20 "6#>%$b10G,@*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"jG\"
\"$F-F-F0F-)%\"qG,*F+\"\"'\"#7F-*$F/F,\"#=F/\"\"(F-!\"\"*&)F2,*F+F4\"#
8F-F6F7F/\"#6F--F(6%,&F+F,F,F-,(F+F-F/F0F,F-F0F-F-*&)F2,*F+F4\"#;F-F6F
7F/F>F--F(6%,&F+F,\"\"%F-,(F+F-F0F-F/F0F0F-F-*&)F2,*F=F-F6F7F/\"#?F+F0
F--F(6%FAFKF0F-F-*&)F2,*F8F-F6F7F/F,F+F0F--F(6%,&F+F,F0F-FBF0F-F-*&)F2
,(F6F7F/F>F-F-F--F(6%,&F+F,F4F-,(F+F-FJF-F/F0F0F-F9*&)F2,*F+F4F=F-F6F7
F/F8F-FUF-F-*&)F2,*F+F4\"#9F-F6F7F/F>F-F?F-F9*&)F2,*F+F4F_oF-F6F7F/F8F
-FUF-F-*&)F2,*F+F4\"#:F-F6F7F/F>F-F?F-F9*&)F2,*F5F-F6F7F/FFF+F0F--F(6%
F*FBF0F-F9*&FYF-FGF-F-*&)F2,*FfoF-F6F7F/!#6F+F4F--F(6%FA,&F+F-F/F0F0F-
F-*&FhoF-FPF-F-*&F1F-F?F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
18 "b11:= eG1(14,b10);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b11G,>*&-
%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"jG\"\"$F-F-F0F-)%\"qG,*F+\"\"'\"#7
F-*$F/F,\"#=F/\"\"(F-!\"\"*&)F2,*F+F4\"#8F-F6F7F/\"#6F--F(6%,&F+F,F,F-
,(F+F-F/F0F,F-F0F-F-*&)F2,*F+F4\"#;F-F6F7F/F>F--F(6%,&F+F,\"\"%F-,(F+F
-F0F-F/F0F0F-F-*&)F2,*F=F-F6F7F/\"#?F+F0F--F(6%FAFKF0F-F-*&)F2,*F8F-F6
F7F/F,F+F0F--F(6%,&F+F,F0F-FBF0F-F-*&)F2,(F6F7F/F>F-F-F--F(6%,&F+F,F4F
-,(F+F-FJF-F/F0F0F-F9*&)F2,*F+F4F=F-F6F7F/F8F-FUF-F-*&)F2,*F+F4\"#9F-F
6F7F/F>F-F?F-F9*&)F2,*F+F4F_oF-F6F7F/F8F-FUF-F-*&)F2,*F+F4\"#:F-F6F7F/
F>F-F?F-F9*&FYF-FGF-F-*&)F2,*FfoF-F6F7F/!#6F+F4F--F(6%FA,&F+F-F/F0F0F-
F-*&)F2,*\"#@F-F6F7F/\"#DF+F4F--F(6%F*FKF0F-F-*&F1F-F?F-F-" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "b12:= eG1(14,b11);" }}{PARA 12 "" 
1 "" {XPPMATH 20 "6#>%$b12G,<*&)%\"qG,*%\"mG\"\"'\"#8\"\"\"*$%\"jG\"\"
#\"#=F/\"#6F--%#gpG6%,&F*F0F0F-,(F*F-F/\"\"$F0F-F8F-F-*&)F(,*F*F+\"#;F
-F.F1F/F2F--F46%,&F*F0\"\"%F-,(F*F-F8F-F/F8F8F-F-*&)F(,*F,F-F.F1F/\"#?
F*F8F--F46%F6FAF8F-F-*&)F(,*\"\"(F-F.F1F/F0F*F8F--F46%,&F*F0F8F-F7F8F-
F-*&)F(,(F.F1F/F2F-F-F--F46%,&F*F0F+F-,(F*F-F@F-F/F8F8F-!\"\"*&)F(,*F*
F+F,F-F.F1F/FKF-FLF-F-*&)F(,*F*F+\"#9F-F.F1F/F2F-F3F-FV*&)F(,*F*F+FgnF
-F.F1F/FKF-FLF-F-*&)F(,*F*F+\"#:F-F.F1F/F2F-F3F-FV*&FPF-F=F-F-*&)F(,*F
^oF-F.F1F/!#6F*F+F--F46%F6,&F*F-F/F8F8F-F-*&)F(,*\"#@F-F.F1F/\"#DF*F+F
--F46%,&F*F0F-F-FAF8F-F-*&)F(,*F*\"\"*F1F-F.F1F/F<F--F46%F^pF7F8F-F-" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "b13:= shiftdown(12,b12);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b13G,<*&)%\"qG,*%\"mG\"\"'\"#8
\"\"\"*$%\"jG\"\"#\"#=F/\"#6F--%#gpG6%,&F*F0F0F-,(F*F-F/\"\"$F0F-F8F-F
-*&)F(,*F*F+\"#;F-F.F1F/F2F--F46%,&F*F0\"\"%F-,(F*F-F8F-F/F8F8F-F-*&)F
(,*F,F-F.F1F/\"#?F*F8F--F46%F6FAF8F-F-*&)F(,*\"\"(F-F.F1F/F0F*F8F--F46
%,&F*F0F8F-F7F8F-F-*&)F(,(F.F1F/F2F-F-F--F46%,&F*F0F+F-,(F*F-F@F-F/F8F
8F-!\"\"*&)F(,*F*F+F,F-F.F1F/FKF-FLF-F-*&)F(,*F*F+\"#9F-F.F1F/F2F-F3F-
FV*&)F(,*F*F+FgnF-F.F1F/FKF-FLF-F-*&)F(,*F*F+\"#:F-F.F1F/F2F-F3F-FV*&F
PF-F=F-F-*&)F(,*F^oF-F.F1F/!#6F*F+F--F46%F6,&F*F-F/F8F8F-F-*&)F(,*FgnF
-F.F1F/FcoF*F+F--F46%,&F*F0F-F-FfoF8F-F-*&)F(,*F*\"\"*F1F-F.F1F/F<F--F
46%F\\pF7F8F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "b14:= gp
sym(12,b13);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b14G,<*&)%\"qG,*%\"
mG\"\"'\"#8\"\"\"*$%\"jG\"\"#\"#=F/\"#6F--%#gpG6%,&F*F0F0F-,(F*F-F/\"
\"$F0F-F8F-F-*&)F(,*F*F+\"#;F-F.F1F/F2F--F46%,&F*F0\"\"%F-,(F*F-F8F-F/
F8F8F-F-*&)F(,*F,F-F.F1F/\"#?F*F8F--F46%F6FAF8F-F-*&)F(,*\"\"(F-F.F1F/
F0F*F8F--F46%,&F*F0F8F-F7F8F-F-*&)F(,(F.F1F/F2F-F-F--F46%,&F*F0F+F-,(F
*F-F@F-F/F8F8F-!\"\"*&)F(,*F*F+F,F-F.F1F/FKF-FLF-F-*&)F(,*F*F+\"#9F-F.
F1F/F2F-F3F-FV*&)F(,*F*F+FgnF-F.F1F/FKF-FLF-F-*&)F(,*F*F+\"#:F-F.F1F/F
2F-F3F-FV*&FPF-F=F-F-*&)F(,*F^oF-F.F1F/!#6F*F+F--F46%F6,&F*F-F/F8F8F-F
-*&)F(,*FgnF-F.F1F/FcoF*F+F--F46%,&F*F0F-F-,(F*F-F-F-F/!\"$F8F-F-*&)F(
,*F*\"\"*F1F-F.F1F/F<F--F46%F\\pF7F8F-F-" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 21 "b15:= negate(12,b14);" }}{PARA 0 "> " 0 "" {MPLTEXT 
1 0 0 "" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b15G,<*&)%\"qG,*%\"mG\"
\"'\"#8\"\"\"*$%\"jG\"\"#\"#=F/\"#6F--%#gpG6%,&F*F0F0F-,(F*F-F/\"\"$F0
F-F8F-F-*&)F(,*F*F+\"#;F-F.F1F/F2F--F46%,&F*F0\"\"%F-,(F*F-F8F-F/F8F8F
-F-*&)F(,*F,F-F.F1F/\"#?F*F8F--F46%F6FAF8F-F-*&)F(,*\"\"(F-F.F1F/F0F*F
8F--F46%,&F*F0F8F-F7F8F-F-*&)F(,(F.F1F/F2F-F-F--F46%,&F*F0F+F-,(F*F-F@
F-F/F8F8F-!\"\"*&)F(,*F*F+F,F-F.F1F/FKF-FLF-F-*&)F(,*F*F+\"#9F-F.F1F/F
2F-F3F-FV*&)F(,*F*F+FgnF-F.F1F/FKF-FLF-F-*&)F(,*F*F+\"#:F-F.F1F/F2F-F3
F-FV*&FPF-F=F-F-*&)F(,*F^oF-F.F1F/!#6F*F+F--F46%F6,&F*F-F/F8F8F-F-*&Fe
nF--F46%,&F*F0F-F-,(F*F-F/F8F-F-F8F-F-*&)F(,*F*\"\"*F1F-F.F1F/F<F--F46
%FjoF7F8F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b16:= eG1(7
,b15);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b16G,:*&)%\"qG,*%\"mG\"\"
'\"#8\"\"\"*$%\"jG\"\"#\"#=F/\"#6F--%#gpG6%,&F*F0F0F-,(F*F-F/\"\"$F0F-
F8F-F-*&)F(,*F*F+\"#;F-F.F1F/F2F--F46%,&F*F0\"\"%F-,(F*F-F8F-F/F8F8F-F
-*&)F(,*F,F-F.F1F/\"#?F*F8F--F46%F6FAF8F-F-*&)F(,*\"\"(F-F.F1F/F0F*F8F
--F46%,&F*F0F8F-F7F8F-F-*&)F(,(F.F1F/F2F-F-F--F46%,&F*F0F+F-,(F*F-F@F-
F/F8F8F-!\"\"*&)F(,*F*F+F,F-F.F1F/FKF-FLF-F-*&)F(,*F*\"\"*FEF-F.F1F/FE
F--F46%,&F*F0F-F-F7F8F-FV*&)F(,*F*F+\"#9F-F.F1F/FKF-FLF-F-*&)F(,*F*F+
\"#:F-F.F1F/F2F-F3F-FV*&FPF-F=F-F-*&)F(,*FboF-F.F1F/!#6F*F+F--F46%F6,&
F*F-F/F8F8F-F-*&)F(,*F*FgnF1F-F.F1F/F<F-FhnF-F-" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 23 "b17:= shiftdown(7,b16);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$b17G,:*&)%\"qG,*%\"mG\"\"'\"#8\"\"\"*$%\"jG\"\"#\"#=
F/\"#6F--%#gpG6%,&F*F0F0F-,(F*F-F/\"\"$F0F-F8F-F-*&)F(,*F*F+\"#;F-F.F1
F/F2F--F46%,&F*F0\"\"%F-,(F*F-F8F-F/F8F8F-F-*&)F(,*F,F-F.F1F/\"#?F*F8F
--F46%F6FAF8F-F-*&)F(,*\"\"(F-F.F1F/F0F*F8F--F46%,&F*F0F8F-F7F8F-F-*&)
F(,(F.F1F/F2F-F-F--F46%,&F*F0F+F-,(F*F-F@F-F/F8F8F-!\"\"*&)F(,*F*F+F,F
-F.F1F/FKF-FLF-F-*&)F(,*F*\"\"*F.F1F/!#;F1F-F--F46%,&F*F0F-F-,(F*F-F/F
8FVF-F8F-FV*&)F(,*F*F+\"#9F-F.F1F/FKF-FLF-F-*&)F(,*F*F+\"#:F-F.F1F/F2F
-F3F-FV*&FPF-F=F-F-*&)F(,*FdoF-F.F1F/!#6F*F+F--F46%F6,&F*F-F/F8F8F-F-*
&)F(,*F*FgnF1F-F.F1F/F<F--F46%F[oF7F8F-F-" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 19 "b18:= gpsym(7,b17);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%$b18G,:*&)%\"qG,*%\"mG\"\"'\"#8\"\"\"*$%\"jG\"\"#\"#=F/\"#6F--
%#gpG6%,&F*F0F0F-,(F*F-F/\"\"$F0F-F8F-F-*&)F(,*F*F+\"#;F-F.F1F/F2F--F4
6%,&F*F0\"\"%F-,(F*F-F8F-F/F8F8F-F-*&)F(,*F,F-F.F1F/\"#?F*F8F--F46%F6F
AF8F-F-*&)F(,*\"\"(F-F.F1F/F0F*F8F--F46%,&F*F0F8F-F7F8F-F-*&)F(,(F.F1F
/F2F-F-F--F46%,&F*F0F+F-,(F*F-F@F-F/F8F8F-!\"\"*&)F(,*F*F+F,F-F.F1F/FK
F-FLF-F-*&)F(,*F*\"\"*F.F1F/!#;F1F-F--F46%,&F*F0F-F-,(F*F-F0F-F/!\"$F8
F-FV*&)F(,*F*F+\"#9F-F.F1F/FKF-FLF-F-*&)F(,*F*F+\"#:F-F.F1F/F2F-F3F-FV
*&FPF-F=F-F-*&)F(,*FeoF-F.F1F/!#6F*F+F--F46%F6,&F*F-F/F8F8F-F-*&)F(,*F
*FgnF1F-F.F1F/F<F--F46%F[oF7F8F-F-" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 20 "b19:= negate(7,b18);" }}{PARA 12 "" 1 "" {XPPMATH 20 
"6#>%$b19G,6*&)%\"qG,*%\"mG\"\"'\"#8\"\"\"*$%\"jG\"\"#\"#=F/\"#6F--%#g
pG6%,&F*F0F0F-,(F*F-F/\"\"$F0F-F8F-F-*&)F(,*F*F+\"#;F-F.F1F/F2F--F46%,
&F*F0\"\"%F-,(F*F-F8F-F/F8F8F-F-*&)F(,*F,F-F.F1F/\"#?F*F8F--F46%F6FAF8
F-F-*&)F(,*\"\"(F-F.F1F/F0F*F8F--F46%,&F*F0F8F-F7F8F-F-*&)F(,(F.F1F/F2
F-F-F--F46%,&F*F0F+F-,(F*F-F@F-F/F8F8F-!\"\"*&)F(,*F*F+F,F-F.F1F/FKF-F
LF-F-*&)F(,*F*F+\"#9F-F.F1F/FKF-FLF-F-*&)F(,*F*F+\"#:F-F.F1F/F2F-F3F-F
V*&FPF-F=F-F-*&)F(,*F[oF-F.F1F/!#6F*F+F--F46%F6,&F*F-F/F8F8F-F-" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "b20:= gpsym(10,b19);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b20G,6*&)%\"qG,*%\"mG\"\"'\"#8\"\"
\"*$%\"jG\"\"#\"#=F/\"#6F--%#gpG6%,&F*F0F0F-,(F*F-F/\"\"$F0F-F8F-F-*&)
F(,*F*F+\"#;F-F.F1F/F2F--F46%,&F*F0\"\"%F-,(F*F-F8F-F/F8F8F-F-*&)F(,*F
,F-F.F1F/\"#?F*F8F--F46%F6FAF8F-F-*&)F(,*\"\"(F-F.F1F/F0F*F8F--F46%,&F
*F0F8F-F7F8F-F-*&)F(,(F.F1F/F2F-F-F--F46%,&F*F0F+F-,(F*F-F@F-F/F8F8F-!
\"\"*&)F(,*F*F+F,F-F.F1F/FKF-FLF-F-*&)F(,*F*F+\"#9F-F.F1F/FKF-FLF-F-*&
)F(,*F*F+\"#:F-F.F1F/F2F-F3F-FV*&FPF-F=F-F-*&)F(,*F[oF-F.F1F/!#6F*F+F-
-F46%F6,(F*F-F0F-F/!\"$F8F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 21 "b21:= negate(10,b20);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b21G
,2*&)%\"qG,*%\"mG\"\"'\"#8\"\"\"*$%\"jG\"\"#\"#=F/\"#6F--%#gpG6%,&F*F0
F0F-,(F*F-F/\"\"$F0F-F8F-F-*&)F(,*F*F+\"#;F-F.F1F/F2F--F46%,&F*F0\"\"%
F-,(F*F-F8F-F/F8F8F-F-*&)F(,*F,F-F.F1F/\"#?F*F8F--F46%F6FAF8F-F-*&)F(,
*\"\"(F-F.F1F/F0F*F8F--F46%,&F*F0F8F-F7F8F-F-*&)F(,(F.F1F/F2F-F-F--F46
%,&F*F0F+F-,(F*F-F@F-F/F8F8F-!\"\"*&)F(,*F*F+F,F-F.F1F/FKF-FLF-F-*&)F(
,*F*F+\"#9F-F.F1F/FKF-FLF-F-*&FPF-F=F-F-" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "b22:= eG1(5,b21);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%$b22G,4*&)%\"qG,*%\"mG\"\"'\"#8\"\"\"*$%\"jG\"\"#\"#=F/\"#6F--%#gpG6
%,&F*F0F0F-,(F*F-F/\"\"$F0F-F8F-F-*&)F(,*F*F+\"#;F-F.F1F/F2F--F46%,&F*
F0\"\"%F-,(F*F-F8F-F/F8F8F-F-*&)F(,*F,F-F.F1F/\"#?F*F8F--F46%F6FAF8F-F
-*&)F(,*\"\"(F-F.F1F/F0F*F8F--F46%,&F*F0F8F-F7F8F-F-*&)F(,(F.F1F/F2F-F
-F--F46%,&F*F0\"\"&F-FAF8F-!\"\"*&FCF--F46%FT,(F*F-F@F-F/F8F8F-FV*&)F(
,*F*F+F,F-F.F1F/FKF-FLF-F-*&)F(,*F*F+\"#9F-F.F1F/FKF-FLF-F-*&FPF-F=F-F
-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b23:= eG0(5,b22);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b23G,2*&)%\"qG,*%\"mG\"\"'\"#8\"\"
\"*$%\"jG\"\"#\"#=F/\"#6F--%#gpG6%,&F*F0F0F-,(F*F-F/\"\"$F0F-F8F-F-*&)
F(,*F*F+\"#;F-F.F1F/F2F--F46%,&F*F0\"\"%F-,(F*F-F8F-F/F8F8F-F-*&)F(,*F
,F-F.F1F/\"#?F*F8F--F46%F6FAF8F-F-*&)F(,*\"\"(F-F.F1F/F0F*F8F--F46%,&F
*F0F8F-F7F8F-F-*&FIF--F46%F?F7F8F-!\"\"*&FCF--F46%,&F*F0\"\"&F-,(F*F-F
@F-F/F8F8F-FR*&)F(,*F*F+F,F-F.F1F/FKF-FLF-F-*&)F(,*F*F+\"#9F-F.F1F/FKF
-FLF-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b24:= eG0(6,b23)
;" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b24G,0*&)%\"qG,*%\"mG\"\"'\"#8
\"\"\"*$%\"jG\"\"#\"#=F/\"#6F--%#gpG6%,&F*F0F0F-,(F*F-F/\"\"$F0F-F8F-F
-*&)F(,*F,F-F.F1F/\"#?F*F8F--F46%F6,(F*F-F8F-F/F8F8F-F-*&)F(,*\"\"(F-F
.F1F/F0F*F8F--F46%,&F*F0F8F-F7F8F-F-*&FAF--F46%,&F*F0\"\"%F-F7F8F-!\"
\"*&F:F--F46%FJ,(F*F-FKF-F/F8F8F-FL*&)F(,*F*F+F,F-F.F1F/FCF-FDF-F-*&)F
(,*F*F+\"#9F-F.F1F/FCF-FDF-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 17 "b25:= eG1(5,b24);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b25G,2*&
)%\"qG,*%\"mG\"\"'\"#8\"\"\"*$%\"jG\"\"#\"#=F/\"#6F--%#gpG6%,&F*F0F0F-
,(F*F-F/\"\"$F0F-F8F-F-*&)F(,*F,F-F.F1F/\"#?F*F8F--F46%F6,(F*F-F8F-F/F
8F8F-F-*&)F(,*\"\"(F-F.F1F/F0F*F8F--F46%,&F*F0F8F-F7F8F-F-*&FAF--F46%,
&F*F0\"\"%F-F7F8F-!\"\"*&F:F--F46%FFF?F8F-FL*&)F(,*\"#DF-F.F1F/\"#HF*F
+F--F46%FF,(F*F-FKF-F/F8F8F-FL*&)F(,*F*F+F,F-F.F1F/FCF-FDF-F-*&)F(,*F*
F+\"#9F-F.F1F/FCF-FDF-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 
"b26:= eG0(5,b25);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b26G,,*&)%\"q
G,*\"\"(\"\"\"*$%\"jG\"\"#\"#=F-F.%\"mG\"\"$F+-%#gpG6%,&F0F.F1F+,(F0F+
F-F1F.F+F1F+F+*&F'F+-F36%,&F0F.\"\"%F+F6F1F+!\"\"*&)F(,*\"#DF+F,F/F-\"
#HF0\"\"'F+-F36%F5,(F0F+F;F+F-F1F1F+F<*&)F(,*F0FB\"#8F+F,F/F-F*F+F2F+F
+*&)F(,*F0FB\"#9F+F,F/F-F*F+F2F+F+" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "b27:= eG0(2,b26);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%$b27G,**&)%\"qG,*\"#8\"\"\"*$%\"jG\"\"#\"#=F-!\"(%\"mG\"\"'F+-%#gpG6
%,&F1F.\"\"$F+,(F1F+F-F7F+F+F7F+!\"\"*&)F(,*\"#DF+F,F/F-\"#HF1F2F+-F46
%F6,(F1F+\"\"%F+F-F7F7F+F9*&)F(,*F1F2F*F+F,F/F-\"\"(F+-F46%F6,(F1F+F-F
7F.F+F7F+F+*&)F(,*F1F2\"#9F+F,F/F-FFF+FGF+F+" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 23 "b28:= shiftdown(2,b27);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$b28G,**&)%\"qG,*\"#8\"\"\"*$%\"jG\"\"#\"#=F-!\"(%\"m
G\"\"'F+-%#gpG6%,&F1F.\"\"$F+,(F1F+F-F7F+F+F7F+!\"\"*&)F(,*\"#9F+F,F/F
-F0F1F2F+F3F+F9*&)F(,*F1F2F*F+F,F/F-\"\"(F+-F46%F6,(F1F+F-F7F.F+F7F+F+
*&)F(,*F1F2F=F+F,F/F-FAF+FBF+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 19 "b29:= gpsym(2,b28);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b29G
,**&)%\"qG,*\"#8\"\"\"*$%\"jG\"\"#\"#=F-!\"(%\"mG\"\"'F+-%#gpG6%,&F1F.
\"\"$F+,(F1F+F-F7F+F+F7F+!\"\"*&)F(,*\"#9F+F,F/F-F0F1F2F+-F46%F6,(F1F+
F.F+F-!\"$F7F+F9*&)F(,*F1F2F*F+F,F/F-\"\"(F+-F46%F6,(F1F+F-F7F.F+F7F+F
+*&)F(,*F1F2F=F+F,F/F-FEF+FFF+F+" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 20 "b30:= negate(2,b29);" }}{PARA 12 "" 1 "" {XPPMATH 20 
"6#>%$b30G,&*&)%\"qG,*\"#8\"\"\"*$%\"jG\"\"#\"#=F-!\"(%\"mG\"\"'F+-%#g
pG6%,&F1F.\"\"$F+,(F1F+F-F7F+F+F7F+!\"\"*&)F(,*F1F2F*F+F,F/F-\"\"(F+-F
46%F6,(F1F+F-F7F.F+F7F+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
19 "b31:= gpsym(2,b30);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b31G,&*&
)%\"qG,*\"#8\"\"\"*$%\"jG\"\"#\"#=F-!\"(%\"mG\"\"'F+-%#gpG6%,&F1F.\"\"
$F+,(F1F+F-F7F+F+F7F+!\"\"*&)F(,*F1F2F*F+F,F/F-\"\"(F+-F46%F6,(F1F+F+F
+F-!\"$F7F+F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "b32:= nega
te(2,b31);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$b32G\"\"!" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "2 0 0" 0 }{VIEWOPTS 1 
1 0 1 1 1803 }