{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 13 "######## 3.69" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 121 "op1:= annihiloper( q^(j^2 +
 2*j) * qfac(q^4,q^4,j) / qfac(q,q^2, j+1) / qfac( q^2,q^2,j+1) / spqf
ac(q^2,q^2,j), 0, back);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$op1G,*
\"\"\"F&*&,*F&F&*$%\"qG\"\"#F&F*F&)F*,&%\"nGF+F&F&F&F&%\"NG!\"\"F0*&,(
F)F0F*F0*$F*\"\"$F0F&F/!\"#F0*&,&F3F&F,F0F&F/!\"$F0" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 57 "A1:= applyshiftop(op1, q^(8*j^2 + 6*j) * \+
U(n+1,4*j+1,1));" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A1G,6*&)%\"qG,(
*$%\"jG\"\"#\"\")F+\"\"'\"\"$\"\"\"F0-%\"UG6%,&%\"nGF0!\"#F0,&F+\"\"%F
0F0F0F0!\"\"*&)F(,*F*F-F+F.F5F,F0F0F0F1F0F0*&)F(,(F*F-F+F.F0F0F0-F26%,
&F5F0F9F0F7F0F0F0*&F'F0F@F0F0*&)F(,(F*F-F+F.F,F0F0F@F0F0*&)F(,&F*F-F+F
.F0-F26%F5F7F0F0F9*&FJF0FEF0F9*&FJF0F>F0F9*&FJF0F;F0F9*&FHF0-F26%,&F5F
0F0F0F7F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A2:= eU1(4
,A1);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A2G,8*&)%\"qG,**$%\"jG\"\"
#\"\")F+\"\"'%\"nGF,\"\"\"F0F0-%\"UG6%,&F/F0!\"#F0,&F+\"\"%F0F0F0F0F0*
&)F(,(F*F-F+F.F0F0F0-F26%,&F/F0!\"\"F0F6F0F0F0*&)F(,(F*F-F+F.F/F,F0F1F
0F0*&)F(,*F*F-F+F,F0F0F/F0F0-%#T1G6%F4,$F+F7F0F0F0*&)F(,*F*F-F+\"#5F7F
0F/F0F0-FF6%F4,&F+F7\"\"$F0F0F0F0*&)F(,(F*F-F+F.F,F0F0F;F0F0*&)F(,&F*F
-F+F.F0-F26%F/F6F0F0F>*&FWF0FRF0F>*&FWF0F9F0F>*&FWF0F'F0F>*&FUF0-F26%,
&F/F0F0F0F6F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A3:=eU
1(11,A2);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A3G,6*&)%\"qG,**$%\"jG
\"\"#\"\")F+\"\"'%\"nGF,\"\"\"F0F0-%\"UG6%,&F/F0!\"#F0,&F+\"\"%F0F0F0F
0F0*&)F(,(F*F-F+F.F0F0F0-F26%,&F/F0!\"\"F0F6F0F0F0*&)F(,(F*F-F+F.F/F,F
0F1F0F0*&)F(,*F*F-F+F,F0F0F/F0F0-%#T1G6%F4,$F+F7F0F0F0*&)F(,*F*F-F+\"#
5F7F0F/F0F0-FF6%F4,&F+F7\"\"$F0F0F0F0*&)F(,(F*F-F+F.F,F0F0F;F0F0*&-F26
%F/F6F0F0FRF0F>*&FUF0F9F0F>*&)F(,(F*F-F+F,F/F0F0-FF6%F/FHF0F0F0*&)F(,*
F*F-F+FLFPF0F/F0F0-FF6%F/FOF0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "A4:= eU1(7,A3);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%
#A4G,8*&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%\"nGF,\"\"\"F0F0-%\"UG6%,&F/F
0!\"#F0,&F+\"\"%F0F0F0F0F0*&)F(,(F*F-F+F.F0F0F0-F26%,&F/F0!\"\"F0F6F0F
0F0*&)F(,(F*F-F+F.F/F,F0F1F0F0*&)F(,*F*F-F+F,F0F0F/F0F0-%#T1G6%F4,$F+F
7F0F0F0*&)F(,*F*F-F+\"#5F7F0F/F0F0-FF6%F4,&F+F7\"\"$F0F0F0F0*&F'F0F;F0
F>*&FCF0-FF6%F=FHF0F0F>*&FJF0-FF6%F=FOF0F0F>*&-F26%F/F6F0F0F9F0F>*&)F(
,(F*F-F+F,F/F0F0-FF6%F/FHF0F0F0*&)F(,*F*F-F+FLFPF0F/F0F0-FF6%F/FOF0F0F
0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "A5:=eU1(9,A4);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A5G,:*&)%\"qG,**$%\"jG\"\"#\"\")F+
\"\"'%\"nGF,\"\"\"F0F0-%\"UG6%,&F/F0!\"#F0,&F+\"\"%F0F0F0F0F0*&)F(,(F*
F-F+F.F/F,F0F1F0F0*&)F(,*F*F-F+F,F0F0F/F0F0-%#T1G6%F4,$F+F7F0F0F0*&)F(
,*F*F-F+\"#5F7F0F/F0F0-F?6%F4,&F+F7\"\"$F0F0F0F0*&F'F0-F26%,&F/F0!\"\"
F0F6F0F0FN*&F<F0-F?6%FMFAF0F0FN*&FCF0-F?6%FMFHF0F0FN*&F9F0FKF0FN*&)F(,
(F*F-F+F,F/F0F0FPF0FN*&)F(,*F*F-F+FEFIF0F/F0F0FSF0FN*&FWF0-F?6%F/FAF0F
0F0*&FZF0-F?6%F/FHF0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 
"A6:= eU1(8,A5);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A6G,<*&)%\"qG,*
*$%\"jG\"\"#\"\")F+\"\"'%\"nGF,\"\"\"F0F0-%\"UG6%,&F/F0!\"#F0,&F+\"\"%
F0F0F0F0F0*&)F(,*F*F-F+F,F0F0F/F0F0-%#T1G6%F4,$F+F7F0F0F0*&)F(,*F*F-F+
\"#5F7F0F/F0F0-F<6%F4,&F+F7\"\"$F0F0F0F0*&F'F0-F26%,&F/F0!\"\"F0F6F0F0
FK*&F9F0-F<6%FJF>F0F0FK*&F@F0-F<6%FJFEF0F0FK*&)F(,*F*F-F+F.F/F7!\"$F0F
0F1F0FK*&)F(,*F*F-F+F,F/FFF5F0F0F;F0FK*&)F(,*F*F-F+FBF/FFF0F0F0FCF0FK*
&)F(,(F*F-F+F,F/F0F0FMF0FK*&)F(,*F*F-F+FBFFF0F/F0F0FPF0FK*&FgnF0-F<6%F
/F>F0F0F0*&FjnF0-F<6%F/FEF0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 15 "A7:= eU1(4,A6);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A7G,>*&)
%\"qG,**$%\"jG\"\"#\"\")F+F,\"\"\"F.%\"nGF.F.-%#T1G6%,&F/F.!\"#F.,$F+
\"\"%F.F.F.*&)F(,*F*F-F+\"#5F6F.F/F.F.-F16%F3,&F+F6\"\"$F.F.F.F.*&)F(,
*F*F-F+\"\"'F/F6F4F.F.-%\"UG6%F3,&F+F6F.F.F.F.!\"\"*&)F(,*F*F-F+F,F/F>
FGF.F.F0F.FG*&)F(,*F*F-F+F:F/F>F,F.F.F;F.FG*&F'F.-F16%,&F/F.FGF.F5F.F.
FG*&F8F.-F16%FQF=F.F.FG*&)F(,*F*F-F+FBF/F6!\"$F.F.FCF.FG*&)F(,*F*F-F+F
,F/F>F4F.F.F0F.FG*&)F(,*F*F-F+F:F/F>F.F.F.F;F.FG*&)F(,(F*F-F+F,F/F.F.F
OF.FG*&)F(,*F*F-F+F:F>F.F/F.F.FSF.FG*&FjnF.-F16%F/F5F.F.F.*&F]oF.-F16%
F/F=F.F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A8:=eT1(13,A7
);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A8G,>*&)%\"qG,**$%\"jG\"\"#\"
\")F+F,\"\"\"F.%\"nGF.F.-%#T1G6%,&F/F.!\"#F.,$F+\"\"%F.F.F.*&)F(,*F*F-
F+\"#5F6F.F/F.F.-F16%F3,&F+F6\"\"$F.F.F.F.*&)F(,*F*F-F+\"\"'F/F6F4F.F.
-%\"UG6%F3,&F+F6F.F.F.F.!\"\"*&)F(,*F*F-F+F,F/F>FGF.F.F0F.FG*&)F(,*F*F
-F+F:F/F>F,F.F.F;F.FG*&F'F.-F16%,&F/F.FGF.F5F.F.FG*&F8F.-F16%FQF=F.F.F
G*&)F(,*F*F-F+FBF/F6!\"$F.F.FCF.FG*&)F(,*F*F-F+F,F/F>F4F.F.F0F.FG*&)F(
,*F*F-F+F:F/F>F.F.F.F;F.FG*&)F(,*F*F-F+F:F>F.F/F.F.FSF.FG*&)F(,(F*F-F+
FBF/F,F.-%#T0G6%FQFFF.F.F.*&)F(,(F*F-F+F4F/F,F.-F`o6%FQ,&F+F6FGF.F.F.F
.*&FjnF.-F16%F/F=F.F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "
A9:= eT1(14,A8);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A9G,>*&)%\"qG,*
*$%\"jG\"\"#\"\")F+F,\"\"\"F.%\"nGF.F.-%#T1G6%,&F/F.!\"#F.,$F+\"\"%F.F
.F.*&)F(,*F*F-F+\"#5F6F.F/F.F.-F16%F3,&F+F6\"\"$F.F.F.F.*&)F(,*F*F-F+
\"\"'F/F6F4F.F.-%\"UG6%F3,&F+F6F.F.F.F.!\"\"*&)F(,*F*F-F+F,F/F>FGF.F.F
0F.FG*&)F(,*F*F-F+F:F/F>F,F.F.F;F.FG*&F'F.-F16%,&F/F.FGF.F5F.F.FG*&F8F
.-F16%FQF=F.F.FG*&)F(,*F*F-F+FBF/F6!\"$F.F.FCF.FG*&)F(,*F*F-F+F,F/F>F4
F.F.F0F.FG*&)F(,*F*F-F+F:F/F>F.F.F.F;F.FG*&)F(,(F*F-F+FBF/F,F.-%#T0G6%
FQFFF.F.F.*&)F(,(F*F-F+F4F/F,F.-F]o6%FQ,&F+F6FGF.F.F.F.*&)F(,*F*F-F+\"
#9FBF.F/F,F.-F]o6%FQ,&F+F6F6F.F.F.F.*&FjnF.-F]o6%FQ,&F+F6F,F.F.F.F." }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A10:=eT1(6,A9);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$A10G,>*&)%\"qG,**$%\"jG\"\"#\"\")F+\"#5\"
\"%\"\"\"%\"nGF0F0-%#T1G6%,&F1F0!\"#F0,&F+F/\"\"$F0F0F0F0*&)F(,*F*F-F+
\"\"'F1F/F6F0F0-%\"UG6%F5,&F+F/F0F0F0F0!\"\"*&)F(,*F*F-F+F,F1F8FAF0F0-
F36%F5,$F+F/F0F0FA*&)F(,*F*F-F+F.F1F8F,F0F0F2F0FA*&)F(,(F*F-F+F<F1F,F0
-%#T0GF?F0FA*&)F(,(F*F-F+F6F1F,F0-FO6%F5,&F+F/FAF0F0F0FA*&F'F0-F36%,&F
1F0FAF0F7F0F0FA*&)F(,*F*F-F+F<F1F/!\"$F0F0F=F0FA*&)F(,*F*F-F+F,F1F8F6F
0F0FEF0FA*&)F(,*F*F-F+F.F1F8F0F0F0F2F0FA*&FLF0-FO6%FYF@F0F0F0*&FQF0-FO
6%FYFUF0F0F0*&)F(,*F*F-F+\"#9F<F0F1F,F0-FO6%FY,&F+F/F/F0F0F0F0*&FLF0-F
O6%FY,&F+F/F,F0F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A1
1:=eT1(7,A10);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A11G,>*&)%\"qG,**
$%\"jG\"\"#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%\"UG6%,&F/F2F1F2,&F+F0F
2F2F2F2!\"\"*&)F(,*F*F-F+F,F/\"\"$F8F2F2-%#T1G6%F6,$F+F0F2F2F8*&)F(,*F
*F-F+\"#5F/F<F,F2F2-F>6%F6,&F+F0F<F2F2F2F8*&)F(,(F*F-F+F.F/F,F2-%#T0GF
5F2F8*&)F(,(F*F-F+F1F/F,F2-FL6%F6,&F+F0F8F2F2F2F8*&)F(,*F*F-F+\"#9F.F2
F/F,F2-FL6%F6,&F+F0F0F2F2F2F8*&FIF2-FL6%F6,&F+F0F,F2F2F2F8*&)F(,*F*F-F
+F.F/F0!\"$F2F2F3F2F8*&)F(,*F*F-F+F,F/F<F1F2F2F=F2F8*&)F(,*F*F-F+FDF/F
<F2F2F2FEF2F8*&FIF2-FL6%,&F/F2F8F2F7F2F2F2*&FNF2-FL6%FeoFRF2F2F2*&FTF2
-FL6%FeoFYF2F2F2*&FIF2-FL6%FeoFgnF2F2F2" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 18 "A12:= sym(11,A11);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6
#>%$A12G,>*&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%\"
UG6%,&F/F2F1F2,&F+F0F2F2F2F2!\"\"*&)F(,*F*F-F+F,F/\"\"$F8F2F2-%#T1G6%F
6,$F+F0F2F2F8*&)F(,*F*F-F+\"#5F/F<F,F2F2-F>6%F6,&F+F0F<F2F2F2F8*&)F(,(
F*F-F+F.F/F,F2-%#T0GF5F2F8*&)F(,(F*F-F+F1F/F,F2-FL6%F6,&F+F0F8F2F2F2F8
*&)F(,*F*F-F+\"#9F.F2F/F,F2-FL6%F6,&F+F0F0F2F2F2F8*&FIF2-FL6%F6,&F+F0F
,F2F2F2F8*&)F(,*F*F-F+F.F/F0!\"$F2F2F3F2F8*&)F(,*F*F-F+F,F/F<F1F2F2F=F
2F8*&)F(,*F*F-F+FDF/F<F2F2F2FEF2F8*&FIF2-FL6%,&F/F2F8F2,&F+!\"%F8F2F2F
2F2*&FNF2-FL6%FeoFRF2F2F2*&FTF2-FL6%FeoFYF2F2F2*&FIF2-FL6%FeoFgnF2F2F2
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "A13:=eT0(11,A12);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A13G,B*&)%\"qG,**$%\"jG\"\"#\"\")F+
\"\"'%\"nG\"\"%!\"#\"\"\"F2-%\"UG6%,&F/F2F1F2,&F+F0F2F2F2F2!\"\"*&)F(,
*F*F-F+F,F/\"\"$F8F2F2-%#T1G6%F6,$F+F0F2F2F8*&)F(,*F*F-F+\"#5F/F<F,F2F
2-F>6%F6,&F+F0F<F2F2F2F8*&)F(,(F*F-F+F.F/F,F2-%#T0GF5F2F8*&)F(,(F*F-F+
F1F/F,F2-FL6%F6,&F+F0F8F2F2F2F8*&)F(,*F*F-F+\"#9F.F2F/F,F2-FL6%F6,&F+F
0F0F2F2F2F8*&FIF2-FL6%F6,&F+F0F,F2F2F2F8*&)F(,*F*F-F+F.F/F0!\"$F2F2F3F
2F8*&)F(,*F*F-F+F,F/F<F1F2F2F=F2F8*&)F(,*F*F-F+FDF/F<F2F2F2FEF2F8*&FIF
2-FL6%F6,&F+!\"%F1F2F2F2F2*&F]oF2-F>6%F6,&F+FfoF8F2F2F2F2*&)F(,*F*F-F+
F1F/F0FfoF2F2-FL6%F6,$F+FfoF2F2F2*&FNF2-FL6%,&F/F2F8F2FRF2F2F2*&FTF2-F
L6%FdpFYF2F2F2*&FIF2-FL6%FdpFgnF2F2F2" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 18 "A14:= sym(11,A13);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6
#>%$A14G,>*&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%\"
UG6%,&F/F2F1F2,&F+F0F2F2F2F2!\"\"*&)F(,*F*F-F+F,F/\"\"$F8F2F2-%#T1G6%F
6,$F+F0F2F2F8*&)F(,*F*F-F+\"#5F/F<F,F2F2-F>6%F6,&F+F0F<F2F2F2F8*&)F(,(
F*F-F+F.F/F,F2-%#T0GF5F2F8*&)F(,(F*F-F+F1F/F,F2-FL6%F6,&F+F0F8F2F2F2F8
*&)F(,*F*F-F+\"#9F.F2F/F,F2-FL6%F6,&F+F0F0F2F2F2F8*&)F(,*F*F-F+F.F/F0!
\"$F2F2F3F2F8*&)F(,*F*F-F+F,F/F<F1F2F2F=F2F8*&)F(,*F*F-F+FDF/F<F2F2F2F
EF2F8*&FinF2-F>6%F6,&F+!\"%F8F2F2F2F2*&)F(,*F*F-F+F1F/F0FboF2F2-FL6%F6
,$F+FboF2F2F2*&FNF2-FL6%,&F/F2F8F2FRF2F2F2*&FTF2-FL6%F\\pFYF2F2F2*&FIF
2-FL6%F\\p,&F+F0F,F2F2F2F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
17 "A15:=sym(10,A14);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A15G,>*&)%
\"qG,**$%\"jG\"\"#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%\"UG6%,&F/F2F1F2
,&F+F0F2F2F2F2!\"\"*&)F(,*F*F-F+F,F/\"\"$F8F2F2-%#T1G6%F6,$F+F0F2F2F8*
&)F(,*F*F-F+\"#5F/F<F,F2F2-F>6%F6,&F+F0F<F2F2F2F8*&)F(,(F*F-F+F.F/F,F2
-%#T0GF5F2F8*&)F(,(F*F-F+F1F/F,F2-FL6%F6,&F+F0F8F2F2F2F8*&)F(,*F*F-F+
\"#9F.F2F/F,F2-FL6%F6,&F+F0F0F2F2F2F8*&)F(,*F*F-F+F.F/F0!\"$F2F2F3F2F8
*&)F(,*F*F-F+F,F/F<F1F2F2F=F2F8*&)F(,*F*F-F+FDF/F<F2F2F2FEF2F8*&FinF2-
F>F5F2F2*&)F(,*F*F-F+F1F/F0!\"%F2F2-FL6%F6,$F+FcoF2F2F2*&FNF2-FL6%,&F/
F2F8F2FRF2F2F2*&FTF2-FL6%FjoFYF2F2F2*&FIF2-FL6%Fjo,&F+F0F,F2F2F2F2" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A16:=e0(8,A15);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$A16G,>*&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%
\"nG\"\"%!\"#\"\"\"F2-%\"UG6%,&F/F2F1F2,&F+F0F2F2F2F2!\"\"*&)F(,*F*F-F
+F,F/\"\"$F8F2F2-%#T1G6%F6,$F+F0F2F2F8*&)F(,*F*F-F+\"#5F/F<F,F2F2-F>6%
F6,&F+F0F<F2F2F2F8*&)F(,(F*F-F+F.F/F,F2-%#T0GF5F2F8*&)F(,(F*F-F+F1F/F,
F2-FL6%F6,&F+F0F8F2F2F2F8*&)F(,*F*F-F+\"#9F.F2F/F,F2-FL6%F6,&F+F0F0F2F
2F2F8*&)F(,*F*F-F+F.F/F0!\"$F2F2F3F2F8*&)F(,*F*F-F+F1F/F0!\"%F2F2-FLF?
F2F8*&FenF2FKF2F2*&)F(,*F*F-F+FDF/F<F2F2F2FEF2F8*&FinF2-FL6%F6,$F+F[oF
2F2F2*&FNF2-FL6%,&F/F2F8F2FRF2F2F2*&FTF2-FL6%FhoFYF2F2F2*&FIF2-FL6%Fho
,&F+F0F,F2F2F2F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "A17:=eT
0(14,A16);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A17G,>*&)%\"qG,**$%\"
jG\"\"#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%\"UG6%,&F/F2F1F2,&F+F0F2F2F
2F2!\"\"*&)F(,*F*F-F+F,F/\"\"$F8F2F2-%#T1G6%F6,$F+F0F2F2F8*&)F(,*F*F-F
+\"#5F/F<F,F2F2-F>6%F6,&F+F0F<F2F2F2F8*&)F(,(F*F-F+F1F/F,F2-%#T0G6%F6,
&F+F0F8F2F2F2F8*&)F(,*F*F-F+\"#9F.F2F/F,F2-FL6%F6,&F+F0F0F2F2F2F8*&)F(
,*F*F-F+F.F/F0!\"$F2F2F3F2F8*&)F(,*F*F-F+F1F/F0!\"%F2F2-FLF?F2F8*&FWF2
-FLF5F2F2*&)F(,*F*F-F+FDF/F<F2F2F2FEF2F8*&FenF2-FL6%F6,$F+FgnF2F2F2*&F
IF2-FL6%,&F/F2F8F2FNF2F2F2*&FPF2-FL6%FeoFUF2F2F2*&F\\oF2-F>6%F6,&F+F0F
,F2F2F2F2*&)F(,*F*F-F+FRF/F0F,F2F2-FLFFF2F2" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 16 "A18:=sym(7,A17);" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>%$A18G,:*&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%
\"UG6%,&F/F2F1F2,&F+F0F2F2F2F2!\"\"*&)F(,*F*F-F+F,F/\"\"$F8F2F2-%#T1G6
%F6,$F+F0F2F2F8*&)F(,*F*F-F+\"#5F/F<F,F2F2-F>6%F6,&F+F0F<F2F2F2F8*&)F(
,(F*F-F+F1F/F,F2-%#T0G6%F6,&F+F0F8F2F2F2F8*&)F(,*F*F-F+\"#9F.F2F/F,F2-
FL6%F6,&F+F0F0F2F2F2F8*&)F(,*F*F-F+F.F/F0!\"$F2F2F3F2F8*&FWF2-FLF5F2F2
*&)F(,*F*F-F+FDF/F<F2F2F2FEF2F8*&FIF2-FL6%,&F/F2F8F2FNF2F2F2*&FPF2-FL6
%F\\oFUF2F2F2*&FgnF2-F>6%F6,&F+F0F,F2F2F2F2*&)F(,*F*F-F+FRF/F0F,F2F2-F
LFFF2F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "A19:= splitU(6,A
18);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A19G,8*&)%\"qG,**$%\"jG\"\"
#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%\"UG6%,&F/F2F1F2,&F+F0F2F2F2F2!\"
\"*&)F(,*F*F-F+F,F/\"\"$F8F2F2-%#T1G6%F6,$F+F0F2F2F8*&)F(,*F*F-F+\"#5F
/F<F,F2F2-F>6%F6,&F+F0F<F2F2F2F8*&)F(,(F*F-F+F1F/F,F2-%#T0G6%F6,&F+F0F
8F2F2F2F8*&)F(,*F*F-F+\"#9F.F2F/F,F2-FL6%F6,&F+F0F0F2F2F2F8*&)F(,*F*F-
F+F.F/F0!\"$F2F2-FL6%F6,&F+F0F,F2F2F2F8*&)F(,*F*F-F+FDF/F<F2F2F2FEF2F8
*&FIF2-FL6%,&F/F2F8F2FNF2F2F2*&FPF2-FL6%F]oFUF2F2F2*&FhnF2-F>FenF2F2*&
)F(,*F*F-F+FRF/F0F,F2F2-FLFFF2F2" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "A20:= e0(10,A19);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%$A20G,0*&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%\"U
G6%,&F/F2F1F2,&F+F0F2F2F2F2!\"\"*&)F(,*F*F-F+F,F/\"\"$F8F2F2-%#T1G6%F6
,$F+F0F2F2F8*&)F(,*F*F-F+\"#5F/F<F,F2F2-F>6%F6,&F+F0F<F2F2F2F8*&)F(,(F
*F-F+F1F/F,F2-%#T0G6%F6,&F+F0F8F2F2F2F8*&)F(,*F*F-F+\"#9F.F2F/F,F2-FL6
%F6,&F+F0F0F2F2F2F8*&FIF2-FL6%,&F/F2F8F2FNF2F2F2*&FPF2-FL6%FYFUF2F2F2
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "A21:=shiftdown(7,A20);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A21G,0*&)%\"qG,**$%\"jG\"\"#\"
\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%\"UG6%,&F/F2F1F2,&F+F0F2F2F2F2!\"\"*
&)F(,*F*F-F+F,F/\"\"$F8F2F2-%#T1G6%F6,$F+F0F2F2F8*&)F(,*F*F-F+\"#5F/F<
F,F2F2-F>6%F6,&F+F0F<F2F2F2F8*&)F(,(F*F-F+F1F/F,F2-%#T0G6%F6,&F+F0F8F2
F2F2F8*&)F(,*F*F-F+\"#9F.F2F/F,F2-FL6%F6,&F+F0F0F2F2F2F8*&FIF2-FL6%,&F
/F2F8F2FNF2F2F2*&FIF2-FL6%FYF@F2F2F2" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "A22:= eT0(7,A21);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%$A22G,,*&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%\"U
G6%,&F/F2F1F2,&F+F0F2F2F2F2!\"\"*&)F(,*F*F-F+\"#5F/\"\"$F,F2F2-%#T1G6%
F6,&F+F0F=F2F2F2F8*&)F(,*F*F-F+\"#9F.F2F/F,F2-%#T0G6%F6,&F+F0F0F2F2F2F
8*&)F(,(F*F-F+F1F/F,F2-FG6%,&F/F2F8F2,&F+F0F8F2F2F2F2*&F'F2-FGF5F2F2" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "A23:= splitU(1,A22);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A23G,**&)%\"qG,**$%\"jG\"\"#\"\")F+
\"\"'%\"nG\"\"%!\"#\"\"\"F2-%#T0G6%,&F/F2F1F2,&F+F0F,F2F2F2!\"\"*&)F(,
*F*F-F+\"#5F/\"\"$F,F2F2-%#T1G6%F6,&F+F0F=F2F2F2F8*&)F(,*F*F-F+\"#9F.F
2F/F,F2-F46%F6,&F+F0F0F2F2F2F8*&)F(,(F*F-F+F1F/F,F2-F46%,&F/F2F8F2,&F+
F0F8F2F2F2F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "A24:=shiftd
own(3,A23);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A24G,**&)%\"qG,**$%
\"jG\"\"#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%#T0G6%,&F/F2F1F2,&F+F0F,F
2F2F2!\"\"*&)F(,*F*F-F+\"#5F/\"\"$F,F2F2-%#T1G6%F6,&F+F0F=F2F2F2F8*&)F
(,(F*F-F+F1F/F,F2-F46%F6,$F+F0F2F2F8*&FCF2-F46%,&F/F2F8F2,&F+F0F8F2F2F
2F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "A25:= sym(4,A24);" }
}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A25G,**&)%\"qG,**$%\"jG\"\"#\"\")F
+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%#T0G6%,&F/F2F1F2,&F+F0F,F2F2F2!\"\"*&)F(
,*F*F-F+\"#5F/\"\"$F,F2F2-%#T1G6%F6,&F+F0F=F2F2F2F8*&)F(,(F*F-F+F1F/F,
F2-F46%F6,$F+F0F2F2F8*&FCF2-F46%,&F/F2F8F2,&F+!\"%F2F2F2F2F2" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "A26:= eT0(4,A25);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$A26G,.*&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%
\"nG\"\"%!\"#\"\"\"F2-%#T0G6%,&F/F2F1F2,&F+F0F,F2F2F2!\"\"*&)F(,*F*F-F
+\"#5F/\"\"$F,F2F2-%#T1G6%F6,&F+F0F=F2F2F2F8*&)F(,(F*F-F+F1F/F,F2-F46%
F6,$F+F0F2F2F8*&FCF2-F46%F6,$F+!\"%F2F2F2*&)F(,(F*F-F+!\"'F/F=F2-F?6%F
6,&F+FLF2F2F2F2F2*&)F(,(F*F-F+!#5F/F0F2-F46%F6,&F+FLF,F2F2F2F2" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A27:=sym(3,A26);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$A27G,**&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%
\"nG\"\"%!\"#\"\"\"F2-%#T0G6%,&F/F2F1F2,&F+F0F,F2F2F2!\"\"*&)F(,*F*F-F
+\"#5F/\"\"$F,F2F2-%#T1G6%F6,&F+F0F=F2F2F2F8*&)F(,(F*F-F+!\"'F/F=F2-F?
6%F6,&F+!\"%F2F2F2F2F2*&)F(,(F*F-F+!#5F/F0F2-F46%F6,&F+FIF,F2F2F2F2" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "A28:= shiftdown(1,A27);" }
}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A28G,**&)%\"qG,(*$%\"jG\"\"#\"\")F
+!#5%\"nG\"\"%\"\"\"-%#T0G6%,&F/F1!\"#F1,&F+F0F6F1F1F1!\"\"*&)F(,*F*F-
F+\"#5F/\"\"$F,F1F1-%#T1G6%F5,&F+F0F=F1F1F1F8*&)F(,(F*F-F+!\"'F/F=F1-F
?6%F5,&F+!\"%F1F1F1F1F1*&F'F1-F36%F5,&F+FIF,F1F1F1F1" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 16 "A29:=sym(1,A28);" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%$A29G,&*&)%\"qG,**$%\"jG\"\"#\"\")F+\"#5%\"nG\"\"$F,
\"\"\"F1-%#T1G6%,&F/F1!\"#F1,&F+\"\"%F0F1F1F1!\"\"*&)F(,(F*F-F+!\"'F/F
0F1-F36%F5,&F+!\"%F1F1F1F1F1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 22 "A30:=shiftdown(1,A29);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$A30
G,&*&)%\"qG,(*$%\"jG\"\"#\"\")F+!\"'%\"nG\"\"$\"\"\"-%#T1G6%,&F/F1!\"#
F1,&F+\"\"%!\"\"F1F1F1F9*&F'F1-F36%F5,&F+!\"%F1F1F1F1F1" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A31:=sym(1,A30);" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#>%$A31G\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 0 "" }}}}{MARK "2 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }