{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 0 "" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%(HomeLibG%A/home/fourier3/sills/maple/mylibG" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "######### 3.25" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 90 "op1:=annihiloper( q^(j^2) * qfac(-q
,q^2,j) /qfac(-q^2,q^2,j)/ spqfac(q^2,q^2,j), 0, back);" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#>%$op1G,(\"\"\"F&*&,(*$%\"qG\"\"#!\"\"F&F&)F*,&F
,F&%\"nGF+F&F&%\"NGF,F,*&,&F)F&)F*,&F/F+!\"#F&F&F&F0F5F," }}}{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 48 "A1:=applyshiftop(op
1, q^(3*j^2) * U(n, 3*j, 1));" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A1
G,.*&)%\"qG,&*$%\"jG\"\"#\"\"$F,\"\"\"F.-%\"UG6%,&%\"nGF.!\"#F.,$F+F-F
.F.!\"\"*&)F(,(F*F-F3F,F4F.F.F/F.F6*&F'F.-F06%,&F3F.F6F.F5F.F.F.*&)F(,
$F*F-F.F;F.F6*&)F(,(F*F-F6F.F3F,F.F;F.F6*&F?F.-F06%F3F5F.F.F." }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A2:= eU1(6,A1);" }}{PARA 12 
"" 1 "" {XPPMATH 20 "6#>%#A2G,,*&)%\"qG,&*$%\"jG\"\"#\"\"$F,\"\"\"F.-%
\"UG6%,&%\"nGF.!\"#F.,$F+F-F.F.!\"\"*&)F(,(F*F-F3F,F4F.F.F/F.F6*&F'F.-
F06%,&F3F.F6F.F5F.F.F.*&)F(,(F*F-F3F.F+!\"$F.-%#T1G6%F=,&F+F-F6F.F.F.F
.*&)F(,*F*F-F3F.F+F-F.F.F.-FC6%F=,&F+F-F,F.F.F.F." }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 15 "A3:= eU1(3,A2);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%#A3G,.*&)%\"qG,(*$%\"jG\"\"#\"\"$%\"nGF,!\"#\"\"\"F0-
%\"UG6%,&F.F0F/F0,$F+F-F0F0!\"\"*&)F(,(F*F-F6F0F.F,F0F1F0F0*&)F(,*F*F-
F0F0F.F0F+!\"$F0-%#T1G6%F4,&F+F-F6F0F0F0F0*&)F(,*F*F-F,F0F.F0F+F-F0-F?
6%F4,&F+F-F,F0F0F0F0*&)F(,(F*F-F.F0F+F=F0-F?6%,&F.F0F6F0FAF0F0F0*&)F(,
*F*F-F.F0F+F-F0F0F0-F?6%FMFGF0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 21 "A4:= shiftdown(6,A3);" }}{PARA 12 "" 1 "" {XPPMATH 
20 "6#>%#A4G,.*&)%\"qG,(*$%\"jG\"\"#\"\"$%\"nGF,!\"#\"\"\"F0-%\"UG6%,&
F.F0F/F0,$F+F-F0F0!\"\"*&)F(,(F*F-F6F0F.F,F0F1F0F0*&)F(,*F*F-F0F0F.F0F
+!\"$F0-%#T1G6%F4,&F+F-F6F0F0F0F0*&)F(,*F*F-F,F0F.F0F+F-F0-F?6%F4,&F+F
-F,F0F0F0F0*&)F(,(F*F-F.F0F+F=F0-F?6%,&F.F0F6F0FAF0F0F0*&F;F0FKF0F6" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A5:= eT1(6,A4);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%#A5G,.*&)%\"qG,(*$%\"jG\"\"#\"\"$%\"nGF,!
\"#\"\"\"F0-%\"UG6%,&F.F0F/F0,$F+F-F0F0!\"\"*&)F(,(F*F-F6F0F.F,F0F1F0F
0*&)F(,*F*F-F,F0F.F0F+F-F0-%#T1G6%F4,&F+F-F,F0F0F0F0*&)F(,(F*F-F.F0F+!
\"$F0-F>6%,&F.F0F6F0,&F+F-F6F0F0F0F0*&F8F0-%#T0GF3F0F6*&)F(,*F*F-F0F0F
.F,F+!\"'F0-FK6%F4,&F+F-F/F0F0F0F6" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 18 "A6:= splitU(2,A5);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6
#>%#A6G,,*&)%\"qG,(*$%\"jG\"\"#\"\"$%\"nGF,!\"#\"\"\"F0-%\"UG6%,&F.F0F
/F0,$F+F-F0F0!\"\"*&)F(,(F*F-F6F0F.F,F0-%#T0G6%F4,&F+F-F0F0F0F0F0*&)F(
,*F*F-F,F0F.F0F+F-F0-%#T1G6%F4,&F+F-F,F0F0F0F0*&)F(,(F*F-F.F0F+!\"$F0-
FB6%,&F.F0F6F0,&F+F-F6F0F0F0F0*&)F(,*F*F-F0F0F.F,F+!\"'F0-F;6%F4,&F+F-
F/F0F0F0F6" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "A7:=shiftup(5
,A6);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A7G,,*&)%\"qG,(*$%\"jG\"\"
#\"\"$%\"nGF,!\"#\"\"\"F0-%\"UG6%,&F.F0F/F0,$F+F-F0F0!\"\"*&)F(,(F*F-F
6F0F.F,F0-%#T0G6%F4,&F+F-F0F0F0F0F0*&)F(,*F*F-F,F0F.F0F+F-F0-%#T1G6%F4
,&F+F-F,F0F0F0F0*&)F(,(F*F-F.F0F+!\"$F0-FB6%,&F.F0F6F0,&F+F-F6F0F0F0F0
*&F'F0F:F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "A8:=splitU(
1,A7);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#A8G,**&)%\"qG,(*$%\"jG\"
\"#\"\"$%\"nGF,!\"#\"\"\"F0-%#T0G6%,&F.F0F/F0,$F+F-F0F0!\"\"*&)F(,(F*F
-F6F0F.F,F0-F26%F4,&F+F-F0F0F0F0F0*&)F(,*F*F-F,F0F.F0F+F-F0-%#T1G6%F4,
&F+F-F,F0F0F0F0*&)F(,(F*F-F.F0F+!\"$F0-FA6%,&F.F0F6F0,&F+F-F6F0F0F0F0
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "#######" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "A9:=sym(4,A8);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%#A9G,**&)%\"qG,(*$%\"jG\"\"#\"\"$%\"nGF,!\"#\"\"\"F0-
%#T0G6%,&F.F0F/F0,$F+F-F0F0!\"\"*&)F(,(F*F-F6F0F.F,F0-F26%F4,&F+F-F0F0
F0F0F0*&)F(,*F*F-F,F0F.F0F+F-F0-%#T1G6%F4,&F+F-F,F0F0F0F0*&)F(,(F*F-F.
F0F+!\"$F0-FA6%,&F.F0F6F0,&F+FGF0F0F0F0F0" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 17 "A10 := eT1(4,A9);" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>%$A10G,.*&)%\"qG,(*$%\"jG\"\"#\"\"$%\"nGF,!\"#\"\"\"F0-%#T0G6%,&F.F
0F/F0,$F+F-F0F0!\"\"*&)F(,(F*F-F6F0F.F,F0-F26%F4,&F+F-F0F0F0F0F0*&)F(,
*F*F-F,F0F.F0F+F-F0-%#T1G6%F4,&F+F-F,F0F0F0F0*&)F(,(F*F-F.F0F+!\"$F0-F
A6%F4,&F+FGF0F0F0F0F0*&)F(,(F*F-F.F,F+!\"'F0-F26%F4,&F+FGF,F0F0F0F0*&F
'F0-F26%F4,$F+FGF0F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "A
11:= sym(1,A10);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A11G,**&)%\"qG,
(*$%\"jG\"\"#\"\"$!\"\"\"\"\"%\"nGF,F/-%#T0G6%,&F0F/!\"#F/,&F+F-F/F/F/
F/F/*&)F(,*F*F-F,F/F0F/F+F-F/-%#T1G6%F4,&F+F-F,F/F/F/F/*&)F(,(F*F-F0F/
F+!\"$F/-F;6%F4,&F+FAF/F/F/F/F/*&)F(,(F*F-F0F,F+!\"'F/-F26%F4,&F+FAF,F
/F/F/F/" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "#########" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A12:=sym(2,A11);" }}{PARA 
12 "" 1 "" {XPPMATH 20 "6#>%$A12G,**&)%\"qG,(*$%\"jG\"\"#\"\"$!\"\"\"
\"\"%\"nGF,F/-%#T0G6%,&F0F/!\"#F/,&F+F-F/F/F/F/F/*&)F(,*F*F-F,F/F0F/F+
F-F/-%#T1G6%F4,&F+!\"$F5F/F/F/F/*&)F(,(F*F-F0F/F+F>F/-F;6%F4,&F+F>F/F/
F/F/F/*&)F(,(F*F-F0F,F+!\"'F/-F26%F4,&F+F>F,F/F/F/F/" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 41 "A13:= subs(j=2*j,A12)-subs(j=2*j-1, A12);
" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A13G,2*&)%\"qG,(*$%\"jG\"\"#\"#
7!\"\"\"\"\"%\"nGF,F/-%#T0G6%,&F0F/!\"#F/,&F+\"\"'F/F/F/F/F/*&)F(,*F*F
-F,F/F0F/F+F7F/-%#T1G6%F4,&F+!\"'F5F/F/F/F/*&)F(,(F*F-F0F/F+F?F/-F<6%F
4,&F+F?F/F/F/F/F/*&)F(,(F*F-F0F,F+!#7F/-F26%F4,&F+F?F,F/F/F/F/*&)F(,(*
$,&F+F,F.F/F,\"\"$F.F/F0F,F/-F26%F4,&F+F7F5F/F/F/F.*&)F(,*FPFRF.F/F0F/
F+F7F/FCF/F.*&)F(,*FPFRF0F/F+F?FRF/F/-F<6%F4,&F+F?\"\"%F/F/F/F.*&)F(,*
FPFRF0F,F+FIF7F/F/-F26%F4,&F+F?\"\"&F/F/F/F." }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 20 "A14:=expandall(A13);" }}{PARA 12 "" 1 "" 
{XPPMATH 20 "6#>%$A14G,2*&)%\"qG,(*$%\"jG\"\"#\"#7!\"\"\"\"\"%\"nGF,F/
-%#T0G6%,&F0F/!\"#F/,&F+\"\"'F/F/F/F/F/*&)F(,*F*F-F,F/F0F/F+F7F/-%#T1G
6%F4,&F+!\"'F5F/F/F/F/*&)F(,(F*F-F0F/F+F?F/-F<6%F4,&F+F?F/F/F/F/F/*&)F
(,(F*F-F0F,F+!#7F/-F26%F4,&F+F?F,F/F/F/F/*&)F(,*F*F-F+FIF,F/F0F,F/-F26
%F4,&F+F7F5F/F/F/F.*&)F(,*F*F-F+F?F,F/F0F/F/FCF/F.*&)F(,*F*F-F+!#=F7F/
F0F/F/-F<6%F4,&F+F?\"\"%F/F/F/F.*&)F(,*F*F-F+!#C\"\"*F/F0F,F/-F26%F4,&
F+F?\"\"&F/F/F/F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "altsig
n:=false;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%(altsignG%&falseG" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "A15:= shiftup(8,A14);" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A15G,2*&)%\"qG,(*$%\"jG\"\"#\"#7!\"
\"\"\"\"%\"nGF,F/-%#T0G6%,&F0F/!\"#F/,&F+\"\"'F/F/F/F/F/*&)F(,*F*F-F,F
/F0F/F+F7F/-%#T1G6%F4,&F+!\"'F5F/F/F/F/*&)F(,(F*F-F0F/F+F?F/-F<6%F4,&F
+F?F/F/F/F/F/*&)F(,(F*F-F0F,F+!#7F/-F26%F4,&F+F?F,F/F/F/F/*&)F(,*F*F-F
+FIF,F/F0F,F/-F26%F4,&F+F7F5F/F/F/F.*&)F(,*F*F-F+F?F,F/F0F/F/FCF/F.*&)
F(,*F*F-F+!#=F7F/F0F/F/-F<6%F4,&F+F?\"\"%F/F/F/F.*&)F(,(F*F-!\"$F/F0F,
F/-F26%F4,&F+F?F.F/F/F/F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
20 "A16:=shiftup(7,A15);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A16G,2*
&)%\"qG,(*$%\"jG\"\"#\"#7!\"\"\"\"\"%\"nGF,F/-%#T0G6%,&F0F/!\"#F/,&F+
\"\"'F/F/F/F/F/*&)F(,*F*F-F,F/F0F/F+F7F/-%#T1G6%F4,&F+!\"'F5F/F/F/F/*&
)F(,(F*F-F0F/F+F?F/-F<6%F4,&F+F?F/F/F/F/F/*&)F(,(F*F-F0F,F+!#7F/-F26%F
4,&F+F?F,F/F/F/F/*&)F(,*F*F-F+FIF,F/F0F,F/-F26%F4,&F+F7F5F/F/F/F.*&)F(
,*F*F-F+F?F,F/F0F/F/FCF/F.*&)F(,(F*F-F+F7F0F/F/F;F/F.*&)F(,(F*F-!\"$F/
F0F,F/-F26%F4,&F+F?F.F/F/F/F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 20 "A17:= negate(3,A16);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A17G,
2*&)%\"qG,(*$%\"jG\"\"#\"#7!\"\"\"\"\"%\"nGF,F/-%#T0G6%,&F0F/!\"#F/,&F
+\"\"'F/F/F/F/F/*&)F(,*F*F-F,F/F0F/F+F7F/-%#T1G6%F4,&F+!\"'F5F/F/F/F/*
&)F(,(F*F-F+F7F0F/F/-F<F3F/F/*&)F(,(F*F-F0F,F+!#7F/-F26%F4,&F+F?F,F/F/
F/F/*&)F(,*F*F-F+FGF,F/F0F,F/-F26%F4,&F+F7F5F/F/F/F.*&)F(,*F*F-F+F?F,F
/F0F/F/-F<6%F4,&F+F?F/F/F/F/F.*&FAF/F;F/F.*&)F(,(F*F-!\"$F/F0F,F/-F26%
F4,&F+F?F.F/F/F/F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "A18:=
 sym(7,A17);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A18G,2*&)%\"qG,(*$%
\"jG\"\"#\"#7!\"\"\"\"\"%\"nGF,F/-%#T0G6%,&F0F/!\"#F/,&F+\"\"'F/F/F/F/
F/*&)F(,*F*F-F,F/F0F/F+F7F/-%#T1G6%F4,&F+!\"'F5F/F/F/F/*&)F(,(F*F-F+F7
F0F/F/-F<F3F/F/*&)F(,(F*F-F0F,F+!#7F/-F26%F4,&F+F?F,F/F/F/F/*&)F(,*F*F
-F+FGF,F/F0F,F/-F26%F4,&F+F7F5F/F/F/F.*&)F(,*F*F-F+F?F,F/F0F/F/-F<6%F4
,&F+F?F/F/F/F/F.*&FAF/-F<6%F4,&F+F7F,F/F/F/F.*&)F(,(F*F-!\"$F/F0F,F/-F
26%F4,&F+F?F.F/F/F/F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A1
9:= e0(3,A18);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A19G,2*&)%\"qG,(*
$%\"jG\"\"#\"#7!\"\"\"\"\"%\"nGF,F/-%#T0G6%,&F0F/!\"#F/,&F+\"\"'F/F/F/
F/F/*&)F(,*F*F-F,F/F0F/F+F7F/-%#T1G6%F4,&F+!\"'F5F/F/F/F/*&)F(,(F*F-!
\"$F/F0F,F/F1F/F/*&)F(,(F*F-F+F-F0F,F/-F26%F4,&F+F7F,F/F/F/F.*&)F(,(F*
F-F0F,F+!#7F/-F26%F4,&F+F?F,F/F/F/F/*&)F(,*F*F-F+FMF,F/F0F,F/-F26%F4,&
F+F7F5F/F/F/F.*&)F(,*F*F-F+F?F,F/F0F/F/-F<6%F4,&F+F?F/F/F/F/F.*&FAF/-F
26%F4,&F+F?F.F/F/F/F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A2
0:=sym(3,A19);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A20G,.*&)%\"qG,(*
$%\"jG\"\"#\"#7!\"\"\"\"\"%\"nGF,F/-%#T0G6%,&F0F/!\"#F/,&F+\"\"'F/F/F/
F/F/*&)F(,*F*F-F,F/F0F/F+F7F/-%#T1G6%F4,&F+!\"'F5F/F/F/F/*&)F(,(F*F-F+
F-F0F,F/-F26%F4,&F+F7F,F/F/F/F.*&)F(,(F*F-F0F,F+!#7F/-F26%F4,&F+F?F,F/
F/F/F/*&)F(,*F*F-F+FIF,F/F0F,F/-F26%F4,&F+F7F5F/F/F/F.*&)F(,*F*F-F+F?F
,F/F0F/F/-F<6%F4,&F+F?F/F/F/F/F." }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 19 "A21:=negate(4,A20);" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>%$A21G,**&)%\"qG,(*$%\"jG\"\"#\"#7!\"\"\"\"\"%\"nGF,F/-%#T0G6%,&F0F
/!\"#F/,&F+\"\"'F/F/F/F/F/*&)F(,*F*F-F,F/F0F/F+F7F/-%#T1G6%F4,&F+!\"'F
5F/F/F/F/*&)F(,*F*F-F+!#7F,F/F0F,F/-F26%F4,&F+F7F5F/F/F/F.*&)F(,*F*F-F
+F?F,F/F0F/F/-F<6%F4,&F+F?F/F/F/F/F." }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 20 "A22:= negate(4,A21);" }}{PARA 12 "" 1 "" {XPPMATH 20 
"6#>%$A22G,**&)%\"qG,(*$%\"jG\"\"#\"#7!\"\"\"\"\"%\"nGF,F/-%#T0G6%,&F0
F/!\"#F/,&F+\"\"'F/F/F/F/F/*&)F(,*F*F-F,F/F0F/F+F7F/-%#T1G6%F4,&F+!\"'
F5F/F/F/F/*&)F(,*F*F-F+!#7F,F/F0F,F/-F26%F4,&F+F7F5F/F/F/F.*&F9F/-F<F3
F/F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "A23:=sym(2,A22);" }
}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$A23G,**&)%\"qG,(*$%\"jG\"\"#\"#7!
\"\"\"\"\"%\"nGF,F/-%#T0G6%,&F0F/!\"#F/,&F+\"\"'F/F/F/F/F/*&)F(,*F*F-F
,F/F0F/F+F7F/-%#T1G6%F4,&F+F7F,F/F/F/F/*&)F(,*F*F-F+!#7F,F/F0F,F/-F26%
F4,&F+F7F5F/F/F/F.*&F9F/-F<F3F/F." }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "A24:=e0(4,A23);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%
$A24G,&*&)%\"qG,**$%\"jG\"\"#\"#7F+!#7F,\"\"\"%\"nGF,F/-%#T0G6%,&F0F/!
\"#F/,&F+\"\"'F5F/F/F/!\"\"*&)F(,*F*F-F,F/F0F,F+F-F/-F26%F4,&F+F7F,F/F
/F/F/" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "A25:=negate(1,A24)
;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$A25G,&*&)%\"qG,**$%\"jG\"\"#\"
#7F,\"\"\"%\"nGF,F+F-F.-%#T0G6%,&F/F.!\"#F.,&F+!\"'F4F.F.F.!\"\"*&F'F.
-F16%F3,&F+\"\"'F,F.F.F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
16 "A26:=sym(1,A25);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$A26G\"\"!" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "3 0 0" 0 }
{VIEWOPTS 1 1 0 1 1 1803 }