{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 14 "######### 3.45" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 92 "op1:= annihiloper( q^(j*(j+1
)/2) * qfac(-q,q,j) / 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&" }}}{EXCHG {PARA 
11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 58 "A:= applyshiftop(op1, q
^(5*j^2+2*j)*T1(n+1,5*j + 1, 1/2));" }}{PARA 12 "" 1 "" {XPPMATH 20 "6
#>%\"AG,.*&-%#T1G6%,&%\"nG\"\"\"!\"#F,,&%\"jG\"\"&F,F,#F,\"\"#F,)%\"qG
,(F,F,*$F/F2F0F/F2F,F,*&-F(6%,&F+F,!\"\"F,F.F1F,F3F,F;*&F8F,)F4,(F6F0F
/F2F+F,F,F;*&)F4,&F6F0F/F2F,-F(6%F+F.F1F,F;*&FBF,F=F,F;*&F@F,-F(6%,&F+
F,F,F,F.F1F,F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "altsign:=
 true;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%(altsignG%%trueG" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 14 "A2:= eT1(6,A);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>
%#A2G,.*&-%#T1G6%,&%\"nG\"\"\"!\"#F,,&%\"jG\"\"&F,F,#F,\"\"#F,)%\"qG,(
F,F,*$F/F2F0F/F2F,F,*&-F(6%,&F+F,!\"\"F,F.F1F,F3F,F;*&F8F,)F4,(F6F0F/F
2F+F,F,F;*&-F(6%F+F.F1F,F=F,F;*&)F4,*F6F0F/#\"\"*F2F+F1F,F,F,-%#T0G6%F
+,&F/F0F2F,F1F,F,*&)F4,(F6F0F/#F;F2F+F1F,-FH6%F+,$F/F0F1F,F," }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 14 "A3:=eT1(2,A2);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>
%#A3G,.*&)%\"qG,**$%\"jG\"\"#\"\"&F+#\"\"*F,%\"nG#\"\"\"F,F2F2F2-%#T0G
6%,&F0F2!\"#F2,&F+F-F,F2F1F2!\"\"*&)F(,(F*F-F+#F9F,F0F1F2-F46%F6,$F+F-
F1F2F9*&-%#T1G6%,&F0F2F9F2,&F+F-F2F2F1F2)F(,(F*F-F+F,F0F2F2F9*&-FC6%F0
FFF1F2FGF2F9*&F'F2-F46%F0F8F1F2F2*&F;F2-F46%F0F@F1F2F2" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "##############" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 15 "A4:= eT0(6,A3);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%#A4G,2*&)%\"qG,**$%\"jG\"\"#\"\"&F+#\"\"*F,%\"nG#\"\"
\"F,F2F2F2-%#T0G6%,&F0F2!\"#F2,&F+F-F,F2F1F2!\"\"*&)F(,(F*F-F+#F9F,F0F
1F2-F46%F6,$F+F-F1F2F9*&-%#T1G6%,&F0F2F9F2,&F+F-F2F2F1F2)F(,(F*F-F+F,F
0F2F2F9*&-FC6%F0FFF1F2FGF2F9*&F'F2-F46%F0F8F1F2F2*&F;F2-F46%FE,&F+F-F9
F2F1F2F2*&FGF2-FC6%FEF@F1F2F2*&)F(,(F*F-F+F.F0#\"\"$F,F2-F4FDF2F2" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "A5:=sym(6,A4);" }}{PARA 12 "
" 1 "" {XPPMATH 20 "6#>%#A5G,2*&)%\"qG,**$%\"jG\"\"#\"\"&F+#\"\"*F,%\"
nG#\"\"\"F,F2F2F2-%#T0G6%,&F0F2!\"#F2,&F+F-F,F2F1F2!\"\"*&)F(,(F*F-F+#
F9F,F0F1F2-F46%F6,$F+F-F1F2F9*&-%#T1G6%,&F0F2F9F2,&F+F-F2F2F1F2)F(,(F*
F-F+F,F0F2F2F9*&-FC6%F0FFF1F2FGF2F9*&F'F2-F46%F0F8F1F2F2*&F;F2-F46%FE,
&F+!\"&F2F2F1F2F2*&FGF2-FC6%FEF@F1F2F2*&)F(,(F*F-F+F.F0#\"\"$F,F2-F4FD
F2F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A6:= eT0(6,A5);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A6G,6*&)%\"qG,**$%\"jG\"\"#\"\"&F+#
\"\"*F,%\"nG#\"\"\"F,F2F2F2-%#T0G6%,&F0F2!\"#F2,&F+F-F,F2F1F2!\"\"*&)F
(,(F*F-F+#F9F,F0F1F2-F46%F6,$F+F-F1F2F9*&-%#T1G6%,&F0F2F9F2,&F+F-F2F2F
1F2)F(,(F*F-F+F,F0F2F2F9*&-FC6%F0FFF1F2FGF2F9*&F'F2-F46%F0F8F1F2F2*&F;
F2-F46%F6,$F+!\"&F1F2F2*&)F(,(F*F-F+!\"$F0F2F2-FC6%F6,&F+FSF2F2F1F2F2*
&)F(,(F*F-F+#!#6F,F0#\"\"$F,F2-F46%F6,&F+FSF,F2F1F2F2*&FGF2-FC6%FEF@F1
F2F2*&)F(,(F*F-F+F.F0FjnF2-F4FDF2F2" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 14 "A7:=sym(2,A6);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#
A7G,2*&)%\"qG,**$%\"jG\"\"#\"\"&F+#\"\"*F,%\"nG#\"\"\"F,F2F2F2-%#T0G6%
,&F0F2!\"#F2,&F+F-F,F2F1F2!\"\"*&-%#T1G6%,&F0F2F9F2,&F+F-F2F2F1F2)F(,(
F*F-F+F,F0F2F2F9*&-F<6%F0F?F1F2F@F2F9*&F'F2-F46%F0F8F1F2F2*&)F(,(F*F-F
+!\"$F0F2F2-F<6%F6,&F+!\"&F2F2F1F2F2*&)F(,(F*F-F+#!#6F,F0#\"\"$F,F2-F4
6%F6,&F+FOF,F2F1F2F2*&F@F2-F<6%F>,$F+F-F1F2F2*&)F(,(F*F-F+F.F0FUF2-F4F
=F2F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "A8:= e0(7,A7);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A8G,.*&)%\"qG,**$%\"jG\"\"#\"\"&F+#
\"\"*F,%\"nG#\"\"\"F,F2F2F2-%#T0G6%,&F0F2!\"#F2,&F+F-F,F2F1F2!\"\"*&-%
#T1G6%F0,&F+F-F2F2F1F2)F(,(F*F-F+F,F0F2F2F9*&F'F2-F46%F0F8F1F2F2*&)F(,
(F*F-F+!\"$F0F2F2-F<6%F6,&F+!\"&F2F2F1F2F2*&)F(,(F*F-F+#!#6F,F0#\"\"$F
,F2-F46%F6,&F+FKF,F2F1F2F2*&)F(,*F*F-F+#F9F,F0FQFYF2F2-F46%,&F0F2F9F2,
$F+F-F1F2F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "########" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 " A9:=sym(3,A8);" }}{PARA 12 
"" 1 "" {XPPMATH 20 "6#>%#A9G,.*&)%\"qG,**$%\"jG\"\"#\"\"&F+#\"\"*F,%
\"nG#\"\"\"F,F2F2F2-%#T0G6%,&F0F2!\"#F2,&F+F-F,F2F1F2!\"\"*&-%#T1G6%F0
,&F+F-F2F2F1F2)F(,(F*F-F+F,F0F2F2F9*&F'F2-F46%F0,&F+!\"&F7F2F1F2F2*&)F
(,(F*F-F+!\"$F0F2F2-F<6%F6,&F+FEF2F2F1F2F2*&)F(,(F*F-F+#!#6F,F0#\"\"$F
,F2-F46%F6,&F+FEF,F2F1F2F2*&)F(,*F*F-F+#F9F,F0FRFZF2F2-F46%,&F0F2F9F2,
$F+F-F1F2F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A10:= eT0(3,
A9);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A10G,2*&)%\"qG,**$%\"jG\"\"
#\"\"&F+#\"\"*F,%\"nG#\"\"\"F,F2F2F2-%#T0G6%,&F0F2!\"#F2,&F+F-F,F2F1F2
!\"\"*&-%#T1G6%F0,&F+F-F2F2F1F2)F(,(F*F-F+F,F0F2F2F9*&F'F2-F46%,&F0F2F
9F2,&F+!\"&!\"$F2F1F2F2*&F?F2-F<6%FD,&F+FFF7F2F1F2F2*&)F(,*F*F-F+#F9F,
F0#\"\"$F,F9F2F2-F46%FD,&F+FFF9F2F1F2F2*&)F(,(F*F-F+FGF0F2F2-F<6%F6,&F
+FFF2F2F1F2F2*&)F(,(F*F-F+#!#6F,F0FPF2-F46%F6,&F+FFF,F2F1F2F2*&)F(,*F*
F-F+FOF0FPFOF2F2-F46%FD,$F+F-F1F2F2" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "A11:= sym(3,A10);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%$A11G,2*&)%\"qG,**$%\"jG\"\"#\"\"&F+#\"\"*F,%\"nG#\"\"\"F,F2F2F2-%#T
0G6%,&F0F2!\"#F2,&F+F-F,F2F1F2!\"\"*&-%#T1G6%F0,&F+F-F2F2F1F2)F(,(F*F-
F+F,F0F2F2F9*&F'F2-F46%,&F0F2F9F2,&F+F-\"\"$F2F1F2F2*&F?F2-F<6%FD,&F+!
\"&F7F2F1F2F2*&)F(,*F*F-F+#F9F,F0#FFF,F9F2F2-F46%FD,&F+FKF9F2F1F2F2*&)
F(,(F*F-F+!\"$F0F2F2-F<6%F6,&F+FKF2F2F1F2F2*&)F(,(F*F-F+#!#6F,F0FPF2-F
46%F6,&F+FKF,F2F1F2F2*&)F(,*F*F-F+FOF0FPFOF2F2-F46%FD,$F+F-F1F2F2" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "A12:= eT0(3,A11);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$A12G,2*&-%#T1G6%%\"nG,&%\"jG\"\"&\"\"\"F.
#F.\"\"#F.)%\"qG,(*$F,F0F-F,F0F*F.F.!\"\"*&)F2,*F4F-F,\"\"(F*F.F0F.F.-
F(6%,&F*F.!\"#F.,&F,F-\"\"$F.F/F.F.*&)F2,*F4F-F,#\"#>F0F*#F?F0F?F.F.-%
#T0G6%F<,&F,F-\"\"%F.F/F.F.*&F1F.-F(6%,&F*F.F5F.,&F,!\"&F=F.F/F.F.*&)F
2,*F4F-F,#F5F0F*FEF5F.F.-FG6%FN,&F,FPF5F.F/F.F.*&)F2,(F4F-F,!\"$F*F.F.
-F(6%F<,&F,FPF.F.F/F.F.*&)F2,(F4F-F,#!#6F0F*FEF.-FG6%F<,&F,FPF0F.F/F.F
.*&)F2,*F4F-F,FTF*FEFTF.F.-FG6%FN,$F,F-F/F.F." }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 16 "A13:=sym(4,A12);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%$A13G,2*&-%#T1G6%%\"nG,&%\"jG\"\"&\"\"\"F.#F.\"\"#F.)%\"qG,(*$
F,F0F-F,F0F*F.F.!\"\"*&)F2,*F4F-F,\"\"(F*F.F0F.F.-F(6%,&F*F.!\"#F.,&F,
F-\"\"$F.F/F.F.*&)F2,*F4F-F,#\"#>F0F*#F?F0F?F.F.-%#T0G6%F<,&F,F-\"\"%F
.F/F.F.*&F1F.-F(6%,&F*F.F5F.,&F,F-F0F.F/F.F.*&)F2,*F4F-F,#F5F0F*FEF5F.
F.-FG6%FN,&F,!\"&F5F.F/F.F.*&)F2,(F4F-F,!\"$F*F.F.-F(6%F<,&F,FWF.F.F/F
.F.*&)F2,(F4F-F,#!#6F0F*FEF.-FG6%F<,&F,FWF0F.F/F.F.*&)F2,*F4F-F,FSF*FE
FSF.F.-FG6%FN,$F,F-F/F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
17 "A14:= eT1(1,A13);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A14G,2*&-%
#T1G6%,&%\"nG\"\"\"!\"\"F,,&%\"jG\"\"&F,F,#F,\"\"#F,)%\"qG,(*$F/F2F0F/
F2F+F,F,F-*&)F4,*F6F0F/#\"\"*F2F+#\"\"$F2F1F,F,-%#T0G6%F*,&F/F0F2F,F1F
,F-*&)F4,*F6F0F/\"\"(F+F,F2F,F,-F(6%,&F+F,!\"#F,,&F/F0F=F,F1F,F,*&)F4,
*F6F0F/#\"#>F2F+F<F=F,F,-F?6%FH,&F/F0\"\"%F,F1F,F,*&F3F,-F(F@F,F,*&)F4
,*F6F0F/#F-F2F+F<F-F,F,-F?6%F*,&F/!\"&F-F,F1F,F,*&)F4,(F6F0F/!\"$F+F,F
,-F(6%FH,&F/FgnF,F,F1F,F,*&)F4,(F6F0F/#!#6F2F+F<F,-F?6%FH,&F/FgnF2F,F1
F,F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A15:= e0(1,A14);" }
}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A15G,.*&)%\"qG,**$%\"jG\"\"#\"\"&F
+#!\"\"F,%\"nG#\"\"$F,F/\"\"\"F3-%#T0G6%,&F0F3F/F3,&F+F-F3F3#F3F,F3F/*
&)F(,*F*F-F+\"\"(F0F3F,F3F3-%#T1G6%,&F0F3!\"#F3,&F+F-F2F3F9F3F3*&)F(,*
F*F-F+#\"#>F,F0F1F2F3F3-F56%FA,&F+F-\"\"%F3F9F3F3*&F'F3-F56%F7,&F+!\"&
F/F3F9F3F3*&)F(,(F*F-F+!\"$F0F3F3-F?6%FA,&F+FQF3F3F9F3F3*&)F(,(F*F-F+#
!#6F,F0F1F3-F56%FA,&F+FQF,F3F9F3F3" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 16 "A16:=sym(1,A15);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>
%$A16G,**&)%\"qG,**$%\"jG\"\"#\"\"&F+\"\"(%\"nG\"\"\"F,F0F0-%#T1G6%,&F
/F0!\"#F0,&F+F-\"\"$F0#F0F,F0F0*&)F(,*F*F-F+#\"#>F,F/#F7F,F7F0F0-%#T0G
6%F4,&F+F-\"\"%F0F8F0F0*&)F(,(F*F-F+!\"$F/F0F0-F26%F4,&F+!\"&F0F0F8F0F
0*&)F(,(F*F-F+#!#6F,F/F>F0-F@6%F4,&F+FKF,F0F8F0F0" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 23 "A17:= shiftdown(1,A16);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$A17G,**&)%\"qG,(*$%\"jG\"\"#\"\"&F+!\"$%\"nG\"\"\"F0
-%#T1G6%,&F/F0!\"#F0,&F+F-F5F0#F0F,F0!\"\"*&)F(,*F*F-F+#\"#>F,F/#\"\"$
F,F?F0F0-%#T0G6%F4,&F+F-\"\"%F0F7F0F0*&F'F0-F26%F4,&F+!\"&F0F0F7F0F0*&
)F(,(F*F-F+#!#6F,F/F>F0-FA6%F4,&F+FIF,F0F7F0F0" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 16 "A18:=sym(1,A17);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%$A18G,**&)%\"qG,(*$%\"jG\"\"#\"\"&F+!\"$%\"nG\"\"\"F0-%#T1G6%,
&F/F0!\"#F0,&F+!\"&F,F0#F0F,F0!\"\"*&)F(,*F*F-F+#\"#>F,F/#\"\"$F,F@F0F
0-%#T0G6%F4,&F+F-\"\"%F0F8F0F0*&F'F0-F26%F4,&F+F7F0F0F8F0F0*&)F(,(F*F-
F+#!#6F,F/F?F0-FBF3F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "
A19:=e0(3,A18);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$A19G,&*&)%\"qG,*
*$%\"jG\"\"#\"\"&F+#\"#>F,%\"nG#\"\"$F,F2\"\"\"F3-%#T0G6%,&F0F3!\"#F3,
&F+F-\"\"%F3#F3F,F3F3*&)F(,*F*F-F+#!\"\"F,F0F1#!\"$F,F3F3-F56%F7,&F+!
\"&F3F3F;F3F3" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "A20:= shif
tdown(1,A19);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$A20G,&*&)%\"qG,**$
%\"jG\"\"#\"\"&F+#!\"\"F,%\"nG#\"\"$F,#!\"$F,\"\"\"F5-%#T0G6%,&F0F5!\"
#F5,&F+F-F/F5#F5F,F5F/*&F'F5-F76%F9,&F+!\"&F5F5F<F5F5" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A21:=sym(1,A20);" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#>%$A21G\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 0 "" }}}}{MARK "3 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }