{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 15 "######## 3.94-t" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 77 "op1:= annihiloper( q^(j^2+j) / qfac(q,q^2,j+1) / sp
qfac(q^2,q^2,j), 0, back);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$op1G,
(\"\"\"F&*&,(%\"qGF&F&F&)F),$%\"nG\"\"#F&F&%\"NG!\"\"F/*&F)F&F.!\"#F&
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 117 "A1:=applyshiftop(op1, \+
q^(10*j^2+3*j) * T1(n+1,5*j+1,1) \n              +   q^(10*j^2 + 7*j +
 1) * T1(n+1,5*j + 2, 1));" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A1G,6
*&-%#T1G6%,&%\"nG\"\"\"!\"\"F,,&%\"jG\"\"&F,F,F,F,)%\"qG,(F,F,*$F/\"\"
#\"#5F/\"\"$F,F,*&-F(6%F*,&F/F0F5F,F,F,)F2,(F4F6F/\"\"(F5F,F,F,*&)F2,&
F4F6F/F7F,-F(6%F+F.F,F,F-*&)F2,(F4F6F/F>F,F,F,-F(6%F+F;F,F,F-*&F1F,FBF
,F-*&F<F,FGF,F-*&)F2,(F+F5F4F6F/F7F,FBF,F-*&)F2,*F+F5F4F6F/F>F,F,F,FGF
,F-*&F@F,-F(6%,&F+F,F,F,F.F,F,F,*&FEF,-F(6%FTF;F,F,F," }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "altsign:=true;" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%(altsignG%%trueG" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 14 "A2:=eT1(9,A1);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#
A2G,6*&-%#T1G6%,&%\"nG\"\"\"!\"\"F,,&%\"jG\"\"&F,F,F,F,)%\"qG,(F,F,*$F
/\"\"#\"#5F/\"\"$F,F,*&-F(6%F*,&F/F0F5F,F,F,)F2,(F4F6F/\"\"(F5F,F,F,*&
)F2,(F4F6F/F>F,F,F,-F(6%F+F;F,F,F-*&F1F,-F(6%F+F.F,F,F-*&F<F,FBF,F-*&)
F2,(F+F5F4F6F/F7F,FEF,F-*&)F2,*F+F5F4F6F/F>F,F,F,FBF,F-*&)F2,*F4F6F/\"
\")F+F,F5F,F,-%#T0GFCF,F,*&)F2,(F4F6F/!\"#F+F,F,-FS6%F+,$F/F0F,F,F,*&F
@F,-F(6%,&F+F,F,F,F;F,F,F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
15 "A3:=eT1(10,A2);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A3G,6*&-%#T1
G6%,&%\"nG\"\"\"!\"\"F,,&%\"jG\"\"&F,F,F,F,)%\"qG,(F,F,*$F/\"\"#\"#5F/
\"\"$F,F,*&-F(6%F*,&F/F0F5F,F,F,)F2,(F4F6F/\"\"(F5F,F,F,*&F1F,-F(6%F+F
.F,F,F-*&F<F,-F(6%F+F;F,F,F-*&)F2,(F+F5F4F6F/F7F,F@F,F-*&)F2,*F+F5F4F6
F/F>F,F,F,FCF,F-*&)F2,*F4F6F/\"\")F+F,F5F,F,-%#T0GFDF,F,*&)F2,(F4F6F/!
\"#F+F,F,-FP6%F+,$F/F0F,F,F,*&)F2,*F4F6F/\"#7\"\"%F,F+F,F,-FP6%F+,&F/F
0F7F,F,F,F,*&)F2,(F4F6F/F5F+F,F,-FPFAF,F," }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 14 "A4:=eT1(3,A3);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>
%#A4G,6*&-%#T1G6%,&%\"nG\"\"\"!\"\"F,,&%\"jG\"\"&\"\"#F,F,F,)%\"qG,(*$
F/F1\"#5F/\"\"(F1F,F,F,*&)F3,*F5F6F/\"\")F+F,F1F,F,-%#T0GF)F,F-*&)F3,(
F5F6F/!\"#F+F,F,-F=6%F*,$F/F0F,F,F-*&F2F,-F(6%F+F.F,F,F-*&)F3,(F+F1F5F
6F/\"\"$F,-F(6%F+,&F/F0F,F,F,F,F-*&)F3,*F+F1F5F6F/F7F,F,F,FFF,F-*&F9F,
-F=FGF,F,*&F?F,-F=6%F+FDF,F,F,*&)F3,*F5F6F/\"#7\"\"%F,F+F,F,-F=6%F+,&F
/F0FKF,F,F,F,*&)F3,(F5F6F/F1F+F,F,-F=FMF,F," }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 10 "##########" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A5:= eT0(10,A4);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A5G,:*&-%#T1G6%,&%\"nG\"\"\"!\"
\"F,,&%\"jG\"\"&\"\"#F,F,F,)%\"qG,(*$F/F1\"#5F/\"\"(F1F,F,F,*&)F3,*F5F
6F/\"\")F+F,F1F,F,-%#T0GF)F,F-*&)F3,(F5F6F/!\"#F+F,F,-F=6%F*,$F/F0F,F,
F-*&F2F,-F(6%F+F.F,F,F-*&)F3,(F+F1F5F6F/\"\"$F,-F(6%F+,&F/F0F,F,F,F,F-
*&)F3,*F+F1F5F6F/F7F,F,F,FFF,F-*&F9F,-F=FGF,F,*&F?F,-F=6%F+FDF,F,F,*&)
F3,*F5F6F/\"#7\"\"%F,F+F,F,-F=6%F+,&F/F0FKF,F,F,F,*&)F3,(F5F6F/F1F+F,F
,FBF,F,*&FPF,-F(6%F*FNF,F,F,*&)F3,*F5F6F/FZF+FKF1F,F,F<F,F," }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "A6:= negate(10,A5);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A6G,:*&-%#T1G6%,&%\"nG\"\"\"!\"\"F,
,&%\"jG\"\"&\"\"#F,F,F,)%\"qG,(*$F/F1\"#5F/\"\"(F1F,F,F,*&)F3,*F5F6F/
\"\")F+F,F1F,F,-%#T0GF)F,F-*&)F3,(F5F6F/!\"#F+F,F,-F=6%F*,$F/F0F,F,F-*
&F2F,-F(6%F+F.F,F,F-*&)F3,(F+F1F5F6F/\"\"$F,-F(6%F+,&F/F0F,F,F,F,F-*&)
F3,*F+F1F5F6F/F7F,F,F,FFF,F-*&F9F,-F=FGF,F,*&F?F,-F=6%F+FDF,F,F,*&)F3,
*F5F6F/\"#7\"\"%F,F+F,F,-F=6%F+,&F/F0FKF,F,F,F,*&F?F,-F=6%F*,$F/!\"&F,
F,F,*&FPF,-F(6%F*FNF,F,F,*&)F3,*F5F6F/FZF+FKF1F,F,F<F,F," }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A7:=sym(10,A6);" }}{PARA 12 "" 1 "
" {XPPMATH 20 "6#>%#A7G,6*&-%#T1G6%,&%\"nG\"\"\"!\"\"F,,&%\"jG\"\"&\"
\"#F,F,F,)%\"qG,(*$F/F1\"#5F/\"\"(F1F,F,F,*&)F3,*F5F6F/\"\")F+F,F1F,F,
-%#T0GF)F,F-*&F2F,-F(6%F+F.F,F,F-*&)F3,(F+F1F5F6F/\"\"$F,-F(6%F+,&F/F0
F,F,F,F,F-*&)F3,*F+F1F5F6F/F7F,F,F,F?F,F-*&F9F,-F=F@F,F,*&)F3,(F5F6F/!
\"#F+F,F,-F=6%F+,$F/F0F,F,F,*&)F3,*F5F6F/\"#7\"\"%F,F+F,F,-F=6%F+,&F/F
0FDF,F,F,F,*&FIF,-F(6%F*FGF,F,F,*&)F3,*F5F6F/FWF+FDF1F,F,F<F,F," }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "A8:=eT1(3,A7);" }}{PARA 12 "
" 1 "" {XPPMATH 20 "6#>%#A8G,6*&)%\"qG,**$%\"jG\"\"#\"#5F+\"\")%\"nG\"
\"\"F,F0F0-%#T0G6%,&F/F0!\"\"F0,&F+\"\"&F,F0F0F0F5*&)F(,*F*F-F+\"#7\"
\"%F0F/F0F0-F26%F4,&F+F7\"\"$F0F0F0F5*&)F(,(F*F-F+F,F/F0F0-F26%F4,&F+F
7F0F0F0F0F5*&)F(,(F/F,F*F-F+F@F0-%#T1G6%F/FFF0F0F5*&)F(,*F/F,F*F-F+\"
\"(F0F0F0-FK6%F/F6F0F0F5*&F'F0-F2FRF0F0*&)F(,(F*F-F+!\"#F/F0F0-F26%F/,
$F+F7F0F0F0*&F9F0-F26%F/F?F0F0F0*&FNF0-FKFEF0F0*&)F(,*F*F-F+F;F/F@F,F0
F0F1F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A9:= eT1(5,A8);" }}{PARA 12 "" 1 "
" {XPPMATH 20 "6#>%#A9G,:*&)%\"qG,**$%\"jG\"\"#\"#5F+\"\")%\"nG\"\"\"F
,F0F0-%#T0G6%,&F/F0!\"\"F0,&F+\"\"&F,F0F0F0F5*&)F(,*F*F-F+\"#7\"\"%F0F
/F0F0-F26%F4,&F+F7\"\"$F0F0F0F5*&)F(,(F*F-F+F,F/F0F0-F26%F4,&F+F7F0F0F
0F0F5*&)F(,(F/F,F*F-F+F@F0-%#T1G6%F/FFF0F0F5*&)F(,*F/F,F*F-F+\"\"(F0F0
F0-FKF3F0F5*&)F(,*F/F@F*F-F+F;F@F0F0F=F0F5*&)F(,*F/F@F*F-F+F,F5F0F0FDF
0F5*&F'F0-F26%F/F6F0F0F0*&)F(,(F*F-F+!\"#F/F0F0-F26%F/,$F+F7F0F0F0*&F9
F0-F26%F/F?F0F0F0*&FNF0-FKFEF0F0*&)F(,*F*F-F+F;F/F@F,F0F0F1F0F0" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A10:=e0(11,A9);" }}{PARA 12 
"" 1 "" {XPPMATH 20 "6#>%$A10G,2*&)%\"qG,**$%\"jG\"\"#\"#5F+\"\")%\"nG
\"\"\"F,F0F0-%#T0G6%,&F/F0!\"\"F0,&F+\"\"&F,F0F0F0F5*&)F(,*F*F-F+\"#7
\"\"%F0F/F0F0-F26%F4,&F+F7\"\"$F0F0F0F5*&)F(,(F*F-F+F,F/F0F0-F26%F4,&F
+F7F0F0F0F0F5*&)F(,(F/F,F*F-F+F@F0-%#T1G6%F/FFF0F0F5*&)F(,*F/F@F*F-F+F
;F@F0F0F=F0F5*&F'F0-F26%F/F6F0F0F0*&)F(,(F*F-F+!\"#F/F0F0-F26%F/,$F+F7
F0F0F0*&F9F0-F26%F/F?F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "#######" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "A11:= eT0(7,A10);" }}{PARA 12 "" 1 
"" {XPPMATH 20 "6#>%$A11G,6*&)%\"qG,**$%\"jG\"\"#\"#5F+\"\")%\"nG\"\"
\"F,F0F0-%#T0G6%,&F/F0!\"\"F0,&F+\"\"&F,F0F0F0F5*&)F(,*F*F-F+\"#7\"\"%
F0F/F0F0-F26%F4,&F+F7\"\"$F0F0F0F5*&)F(,(F*F-F+F,F/F0F0-F26%F4,&F+F7F0
F0F0F0F5*&)F(,(F/F,F*F-F+F@F0-%#T1G6%F/FFF0F0F5*&)F(,*F/F@F*F-F+F;F@F0
F0F=F0F5*&F'F0-F26%F/F6F0F0F0*&)F(,(F*F-F+!\"#F/F0F0-F26%F4,&F+F7F5F0F
0F0F0*&FHF0-FK6%F4,$F+F7F0F0F0*&)F(,(F*F-F+F.F/F@F0FDF0F0*&F9F0-F26%F/
F?F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "A12:=negate(7,A
11);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A12G,6*&)%\"qG,**$%\"jG\"\"
#\"#5F+\"\")%\"nG\"\"\"F,F0F0-%#T0G6%,&F/F0!\"\"F0,&F+\"\"&F,F0F0F0F5*
&)F(,*F*F-F+\"#7\"\"%F0F/F0F0-F26%F4,&F+F7\"\"$F0F0F0F5*&)F(,(F*F-F+F,
F/F0F0-F26%F4,&F+F7F0F0F0F0F5*&)F(,(F/F,F*F-F+F@F0-%#T1G6%F/FFF0F0F5*&
)F(,*F/F@F*F-F+F;F@F0F0F=F0F5*&F'F0-F26%F/F6F0F0F0*&FBF0-F26%F4,&F+!\"
&F5F0F0F0F0*&FHF0-FK6%F4,$F+F7F0F0F0*&)F(,(F*F-F+F.F/F@F0FDF0F0*&F9F0-
F26%F/F?F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A13:=sym(
7,A12);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A13G,2*&)%\"qG,**$%\"jG
\"\"#\"#5F+\"\")%\"nG\"\"\"F,F0F0-%#T0G6%,&F/F0!\"\"F0,&F+\"\"&F,F0F0F
0F5*&)F(,*F*F-F+\"#7\"\"%F0F/F0F0-F26%F4,&F+F7\"\"$F0F0F0F5*&)F(,(F/F,
F*F-F+F@F0-%#T1G6%F/,&F+F7F0F0F0F0F5*&)F(,*F/F@F*F-F+F;F@F0F0F=F0F5*&F
'F0-F26%F/F6F0F0F0*&FBF0-FE6%F4,$F+F7F0F0F0*&)F(,(F*F-F+F.F/F@F0-F26%F
4FGF0F0F0*&F9F0-F26%F/F?F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 17 "A14:= eT1(3,A13);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A14G,6
*&)%\"qG,**$%\"jG\"\"#\"#5F+\"\")%\"nG\"\"\"F,F0F0-%#T0G6%,&F/F0!\"\"F
0,&F+\"\"&F,F0F0F0F5*&)F(,*F*F-F+\"#7\"\"%F0F/F0F0-F26%F4,&F+F7\"\"$F0
F0F0F5*&)F(,(F/F,F*F-F+F@F0-%#T1G6%F4,&F+F7F0F0F0F0F5*&)F(,*F/F@F*F-F+
F.F0F0F0F1F0F5*&)F(,*F/F@F*F-F+!\"#F5F0F0-F26%F4,$F+F7F0F0F5*&)F(,*F/F
@F*F-F+F;F@F0F0F=F0F5*&F'F0-F26%F/F6F0F0F0*&FBF0-FEFPF0F0*&)F(,(F*F-F+
F.F/F@F0-F2FFF0F0*&F9F0-F26%F/F?F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 16 "A15:= e0(8,A14);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>
%$A15G,.*&)%\"qG,**$%\"jG\"\"#\"#5F+\"\")%\"nG\"\"\"F,F0F0-%#T0G6%,&F/
F0!\"\"F0,&F+\"\"&F,F0F0F0F5*&)F(,*F*F-F+\"#7\"\"%F0F/F0F0-F26%F4,&F+F
7\"\"$F0F0F0F5*&)F(,*F/F@F*F-F+F.F0F0F0F1F0F5*&)F(,*F/F@F*F-F+F;F@F0F0
F=F0F5*&F'F0-F26%F/F6F0F0F0*&F9F0-F26%F/F?F0F0F0" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "
#########" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "A16:= eT0(5,A1
5);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A16G,2*&)%\"qG,**$%\"jG\"\"#
\"#5F+\"\")%\"nG\"\"\"F,F0F0-%#T0G6%,&F/F0!\"\"F0,&F+\"\"&F,F0F0F0F5*&
)F(,*F*F-F+\"#7\"\"%F0F/F0F0-F26%F4,&F+F7\"\"$F0F0F0F5*&)F(,*F/F@F*F-F
+F.F0F0F0F1F0F5*&)F(,*F/F@F*F-F+F;F@F0F0F=F0F5*&F'F0-F26%F4,&F+F7F0F0F
0F0F0*&)F(,*F*F-F+\"#8F/F,F<F0F0-%#T1GF3F0F0*&)F(,*F*F-F+\"#=F/F@\"\"'
F0F0F=F0F0*&F9F0-F26%F/F?F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 16 "A17:=sym(8,A16);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A17G,2*
&)%\"qG,**$%\"jG\"\"#\"#5F+\"\")%\"nG\"\"\"F,F0F0-%#T0G6%,&F/F0!\"\"F0
,&F+\"\"&F,F0F0F0F5*&)F(,*F*F-F+\"#7\"\"%F0F/F0F0-F26%F4,&F+F7\"\"$F0F
0F0F5*&)F(,*F/F@F*F-F+F.F0F0F0F1F0F5*&)F(,*F/F@F*F-F+F;F@F0F0F=F0F5*&F
'F0-F26%F4,&F+F7F0F0F0F0F0*&)F(,*F*F-F+\"#8F/F,F<F0F0-%#T1GF3F0F0*&)F(
,*F*F-F+\"#=F/F@\"\"'F0F0F=F0F0*&F9F0-F26%F/,&F+!\"&!\"$F0F0F0F0" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A18:=eT0(8,A17);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$A18G,6*&)%\"qG,**$%\"jG\"\"#\"#5F+\"\")%
\"nG\"\"\"F,F0F0-%#T0G6%,&F/F0!\"\"F0,&F+\"\"&F,F0F0F0F5*&)F(,*F*F-F+
\"#7\"\"%F0F/F0F0-F26%F4,&F+F7\"\"$F0F0F0F5*&)F(,*F/F@F*F-F+F.F0F0F0F1
F0F5*&)F(,*F/F@F*F-F+F;F@F0F0F=F0F5*&F'F0-F26%F4,&F+F7F0F0F0F0F0*&)F(,
*F*F-F+\"#8F/F,F<F0F0-%#T1GF3F0F0*&)F(,*F*F-F+\"#=F/F@\"\"'F0F0F=F0F0*
&F9F0-F26%F4,&F+!\"&!\"%F0F0F0F0*&)F(,*F/F,F*F-F+\"\"(F0F0F0-FP6%F4,&F
+FZ!\"$F0F0F0F0*&)F(,*F*F-F+F,!\"#F0F/F@F0-F26%F4,&F+FZFaoF0F0F0F0" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "A19:=shiftdown(8,A18);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A19G,6*&)%\"qG,**$%\"jG\"\"#\"#5F+
\"\")%\"nG\"\"\"F,F0F0-%#T0G6%,&F/F0!\"\"F0,&F+\"\"&F,F0F0F0F5*&)F(,*F
*F-F+\"#7\"\"%F0F/F0F0-F26%F4,&F+F7\"\"$F0F0F0F5*&)F(,*F/F@F*F-F+F.F0F
0F0F1F0F5*&)F(,*F/F@F*F-F+F;F@F0F0F=F0F5*&F'F0-F26%F4,&F+F7F0F0F0F0F0*
&)F(,*F*F-F+\"#8F/F,F<F0F0-%#T1GF3F0F0*&)F(,*F*F-F+\"#=F/F@\"\"'F0F0F=
F0F0*&)F(,*F*F-F+!\")F,F0F/F0F0-F26%F4,&F+!\"&F0F0F0F0F5*&)F(,*F/F,F*F
-F+\"\"(F0F0F0-FP6%F4,&F+Fgn!\"$F0F0F0F0*&)F(,*F*F-F+F,!\"#F0F/F@F0-F2
6%F4,&F+FgnFcoF0F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "A
20:=negate(8,A19);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A20G,2*&)%\"q
G,**$%\"jG\"\"#\"#5F+\"\")%\"nG\"\"\"F,F0F0-%#T0G6%,&F/F0!\"\"F0,&F+\"
\"&F,F0F0F0F5*&)F(,*F*F-F+\"#7\"\"%F0F/F0F0-F26%F4,&F+F7\"\"$F0F0F0F5*
&)F(,*F/F@F*F-F+F.F0F0F0F1F0F5*&)F(,*F/F@F*F-F+F;F@F0F0F=F0F5*&)F(,*F*
F-F+\"#8F/F,F<F0F0-%#T1GF3F0F0*&)F(,*F*F-F+\"#=F/F@\"\"'F0F0F=F0F0*&)F
(,*F/F,F*F-F+\"\"(F0F0F0-FL6%F4,&F+!\"&!\"$F0F0F0F0*&)F(,*F*F-F+F,!\"#
F0F/F@F0-F26%F4,&F+FYFhnF0F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "A21:= s
hiftdown(7,A20);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A21G,2*&)%\"qG,
**$%\"jG\"\"#\"#5F+\"\")%\"nG\"\"\"F,F0F0-%#T0G6%,&F/F0!\"\"F0,&F+\"\"
&F,F0F0F0F5*&)F(,*F*F-F+\"#7\"\"%F0F/F0F0-F26%F4,&F+F7\"\"$F0F0F0F5*&)
F(,*F/F@F*F-F+F.F0F0F0F1F0F5*&)F(,*F/F@F*F-F+F;F@F0F0F=F0F5*&)F(,*F*F-
F+\"#8F/F,F<F0F0-%#T1GF3F0F0*&)F(,*F*F-F+\"#=F/F@\"\"'F0F0F=F0F0*&)F(,
*F/F,F*F-F+!#8F<F0F0-FL6%F4,&F+!\"&F,F0F0F0F5*&)F(,*F*F-F+F,!\"#F0F/F@
F0-F26%F4,&F+FYFgnF0F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
19 "A22:=negate(7,A21);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A22G,.*&
)%\"qG,**$%\"jG\"\"#\"#5F+\"\")%\"nG\"\"\"F,F0F0-%#T0G6%,&F/F0!\"\"F0,
&F+\"\"&F,F0F0F0F5*&)F(,*F*F-F+\"#7\"\"%F0F/F0F0-F26%F4,&F+F7\"\"$F0F0
F0F5*&)F(,*F/F@F*F-F+F.F0F0F0F1F0F5*&)F(,*F/F@F*F-F+F;F@F0F0F=F0F5*&)F
(,*F*F-F+\"#=F/F@\"\"'F0F0F=F0F0*&)F(,*F*F-F+F,!\"#F0F/F@F0-F26%F4,&F+
!\"&FOF0F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "A23:=shiftdown(2,A22);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A23G,.*&)%\"qG,**$%\"jG\"\"#\"#5F+
\"\")%\"nG\"\"\"F,F0F0-%#T0G6%,&F/F0!\"\"F0,&F+\"\"&F,F0F0F0F5*&)F(,*F
*F-F+!\")F,F0F/F0F0-F26%F4,&F+F7!\"#F0F0F0F0*&)F(,*F/\"\"$F*F-F+F.F0F0
F0F1F0F5*&)F(,*F/FCF*F-F+\"#7FCF0F0-F26%F4,&F+F7FCF0F0F0F5*&)F(,*F*F-F
+\"#=F/FC\"\"'F0F0FHF0F0*&)F(,*F*F-F+F,F?F0F/FCF0-F26%F4,&F+!\"&F?F0F0
F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "A24:=negate(2,A23);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A24G,.*&)%\"qG,**$%\"jG\"\"#\"#
5F+\"\")%\"nG\"\"\"F,F0F0-%#T0G6%,&F/F0!\"\"F0,&F+\"\"&F,F0F0F0F5*&F'F
0-F26%F4,&F+!\"&!\"#F0F0F0F0*&)F(,*F/\"\"$F*F-F+F.F0F0F0F1F0F5*&)F(,*F
/FAF*F-F+\"#7FAF0F0-F26%F4,&F+F7FAF0F0F0F5*&)F(,*F*F-F+\"#=F/FA\"\"'F0
F0FFF0F0*&)F(,*F*F-F+F,F=F0F/FAF0F9F0F0" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 16 "A25:=sym(2,A24);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>
%$A25G,**&)%\"qG,*%\"nG\"\"$*$%\"jG\"\"#\"#5F-\"\")\"\"\"F1F1-%#T0G6%,
&F*F1!\"\"F1,&F-\"\"&F.F1F1F1F6*&)F(,*F*F+F,F/F-\"#7F+F1F1-F36%F5,&F-F
8F+F1F1F1F6*&)F(,*F,F/F-\"#=F*F+\"\"'F1F1F=F1F1*&)F(,*F,F/F-F.!\"#F1F*
F+F1-F36%F5,&F-!\"&FHF1F1F1F1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 22 "A26:=shiftdown(3,A25);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A26
G,**&)%\"qG,*%\"nG\"\"$*$%\"jG\"\"#\"#5F-\"\")\"\"\"F1F1-%#T0G6%,&F*F1
!\"\"F1,&F-\"\"&F.F1F1F1F6*&)F(,*F*F+F,F/F-\"#7F+F1F1-F36%F5,&F-F8F+F1
F1F1F6*&)F(,*F,F/F-!\"#FCF1F*F+F1-F36%F5,&F-F8FCF1F1F1F6*&)F(,*F,F/F-F
.FCF1F*F+F1-F36%F5,&F-!\"&FCF1F1F1F1" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 19 "A27:=negate(3,A26);" }}{PARA 11 "" 1 "" {XPPMATH 20 "
6#>%$A27G,&*&)%\"qG,*%\"nG\"\"$*$%\"jG\"\"#\"#5F-\"\")\"\"\"F1F1-%#T0G
6%,&F*F1!\"\"F1,&F-\"\"&F.F1F1F1F6*&)F(,*F*F+F,F/F-\"#7F+F1F1-F36%F5,&
F-F8F+F1F1F1F6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "A28:=shif
tdown(2,A27);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$A28G,&*&)%\"qG,*%
\"nG\"\"$*$%\"jG\"\"#\"#5F-\"\")\"\"\"F1F1-%#T0G6%,&F*F1!\"\"F1,&F-\"
\"&F.F1F1F1F6*&)F(,*F*F+F,F/F-!\")F1F1F1-F36%F5,&F-F8!\"#F1F1F1F1" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "A29:=negate(2,A28);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$A29G,&*&)%\"qG,*%\"nG\"\"$*$%\"jG\"
\"#\"#5F-\"\")\"\"\"F1F1-%#T0G6%,&F*F1!\"\"F1,&F-\"\"&F.F1F1F1F6*&F'F1
-F36%F5,&F-!\"&!\"#F1F1F1F1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
16 "A30:=sym(1,A29);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$A30G\"\"!" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "3 0 0" 0 }
{VIEWOPTS 1 1 0 1 1 1803 }