{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.56" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 111 "op1:= annihiloper( q^(j^2+2
*j) * qfac(q^2,q^2,j) / qfac(q,q^2,j+1) / qfac(q,q,j+1)/spqfac(q,q,j) \+
, 0, forward);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$op1G,.*$%\"NG\"\"
%\"\"\"*&,&%\"qG!\"\"F-F)F)F'\"\"$F)*&)F,,&%\"nGF)\"\"&F)F)F'\"\"#F-*&
,&*$F,F4F)F,F)F)F'F)F)F7F-F0F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "##### n = 2*m" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 122 "a1:= asoe( op1, q^(6*j^2 \+
+ 5*j)* gp(2*n + 2, n + 3*j + 2,1),\n                q^(6*j^2 + 5*j)* \+
gp(2*n + 3, n + 3*j + 3,1));" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a1G
,2*&)%\"qG,(*$%\"jG\"\"#\"\"'F+\"\"&F,\"\"\"F/-%#gpG6%,&%\"mGF,F,F/,(F
4F/F+\"\"$F,F/F/F/!\"\"*&)F(,*F*F-F+F.F4F,F.F/F/F0F/F/*&F9F/-F16%,&F4F
,\"\"%F/,(F4F/F6F/F+F6F/F/F7*&)F(,&F*F-F+F.F/-F16%,&F4F,F-F/,(F4F/F?F/
F+F6F/F/F/*&)F(,(F*F-F+F.F/F/F/-F16%,&F4F,F6F/F@F/F/F/*&F'F/FKF/F/*&FI
F/-F16%,&F4F,F.F/FGF/F/F7*&FBF/FPF/F7" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "a2:= eG1(6,a1);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%
#a2G,0*&)%\"qG,**$%\"jG\"\"#\"\"'F+\"\"&%\"mGF,F.\"\"\"F0-%#gpG6%,&F/F
,F,F0,(F/F0F+\"\"$F,F0F0F0F0*&F'F0-F26%,&F/F,\"\"%F0,(F/F0F6F0F+F6F0F0
!\"\"*&)F(,&F*F-F+F.F0-F26%,&F/F,F-F0,(F/F0F;F0F+F6F0F0F0*&)F(,(F*F-F+
F.F0F0F0-F26%,&F/F,F6F0F<F0F0F0*&)F(,*F*F-F+\"\")F.F0F/F0F0-F26%F4F<F0
F0F0*&FFF0-F26%,&F/F,F.F0FDF0F0F=*&F?F0FRF0F=" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 15 "a3:= eG0(3,a2);" }}{PARA 12 "" 1 "" {XPPMATH 20 
"6#>%#a3G,.*&)%\"qG,**$%\"jG\"\"#\"\"'F+\"\"&%\"mGF,F.\"\"\"F0-%#gpG6%
,&F/F,F,F0,(F/F0F+\"\"$F,F0F0F0F0*&F'F0-F26%,&F/F,\"\"%F0,(F/F0F6F0F+F
6F0F0!\"\"*&)F(,*F*F-F+F,F/F0F,F0F0-F26%,&F/F,F.F0F<F0F0F0*&)F(,(F*F-F
+F.F0F0F0-F26%,&F/F,F6F0F<F0F0F0*&)F(,*F*F-F+\"\")F.F0F/F0F0-F26%F4F<F
0F0F0*&FEF0-F26%FC,(F/F0F;F0F+F6F0F0F=" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "a4:= eG0(2,a3);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%
#a4G,0*&)%\"qG,**$%\"jG\"\"#\"\"'F+\"\"&%\"mGF,F.\"\"\"F0-%#gpG6%,&F/F
,F,F0,(F/F0F+\"\"$F,F0F0F0F0*&F'F0-F26%,&F/F,F6F0,(F/F0F6F0F+F6F0F0!\"
\"*&)F(,*F*F-F+F,F/F6F-F0F0-F26%F:F5F0F0F<*&)F(,*F*F-F+F,F/F0F,F0F0-F2
6%,&F/F,F.F0F;F0F0F0*&)F(,(F*F-F+F.F0F0F0F8F0F0*&)F(,*F*F-F+\"\")F.F0F
/F0F0-F26%F4F;F0F0F0*&FIF0-F26%FG,(F/F0\"\"%F0F+F6F0F0F<" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a5:= eG1(2,a4);" }}{PARA 12 "" 1 "
" {XPPMATH 20 "6#>%#a5G,.*&)%\"qG,**$%\"jG\"\"#\"\"'F+\"\")%\"mG\"\"$F
.\"\"\"F1-%#gpG6%,&F/F,F,F1,(F/F1F0F1F+F0F1F1!\"\"*&)F(,*F*F-F+F,F/F0F
-F1F1-F36%,&F/F,F0F1,(F/F1F+F0F,F1F1F1F7*&)F(,*F*F-F+F,F/F1F,F1F1-F36%
,&F/F,\"\"&F1F6F1F1F1*&)F(,(F*F-F+FEF1F1F1-F36%F=F6F1F1F1*&)F(,*F*F-F+
F.FEF1F/F1F1F2F1F1*&FGF1-F36%FD,(F/F1\"\"%F1F+F0F1F1F7" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a6:= eG1(6,a5);" }}{PARA 12 "" 1 "
" {XPPMATH 20 "6#>%#a6G,0*&)%\"qG,**$%\"jG\"\"#\"\"'F+\"\")%\"mG\"\"$F
.\"\"\"F1-%#gpG6%,&F/F,F,F1,(F/F1F0F1F+F0F1F1!\"\"*&)F(,*F*F-F+F,F/F0F
-F1F1-F36%,&F/F,F0F1,(F/F1F+F0F,F1F1F1F7*&)F(,*F*F-F+F,F/F1F,F1F1-F36%
,&F/F,\"\"&F1F6F1F1F1*&)F(,(F*F-F+FEF1F1F1-F36%F=F6F1F1F1*&)F(,*F*F-F+
F.FEF1F/F1F1F2F1F1*&FGF1-F36%,&F/F,\"\"%F1F6F1F1F7*&FLF1-F36%FQ,(F/F1F
RF1F+F0F1F1F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a7:= eG0(6
,a6);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a7G,.*&)%\"qG,**$%\"jG\"\"
#\"\"'F+\"\")%\"mG\"\"$F.\"\"\"F1-%#gpG6%,&F/F,F,F1,(F/F1F0F1F+F0F1F1!
\"\"*&)F(,*F*F-F+F,F/F0F-F1F1-F36%,&F/F,F0F1,(F/F1F+F0F,F1F1F1F7*&)F(,
*F*F-F+F,F/F1F,F1F1-F36%,&F/F,\"\"&F1F6F1F1F1*&)F(,*F*F-F+F.FEF1F/F1F1
F2F1F1*&F@F1F;F1F7*&FGF1-F36%,&F/F,\"\"%F1,(F/F1FNF1F+F0F1F1F7" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a8:= eG1(3,a7);" }}{PARA 12 
"" 1 "" {XPPMATH 20 "6#>%#a8G,0*&)%\"qG,**$%\"jG\"\"#\"\"'F+\"\")%\"mG
\"\"$F.\"\"\"F1-%#gpG6%,&F/F,F,F1,(F/F1F0F1F+F0F1F1!\"\"*&)F(,*F*F-F+F
,F/F0F-F1F1-F36%,&F/F,F0F1,(F/F1F+F0F,F1F1F1F7*&)F(,*F*F-F+F,F/F1F,F1F
1-F36%,&F/F,\"\"%F1F>F1F1F1*&)F(,*F*F-F+\"\"&F/F,FIF1F1-F36%FDF6F1F1F1
*&)F(,*F*F-F+F.FIF1F/F1F1F2F1F1*&F@F1F;F1F7*&FMF1-F36%FD,(F/F1FEF1F+F0
F1F1F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a9:= eG0(3,a8);" 
}}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a9G,.*&)%\"qG,**$%\"jG\"\"#\"\"'F
+\"\")%\"mG\"\"$F.\"\"\"F1-%#gpG6%,&F/F,F,F1,(F/F1F0F1F+F0F1F1!\"\"*&)
F(,*F*F-F+F,F/F0F-F1F1-F36%,&F/F,F0F1,(F/F1F+F0F,F1F1F1F7*&)F(,*F*F-F+
F7F/F,\"\"%F1F1-F36%F=,(F/F1F+F0F1F1F1F1F1*&)F(,*F*F-F+\"\"&F/F,FIF1F1
-F36%,&F/F,FBF1F6F1F1F1*&)F(,*F*F-F+F.FIF1F/F1F1F2F1F1*&FNF1-F36%FL,(F
/F1FBF1F+F0F1F1F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "a10:= \+
eG0(6,a9);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a10G,0*&)%\"qG,**$%\"
jG\"\"#\"\"'F+\"\")%\"mG\"\"$F.\"\"\"F1-%#gpG6%,&F/F,F,F1,(F/F1F0F1F+F
0F1F1!\"\"*&)F(,*F*F-F+F,F/F0F-F1F1-F36%,&F/F,F0F1,(F/F1F+F0F,F1F1F1F7
*&)F(,*F*F-F+F7F/F,\"\"%F1F1-F36%F=,(F/F1F+F0F1F1F1F1F1*&)F(,*F*F-F+\"
\"&F/F,FIF1F1-F36%,&F/F,FBF1F6F1F1F1*&)F(,*F*F-F+F.FIF1F/F1F1F2F1F1*&F
NF1-F36%F=,(F/F1FBF1F+F0F1F1F7*&FGF1-F36%F=F6F1F1F7" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 17 "a11:= eG1(6,a10);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$a11G,.*&)%\"qG,**$%\"jG\"\"#\"\"'F+\"\")%\"mG\"\"$F.
\"\"\"F1-%#gpG6%,&F/F,F,F1,(F/F1F0F1F+F0F1F1!\"\"*&)F(,*F*F-F+F,F/F0F-
F1F1-F36%,&F/F,F0F1,(F/F1F+F0F,F1F1F1F7*&)F(,*F*F-F+F7F/F,\"\"%F1F1-F3
6%F=,(F/F1F+F0F1F1F1F1F1*&)F(,*F*F-F+\"\"&F/F,FIF1F1-F36%,&F/F,FBF1F6F
1F1F1*&)F(,*F*F-F+\"#6\"\"*F1F/F,F1-F36%F5,(F/F1FBF1F+F0F1F1F7*&FGF1-F
36%F=F6F1F1F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a12:= eG0(
4,a11);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a12G,(*&)%\"qG,**$%\"jG
\"\"#\"\"'F+\"\")%\"mG\"\"$F.\"\"\"F1-%#gpG6%,&F/F,F,F1,(F/F1F0F1F+F0F
1F1!\"\"*&)F(,*F*F-F+F7F/F,\"\"%F1F1-F36%,&F/F,F0F1,(F/F1F+F0F1F1F1F1F
1*&)F(,*F*F-F+\"#6\"\"*F1F/F,F1-F36%F5,(F/F1F;F1F+F0F1F1F7" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a13:= eG0(2,a12);" }}{PARA 12 "" 1 
"" {XPPMATH 20 "6#>%$a13G,**&)%\"qG,**$%\"jG\"\"#\"\"'F+\"\")%\"mG\"\"
$F.\"\"\"F1-%#gpG6%,&F/F,F,F1,(F/F1F0F1F+F0F1F1!\"\"*&)F(,*F*F-F+F7F/F
,\"\"%F1F1-F36%F5,(F/F1F+F0F1F1F1F1F1*&)F(,*F*F-F+!\"%F/F0F-F1F1-F36%F
5,&F/F1F+F0F1F1F1*&)F(,*F*F-F+\"#6\"\"*F1F/F,F1-F36%F5,(F/F1F;F1F+F0F1
F1F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "a14:= shiftdown(4,a
13);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$a14G,&*&)%\"qG,**$%\"jG\"\"
#\"\"'F+\"\")%\"mG\"\"$F.\"\"\"F1-%#gpG6%,&F/F,F,F1,(F/F1F0F1F+F0F1F1!
\"\"*&)F(,*F*F-F+!\"%F/F0F-F1F1-F36%F5,&F/F1F+F0F1F1F1" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "a15:= shiftdown(1,a14);" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#>%$a15G\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "#######
#### n = 2*m + 1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 122 "b1:= a
soo( op1, q^(6*j^2 + 5*j)* gp(2*n + 2, n + 3*j + 2,1),\n              \+
  q^(6*j^2 + 5*j)* gp(2*n + 3, n + 3*j + 3,1));" }}{PARA 0 "> " 0 "" 
{MPLTEXT 1 0 0 "" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b1G,2*&)%\"qG,(
*$%\"jG\"\"#\"\"'F+\"\"&F,\"\"\"F/-%#gpG6%,&%\"mGF,\"\"$F/,(F4F/F5F/F+
F5F/F/!\"\"*&)F(,*F*F-F+F.F4F,F-F/F/F0F/F/*&F9F/-F16%,&F4F,F.F/,(F4F/
\"\"%F/F+F5F/F/F7*&)F(,&F*F-F+F.F/-F16%,&F4F,\"\"(F/,(F4F/F.F/F+F5F/F/
F/*&)F(,(F*F-F+F.F/F/F/-F16%,&F4F,F@F/F6F/F/F/*&F'F/FLF/F/*&FJF/-F16%,
&F4F,F-F/F?F/F/F7*&FBF/FQF/F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 15 "b2:= eG0(6,b1);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b2G,0*&)%
\"qG,**$%\"jG\"\"#\"\"'F+\"\"&%\"mGF,F-\"\"\"F0-%#gpG6%,&F/F,\"\"$F0,(
F/F0F5F0F+F5F0F0F0*&F'F0-F26%,&F/F,F.F0,(F/F0\"\"%F0F+F5F0F0!\"\"*&)F(
,&F*F-F+F.F0-F26%,&F/F,\"\"(F0,(F/F0F.F0F+F5F0F0F0*&)F(,(F*F-F+F.F0F0F
0-F26%,&F/F,F<F0F6F0F0F0*&)F(,*F*F-F+F,F5F0F/F0F0-F26%F4,(F/F0F+F5F,F0
F0F0F0*&FGF0-F26%,&F/F,F-F0F;F0F0F=*&F?F0FSF0F=" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 15 "b3:= eG1(3,b2);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%#b3G,.*&)%\"qG,**$%\"jG\"\"#\"\"'F+\"\"&%\"mGF,F-\"\"\"F0-%#gp
G6%,&F/F,\"\"$F0,(F/F0F5F0F+F5F0F0F0*&F'F0-F26%,&F/F,F.F0,(F/F0\"\"%F0
F+F5F0F0!\"\"*&)F(,*F*F-F+\"\")F.F0F/F0F0-F26%,&F/F,F-F0,(F/F0F.F0F+F5
F0F0F0*&)F(,(F*F-F+F.F0F0F0-F26%,&F/F,F<F0F6F0F0F0*&)F(,*F*F-F+F,F5F0F
/F0F0-F26%F4,(F/F0F+F5F,F0F0F0F0*&FGF0-F26%FDF;F0F0F=" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "b4:= eG1(2,b3);" }}{PARA 12 "" 1 "
" {XPPMATH 20 "6#>%#b4G,0*&)%\"qG,**$%\"jG\"\"#\"\"'F+\"\"&%\"mGF,F-\"
\"\"F0-%#gpG6%,&F/F,\"\"$F0,(F/F0F5F0F+F5F0F0F0*&F'F0-F26%,&F/F,\"\"%F
0F6F0F0!\"\"*&)F(,*F*F-F+\"\")F/F5\"#5F0F0-F26%F:,(F/F0F;F0F+F5F0F0F<*
&)F(,*F*F-F+F@F.F0F/F0F0-F26%,&F/F,F-F0,(F/F0F.F0F+F5F0F0F0*&)F(,(F*F-
F+F.F0F0F0F8F0F0*&)F(,*F*F-F+F,F5F0F/F0F0-F26%F4,(F/F0F+F5F,F0F0F0F0*&
FMF0-F26%FJFDF0F0F<" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "b5:=
 eG0(2,b4);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b5G,.*&)%\"qG,**$%\"
jG\"\"#\"\"'F+F,%\"mG\"\"$\"\"(\"\"\"F1-%#gpG6%,&F.F,F/F1,(F.F1F+F/F,F
1F1F1!\"\"*&)F(,*F*F-F+\"\")F.F/\"#5F1F1-F36%,&F.F,\"\"%F1,(F.F1F@F1F+
F/F1F1F7*&)F(,*F*F-F+F;\"\"&F1F.F1F1-F36%,&F.F,F-F1,(F.F1FEF1F+F/F1F1F
1*&)F(,(F*F-F+FEF1F1F1-F36%F?,(F.F1F/F1F+F/F1F1F1*&)F(,*F*F-F+F,F/F1F.
F1F1F2F1F1*&FKF1-F36%FHFAF1F1F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 16 "b6:= eG0(6,b5); " }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b6G,0*&
)%\"qG,**$%\"jG\"\"#\"\"'F+F,%\"mG\"\"$\"\"(\"\"\"F1-%#gpG6%,&F.F,F/F1
,(F.F1F+F/F,F1F1F1!\"\"*&)F(,*F*F-F+\"\")F.F/\"#5F1F1-F36%,&F.F,\"\"%F
1,(F.F1F@F1F+F/F1F1F7*&)F(,*F*F-F+F;\"\"&F1F.F1F1-F36%,&F.F,F-F1,(F.F1
FEF1F+F/F1F1F1*&)F(,(F*F-F+FEF1F1F1-F36%F?,(F.F1F/F1F+F/F1F1F1*&)F(,*F
*F-F+F,F/F1F.F1F1F2F1F1*&FKF1-F36%,&F.F,FEF1FAF1F1F7*&FQF1-F36%FVFOF1F
1F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "b7:= eG1(6,b6);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b7G,.*&)%\"qG,**$%\"jG\"\"#\"\"'F+F
,%\"mG\"\"$\"\"(\"\"\"F1-%#gpG6%,&F.F,F/F1,(F.F1F+F/F,F1F1F1!\"\"*&)F(
,*F*F-F+\"\")F.F/\"#5F1F1-F36%,&F.F,\"\"%F1,(F.F1F@F1F+F/F1F1F7*&)F(,*
F*F-F+F;\"\"&F1F.F1F1-F36%,&F.F,F-F1,(F.F1FEF1F+F/F1F1F1*&)F(,*F*F-F+F
,F/F1F.F1F1F2F1F1*&FCF1F=F1F7*&FKF1-F36%,&F.F,FEF1,(F.F1F/F1F+F/F1F1F7
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "b8:= eG0(3,b7);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b8G,0*&)%\"qG,**$%\"jG\"\"#\"\"'F+F
,%\"mG\"\"$\"\"(\"\"\"F1-%#gpG6%,&F.F,F/F1,(F.F1F+F/F,F1F1F1!\"\"*&)F(
,*F*F-F+\"\")F.F/\"#5F1F1-F36%,&F.F,\"\"%F1,(F.F1F@F1F+F/F1F1F7*&)F(,*
F*F-F+F;\"\"&F1F.F1F1-F36%,&F.F,FEF1,(F.F1FEF1F+F/F1F1F1*&)F(,*F*F-F+F
EF.F,F-F1F1-F36%FHFAF1F1F1*&)F(,*F*F-F+F,F/F1F.F1F1F2F1F1*&FCF1F=F1F7*
&FPF1-F36%FH,(F.F1F/F1F+F/F1F1F7" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "b9:= eG1(3,b8);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%
#b9G,.*&)%\"qG,**$%\"jG\"\"#\"\"'F+F,%\"mG\"\"$\"\"(\"\"\"F1-%#gpG6%,&
F.F,F/F1,(F.F1F+F/F,F1F1F1!\"\"*&)F(,*F*F-F+\"\")F.F/\"#5F1F1-F36%,&F.
F,\"\"%F1,(F.F1F@F1F+F/F1F1F7*&)F(,*F*F-F+\"#6F<F1F.F,F1-F36%F?,(F.F1
\"\"&F1F+F/F1F1F1*&)F(,*F*F-F+FIF.F,F-F1F1-F36%,&F.F,FIF1FAF1F1F1*&)F(
,*F*F-F+F,F/F1F.F1F1F2F1F1*&FQF1-F36%FO,(F.F1F/F1F+F/F1F1F7" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b10:= eG1(6,b9);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$b10G,0*&)%\"qG,**$%\"jG\"\"#\"\"'F+F,%\"m
G\"\"$\"\"(\"\"\"F1-%#gpG6%,&F.F,F/F1,(F.F1F+F/F,F1F1F1!\"\"*&)F(,*F*F
-F+\"\")F.F/\"#5F1F1-F36%,&F.F,\"\"%F1,(F.F1F@F1F+F/F1F1F7*&)F(,*F*F-F
+\"#6F<F1F.F,F1-F36%F?,(F.F1\"\"&F1F+F/F1F1F1*&)F(,*F*F-F+FIF.F,F-F1F1
-F36%,&F.F,FIF1FAF1F1F1*&)F(,*F*F-F+F,F/F1F.F1F1F2F1F1*&FQF1-F36%F?F6F
1F1F7*&FKF1-F36%F?,(F.F1F/F1F+F/F1F1F7" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "b11:= eG0(6,b10);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%$b11G,.*&)%\"qG,**$%\"jG\"\"#\"\"'F+F,%\"mG\"\"$\"\"(\"\"\"F1-%#gpG6
%,&F.F,F/F1,(F.F1F+F/F,F1F1F1!\"\"*&)F(,*F*F-F+\"\")F.F/\"#5F1F1-F36%,
&F.F,\"\"%F1,(F.F1F@F1F+F/F1F1F7*&)F(,*F*F-F+\"#6F<F1F.F,F1-F36%F?,(F.
F1\"\"&F1F+F/F1F1F1*&)F(,*F*F-F+FIF.F,F-F1F1-F36%,&F.F,FIF1FAF1F1F1*&)
F(,*F*F-F+F7FIF1F.F,F1-F36%F5,(F.F1F+F/F1F1F1F1F7*&FKF1-F36%F?,(F.F1F/
F1F+F/F1F1F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b12:= eG1(4
,b11);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b12G,(*&)%\"qG,**$%\"jG\"
\"#\"\"'F+F,%\"mG\"\"$\"\"(\"\"\"F1-%#gpG6%,&F.F,F/F1,(F.F1F+F/F,F1F1F
1!\"\"*&)F(,*F*F-F+\"#6\"#5F1F.F,F1-F36%,&F.F,\"\"%F1,(F.F1\"\"&F1F+F/
F1F1F1*&)F(,*F*F-F+F7FBF1F.F,F1-F36%F5,(F.F1F+F/F1F1F1F1F7" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "b13:= shiftdown(2,b12);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$b13G,(*&)%\"qG,**$%\"jG\"\"#\"\"'F+F,%\"m
G\"\"$\"\"(\"\"\"F1-%#gpG6%,&F.F,F/F1,(F.F1F+F/F,F1F1F1!\"\"*&)F(,*F*F
-F+F7\"\"&F1F.F,F1-F36%,&F.F,\"\"%F1F6F1F1F1*&F9F1-F36%F5,(F.F1F+F/F1F
1F1F1F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b14:= eG1(2,b13)
;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$b14G\"\"!" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "2 0 0" 0 }{VIEWOPTS 1 1 0 1 1 
1803 }