{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.60" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 74 "op1:= annihiloper( q^(j^2+j) / qfac(q,q^2,j+1)/ spqfac(q,q,j), 0, forward);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$op1G,**$%\"NG\"\"$\"\"\"*$F'\"\"#!\"\"*&,&%\"qGF,)F/ ,&%\"nGF)F(F)F,F)F'F)F)F/F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "####### even n = 2*m" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 243 "a1:= asoe(op1, q^(28*j^2 + 6*j) * gp(2*n+1, n+7*j+1, 1) \n \+ - q^(28*j^2 + 34*j + 10) * gp(2*n+1, n+7*j + 5, 1),\n \+ q^(28*j^2 + 6*j) * gp(2*n+2, n+7*j+2, 1) \n - q^(28*j^ 2 + 34*j + 10) * gp(2*n+2, n+7*j +5, 1));" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a1G,6*&)%\"qG,(\"\"\"F**$%\"jG\"\"#\"#GF,\"\"'F*-%#g pG6%,&%\"mGF-F*F*,(F4F*F,\"\"(F*F*F*F*F**&-F16%F3,(F4F*F,F6\"\"&F*F*F* )F(,(F+F.F,\"#M\"#6F*F*!\"\"*&)F(,&F+F.F,F/F*-F16%,&F4F-\"\"$F*,(F4F*F -F*F,F6F*F*F@*&)F(,(F+F.F,F>\"#5F*F*-F16%FF,(F4F*F/F*F,F6F*F*F**&F'F*- F16%,&F4F-F-F*FHF*F*F@*&-F16%FSF:F*F*FF*F**&FBF*-F16%,&F4F-\"\"%F*,(F4F*FGF *F,F6F*F*F**&FJF*-F16%F[oFOF*F*F@" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a2:= eG1(5,a1);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>% #a2G,4*&-%#gpG6%,&%\"mG\"\"#\"\"\"F-,(F+F-%\"jG\"\"(\"\"&F-F-F-)%\"qG, (*$F/F,\"#GF/\"#M\"#6F-F-!\"\"*&)F3,&F5F6F/\"\"'F--F(6%,&F+F,\"\"$F-,( F+F-F,F-F/F0F-F-F9*&)F3,(F5F6F/F7\"#5F-F--F(6%F@,(F+F-F=F-F/F0F-F-F-*& )F3,*FAF-F5F6F/\"#8F+F-F--F(6%F*FBF-F-F9*&-F(6%,&F+F,F,F-F.F-F-F2F-F-* &)F3,*F+F,FAF-F5F6F/F=F--F(6%FSFBF-F-F9*&FQF-)F3,*F+F,FMF-F5F6F/F7F-F- *&F;F--F(6%,&F+F,\"\"%F-,(F+F-FAF-F/F0F-F-F-*&FDF--F(6%FinFIF-F-F9" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a3:= eG0(5,a2);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a3G,2*&)%\"qG,&*$%\"jG\"\"#\"#GF+\"\"'\" \"\"-%#gpG6%,&%\"mGF,\"\"$F/,(F4F/F,F/F+\"\"(F/F/!\"\"*&)F(,(F*F-F+\"# M\"#5F/F/-F16%F3,(F4F/F.F/F+F7F/F/F/*&)F(,*F5F/F*F-F+\"#8F4F/F/-F16%,& F4F,F/F/F6F/F/F8*&)F(,*F*F-F+\"#F\"\")F/F4F/F/-F16%FG,(F4F/F+F7\"\"%F/ F/F/F/*&)F(,*F4F,F5F/F*F-F+F.F/-F16%,&F4F,F,F/F6F/F/F8*&-F16%FV,(F4F/F +F7\"\"&F/F/F/)F(,*F4F,FDF/F*F-F+F " 0 "" {MPLTEXT 1 0 15 "a4:= eG1(7,a3);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>% #a4G,0*&)%\"qG,(*$%\"jG\"\"#\"#GF+\"#M\"#5\"\"\"F0-%#gpG6%,&%\"mGF,\" \"$F0,(F5F0\"\"'F0F+\"\"(F0F0F0*&)F(,*F6F0F*F-F+\"#8F5F0F0-F26%,&F5F,F 0F0,(F5F0F,F0F+F9F0F0!\"\"*&)F(,*F*F-F+\"#F\"\")F0F5F0F0-F26%F@,(F5F0F +F9\"\"%F0F0F0F0*&)F(,*F5F,F6F0F*F-F+F8F0-F26%,&F5F,F,F0FAF0F0FB*&-F26 %FQ,(F5F0F+F9\"\"&F0F0F0)F(,*F5F,F=F0F*F-F+F.F0F0*&F;F0-F26%F4,(F5F0F6 F0F+F9F0F0F0*&F'F0-F26%,&F5F,FKF0F7F0F0FB" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 15 "a5:= eG0(7,a4);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6# >%#a5G,.*&)%\"qG,*\"\"$\"\"\"*$%\"jG\"\"#\"#GF-\"#8%\"mGF+F+-%#gpG6%,& F1F.F+F+,(F1F+F.F+F-\"\"(F+F+!\"\"*&)F(,*F,F/F-\"#F\"\")F+F1F+F+-F36%F 5,(F1F+F-F7\"\"%F+F+F+F+*&)F(,*F1F.F*F+F,F/F-\"\"'F+-F36%,&F1F.F.F+F6F +F+F8*&-F36%FH,(F1F+F-F7\"\"&F+F+F+)F(,*F1F.F0F+F,F/F-\"#MF+F+*&F'F+-F 36%,&F1F.F*F+,(F1F+F*F+F-F7F+F+F+*&F:F+-F36%FTFLF+F+F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a6:= eG0(5,a5);" }}{PARA 12 "" 1 " " {XPPMATH 20 "6#>%#a6G,,*&)%\"qG,*\"\"$\"\"\"*$%\"jG\"\"#\"#GF-\"#8% \"mGF+F+-%#gpG6%,&F1F.F+F+,(F1F+F.F+F-\"\"(F+F+!\"\"*&)F(,*F,F/F-\"#F \"\")F+F1F+F+-F36%F5,(F1F+F-F7\"\"%F+F+F+F+*&-F36%,&F1F.F.F+,(F1F+F-F7 \"\"&F+F+F+)F(,*F1F.F0F+F,F/F-\"#MF+F+*&F'F+-F36%FE,(F1F+F*F+F-F7F+F+F +*&F:F+-F36%,&F1F.F*F+FFF+F+F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a7:= eG1(5,a6);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a7G,**&) %\"qG,*\"\"$\"\"\"*$%\"jG\"\"#\"#GF-\"#8%\"mGF+F+-%#gpG6%,&F1F.F+F+,(F 1F+F.F+F-\"\"(F+F+!\"\"*&)F(,*F,F/F-\"#F\"\")F+F1F+F+-F36%F5,(F1F+F-F7 \"\"%F+F+F+F+*&F'F+-F36%,&F1F.F.F+,(F1F+F*F+F-F7F+F+F+*&F:F+-F36%FEF@F +F+F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a8:= eG1(3,a7);" } }{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#a8G,(*&)%\"qG,**$%\"jG\"\"#\"#GF+ \"#F\"\")\"\"\"%\"mGF0F0-%#gpG6%,&F1F,F0F0,(F1F0F+\"\"(\"\"%F0F0F0F0*& )F(,*\"\"'F0F*F-F+\"#?F1F,F0-F36%F5,(F1F0\"\"$F0F+F7F0F0F0*&F'F0-F36%, &F1F,F,F0F6F0F0!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "a9: = eG0(3,a8);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#a9G\"\"!" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 25 "########## odd n = 2m + 1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 244 "b1:= asoo(op1, q^(28*j^2 + 6*j) * gp(2*n+1, n+7 *j+1, 1) \n - q^(28*j^2 + 34*j + 10) * gp(2*n+1, n+7*j + 5 , 1),\n q^(28*j^2 + 6*j) * gp(2*n+2, n+7*j+2, 1) \n \+ - q^(28*j^2 + 34*j + 10) * gp(2*n+2, n+7*j + 5, 1));" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b1G,6*&)%\"qG,(\"\"\"F**$%\"jG\"\"#\"#GF, \"\"'F*-%#gpG6%,&%\"mGF-F-F*,(F4F*F-F*F,\"\"(F*F*F**&-F16%F3,(F4F*F,F6 \"\"&F*F*F*)F(,(F+F.F,\"#M\"#6F*F*!\"\"*&)F(,&F+F.F,F/F*-F16%,&F4F-\" \"%F*,(F4F*\"\"$F*F,F6F*F*F@*&)F(,(F+F.F,F>\"#5F*F*-F16%FF,(F4F*F/F*F, F6F*F*F**&F'F*-F16%,&F4F-FIF*F5F*F*F@*&FF*FVF*F**&FBF*-F16%,&F4F-F ;F*FHF*F*F**&FKF*-F16%F\\o,(F4F*F6F*F,F6F*F*F@" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 15 "b2:= eG0(5,b1);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b2G,4*&-%#gpG6%,&%\"mG\"\"#F,\"\"\",(F+F-%\"jG\"\"(\"\"&F-F-F -)%\"qG,(*$F/F,\"#GF/\"#M\"#6F-F-!\"\"*&)F3,&F5F6F/\"\"'F--F(6%,&F+F, \"\"%F-,(F+F-\"\"$F-F/F0F-F-F9*&)F3,(F5F6F/F7\"#5F-F--F(6%F@,(F+F-F=F- F/F0F-F-F-*&)F3,*F,F-F5F6F/F9F+F-F--F(6%F*,(F+F-F/F0F-F-F-F-F9*&F2F--F (6%,&F+F,FCF-FJF-F-F-*&)F3,*F+F,FAF-F5F6F/F=F--F(6%FT,(F+F-F,F-F/F0F-F -F9*&)F3,*F+F,\"#9F-F5F6F/F7F-FRF-F-*&F;F--F(6%,&F+F,F1F-FBF-F-F-*&FEF --F(6%F\\o,(F+F-F0F-F/F0F-F-F9" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "b3:= eG1(5,b2);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b3G,2*&) %\"qG,&*$%\"jG\"\"#\"#GF+\"\"'\"\"\"-%#gpG6%,&%\"mGF,\"\"%F/,(F4F/\"\" $F/F+\"\"(F/F/!\"\"*&)F(,(F*F-F+\"#M\"#5F/F/-F16%F3,(F4F/F.F/F+F8F/F/F /*&)F(,*F,F/F*F-F+F9F4F/F/-F16%,&F4F,F,F/,(F4F/F+F8F/F/F/F/F9*&)F(,*F* F-F+\"#T\"# " 0 "" {MPLTEXT 1 0 15 "b4:= eG0(7,b3);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b4G,0*&)%\"qG,(*$%\"jG\"\"#\"#GF+\"#M\"#5\" \"\"F0-%#gpG6%,&%\"mGF,\"\"%F0,(F5F0\"\"'F0F+\"\"(F0F0F0*&)F(,*F,F0F*F -F+!\"\"F5F0F0-F26%,&F5F,F,F0,(F5F0F+F9F0F0F0F0F=*&)F(,*F*F-F+\"#T\"#< F0F5F0F0-F26%F@F7F0F0F0*&)F(,*F5F,F6F0F*F-F+F8F0-F26%,&F5F,\"\"$F0,(F5 F0F,F0F+F9F0F0F=*&)F(,*F5F,\"#9F0F*F-F+F.F0-F26%FNF7F0F0F0*&F;F0-F26%F 4FPF0F0F0*&F'F0-F26%,&F5F,\"\"&F0,(F5F0F9F0F+F9F0F0F=" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "b5:= eG1(7,b4);" }}{PARA 12 "" 1 " " {XPPMATH 20 "6#>%#b5G,.*&)%\"qG,*\"\"#\"\"\"*$%\"jGF*\"#GF-!\"\"%\"m GF+F+-%#gpG6%,&F0F*F*F+,(F0F+F-\"\"(F+F+F+F+F/*&)F(,*F,F.F-\"#T\"#F +F+F+*&F'F+-F26%,&F0F*FCF+FHF+F+F+*&F8F+-F26%FS,(F0F+F6F+F-F6F+F+F/" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "b6:= eG1(5,b5);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b6G,,*&)%\"qG,*\"\"#\"\"\"*$%\"jGF*\"#GF- !\"\"%\"mGF+F+-%#gpG6%,&F0F*F*F+,(F0F+F-\"\"(F+F+F+F+F/*&)F(,*F,F.F-\" #T\"#F+F+F+*&F'F+-F26%FGF5F+F+F+*&F8F+-F26%,&F0F*\" \"%F+,(F0F+F6F+F-F6F+F+F/" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "b7:= eG0(5,b6);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b7G,**&)%\"q G,*\"\"#\"\"\"*$%\"jGF*\"#GF-!\"\"%\"mGF+F+-%#gpG6%,&F0F*F*F+,(F0F+F- \"\"(F+F+F+F+F/*&)F(,*F,F.F-\"#T\"# " 0 "" {MPLTEXT 1 0 15 "b8:= eG0(3,b7);" }} {PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b8G,(*&)%\"qG,**$%\"jG\"\"#\"#GF+\" #T\"#<\"\"\"%\"mGF0F0-%#gpG6%,&F1F,F,F0,(F1F0\"\"'F0F+\"\"(F0F0F0*&)F( ,*\"\"%F0F*F-F+!\")F1F,F0-F36%F5,&F1F0F+F8F0F0F0*&F'F0-F36%,&F1F,\"\"$ F0,(F1F0F8F0F+F8F0F0!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "b9:= eG1(3,b8);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#b9G,&*&)%\"q G,*\"\"%\"\"\"*$%\"jG\"\"#\"#GF-!\")%\"mGF.F+-%#gpG6%,&F1F.F.F+,&F1F+F -\"\"(F+F+F+*&)F(,*F,F/F-\"#[\"#CF+F1F.F+-F36%F5,(F1F+F7F+F-F7F+F+!\" \"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "b10:= shiftdown(2,b9) ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$b10G\"\"!" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "2 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }