{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 13 "####### 52-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 26 "op1:= 1 - (1+q^(2*n-2))/N;" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%$op1G,&\"\"\"F&*&,&F&F&)%\"qG,&%\"nG\"\"#!\"#F&F&F&%
\"NG!\"\"F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 120 "A1:=applysh
iftop( op1, q^(12*j^2 + 2*j)      * T1(n,6*j  ,1) \n                 -
 q^(12*j^2 + 14*j + 4) * T1(n,6*j+4,1));" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%#A1G,.*&)%\"qG,&*$%\"jG\"\"#\"#7F+F,\"\"\"-%#T1G6%,&%\"nGF.!\"
\"F.,$F+\"\"'F.F.F4*&)F(,(F*F-F+\"#9\"\"%F.F.-F06%F2,&F+F6F;F.F.F.F.*&
)F(,*F3F,!\"#F.F*F-F+F,F.F/F.F4*&)F(,*F3F,F,F.F*F-F+F:F.F<F.F.*&F'F.-F
06%F3F5F.F.F.*&F8F.-F06%F3F>F.F.F4" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "A2:= eT1(6,A1);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%
#A2G,.*&)%\"qG,&*$%\"jG\"\"#\"#7F+F,\"\"\"-%#T1G6%,&%\"nGF.!\"\"F.,$F+
\"\"'F.F.F4*&)F(,*F3F,!\"#F.F*F-F+F,F.F/F.F4*&)F(,*F3F,F,F.F*F-F+\"#9F
.-F06%F2,&F+F6\"\"%F.F.F.F.*&F'F.-F06%F3F5F.F.F.*&)F(,*F*F-F+\"#?\"\")
F.F3F.F.-%#T0G6%F2,&F+F6\"\"&F.F.F.F4*&)F(,(F*F-F+FJF3F.F.-FL6%F2,&F+F
6\"\"$F.F.F.F4" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A3:= eT1(
4,A2);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A3G,.*&)%\"qG,*%\"nG\"\"#
!\"#\"\"\"*$%\"jGF+\"#7F/F+F--%#T1G6%,&F*F-!\"\"F-,$F/\"\"'F-F-F5*&)F(
,*F*F+F+F-F.F0F/\"#9F--F26%F4,&F/F7\"\"%F-F-F-F-*&)F(,(F.F0F/\"\")F*F-
F--%#T0G6%F4,&F/F7F-F-F-F-F-*&)F(,(F.F0F/!\"%F*F-F--FE6%F4,&F/F7F5F-F-
F-F-*&)F(,*F.F0F/\"#?FCF-F*F-F--FE6%F4,&F/F7\"\"&F-F-F-F5*&FAF--FE6%F4
,&F/F7\"\"$F-F-F-F5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "A4:=shiftdown(5,A3);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A4G,**&)%\"qG,*%\"nG\"\"#!\"#\"\"\"
*$%\"jGF+\"#7F/F+F--%#T1G6%,&F*F-!\"\"F-,$F/\"\"'F-F-F5*&)F(,*F*F+F+F-
F.F0F/\"#9F--F26%F4,&F/F7\"\"%F-F-F-F-*&)F(,(F.F0F/\"\")F*F-F--%#T0G6%
F4,&F/F7F-F-F-F-F-*&FAF--FE6%F4,&F/F7\"\"$F-F-F-F5" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 7 "A5:=A4;" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>
%#A5G,**&)%\"qG,*%\"nG\"\"#!\"#\"\"\"*$%\"jGF+\"#7F/F+F--%#T1G6%,&F*F-
!\"\"F-,$F/\"\"'F-F-F5*&)F(,*F*F+F+F-F.F0F/\"#9F--F26%F4,&F/F7\"\"%F-F
-F-F-*&)F(,(F.F0F/\"\")F*F-F--%#T0G6%F4,&F/F7F-F-F-F-F-*&FAF--FE6%F4,&
F/F7\"\"$F-F-F-F5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A6:= e
T0(4,A5);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A6G,.*&)%\"qG,*%\"nG\"
\"#!\"#\"\"\"*$%\"jGF+\"#7F/F+F--%#T1G6%,&F*F-!\"\"F-,$F/\"\"'F-F-F5*&
)F(,*F*F+F+F-F.F0F/\"#9F--F26%F4,&F/F7\"\"%F-F-F-F-*&)F(,(F.F0F/\"\")F
*F-F--%#T0G6%F4,&F/F7F-F-F-F-F-*&FAF--FE6%,&F*F-F,F-,&F/F7F+F-F-F-F5*&
F9F--F26%FK,&F/F7\"\"$F-F-F-F5*&)F(,*F.F0F/\"#?F*FQF?F-F--FE6%FKF>F-F-
F5" }}}{EXCHG {PARA 12 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 15 "A7:= sym(3,A6);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6
#>%#A7G,.*&)%\"qG,*%\"nG\"\"#!\"#\"\"\"*$%\"jGF+\"#7F/F+F--%#T1G6%,&F*
F-!\"\"F-,$F/\"\"'F-F-F5*&)F(,*F*F+F+F-F.F0F/\"#9F--F26%F4,&F/F7\"\"%F
-F-F-F-*&)F(,(F.F0F/\"\")F*F-F--%#T0G6%F4,&F/!\"'F5F-F-F-F-*&FAF--FE6%
,&F*F-F,F-,&F/F7F+F-F-F-F5*&F9F--F26%FL,&F/F7\"\"$F-F-F-F5*&)F(,*F.F0F
/\"#?F*FRF?F-F--FE6%FLF>F-F-F5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 14 "A8:=eT0(3,A7);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A8G,2*&)%
\"qG,*%\"nG\"\"#!\"#\"\"\"*$%\"jGF+\"#7F/F+F--%#T1G6%,&F*F-!\"\"F-,$F/
\"\"'F-F-F5*&)F(,*F*F+F+F-F.F0F/\"#9F--F26%F4,&F/F7\"\"%F-F-F-F-*&)F(,
(F.F0F/\"\")F*F-F--%#T0G6%,&F*F-F,F-,&F/!\"'F,F-F-F-F-*&F'F--F26%FG,&F
/FIF5F-F-F-F-*&)F(,*F.F0F/!\"%F*\"\"$FQF-F--FE6%FG,$F/FIF-F-F-*&FAF--F
E6%FG,&F/F7F+F-F-F-F5*&F9F--F26%FG,&F/F7FRF-F-F-F5*&)F(,*F.F0F/\"#?F*F
RF?F-F--FE6%FGF>F-F-F5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "A
9:=sym(3,A8);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A9G,.*&)%\"qG,*%\"
nG\"\"#!\"#\"\"\"*$%\"jGF+\"#7F/F+F--%#T1G6%,&F*F-!\"\"F-,$F/\"\"'F-F-
F5*&)F(,*F*F+F+F-F.F0F/\"#9F--F26%F4,&F/F7\"\"%F-F-F-F-*&F'F--F26%,&F*
F-F,F-,&F/!\"'F5F-F-F-F-*&)F(,*F.F0F/!\"%F*\"\"$FIF-F--%#T0G6%FC,$F/FE
F-F-F-*&F9F--F26%FC,&F/F7FJF-F-F-F5*&)F(,*F.F0F/\"#?F*FJF?F-F--FL6%FCF
>F-F-F5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A10:=sym(3,A9);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A10G,.*&)%\"qG,*%\"nG\"\"#!\"#
\"\"\"*$%\"jGF+\"#7F/F+F--%#T1G6%,&F*F-!\"\"F-,$F/\"\"'F-F-F5*&)F(,*F*
F+F+F-F.F0F/\"#9F--F26%F4,&F/F7\"\"%F-F-F-F-*&F'F--F26%,&F*F-F,F-,&F/F
7F-F-F-F-F-*&)F(,*F.F0F/!\"%F*\"\"$FHF-F--%#T0G6%FC,$F/!\"'F-F-F-*&F9F
--F26%FC,&F/F7FIF-F-F-F5*&)F(,*F.F0F/\"#?F*FIF?F-F--FK6%FCF>F-F-F5" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A11:=eT1(1,A10);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$A11G,2*&)%\"qG,*%\"nG\"\"#!\"#\"\"\"*$%\"
jGF+\"#7F/F+F--%#T1G6%,&F*F-F,F-,$F/\"\"'F-F-!\"\"*&)F(,*F*\"\"$!\"$F-
F.F0F/\"\")F--%#T0G6%F4,&F/F6F-F-F-F-F7*&)F(,*F*F;F<F-F.F0F/!\"%F--F?6
%F4,&F/F6F7F-F-F-F7*&)F(,*F*F+F+F-F.F0F/\"#9F--F26%,&F*F-F7F-,&F/F6\"
\"%F-F-F-F-*&F'F--F2F@F-F-*&)F(,*F.F0F/FEF*F;FEF-F--F?6%F4,$F/!\"'F-F-
F-*&FJF--F26%F4,&F/F6F;F-F-F-F7*&)F(,*F.F0F/\"#?F*F;FQF-F--F?6%F4FPF-F
-F7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A12:=e0(1,A11);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A12G,.*&)%\"qG,**$%\"jG\"\"#\"#7F+!
\"%%\"nG\"\"$F.\"\"\"F1-%#T0G6%,&F/F1!\"#F1,$F+\"\"'F1F1!\"\"*&)F(,*F/
F0!\"$F1F*F-F+F.F1-F36%F5,&F+F8F9F1F1F1F9*&)F(,*F/F,F,F1F*F-F+\"#9F1-%
#T1G6%,&F/F1F9F1,&F+F8\"\"%F1F1F1F1*&F'F1-F36%F5,$F+!\"'F1F1F1*&FBF1-F
F6%F5,&F+F8F0F1F1F1F9*&)F(,*F*F-F+\"#?F/F0FJF1F1-F36%F5FIF1F1F9" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A13:=eT1(3,A12);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$A13G,2*&)%\"qG,**$%\"jG\"\"#\"#7F+!\"%%\"
nG\"\"$F.\"\"\"F1-%#T0G6%,&F/F1!\"#F1,$F+\"\"'F1F1!\"\"*&)F(,*F/F0!\"$
F1F*F-F+F.F1-F36%F5,&F+F8F9F1F1F1F9*&)F(,*F/F,F,F1F*F-F+\"#9F1-%#T1G6%
F5,&F+F8\"\"%F1F1F1F1*&)F(,*F/F0\"\"&F1F*F-F+\"#?F1-F36%F5,&F+F8FMF1F1
F1F1*&)F(,*F/F0F=F1F*F-F+\"\")F1-F36%F5,&F+F8F0F1F1F1F1*&F'F1-F36%F5,$
F+!\"'F1F1F1*&FBF1-FFFWF1F9*&)F(,*F*F-F+FNF/F0FIF1F1-F3FGF1F9" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A14:=e0(7,A13);" }}{PARA 12 
"" 1 "" {XPPMATH 20 "6#>%$A14G,**&)%\"qG,**$%\"jG\"\"#\"#7F+!\"%%\"nG
\"\"$F.\"\"\"F1-%#T0G6%,&F/F1!\"#F1,$F+\"\"'F1F1!\"\"*&)F(,*F/F0!\"$F1
F*F-F+F.F1-F36%F5,&F+F8F9F1F1F1F9*&)F(,*F/F0\"\"&F1F*F-F+\"#?F1-F36%F5
,&F+F8FDF1F1F1F1*&F'F1-F36%F5,$F+!\"'F1F1F1" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 16 "A15:=sym(1,A14);" }}{PARA 11 "" 1 "" {XPPMATH 20 "
6#>%$A15G,&*&)%\"qG,*%\"nG\"\"$!\"$\"\"\"*$%\"jG\"\"#\"#7F/!\"%F--%#T0
G6%,&F*F-!\"#F-,&F/\"\"'!\"\"F-F-F-F:*&)F(,*F*F+\"\"&F-F.F1F/\"#?F--F4
6%F6,&F/F9F>F-F-F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "A16
:=shiftdown(2,A15);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$A16G\"\"!" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "21 0 0" 0 }
{VIEWOPTS 1 1 0 1 1 1803 }