{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 "######### 3.5" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "######### 3.5-B" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "op5:= 1 - (1+q^n)/N;" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#>%$op5G,&\"\"\"F&*&,&F&F&)%\"qG%\"nGF&F&%\"NG!\"
\"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 56 "a1:= applyshiftop(op5, q^(3*j^2 + j) * gp(2
*n,n+2*j,1));" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a1G,(*&)%\"qG,&*$%
\"jG\"\"#\"\"$F+\"\"\"F.-%#gpG6%,&%\"nGF,!\"#F.,(F3F.!\"\"F.F+F,F.F.F6
*&)F(,(F*F-F+F.F3F.F.F/F.F6*&F'F.-F06%,$F3F,,&F3F.F+F,F.F.F." }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a2:= eG0(3,a1);" }}{PARA 12 
"" 1 "" {XPPMATH 20 "6#>%#a2G,**&)%\"qG,&*$%\"jG\"\"#\"\"$F+\"\"\"F.-%
#gpG6%,&%\"nGF,!\"#F.,(F3F.!\"\"F.F+F,F.F.F6*&)F(,(F*F-F+F.F3F.F.F/F.F
6*&F'F.-F06%,&F3F,F6F.,&F3F.F+F,F.F.F.*&)F(,(F*F-F+F6F3F.F.-F06%F=F5F.
F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a3:= eG1(3,a2);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a3G,(*&)%\"qG,(*$%\"jG\"\"#\"\"$F+
\"\"\"%\"nGF.F.-%#gpG6%,&F/F,!\"#F.,(F/F.!\"\"F.F+F,F.F.F6*&)F(,(F*F-F
+F-F/F.F.-F16%F3,&F/F.F+F,F.F.F.*&)F(,(F*F-F+F6F/F.F.-F16%,&F/F,F6F.F5
F.F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "a4:= gpsym(3,a3);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a4G,(*&)%\"qG,(*$%\"jG\"\"#\"\"
$F+\"\"\"%\"nGF.F.-%#gpG6%,&F/F,!\"#F.,(F/F.!\"\"F.F+F,F.F.F6*&)F(,(F*
F-F+F-F/F.F.-F16%F3,&F/F.F+F,F.F.F.*&)F(,(F*F-F+F6F/F.F.-F16%,&F/F,F6F
.,&F/F.F+F4F.F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a5:= n
egate(3,a4);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a5G,(*&)%\"qG,(*$%
\"jG\"\"#\"\"$F+\"\"\"%\"nGF.F.-%#gpG6%,&F/F,!\"#F.,(F/F.!\"\"F.F+F,F.
F.F6*&)F(,(F*F-F+F-F/F.F.-F16%F3,&F/F.F+F,F.F.F.*&F'F.-F16%,&F/F,F6F.F
<F.F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a6:= eG1(3,a5);
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#a6G,&*&)%\"qG,(*$%\"jG\"\"#\"\"
$F+F-%\"nG\"\"\"F/-%#gpG6%,&F.F,!\"#F/,&F.F/F+F,F/F/F/*&)F(,(F*F-F+F-F
.F,F/F0F/F/" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "a7:= expanda
ll(subs(j=2*j,a6)-subs(j=2*j+1,a6));" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>%#a7G,**&)%\"qG,(*$%\"jG\"\"#\"#7F+\"\"'%\"nG\"\"\"F0-%#gpG6%,&F/F,
!\"#F0,&F/F0F+\"\"%F0F0F0*&)F(,(F*F-F+F.F/F,F0F1F0F0*&)F(,*F*F-F+\"#=F
.F0F/F0F0-F26%F4,(F/F0F+F7F,F0F0F0!\"\"*&)F(,*F*F-F+F>F.F0F/F,F0F?F0FB
" }}}{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 21 "a8:= shiftdown(3,a7);" }}{PARA 12 "" 1 "
" {XPPMATH 20 "6#>%#a8G,**&)%\"qG,(*$%\"jG\"\"#\"#7F+\"\"'%\"nG\"\"\"F
0-%#gpG6%,&F/F,!\"#F0,&F/F0F+\"\"%F0F0F0*&)F(,(F*F-F+F.F/F,F0F1F0F0*&)
F(,(F*F-F+!\"'F/F0F0-F26%F4,(F/F0F+F7F5F0F0F0!\"\"*&)F(,*F*F-F+\"#=F.F
0F/F,F0-F26%F4,(F/F0F+F7F,F0F0F0FB" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "a9:= gpsym(3,a8);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%#a9G,**&)%\"qG,(*$%\"jG\"\"#\"#7F+\"\"'%\"nG\"\"\"F0-%#gpG6%,&F/F,!
\"#F0,&F/F0F+\"\"%F0F0F0*&)F(,(F*F-F+F.F/F,F0F1F0F0*&)F(,(F*F-F+!\"'F/
F0F0-F26%F4,&F/F0F+!\"%F0F0!\"\"*&)F(,*F*F-F+\"#=F.F0F/F,F0-F26%F4,(F/
F0F+F7F,F0F0F0FC" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "a10:=ne
gate(1,a9);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$a10G,&*&)%\"qG,(*$%
\"jG\"\"#\"#7F+\"\"'%\"nGF,\"\"\"-%#gpG6%,&F/F,!\"#F0,&F/F0F+\"\"%F0F0
F0*&)F(,*F*F-F+\"#=F.F0F/F,F0-F26%F4,(F/F0F+F7F,F0F0F0!\"\"" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "a11:= shiftdown(2,a10);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$a11G,&*&)%\"qG,(*$%\"jG\"\"#\"#7F+
\"\"'%\"nGF,\"\"\"-%#gpG6%,&F/F,!\"#F0,&F/F0F+\"\"%F0F0F0*&)F(,(F*F-F+
!\"'F/F,F0-F26%F4,(F/F0F+F7F5F0F0F0!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 18 "a12:=gpsym(2,a11);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6
#>%$a12G,&*&)%\"qG,(*$%\"jG\"\"#\"#7F+\"\"'%\"nGF,\"\"\"-%#gpG6%,&F/F,
!\"#F0,&F/F0F+\"\"%F0F0F0*&)F(,(F*F-F+!\"'F/F,F0-F26%F4,&F/F0F+!\"%F0F
0!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "a13:= negate(2,a1
2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$a13G\"\"!" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 14 "######## 3.5-T" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "# S
ee 3.2-T" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "21 \+
0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }