{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.2" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "####### 3.2-B" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 62 "op2:=annihiloper( q^(j^2 + j) /spqf
ac(q^2,q^2,j), 0, forward);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$op2G
,(%\"NG\"\"\"!\"\"F')%\"qG,&%\"nG\"\"#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 67 "a1:
= applyshiftop(op2, q^(2*j^2 + j)* gp(n*2 + 1, n + 2*j + 1, 1));" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a1G,(*&)%\"qG,&*$%\"jG\"\"#F,F+\"\"
\"F--%#gpG6%,&%\"nGF,F-F-,(F2F-F+F,F-F-F-F-!\"\"*&F.F-)F(,*F*F,F+F-F2F
,F,F-F-F4*&F'F--F/6%,&F2F,\"\"$F-,(F2F-F,F-F+F,F-F-F-" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a2:= eG1(3,a1);" }}{PARA 12 "" 1 "
" {XPPMATH 20 "6#>%#a2G,**&)%\"qG,&*$%\"jG\"\"#F,F+\"\"\"F--%#gpG6%,&%
\"nGF,F-F-,(F2F-F+F,F-F-F-F-!\"\"*&F.F-)F(,*F*F,F+F-F2F,F,F-F-F4*&F'F-
-F/6%,&F2F,F,F-F3F-F-F-*&)F(,*F*F,F+\"\"$F2F-F,F-F--F/6%F;,(F2F-F,F-F+
F,F-F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a3:= eG0(3,a2);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a3G,(*&-%#gpG6%,&%\"nG\"\"#\"\"
\"F-,(F+F-%\"jGF,F-F-F-F-)%\"qG,**$F/F,F,F/F-F+F,F,F-F-!\"\"*&)F1,*F3F
,F/F4F+F-F-F-F--F(6%F*,&F+F-F/F,F-F-F-*&)F1,*F3F,F/\"\"$F+F-F,F-F--F(6
%,&F+F,F,F-,(F+F-F,F-F/F,F-F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 15 "a4:= eG0(3,a3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#a4G,&*&)
%\"qG,**$%\"jG\"\"#F,F+!\"\"%\"nG\"\"\"F/F/F/-%#gpG6%,&F.F,F/F/,&F.F/F
+F,F/F/F/*&)F(,*F*F,F+\"\"$F.F/F,F/F/-F16%F3,(F.F/F,F/F+F,F/F/F/" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "a5:= shiftdown(2,a4);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#a5G\"\"!" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 11 "##### 3.2-T" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 15 "altsign:=false;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%(altsignG
%&falseG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 131 "b1:= applyshif
top(op2, q^(12*j^2 +  2*j   ) * T1(n+1,6*j + 1,1) \n                  \+
   - q^(12*j^2 + 14*j +4) * T1(n+1,6*j + 3,1)); " }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%#b1G,.*&)%\"qG,&*$%\"jG\"\"#\"#7F+F,\"\"\"-%#T1G6%,&%
\"nGF.F.F.,&F+\"\"'F.F.F.F.!\"\"*&)F(,(F*F-F+\"#9\"\"%F.F.-F06%F2,&F+F
5\"\"$F.F.F.F.*&F/F.)F(,*F3F,F,F.F*F-F+F,F.F6*&F<F.)F(,*F3F,F5F.F*F-F+
F:F.F.*&F'F.-F06%,&F3F.F,F.F4F.F.F.*&F8F.-F06%FIF>F.F.F6" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "b2:= eT1(5,b1);" }}{PARA 12 "" 1 "
" {XPPMATH 20 "6#>%#b2G,.*&)%\"qG,(*$%\"jG\"\"#\"#7F+\"#9\"\"%\"\"\"F0
-%#T1G6%,&%\"nGF0F0F0,&F+\"\"'\"\"$F0F0F0F0*&-F26%F4,&F+F7F0F0F0F0)F(,
*F5F,F,F0F*F-F+F,F0!\"\"*&F1F0)F(,*F5F,F7F0F*F-F+F.F0F0*&)F(,*F*F-F+\"
\")F5F0F8F0F0-%#T0G6%F4,&F+F7F,F0F0F0F0*&)F(,*F*F-F+!\"%F5F0F0F0F0-FH6
%F4,$F+F7F0F0F0*&F'F0-F26%,&F5F0F,F0F6F0F0F?" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 15 "b3:= eT1(6,b2);" }}{PARA 12 "" 1 "" {XPPMATH 20 
"6#>%#b3G,**&-%#T1G6%,&%\"nG\"\"\"F,F,,&%\"jG\"\"'F,F,F,F,)%\"qG,*F+\"
\"#F3F,*$F.F3\"#7F.F3F,!\"\"*&-F(6%F*,&F.F/\"\"$F,F,F,)F1,*F+F3F/F,F4F
5F.\"#9F,F,*&)F1,*F4F5F.!\"%F+F,F,F,F,-%#T0G6%F*,$F.F/F,F,F,*&)F1,*F4F
5F.\"#?\"\"*F,F+F,F,-FD6%F*,&F.F/\"\"%F,F,F,F6" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 21 "b4:= shiftdown(4,b3);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%#b4G,**&-%#T1G6%,&%\"nG\"\"\"F,F,,&%\"jG\"\"'F,F,F,F,
)%\"qG,*F+\"\"#F3F,*$F.F3\"#7F.F3F,!\"\"*&-F(6%F*,&F.F/\"\"$F,F,F,)F1,
*F+F3F/F,F4F5F.\"#9F,F,*&)F1,*F4F5F.!\"%F+F,F,F,F,-%#T0G6%F*,$F.F/F,F,
F,*&F@F,-FD6%F*,&F.F/!\"#F,F,F,F6" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "b5:= sym(4,b4);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%
#b5G,**&-%#T1G6%,&%\"nG\"\"\"F,F,,&%\"jG\"\"'F,F,F,F,)%\"qG,*F+\"\"#F3
F,*$F.F3\"#7F.F3F,!\"\"*&-F(6%F*,&F.F/\"\"$F,F,F,)F1,*F+F3F/F,F4F5F.\"
#9F,F,*&)F1,*F4F5F.!\"%F+F,F,F,F,-%#T0G6%F*,$F.F/F,F,F,*&F@F,-FD6%F*,&
F.!\"'F3F,F,F,F6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "b6:= eT
0(4,b5);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b6G,.*&-%#T1G6%,&%\"nG
\"\"\"F,F,,&%\"jG\"\"'F,F,F,F,)%\"qG,*F+\"\"#F3F,*$F.F3\"#7F.F3F,!\"\"
*&-F(6%F*,&F.F/\"\"$F,F,F,)F1,*F+F3F/F,F4F5F.\"#9F,F,*&)F1,*F4F5F.!\"%
F+F,F,F,F,-%#T0G6%F*,$F.F/F,F,F,*&F@F,-FD6%F+,&F.!\"'F,F,F,F,F6*&)F1,*
F+F3\"\"%F,F4F5F.!#5F,-F(6%F+,&F.FKF3F,F,F,F6*&)F1,*F4F5F.!#;F+F;\"\"(
F,F,-FD6%F+,&F.FKF;F,F,F,F6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
15 "b7:= eT0(3,b6);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b7G,2*&-%#T1
G6%,&%\"nG\"\"\"F,F,,&%\"jG\"\"'F,F,F,F,)%\"qG,*F+\"\"#F3F,*$F.F3\"#7F
.F3F,!\"\"*&-F(6%F*,&F.F/\"\"$F,F,F,)F1,*F+F3F/F,F4F5F.\"#9F,F,*&)F1,*
F4F5F.!\"%F+F,F,F,F,-%#T0G6%F+,&F.F/F6F,F,F,F,*&F0F,-F(6%F+,$F.F/F,F,F
,*&)F1,*F4F5F.\"\")F+F;F;F,F,-FD6%F+F-F,F,F,*&F@F,-FD6%F+,&F.!\"'F,F,F
,F,F6*&)F1,*F+F3\"\"%F,F4F5F.!#5F,-F(6%F+,&F.FUF3F,F,F,F6*&)F1,*F4F5F.
!#;F+F;\"\"(F,F,-FD6%F+,&F.FUF;F,F,F,F6" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "b8:= sym(3,b7);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%
#b8G,.*&-%#T1G6%,&%\"nG\"\"\"F,F,,&%\"jG\"\"'F,F,F,F,)%\"qG,*F+\"\"#F3
F,*$F.F3\"#7F.F3F,!\"\"*&-F(6%F*,&F.F/\"\"$F,F,F,)F1,*F+F3F/F,F4F5F.\"
#9F,F,*&F0F,-F(6%F+,$F.F/F,F,F,*&)F1,*F4F5F.\"\")F+F;F;F,F,-%#T0G6%F+F
-F,F,F,*&)F1,*F+F3\"\"%F,F4F5F.!#5F,-F(6%F+,&F.!\"'F3F,F,F,F6*&)F1,*F4
F5F.!#;F+F;\"\"(F,F,-FH6%F+,&F.FRF;F,F,F,F6" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 21 "b9:= shiftdown(2,b8);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%#b9G,.*&-%#T1G6%,&%\"nG\"\"\"F,F,,&%\"jG\"\"'F,F,F,F,
)%\"qG,*F+\"\"#F3F,*$F.F3\"#7F.F3F,!\"\"*&)F1,*F+F3\"\"%F,F4F5F.!#5F,-
F(6%F*,&F.F/!\"$F,F,F,F,*&F0F,-F(6%F+,$F.F/F,F,F,*&)F1,*F4F5F.\"\")F+
\"\"$FHF,F,-%#T0G6%F+F-F,F,F,*&F8F,-F(6%F+,&F.!\"'F3F,F,F,F6*&)F1,*F4F
5F.!#;F+FH\"\"(F,F,-FJ6%F+,&F.FPFHF,F,F,F6" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 16 "b10:= eT1(2,b9);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6
#>%$b10G,2*&-%#T1G6%,&%\"nG\"\"\"F,F,,&%\"jG\"\"'F,F,F,F,)%\"qG,*F+\"
\"#F3F,*$F.F3\"#7F.F3F,!\"\"*&)F1,*F+F3\"\"%F,F4F5F.!#5F,-F(6%F+,&F.F/
!\"$F,F,F,F,*&)F1,*F+\"\"$F3F,F4F5F.!\"%F,-%#T0G6%F+,&F.F/!\"#F,F,F,F,
*&)F1,*F+FC\"\")F,F4F5F.!#;F,-FF6%F+,&F.F/FDF,F,F,F,*&F0F,-F(6%F+,$F.F
/F,F,F,*&)F1,*F4F5F.FMF+FCFCF,F,-FF6%F+F-F,F,F,*&F8F,-F(6%F+,&F.!\"'F3
F,F,F,F6*&)F1,*F4F5F.FNF+FC\"\"(F,F,-FF6%F+,&F.FinFCF,F,F,F6" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b11:= sym(2,b10);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$b11G,2*&-%#T1G6%,&%\"nG\"\"\"F,F,,&%\"jG
\"\"'F,F,F,F,)%\"qG,*F+\"\"#F3F,*$F.F3\"#7F.F3F,!\"\"*&)F1,*F+F3\"\"%F
,F4F5F.!#5F,-F(6%F+,&F.!\"'\"\"$F,F,F,F,*&)F1,*F+F@F3F,F4F5F.!\"%F,-%#
T0G6%F+,&F.F/!\"#F,F,F,F,*&)F1,*F+F@\"\")F,F4F5F.!#;F,-FF6%F+,&F.F/FDF
,F,F,F,*&F0F,-F(6%F+,$F.F/F,F,F,*&)F1,*F4F5F.FMF+F@F@F,F,-FF6%F+F-F,F,
F,*&F8F,-F(6%F+,&F.F?F3F,F,F,F6*&)F1,*F4F5F.FNF+F@\"\"(F,F,-FFF=F,F6" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b12:= e0(7,b11);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b12G,.*&-%#T1G6%,&%\"nG\"\"\"F,F,,&
%\"jG\"\"'F,F,F,F,)%\"qG,*F+\"\"#F3F,*$F.F3\"#7F.F3F,!\"\"*&)F1,*F+\"
\"$F3F,F4F5F.!\"%F,-%#T0G6%F+,&F.F/!\"#F,F,F,F,*&)F1,*F+F:\"\")F,F4F5F
.!#;F,-F=6%F+,&F.F/F;F,F,F,F,*&F0F,-F(6%F+,$F.F/F,F,F,*&)F1,*F4F5F.FDF
+F:F:F,F,-F=6%F+F-F,F,F,*&F8F,-F=6%F+,&F.!\"'F3F,F,F,F6" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "b13:= sym(2,b12);" }}{PARA 12 "" 1 
"" {XPPMATH 20 "6#>%$b13G,**&-%#T1G6%,&%\"nG\"\"\"F,F,,&%\"jG\"\"'F,F,
F,F,)%\"qG,*F+\"\"#F3F,*$F.F3\"#7F.F3F,!\"\"*&)F1,*F+\"\"$\"\")F,F4F5F
.!#;F,-%#T0G6%F+,&F.F/!\"%F,F,F,F,*&F0F,-F(6%F+,$F.F/F,F,F,*&)F1,*F4F5
F.F;F+F:F:F,F,-F>6%F+F-F,F,F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 17 "b14:= eT1(1,b13);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$b14G,.*&
)%\"qG,*%\"nG\"\"#F+\"\"\"*$%\"jGF+\"#7F.F+F,-%#T1G6%F*,&F.\"\"'F,F,F,
F,!\"\"*&)F(,*F*\"\"$\"\"%F,F-F/F.\"\")F,-%#T0G6%F*,&F.F4F+F,F,F,F5*&)
F(,*F*F9F+F,F-F/F.!\"%F,-F=6%F*,$F.F4F,F,F5*&)F(,*F*F9F;F,F-F/F.!#;F,-
F=6%F*,&F.F4FCF,F,F,F,*&F'F,-F1FEF,F,*&)F(,*F-F/F.F;F*F9F9F,F,-F=F2F,F
," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "b15:= e0(5,b14);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$b15G,&*&)%\"qG,*%\"nG\"\"$\"\"%\"\"
\"*$%\"jG\"\"#\"#7F/\"\")F--%#T0G6%F*,&F/\"\"'F0F-F-F-!\"\"*&)F(,*F*F+
F2F-F.F1F/!#;F--F46%F*,&F/F7!\"%F-F-F-F-" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 23 "b16:= shiftdown(1,b15);" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#>%$b16G\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}
{MARK "3 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }