{VERSION 3 0 "DEC ALPHA UNIX" "3.0" }
{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 }{PSTYLE "Maple Plot" 
0 13 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 0 0 -1 -1 
-1 0 0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "sys:=\{(x^2+y^2+z^2-
1),(x^2*y^2+y^2*z^2+z^2*x^2-2*x*y*z)\};" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#>%$sysG<$,**$)%\"xG\"\"#\"\"\"\"\"\"*$)%\"yGF*F+F,*$)%\"zGF*F+F,
!\"\"F,,**&F(F+F.F+F,*&F.F+F1F+F,*&F1F+F(F+F,*(F)F,F/F,F2F,!\"#" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 103 "for i in [lexdeg([x],[y,z])
,lexdeg([y],[x,z]),lexdeg([z],[x,y])] do\n gb[i]:=Groebner[gbasis](sys
,i)\nod;" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>&%#gbG6#-%'lexdegG6$7#%\"
xG7$%\"yG%\"zG7',6*$)F-\"\"'\"\"\"!\"#*$)F-\"\"%F4\"\"\"*&)F-\"\"#F4)F
.F<F4F5*$)F.F3F4F5*$)F.F8F4F9*$)F-\"\")F4F9*&F2F4F=F4F<*&F7F4FAF4\"\"$
*&F;F4F?F4F<*$)F.FDF4F9,.*(F+F9F-F9F.F9F<F6F9*$F;F4!\"\"F:F9F@F9*$F=F4
FN,6*&F+F4F7F4F<*&F+F4F;F4F5*&F+F4FAF4F<*&F+F4F=F4F5*&)F-\"\"&F4F.F4FN
*&)F-FGF4)F.FGF4FN*&FYF4F.F4!\"$*&F-F4)F.FWF4FN*&F-F4FZF4Ffn*&F-F4F.F4
F8,8*$)F-\"\"(F4FN*$FVF4F<*&FVF4F=F4F5*&FYF4FAF4F5*&FYF4F=F4FN*&F+F4Fh
nF4F<*&F+F4FZF4F5*&F-F4F?F4FN*&F-F4FAF4F5*&F-F4F=F4FG*$FYF4FN,**$)F+F<
F4F9FMF9FOF9FNF9" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>&%#gbG6#-%'lexdeg
G6$7#%\"yG7$%\"xG%\"zG7',6*$)F-\"\"'\"\"\"!\"#*$)F-\"\"%F4\"\"\"*&)F.
\"\"#F4)F-F<F4F5*$)F.F3F4F5*$)F.F8F4F9*$)F-\"\")F4F9*&F2F4F;F4F<*&F7F4
FAF4\"\"$*&F?F4F=F4F<*$)F.FDF4F9,.*(F-F9F+F9F.F9F<F6F9*$F=F4!\"\"F:F9F
@F9*$F;F4FN,6*&F+F4F7F4F<*&F+F4F=F4F5*&F+F4FAF4F<*&F+F4F;F4F5*&)F-\"\"
&F4F.F4FN*&)F-FGF4)F.FGF4FN*&FYF4F.F4!\"$*&F-F4)F.FWF4FN*&F-F4FZF4Ffn*
&F-F4F.F4F8,8*$)F-\"\"(F4FN*$FVF4F<*&FVF4F;F4F5*&FYF4FAF4F5*&FYF4F;F4F
N*&F+F4FhnF4F<*&F+F4FZF4F5*&F-F4F?F4FN*&F-F4FAF4F5*&F-F4F;F4FG*$FYF4FN
,*FMF9*$)F+F<F4F9FOF9FNF9" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>&%#gbG6#
-%'lexdegG6$7#%\"zG7$%\"xG%\"yG7',6*$)F-\"\"'\"\"\"!\"#*$)F-\"\"%F4\"
\"\"*&)F-\"\"#F4)F.F<F4F5*$)F.F3F4F5*$)F.F8F4F9*$)F-\"\")F4F9*&F2F4F=F
4F<*&F7F4FAF4\"\"$*&F;F4F?F4F<*$)F.FDF4F9,.*(F-F9F.F9F+F9F<F6F9*$F;F4!
\"\"F:F9F@F9*$F=F4FN,6*&F7F4F+F4F<*&F+F4F;F4F5*&F+F4FAF4F<*&F+F4F=F4F5
*&F.F4)F-\"\"&F4FN*&)F-FGF4)F.FGF4FN*&F.F4FYF4!\"$*&F-F4)F.FWF4FN*&F-F
4FZF4Ffn*&F-F4F.F4F8,8*$)F-\"\"(F4FN*$FVF4F<*&FVF4F=F4F5*&FYF4FAF4F5*&
FYF4F=F4FN*&FhnF4F+F4F<*&FZF4F+F4F5*&F?F4F-F4FN*&F-F4FAF4F5*&F-F4F=F4F
G*$FYF4FN,*FMF9FOF9*$)F+F<F4F9FNF9" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 103 "for i in [lexdeg([x],[y,z]),lexdeg([y],[x,z]),lexdeg
([z],[x,y])] do\n equ[op(2,i)]:=factor(gb[i][1])\nod;" }}{PARA 12 "" 
1 "" {XPPMATH 20 "6#>&%$equG6#7$%\"yG%\"zG**,,*$)F(\"\"#\"\"\"\"\"\"F(
F0*&F(F0F)F0!\"\"F)F2*$)F)F.F/F0F0,,F,F0F(F2F1F0F)F2F3F0F0,,F,F0F(F0F1
F0F)F0F3F0F0,,F,F0F(F2F1F2F)F0F3F0F0" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>&%$equG6#7$%\"xG%\"zG**,,*$)F(\"\"#\"\"\"\"\"\"F(!\"\"*&F(F0F)F0F1F
)F0*$)F)F.F/F0F0,,F,F0F(F0F2F0F)F0F3F0F0,,F,F0F(F1F2F0F)F1F3F0F0,,F,F0
F(F0F2F1F)F1F3F0F0" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>&%$equG6#7$%\"x
G%\"yG**,,*$)F(\"\"#\"\"\"\"\"\"F(F0*&F(F0F)F0F0F)F0*$)F)F.F/F0F0,,F,F
0F(!\"\"F1F5F)F0F2F0F0,,F,F0F(F0F1F5F)F5F2F0F0,,F,F0F(F5F1F0F)F5F2F0F0
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 73 "plots[implicitplot](x^2
+x+x*y+y+y^2,x=-1..1,y=-1..1,scaling=constrained);" }}{PARA 13 "" 1 "
" {INLPLOT "6%-%'CURVESG6]q7$7$$!3S+++++++#*!#=$!3)Qr&G9dG9JF*7$$!3Ymm
mmmmY$*F*$!3$>++++++!GF*7$F-7$$!3?WWWWWWW%*F*$!3pebbbbbbDF*7$7$$!3\">9
dG9dGk*F*$!3y,++++++?F*F37$F97$$!3%)************>)*F*$!3M-+++++!Q\"F*7
$7$$!3fh%Q:YQ:')*F*$!3w,++++++7F*F?7$FE7$$!3q\"======)**F*$!36,#======
%!#>7$7$$!3&HLLLLLL)**F*$!3V<++++++SFPFK7$FR7$FS$\"33<LLLLLLQFP7$7$FL$
\"3u#)************RFPFX7$7$$!3\"G======)**F*Fgn7$FF$\"3Hg%Q:YQ:1\"F*7$
7$$!3&4++++++#)*F*$\"3H)************>\"F*F]o7$7$F@$\"3:)************>
\"F*7$$!38Wr&G9dGk*F*$\"3uTr&G9dGk\"F*7$7$F4$\"3<)*************>F*Fjo7
$7$$!3JXWWWWWW%*F*$\"3X)*************>F*7$$!3dnmmmmmY$*F*$\"3MlmmmmmY@
F*7$7$$!3^,++++++#*F*$\"3+9dG9dG9BF*Fip7$7$$!3\">++++++S)F*$!3f*******
*****RXF*7$$!3jJLLLLL$\\)F*$!3p,++++++WF*7$7$F[r$!3C-++++++WF*7$$!3`HL
LLLLL')F*$!3'Hnmmmmm;%F*7$7$$!3&o&G9dG9d*)F*$!34-++++++OF*Fcr7$Fir7$F`
qF+7$7$F($\"3s8dG9dG9BF*7$$!32fG9dG9d*)F*$\"3scG9dG9dDF*7$7$$!33NLLLLL
L')F*$\"3g)************z#F*Fds7$Fjs7$$!3'\\LLLLLL\\)F*$\"3wKLLLLL$*GF*
7$7$$!3!3++++++S)F*$\"3%)************RHF*F`t7$7$$!3?,++++++wF*$!3h;===
===cF*7$$!30F9dG9dGzF*$!3S-++++++_F*7$Fau7$FgtFhq7$7$Ffq$\"3R++++++SHF
*7$$!3QI9dG9dGzF*$\"3MG9dG9dGJF*7$7$F]u$\"3\"y\"======KF*F\\v7$7$$!3g,
++++++oF*$!30lmmmmm;lF*7$$!3;uI#p2BpF(F*$!3+-++++++gF*7$F[w7$$!34+++++
++wF*$!3]:======cF*7$Fbv7$$!3gyI#p2BpF(F*$\"3;wI#p2BpF$F*7$7$Fgv$\"3lm
mmmmm;LF*Fgw7$7$F^wF\\w7$FivFgv7$FbxFfv7$F]x7$$!3\\pmmmmm;lF*F^x7$7$F^
w$\"3FxI#p2BpF$F*Fex7$7$FduFbu7$FdwF]u7$F^yFax7$Fix7$$!3;A======cF*$\"
3#*=======KF*7$7$Fdu$\"3XH9dG9dGJF*Fay7$7$Far$!3uKLLLLL$\\)F*7$FhqFgt7
$7$$!3/************RXF*FgtF]y7$Fgy7$$!390+++++SXF*$\"31-+++++SHF*7$7$F
ar$\"3(QLLLLLL*GF*Fdz7$F[z7$Ffr$!3kILLLLLL')F*7$7$F\\s$!3ubG9dG9d*)F*F
^[l7$7$F\\s$\"3$y&G9dG9dDF*7$$!33kmmmmmmTF*F]t7$Fi[l7$F]rF[[l7$7$F0$!3
NlmmmmmY$*F*7$$!3*\\r&G9dG9JF*$!3H*************>*F*7$7$Fc\\lF(Fb[l7$Ff
[l7$$!35@dG9dG9JF*$\"3h<dG9dG9BF*7$7$F0$\"3GnmmmmmY@F*Fj\\l7$7$F0F.7$$
!38ebbbbbbDF*F47$7$F<$!3-Vr&G9dGk*F*Fe]l7$7$F<$\"3CWr&G9dGk\"F*7$$!39`
bbbbbbDF*Fgp7$F`^lF`]l7$7$F<F:7$$!3h-+++++!Q\"F*F@7$7$FHFFFf^l7$7$FH$
\"32j%Q:YQ:1\"F*7$$!3M(***********z8F*Fdo7$7$$!3i(***********z8F*FdoF]
^l7$Fj^l7$$!3e/#======%FPFL7$7$FUFSFg_l7$7$FU$\"3x^LLLLLLQFP7$$!3<g\"=
=====%FPFgn7$F``l7$FH$\"3@j%Q:YQ:1\"F*7$F[`l7$$\"3jALLLLLLQFP$!31MLLLL
L$)**F*7$7$FgnF[oFh`l7$7$FgnFa`l7$F^`lFU7$FaalF]`l7$F^al7$$\"3-g%Q:YQ:
1\"F*FF7$7$FdoFboFdal7$7$FdoFd_l7$F]_l$!3i,++++++7F*7$7$F]_lFHF`al7$Fh
al7$$\"3-Ur&G9dGk\"F*F[p7$7$FgpFepFabl7$7$FgpFa^l7$$\"3'R9dG9dGk\"F*F<
7$7$F^^lF<Fjal7$Febl7$$\"3*emmmmmm9#F*Fjp7$7$$\"3G9dG9dG9BF*F(F^cl7$7$
FcclF`q7$FgsFes7$7$F]t$!3>OLLLLLL')F*Fgcl7$7$F]t$!3(Hmmmmmm;%F*7$$\"3Q
eG9dG9dDF*F\\s7$7$Fg[lF\\s7$$\"3<=dG9dG9BF*$!3l@dG9dG9JF*7$7$$\"3$ymmm
mmm9#F*F0Fedl7$7$$\"3cnmmmmmY@F*F0Fgbl7$Ficl7$FctFat7$7$FitFgtFcel7$Fe
el7$F_v$!3\\J9dG9dGzF*7$7$$\"3E<======KF*F]uFgel7$F[fl7$$\"3swI#p2BpF$
F*Fhw7$7$F^xFgvF_fl7$Fcfl7$F^xFfx7$7$Fjx$!36.++++++gF*Fefl7$7$F`flF^w7
$FdyFby7$7$FhyFduF\\gl7$F^gl7$FgzFez7$7$$\"3UMLLLLL$*GF*FarF`gl7$Fbgl7
$F]t$!3_jmmmmmmTF*-%'COLOURG6&%$RGBG\"\"\"\"\"!F^hl-%(SCALINGG6#%,CONS
TRAINEDG-%+AXESLABELSG6$%\"xG%\"yG" 2 249 249 249 2 0 1 0 2 9 0 4 1 
1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 
0 0 0 20000 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" 
}}}}{MARK "3 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }