{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 16 "########### 3.68" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 123 "op1:= annihiloper( q^(j^2 \+
+ 2*j) * qfac(-q^4,q^4,j) / qfac(-q^2,q^2, j+1) / qfac( q,q^2,j+1) / s
pqfac(q^2,q^2,j), 0, back);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$op1G
,*\"\"\"F&*&,**$%\"qG\"\"#!\"\"F*F&F&F&)F*,&%\"nGF+F&F&F&F&%\"NGF,F,*&
,(*$F*\"\"$F&F)F&F*F,F&F0!\"#F,*&,&F3F,F-F&F&F0!\"$F," }}}{EXCHG 
{PARA 11 "" 1 "" {TEXT -1 0 "" }}}{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 0 "" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 57 "A1:= applyshiftop(op1, q^(8*j^2 + 6*j) * U(
n+1,4*j+1,1));" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A1G,6*&)%\"qG,(*$
%\"jG\"\"#\"\")F+\"\"'\"\"$\"\"\"F0-%\"UG6%,&%\"nGF0!\"#F0,&F+\"\"%F0F
0F0F0F0*&)F(,*F*F-F+F.F5F,F0F0F0F1F0!\"\"*&)F(,(F*F-F+F.F0F0F0-F26%,&F
5F0F<F0F7F0F0F0*&)F(,(F*F-F+F.F,F0F0F@F0F<*&F'F0F@F0F<*&)F(,&F*F-F+F.F
0-F26%F5F7F0F0F<*&FJF0F>F0F<*&FJF0FDF0F0*&FJF0F:F0F<*&FHF0-F26%,&F5F0F
0F0F7F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A2:= eU1(5,A
1);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A2G,8*&)%\"qG,**$%\"jG\"\"#
\"\")F+\"\"'%\"nGF,\"\"\"F0F0-%\"UG6%,&F/F0!\"#F0,&F+\"\"%F0F0F0F0!\"
\"*&)F(,(F*F-F+F.F0F0F0-F26%,&F/F0F8F0F6F0F0F0*&)F(,(F*F-F+F.F,F0F0F<F
0F8*&)F(,(F*F-F+F.F/F,F0F1F0F8*&)F(,*F*F-F+F,F0F0F/F0F0-%#T1G6%F4,$F+F
7F0F0F8*&)F(,*F*F-F+\"#5F7F0F/F0F0-FI6%F4,&F+F7\"\"$F0F0F0F8*&)F(,&F*F
-F+F.F0-F26%F/F6F0F0F8*&FWF0F:F0F8*&FWF0F@F0F0*&FWF0F'F0F8*&FUF0-F26%,
&F/F0F0F0F6F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A3:= e
U1(9,A2);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A3G,:*&)%\"qG,**$%\"jG
\"\"#\"\")F+\"\"'%\"nGF,\"\"\"F0F0-%\"UG6%,&F/F0!\"#F0,&F+\"\"%F0F0F0F
0!\"\"*&)F(,(F*F-F+F.F0F0F0-F26%,&F/F0F8F0F6F0F0F0*&)F(,(F*F-F+F.F/F,F
0F1F0F8*&)F(,*F*F-F+F,F0F0F/F0F0-%#T1G6%F4,$F+F7F0F0F8*&)F(,*F*F-F+\"#
5F7F0F/F0F0-FF6%F4,&F+F7\"\"$F0F0F0F8*&)F(,&F*F-F+F.F0-F26%F/F6F0F0F8*
&FTF0F:F0F8*&F'F0F<F0F0*&FCF0-FF6%F>FHF0F0F0*&FJF0-FF6%F>FOF0F0F0*&FTF
0F'F0F8*&FRF0-F26%,&F/F0F0F0F6F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "A4:= eU1(7,A3);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%
#A4G,<*&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%\"nGF,\"\"\"F0F0-%\"UG6%,&F/F
0!\"#F0,&F+\"\"%F0F0F0F0!\"\"*&)F(,(F*F-F+F.F/F,F0F1F0F8*&)F(,*F*F-F+F
,F0F0F/F0F0-%#T1G6%F4,$F+F7F0F0F8*&)F(,*F*F-F+\"#5F7F0F/F0F0-F@6%F4,&F
+F7\"\"$F0F0F0F8*&)F(,&F*F-F+F.F0-F26%F/F6F0F0F8*&F:F0-F26%,&F/F0F8F0F
6F0F0F8*&)F(,(F*F-F+F,F/F0F0-F@6%FSFBF0F0F8*&)F(,*F*F-F+FFFJF0F/F0F0-F
@6%FSFIF0F0F8*&F'F0FQF0F0*&F=F0FWF0F0*&FDF0FfnF0F0*&FNF0F'F0F8*&FLF0-F
26%,&F/F0F0F0F6F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A5
:=eU1(13,A4);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A5G,:*&)%\"qG,**$%
\"jG\"\"#\"\")F+\"\"'%\"nGF,\"\"\"F0F0-%\"UG6%,&F/F0!\"#F0,&F+\"\"%F0F
0F0F0!\"\"*&)F(,(F*F-F+F.F/F,F0F1F0F8*&)F(,*F*F-F+F,F0F0F/F0F0-%#T1G6%
F4,$F+F7F0F0F8*&)F(,*F*F-F+\"#5F7F0F/F0F0-F@6%F4,&F+F7\"\"$F0F0F0F8*&F
:F0-F26%,&F/F0F8F0F6F0F0F8*&)F(,(F*F-F+F,F/F0F0-F@6%FNFBF0F0F8*&)F(,*F
*F-F+FFFJF0F/F0F0-F@6%FNFIF0F0F8*&F'F0FLF0F0*&F=F0FRF0F0*&FDF0FWF0F0*&
FPF0-F@6%F/FBF0F0F0*&FUF0-F@6%F/FIF0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 16 "A6:= eT1(11,A5);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>
%#A6G,:*&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%\"nGF,\"\"\"F0F0-%\"UG6%,&F/
F0!\"#F0,&F+\"\"%F0F0F0F0!\"\"*&)F(,(F*F-F+F.F/F,F0F1F0F8*&)F(,*F*F-F+
F,F0F0F/F0F0-%#T1G6%F4,$F+F7F0F0F8*&)F(,*F*F-F+\"#5F7F0F/F0F0-F@6%F4,&
F+F7\"\"$F0F0F0F8*&F:F0-F26%,&F/F0F8F0F6F0F0F8*&)F(,*F*F-F+FFFJF0F/F0F
0-F@6%FNFIF0F0F8*&F'F0FLF0F0*&F=F0-F@6%FNFBF0F0F0*&FDF0FRF0F0*&F:F0-%#
T0GFMF0F0*&)F(,(F*F-F+F5F/F,F0-Fen6%FN,&F+F7F8F0F0F0F0*&FPF0-F@6%F/FIF
0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "A7:=eT1(8,A6);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A7G,:*&)%\"qG,**$%\"jG\"\"#\"\")F+
\"\"'%\"nGF,\"\"\"F0F0-%\"UG6%,&F/F0!\"#F0,&F+\"\"%F0F0F0F0!\"\"*&)F(,
(F*F-F+F.F/F,F0F1F0F8*&)F(,*F*F-F+\"#5F7F0F/F0F0-%#T1G6%F4,&F+F7\"\"$F
0F0F0F8*&F:F0-F26%,&F/F0F8F0F6F0F0F8*&)F(,*F*F-F+F?FDF0F/F0F0-FA6%FHFC
F0F0F8*&F'F0FFF0F0*&F:F0-%#T0GF3F0F0*&)F(,(F*F-F+F5F/F,F0-FQ6%F4,&F+F7
F8F0F0F0F0*&F=F0FLF0F0*&F:F0-FQFGF0F0*&FSF0-FQ6%FHFWF0F0F0*&FJF0-FA6%F
/FCF0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "A8:=splitU(2,A
7);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A8G,8*&)%\"qG,**$%\"jG\"\"#
\"\")F+\"\"'%\"nGF,\"\"\"F0F0-%\"UG6%,&F/F0!\"#F0,&F+\"\"%F0F0F0F0!\"
\"*&)F(,(F*F-F+F.F/F,F0-%#T0G6%F4,&F+F7F,F0F0F0F8*&)F(,*F*F-F+\"#5F7F0
F/F0F0-%#T1G6%F4,&F+F7\"\"$F0F0F0F8*&F:F0-F26%,&F/F0F8F0F6F0F0F8*&)F(,
*F*F-F+FCFHF0F/F0F0-FE6%FLFGF0F0F8*&F'F0FJF0F0*&)F(,(F*F-F+F5F/F,F0-F=
6%F4,&F+F7F8F0F0F0F0*&FAF0FPF0F0*&F:F0-F=FKF0F0*&FTF0-F=6%FLFXF0F0F0*&
FNF0-FE6%F/FGF0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "A9:=
 splitU(4,A8);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A9G,6*&)%\"qG,**$
%\"jG\"\"#\"\")F+\"\"'%\"nGF,\"\"\"F0F0-%\"UG6%,&F/F0!\"#F0,&F+\"\"%F0
F0F0F0!\"\"*&)F(,(F*F-F+F.F/F,F0-%#T0G6%F4,&F+F7F,F0F0F0F8*&)F(,*F*F-F
+\"#5F7F0F/F0F0-%#T1G6%F4,&F+F7\"\"$F0F0F0F8*&F:F0-F=6%,&F/F0F8F0F?F0F
0F8*&)F(,*F*F-F+FCFHF0F/F0F0-FE6%FLFGF0F0F8*&F'F0-F26%FLF6F0F0F0*&)F(,
(F*F-F+F5F/F,F0-F=6%F4,&F+F7F8F0F0F0F0*&FAF0FPF0F0*&FVF0-F=6%FLFZF0F0F
0*&FNF0-FE6%F/FGF0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A
10:= eU1(6,A9);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A10G,8*&)%\"qG,(
*$%\"jG\"\"#\"\")F+\"\"'%\"nGF,\"\"\"-%#T0G6%,&F/F0!\"#F0,&F+\"\"%F,F0
F0F0!\"\"*&)F(,*F*F-F+\"#5F7F0F/F0F0-%#T1G6%F4,&F+F7\"\"$F0F0F0F8*&F'F
0-F26%,&F/F0F8F0F6F0F0F8*&)F(,*F*F-F+F<FAF0F/F0F0-F>6%FEF@F0F0F8*&)F(,
*F*F-F+F.F/F7F5F0F0-%\"UG6%F4,&F+F7F0F0F0F0F0*&)F(,*F*F-F+F,F/FAF8F0F0
-F>6%F4,$F+F7F0F0F0*&)F(,*F*F-F+F<F/FAF,F0F0F=F0F0*&)F(,(F*F-F+F5F/F,F
0-F26%F4,&F+F7F8F0F0F0F0*&F:F0FIF0F0*&FfnF0-F26%FEFjnF0F0F0*&FGF0-F>6%
F/F@F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "A11:= eT1(11,
A10);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A11G,4*&)%\"qG,(*$%\"jG\"
\"#\"\")F+\"\"'%\"nGF,\"\"\"-%#T0G6%,&F/F0!\"#F0,&F+\"\"%F,F0F0F0!\"\"
*&)F(,*F*F-F+\"#5F7F0F/F0F0-%#T1G6%F4,&F+F7\"\"$F0F0F0F8*&)F(,*F*F-F+F
.F/F7F5F0F0-%\"UG6%F4,&F+F7F0F0F0F0F0*&)F(,*F*F-F+F,F/FAF8F0F0-F>6%F4,
$F+F7F0F0F0*&)F(,*F*F-F+F<F/FAF,F0F0F=F0F0*&)F(,(F*F-F+F5F/F,F0-F26%F4
,&F+F7F8F0F0F0F0*&F:F0-F>6%,&F/F0F8F0F@F0F0F0*&FSF0-F26%FenFWF0F0F0*&)
F(,*F*F-F+\"#9F.F0F/F,F0-F26%Fen,&F+F7F7F0F0F0F0" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 22 "A12:=shiftdown(5,A11);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$A12G,4*&)%\"qG,(*$%\"jG\"\"#\"\")F+\"\"'%\"nGF,\"\"
\"-%#T0G6%,&F/F0!\"#F0,&F+\"\"%F,F0F0F0!\"\"*&)F(,*F*F-F+\"#5F7F0F/F0F
0-%#T1G6%F4,&F+F7\"\"$F0F0F0F8*&)F(,*F*F-F+F.F/F7F5F0F0-%\"UG6%F4,&F+F
7F0F0F0F0F0*&)F(,*F*F-F+F,F/FAF8F0F0-F>6%F4,$F+F7F0F0F0*&)F(,(F*F-F+!
\"'F/FAF0-F>6%F4,&F+F7F8F0F0F0F8*&)F(,(F*F-F+F5F/F,F0-F2FTF0F0*&F:F0-F
>6%,&F/F0F8F0F@F0F0F0*&FWF0-F26%FgnFUF0F0F0*&)F(,*F*F-F+\"#9F.F0F/F,F0
-F26%Fgn,&F+F7F7F0F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 
"A13:= eT1(7,A12);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A13G,0*&)%\"q
G,**$%\"jG\"\"#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%\"UG6%,&F/F2F1F2,&F
+F0F2F2F2F2F2*&)F(,*F*F-F+F,F/\"\"$!\"\"F2F2-%#T1G6%F6,$F+F0F2F2F2*&)F
(,(F*F-F+!\"'F/F;F2-F>6%F6,&F+F0F<F2F2F2F<*&)F(,(F*F-F+F1F/F,F2-%#T0GF
FF2F2*&)F(,*F*F-F+\"#9F.F2F/F,F2-FL6%F6,&F+F0F0F2F2F2F2*&FIF2-FL6%,&F/
F2F<F2FGF2F2F2*&FNF2-FL6%FWFSF2F2F2" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 23 "A14:= shiftdown(5,A13);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%$A14G,0*&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F
2-%\"UG6%,&F/F2F1F2,&F+F0F2F2F2F2F2*&)F(,*F*F-F+F,F/\"\"$!\"\"F2F2-%#T
1G6%F6,$F+F0F2F2F2*&)F(,(F*F-F+!\"'F/F;F2-F>6%F6,&F+F0F<F2F2F2F<*&)F(,
(F*F-F+F1F/F,F2-%#T0GFFF2F2*&FIF2-FLF?F2F<*&FIF2-FL6%,&F/F2F<F2FGF2F2F
2*&)F(,*F*F-F+\"#9F.F2F/F,F2-FL6%FR,&F+F0F0F2F2F2F2" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 23 "A15:= shiftdown(7,A14);" }}{PARA 12 "" 1 
"" {XPPMATH 20 "6#>%$A15G,0*&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%\"nG\"\"
%!\"#\"\"\"F2-%\"UG6%,&F/F2F1F2,&F+F0F2F2F2F2F2*&)F(,*F*F-F+F,F/\"\"$!
\"\"F2F2-%#T1G6%F6,$F+F0F2F2F2*&)F(,(F*F-F+!\"'F/F;F2-F>6%F6,&F+F0F<F2
F2F2F<*&)F(,(F*F-F+F1F/F,F2-%#T0GFFF2F2*&FIF2-FLF?F2F<*&FIF2-FL6%,&F/F
2F<F2FGF2F2F2*&FIF2-FL6%FRF@F2F2F<" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "A16:= eT0(7,A15);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#
>%$A16G,,*&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%\"U
G6%,&F/F2F1F2,&F+F0F2F2F2F2F2*&)F(,(F*F-F+!\"'F/\"\"$F2-%#T1G6%F6,&F+F
0!\"\"F2F2F2FA*&)F(,(F*F-F+F1F/F,F2-%#T0G6%F6,$F+F0F2F2FA*&FCF2-FF6%,&
F/F2FAF2F@F2F2F2*&F'F2-FFF5F2FA" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 19 "A17:=splitU(1,A16);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A17G
,**&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%#T0G6%,&F/
F2F1F2,&F+F0F,F2F2F2F2*&)F(,(F*F-F+!\"'F/\"\"$F2-%#T1G6%F6,&F+F0!\"\"F
2F2F2FA*&)F(,(F*F-F+F1F/F,F2-F46%F6,$F+F0F2F2FA*&FCF2-F46%,&F/F2FAF2F@
F2F2F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "A18:= sym(4,A17);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A18G,**&)%\"qG,**$%\"jG\"\"#\"
\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%#T0G6%,&F/F2F1F2,&F+F0F,F2F2F2F2*&)F
(,(F*F-F+!\"'F/\"\"$F2-%#T1G6%F6,&F+F0!\"\"F2F2F2FA*&)F(,(F*F-F+F1F/F,
F2-F46%F6,$F+F0F2F2FA*&FCF2-F46%,&F/F2FAF2,&F+!\"%F2F2F2F2F2" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "A19:= eT0(4,A18);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$A19G,.*&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%
\"nG\"\"%!\"#\"\"\"F2-%#T0G6%,&F/F2F1F2,&F+F0F,F2F2F2F2*&)F(,(F*F-F+!
\"'F/\"\"$F2-%#T1G6%F6,&F+F0!\"\"F2F2F2FA*&)F(,(F*F-F+F1F/F,F2-F46%F6,
$F+F0F2F2FA*&FCF2-F46%F6,$F+!\"%F2F2F2*&F9F2-F>6%F6,&F+FLF2F2F2F2F2*&)
F(,(F*F-F+!#5F/F0F2-F46%F6,&F+FLF,F2F2F2F2" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 17 "A20:= sym(4,A19);" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>%$A20G,**&)%\"qG,**$%\"jG\"\"#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%#
T0G6%,&F/F2F1F2,&F+F0F,F2F2F2F2*&)F(,(F*F-F+!\"'F/\"\"$F2-%#T1G6%F6,&F
+F0!\"\"F2F2F2FA*&F9F2-F>6%F6,&F+!\"%F2F2F2F2F2*&)F(,(F*F-F+!#5F/F0F2-
F46%F6,&F+FFF,F2F2F2F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A
21:=sym(2,A20);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$A21G,&*&)%\"qG,*
*$%\"jG\"\"#\"\")F+\"\"'%\"nG\"\"%!\"#\"\"\"F2-%#T0G6%,&F/F2F1F2,&F+F0
F,F2F2F2F2*&)F(,(F*F-F+!#5F/F0F2-F46%F6,&F+!\"%F,F2F2F2F2" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "A22:=shiftdown(1,A21);" }}{PARA 11 
"" 1 "" {XPPMATH 20 "6#>%$A22G,&*&)%\"qG,(*$%\"jG\"\"#\"\")F+!#5%\"nG
\"\"%\"\"\"-%#T0G6%,&F/F1!\"#F1,&F+F0F6F1F1F1!\"\"*&F'F1-F36%F5,&F+!\"
%F,F1F1F1F1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A23:=sym(1,A
22);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$A23G\"\"!" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "3 0 0" 0 }{VIEWOPTS 1 1 0 1 
1 1803 }