{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 12 "######  3.37" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 94 "op1:= annihiloper ( qfac(-q,
q^2,j) * q^(j*(j+1)/2) / qfac(q,q^2,j+1)/ spqfac(q,q,j), 0, back);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$op1G,*\"\"\"F&*&,&F&F&)%\"qG%\"nGF&
F&%\"NG!\"\"F-*&F*F&F,!\"#F-*&,&F*F-)F*,&F+F&F-F&F&F&F,!\"$F-" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 93 "A:= applyshiftop(op1, q^(4*j
^2 + j) * ( T1(n,4*j+1,1/2) + q^((n-4*j)/2) * T0(n, 4*j, 1/2)) );" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%\"AG,:*&)%\"qG,(*$%\"jG\"\"#\"\"%F+
\"\"\"F.F.F.-%#T1G6%,&%\"nGF.!\"$F.,&F+F-F.F.#F.F,F.F.*&)F(F3F6)F(,(F*
F-F+!\"\"#F;F,F.F.F.*&)F(,*F*F-F+F.F3F.F;F.F.F/F.F;*&F8#\"\"$F,)F(,(F*
F-F+F;#!\"&F,F.F.F;*&F'F.-F06%,&F3F.!\"#F.F5F6F.F;*&F8F6-%#T0G6%FJ,$F+
F-F6F.F;*&-F06%,&F3F.F;F.F5F6F.)F(,&F*F-F+F.F.F;*&F8F6-FN6%FTFPF6F.F;*
&FRF.)F(,(F*F-F+F.F3F.F.F;*&F8FAFXF.F;*&FUF.-F06%F3F5F6F.F.*&F8F6-FN6%
F3FPF6F.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 3 "   " }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 498 "A1:= q^(4*j^2 +j +1)*T1(n-3,4*j+1,1/2)\n   + q^(4*j^
2 -j -1/2 + n/2)*T0(n-3,4*j,1/2)\n   - q^(4*j^2 +j +n-1)*T1(n-3,4*j+1,
1/2)\n    -q^(4*j^2 -j -5/2 + 3/2*n)*T0(n-3,4*j,1/2)\n    -q^(4*j^2 +j
 +1)*T1(n-2,4*j+1,1/2)\n    -q^(4*j^2 -j  + n/2)*T0(n-2,4*j,1/2)\n    \+
-q^(4*j^2 +j )*T1(n-1,4*j+1,1/2)\n    -q^(4*j^2 -j -1/2 + n/2)*T0(n-1,
4*j,1/2)\n    -q^(4*j^2 +j +n)*T1(n-1,4*j+1,1/2)\n    -q^(4*j^2 -j -1/
2 + 3/2*n)*T0(n-1,4*j,1/2)\n    +q^(4*j^2 +j )*T1(n,4*j+1,1/2)\n    +q
^(4*j^2 -j + n/2) * T0(n, 4*j, 1/2);\n" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%#A1G,:*&)%\"qG,(*$%\"jG\"\"#\"\"%F+\"\"\"F.F.F.-%#T1G6%,&%\"nG
F.!\"$F.,&F+F-F.F.#F.F,F.F.*&)F(,*F*F-F+!\"\"#F:F,F.F3F6F.-%#T0G6%F2,$
F+F-F6F.F.*&)F(,*F*F-F+F.F3F.F:F.F.F/F.F:*&)F(,*F*F-F+F:#!\"&F,F.F3#\"
\"$F,F.F<F.F:*&F'F.-F06%,&F3F.!\"#F.F5F6F.F:*&)F(,(F*F-F+F:F3F6F.-F=6%
FMF?F6F.F:*&-F06%,&F3F.F:F.F5F6F.)F(,&F*F-F+F.F.F:*&F8F.-F=6%FWF?F6F.F
:*&FUF.)F(,(F*F-F+F.F3F.F.F:*&)F(,*F*F-F+F:F;F.F3FHF.FenF.F:*&FXF.-F06
%F3F5F6F.F.*&FPF.-F=6%F3F?F6F.F." }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 16 "A2:= eT1(11,A1);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>
%#A2G,6*&)%\"qG,(*$%\"jG\"\"#\"\"%F+\"\"\"F.F.F.-%#T1G6%,&%\"nGF.!\"$F
.,&F+F-F.F.#F.F,F.F.*&)F(,*F*F-F+!\"\"#F:F,F.F3F6F.-%#T0G6%F2,$F+F-F6F
.F.*&)F(,*F*F-F+F.F3F.F:F.F.F/F.F:*&)F(,*F*F-F+F:#!\"&F,F.F3#\"\"$F,F.
F<F.F:*&F'F.-F06%,&F3F.!\"#F.F5F6F.F:*&)F(,(F*F-F+F:F3F6F.-F=6%FMF?F6F
.F:*&-F06%,&F3F.F:F.F5F6F.)F(,(F*F-F+F.F3F.F.F:*&)F(,*F*F-F+F:F;F.F3FH
F.-F=6%FWF?F6F.F:*&)F(,*F*F-F+FIF3F6F6F.F.-F=6%FW,&F+F-F,F.F6F.F.*&FPF
.-F=6%F3F?F6F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A3:= eT
1(5,A2);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A3G,2*&)%\"qG,**$%\"jG
\"\"#\"\"%F+\"\"\"%\"nGF.!\"\"F.F.-%#T1G6%,&F/F.!\"$F.,&F+F-F.F.#F.F,F
.F0*&)F(,*F*F-F+F0#!\"&F,F.F/#\"\"$F,F.-%#T0G6%F4,$F+F-F7F.F0*&)F(,*F*
F-F+F>F/F7F7F.F.-F@6%F4,&F+F-F,F.F7F.F0*&)F(,(F*F-F+F0F/F7F.-F@6%,&F/F
.!\"#F.FBF7F.F0*&-F26%,&F/F.F0F.F6F7F.)F(,(F*F-F+F.F/F.F.F0*&)F(,*F*F-
F+F0#F0F,F.F/F=F.-F@6%FSFBF7F.F0*&FDF.-F@6%FSFHF7F.F.*&FJF.-F@6%F/FBF7
F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A4:= eT0(8,A3);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A4G,6*&)%\"qG,**$%\"jG\"\"#\"\"%F+
\"\"\"%\"nGF.!\"\"F.F.-%#T1G6%,&F/F.!\"$F.,&F+F-F.F.#F.F,F.F0*&)F(,*F*
F-F+F0#!\"&F,F.F/#\"\"$F,F.-%#T0G6%F4,$F+F-F7F.F0*&)F(,*F*F-F+F>F/F7F7
F.F.-F@6%F4,&F+F-F,F.F7F.F0*&)F(,(F*F-F+F0F/F7F.-F@6%,&F/F.!\"#F.FBF7F
.F0*&-F26%,&F/F.F0F.F6F7F.)F(,(F*F-F+F.F/F.F.F0*&)F(,*F*F-F+F0#F0F,F.F
/F=F.-F@6%FSFBF7F.F0*&FDF.-F@6%FSFHF7F.F.*&FJF.-F@6%FS,&F+F-F0F.F7F.F.
*&FTF.-F2FenF.F.*&)F(,(F*F-F+F>F/F=F.-F@FRF.F." }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 14 "A5:=sym(8,A4);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%#A5G,6*&)%\"qG,**$%\"jG\"\"#\"\"%F+\"\"\"%\"nGF.!\"\"F.F.-%#T1
G6%,&F/F.!\"$F.,&F+F-F.F.#F.F,F.F0*&)F(,*F*F-F+F0#!\"&F,F.F/#\"\"$F,F.
-%#T0G6%F4,$F+F-F7F.F0*&)F(,*F*F-F+F>F/F7F7F.F.-F@6%F4,&F+F-F,F.F7F.F0
*&)F(,(F*F-F+F0F/F7F.-F@6%,&F/F.!\"#F.FBF7F.F0*&-F26%,&F/F.F0F.F6F7F.)
F(,(F*F-F+F.F/F.F.F0*&)F(,*F*F-F+F0#F0F,F.F/F=F.-F@6%FSFBF7F.F0*&FDF.-
F@6%FSFHF7F.F.*&FJF.-F@6%FS,&F+!\"%F.F.F7F.F.*&FTF.-F2FenF.F.*&)F(,(F*
F-F+F>F/F=F.-F@FRF.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "A6
:=eT0(8,A5);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A6G,:*&)%\"qG,**$%
\"jG\"\"#\"\"%F+\"\"\"%\"nGF.!\"\"F.F.-%#T1G6%,&F/F.!\"$F.,&F+F-F.F.#F
.F,F.F0*&)F(,*F*F-F+F0#!\"&F,F.F/#\"\"$F,F.-%#T0G6%F4,$F+F-F7F.F0*&)F(
,*F*F-F+F>F/F7F7F.F.-F@6%F4,&F+F-F,F.F7F.F0*&)F(,(F*F-F+F0F/F7F.-F@6%,
&F/F.!\"#F.FBF7F.F0*&-F26%,&F/F.F0F.F6F7F.)F(,(F*F-F+F.F/F.F.F0*&)F(,*
F*F-F+F0#F0F,F.F/F=F.-F@6%FSFBF7F.F0*&FDF.-F@6%FSFHF7F.F.*&FJF.-F@6%FN
,$F+!\"%F7F.F.*&)F(,(F*F-F+F5F/F.F.-F26%FN,&F+F]oF.F.F7F.F.*&)F(,(F*F-
F+F<F/F=F.-F@6%FN,&F+F]oF,F.F7F.F.*&FTF.-F2FenF.F.*&)F(,(F*F-F+F>F/F=F
.-F@FRF.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "A7:=sym(4,A6)
;" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A7G,6*&)%\"qG,**$%\"jG\"\"#\"
\"%F+\"\"\"%\"nGF.!\"\"F.F.-%#T1G6%,&F/F.!\"$F.,&F+F-F.F.#F.F,F.F0*&)F
(,*F*F-F+F0#!\"&F,F.F/#\"\"$F,F.-%#T0G6%F4,$F+F-F7F.F0*&)F(,*F*F-F+F>F
/F7F7F.F.-F@6%F4,&F+F-F,F.F7F.F0*&-F26%,&F/F.F0F.F6F7F.)F(,(F*F-F+F.F/
F.F.F0*&)F(,*F*F-F+F0#F0F,F.F/F=F.-F@6%FLFBF7F.F0*&FDF.-F@6%FLFHF7F.F.
*&)F(,(F*F-F+F5F/F.F.-F26%,&F/F.!\"#F.,&F+!\"%F.F.F7F.F.*&)F(,(F*F-F+F
<F/F=F.-F@6%Fgn,&F+FjnF,F.F7F.F.*&FMF.-F2FTF.F.*&)F(,(F*F-F+F>F/F=F.-F
@FKF.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "A8:=e0(9,A7);" }
}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A8G,.*&)%\"qG,**$%\"jG\"\"#\"\"%F+
\"\"\"%\"nGF.!\"\"F.F.-%#T1G6%,&F/F.!\"$F.,&F+F-F.F.#F.F,F.F0*&)F(,*F*
F-F+F0#!\"&F,F.F/#\"\"$F,F.-%#T0G6%F4,$F+F-F7F.F0*&)F(,*F*F-F+F>F/F7F7
F.F.-F@6%F4,&F+F-F,F.F7F.F0*&FDF.-F@6%,&F/F.F0F.FHF7F.F.*&)F(,(F*F-F+F
5F/F.F.-F26%,&F/F.!\"#F.,&F+!\"%F.F.F7F.F.*&)F(,(F*F-F+F<F/F=F.-F@6%FR
,&F+FUF,F.F7F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A9:= eT
0(4,A8);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A9G,2*&)%\"qG,**$%\"jG
\"\"#\"\"%F+\"\"\"%\"nGF.!\"\"F.F.-%#T1G6%,&F/F.!\"$F.,&F+F-F.F.#F.F,F
.F0*&)F(,*F*F-F+F0#!\"&F,F.F/#\"\"$F,F.-%#T0G6%F4,$F+F-F7F.F0*&)F(,*F*
F-F+F>F/F7F7F.F.-F@6%F4,&F+F-F,F.F7F.F0*&FDF.-F@6%,&F/F.!\"#F.F6F7F.F.
*&)F(,*F*F-F+\"\"&F/F.F.F.F.-F26%FLFHF7F.F.*&)F(,*F*F-F+\"\"(F/F=F=F.F
.-F@6%FL,&F+F-F>F.F7F.F.*&)F(,(F*F-F+F5F/F.F.-F26%FL,&F+!\"%F.F.F7F.F.
*&)F(,(F*F-F+F<F/F=F.-F@6%FL,&F+F[oF,F.F7F.F." }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 15 "A10:=sym(4,A9);" }}{PARA 12 "" 1 "" {XPPMATH 20 
"6#>%$A10G,2*&)%\"qG,**$%\"jG\"\"#\"\"%F+\"\"\"%\"nGF.!\"\"F.F.-%#T1G6
%,&F/F.!\"$F.,&F+F-F.F.#F.F,F.F0*&)F(,*F*F-F+F0#!\"&F,F.F/#\"\"$F,F.-%
#T0G6%F4,$F+F-F7F.F0*&)F(,*F*F-F+F>F/F7F7F.F.-F@6%F4,&F+F-F,F.F7F.F0*&
FDF.-F@6%,&F/F.!\"#F.,&F+!\"%F0F.F7F.F.*&)F(,*F*F-F+\"\"&F/F.F.F.F.-F2
6%FLFHF7F.F.*&)F(,*F*F-F+\"\"(F/F=F=F.F.-F@6%FL,&F+F-F>F.F7F.F.*&)F(,(
F*F-F+F5F/F.F.-F26%FL,&F+FOF.F.F7F.F.*&)F(,(F*F-F+F<F/F=F.-F@6%FL,&F+F
OF,F.F7F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A11:=eT0(4,A
10);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A11G,6*&)%\"qG,**$%\"jG\"\"
#\"\"%F+\"\"\"%\"nGF.!\"\"F.F.-%#T1G6%,&F/F.!\"$F.,&F+F-F.F.#F.F,F.F0*
&)F(,*F*F-F+F0#!\"&F,F.F/#\"\"$F,F.-%#T0G6%F4,$F+F-F7F.F0*&)F(,*F*F-F+
F>F/F7F7F.F.-F@6%F4,&F+F-F,F.F7F.F0*&FDF.-F@6%F4,&F+!\"%!\"#F.F7F.F.*&
F'F.-F26%F4,&F+FMF0F.F7F.F.*&F9F.-F@6%F4,$F+FMF7F.F.*&)F(,*F*F-F+\"\"&
F/F.F.F.F.-F26%,&F/F.FNF.FHF7F.F.*&)F(,*F*F-F+\"\"(F/F=F=F.F.-F@6%Fgn,
&F+F-F>F.F7F.F.*&)F(,(F*F-F+F5F/F.F.-F26%Fgn,&F+FMF.F.F7F.F.*&)F(,(F*F
-F+F<F/F=F.-F@6%Fgn,&F+FMF,F.F7F.F." }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 16 "A12:=sym(4,A11);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>
%$A12G,2*&)%\"qG,**$%\"jG\"\"#\"\"%F+\"\"\"%\"nGF.!\"\"F.F.-%#T1G6%,&F
/F.!\"$F.,&F+F-F.F.#F.F,F.F0*&)F(,*F*F-F+F0#!\"&F,F.F/#\"\"$F,F.-%#T0G
6%F4,$F+F-F7F.F0*&F'F.-F26%F4,&F+!\"%F0F.F7F.F.*&F9F.-F@6%F4,$F+FGF7F.
F.*&)F(,*F*F-F+\"\"&F/F.F.F.F.-F26%,&F/F.!\"#F.,&F+F-F,F.F7F.F.*&)F(,*
F*F-F+\"\"(F/F=F=F.F.-F@6%FR,&F+F-F>F.F7F.F.*&)F(,(F*F-F+F5F/F.F.-F26%
FR,&F+FGF.F.F7F.F.*&)F(,(F*F-F+F<F/F=F.-F@6%FR,&F+FGF,F.F7F.F." }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A13:=sym(1,A12);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$A13G,.*&)%\"qG,**$%\"jG\"\"#\"\"%F+!\"\"#
!\"&F,\"\"\"%\"nG#\"\"$F,F1-%#T0G6%,&F2F1!\"$F1,$F+F-#F1F,F1F.*&F'F1-F
66%F8,$F+!\"%F;F1F1*&)F(,*F*F-F+\"\"&F2F1F1F1F1-%#T1G6%,&F2F1!\"#F1,&F
+F-F,F1F;F1F1*&)F(,*F*F-F+\"\"(F2F3F3F1F1-F66%FH,&F+F-F4F1F;F1F1*&)F(,
(F*F-F+F9F2F1F1-FF6%FH,&F+F@F1F1F;F1F1*&)F(,(F*F-F+F0F2F3F1-F66%FH,&F+
F@F,F1F;F1F1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A14:=sym(1,
A13);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A14G,**&)%\"qG,**$%\"jG\"
\"#\"\"%F+\"\"&%\"nG\"\"\"F0F0F0-%#T1G6%,&F/F0!\"#F0,&F+F-F,F0#F0F,F0F
0*&)F(,*F*F-F+\"\"(F/#\"\"$F,F<F0F0-%#T0G6%F4,&F+F-F=F0F7F0F0*&)F(,(F*
F-F+!\"$F/F0F0-F26%F4,&F+!\"%F0F0F7F0F0*&)F(,(F*F-F+!\"&F/F<F0-F?6%F4,
&F+FIF,F0F7F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "A15:=shi
ftup(3,A14);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A15G,**&)%\"qG,**$%
\"jG\"\"#\"\"%F+\"\"&%\"nG\"\"\"F0F0F0-%#T1G6%,&F/F0!\"#F0,&F+F-F,F0#F
0F,F0F0*&)F(,*F*F-F+\"\"(F/#\"\"$F,F<F0F0-%#T0G6%F4,&F+F-F=F0F7F0F0*&F
'F0-F26%F4,&F+!\"%!\"$F0F7F0!\"\"*&)F(,(F*F-F+!\"&F/F<F0-F?6%F4,&F+FFF
,F0F7F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A16:=sym(3,A15
);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A16G,**&)%\"qG,**$%\"jG\"\"#
\"\"%F+\"\"&%\"nG\"\"\"F0F0F0-%#T1G6%,&F/F0!\"#F0,&F+F-F,F0#F0F,F0F0*&
)F(,*F*F-F+\"\"(F/#\"\"$F,F<F0F0-%#T0G6%F4,&F+F-F=F0F7F0F0*&F'F0-F2F@F
0!\"\"*&)F(,(F*F-F+!\"&F/F<F0-F?6%F4,&F+!\"%F,F0F7F0F0" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A17:=e0(1,A16);" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#>%$A17G,&*&)%\"qG,**$%\"jG\"\"#\"\"%F+\"\"$%\"nG#F.F,
!\"\"\"\"\"F2-%#T0G6%,&F/F2!\"#F2,&F+F-F,F2#F2F,F2F2*&)F(,(F*F-F+!\"&F
/F0F2-F46%F6,&F+!\"%F,F2F9F2F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 22 "A18:=shiftdown(1,A17);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$A
18G,&*&)%\"qG,(*$%\"jG\"\"#\"\"%F+!\"&%\"nG#\"\"$F,\"\"\"-%#T0G6%,&F/F
2!\"#F2,&F+F-F7F2#F2F,F2!\"\"*&F'F2-F46%F6,&F+!\"%F,F2F9F2F2" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A19:=sym(1,A18);" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#>%$A19G\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 0 "" }}}}{MARK "2 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }