{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 17 "########## 3.96-t" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 77 "op1:= annihiloper( q^(j^2+
2*j)/qfac(q,q^2,j+1) / spqfac(q^2,q^2,j), 0, back);" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#>%$op1G,(\"\"\"F&*&,(F&F&%\"qGF&)F),&%\"nG\"\"#F&F&F&
F&%\"NG!\"\"F/*&F)F&F.!\"#F&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 14 "altsign:=true;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%(altsignG%%t
rueG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 61 "a1:= applyshiftop(o
p1, q^(10*j^2 + 6*j)* U(n+1, 5*j + 1, 1));" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%#a1G,,*&-%\"UG6%,&%\"nG\"\"\"!\"\"F,,&%\"jG\"\"&F,F,F
,F,)%\"qG,(F,F,*$F/\"\"#\"#5F/\"\"'F,F,*&)F2,&F4F6F/F7F,-F(6%F+F.F,F,F
-*&F;F,F1F,F-*&F;F,)F2,*F4F6F/F7F+F5F,F,F,F-*&F9F,-F(6%,&F+F,F,F,F.F,F
,F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a2:= eU1(3,a1);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a2G,.*&)%\"qG,&*$%\"jG\"\"#\"#5F+\"
\"'\"\"\"-%\"UG6%%\"nG,&F+\"\"&F/F/F/F/!\"\"*&)F(,(F*F-F+F.F3F,F/-F16%
,&F3F/F6F/F4F/F/F6*&)F(,(F*F-F+F/F3F/F/-%#T1G6%F<,$F+F5F/F/F6*&)F(,*\"
\"$F/F*F-F+\"#6F3F/F/-FA6%F<,&F+F5FGF/F/F/F6*&F0F/)F(,*F*F-F+F.F3F,F/F
/F/F6*&F'F/-F16%,&F3F/F/F/F4F/F/F/" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "a3:= eU1(6,a2);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%
#a3G,,*&)%\"qG,(*$%\"jG\"\"#\"#5F+\"\"'%\"nGF,\"\"\"-%\"UG6%,&F/F0!\"
\"F0,&F+\"\"&F0F0F0F0F5*&)F(,(F*F-F+F0F/F0F0-%#T1G6%F4,$F+F7F0F0F5*&)F
(,*\"\"$F0F*F-F+\"#6F/F0F0-F<6%F4,&F+F7FBF0F0F0F5*&F9F0-F<6%F/F>F0F0F0
*&F@F0-F<6%F/FFF0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a4
:= eT1(4,a3);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a4G,,*&)%\"qG,(*$%
\"jG\"\"#\"#5F+\"\"'%\"nGF,\"\"\"-%\"UG6%,&F/F0!\"\"F0,&F+\"\"&F0F0F0F
0F5*&)F(,*\"\"$F0F*F-F+\"#6F/F0F0-%#T1G6%F4,&F+F7F;F0F0F0F5*&F'F0-%#T0
GF3F0F0*&)F(,(F*F-F+!\"%F/F,F0-FC6%F4,&F+F7F5F0F0F0F0*&F9F0-F>6%F/F@F0
F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a5:= eT1(5,a4);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a5G,,*&)%\"qG,(*$%\"jG\"\"#\"#5F+\"
\"'%\"nGF,\"\"\"-%\"UG6%,&F/F0!\"\"F0,&F+\"\"&F0F0F0F0F5*&F'F0-%#T0GF3
F0F0*&)F(,(F*F-F+!\"%F/F,F0-F:6%F4,&F+F7F5F0F0F0F0*&)F(,*F.F0F*F-F+\"#
;F/F,F0-F:6%F4,&F+F7\"\"%F0F0F0F0*&F'F0-F:6%F4,&F+F7F,F0F0F0F0" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a6:= splitU(1,a5);" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#>%#a6G,&*&)%\"qG,(*$%\"jG\"\"#\"#5F+!\"%%\"n
GF,\"\"\"-%#T0G6%,&F/F0!\"\"F0,&F+\"\"&F5F0F0F0F0*&)F(,*\"\"'F0F*F-F+
\"#;F/F,F0-F26%F4,&F+F7\"\"%F0F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 19 "a7:= shiftup(1,a6);" }}{PARA 11 "" 1 "" {XPPMATH 20 "
6#>%#a7G\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}
{MARK "2 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }