{VERSION 2 3 "DEC ALPHA UNIX" "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 "Times" 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 P lot" 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 }{PSTYLE "R3 Font 0" -1 256 1 {CSTYLE "" -1 -1 "New century schoolbook" 1 24 0 0 0 0 1 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 2" -1 257 1 {CSTYLE "" -1 -1 "Courier" 1 14 0 0 0 0 2 2 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 53 "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**$%\"zGF)F*!\"\"F*,**&F(F)F,F )F**&F,F)F.F)F**&F.F)F(F)F**(F(F*F,F*F.F*!\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 79 "for i in [[y,z,x],[x,z,y],[x,y,z]] do\n gb[i]: =grobner[gbasis](sys,i,plex)\nod;" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#> &%#gbG6#7%%\"yG%\"zG%\"xG7',**$F*\"\"#\"\"\"*$F(F.F/*$F)F.F/!\"\"F/,6* &F(F/F)\"\"%F.*&F(F/F)F.!\"#*&F*\"\"$F)F9F2*&F*\"\"&F)F/F2*&F*F9F)F/! \"$*&F*F/F)F9F=*&F*F/F)F;F2*&F*F/F)F/F5*&F(F/F*F5F.*&F(F/F*F.F7,.*&F)F .F*F.F/*(F*F/F(F/F)F/F.*$F*F5F/F-F2F1F2*$F)F5F/,8*&F)F9F*F.F2*&F*F5F)F /F7*&F*F.F)F/F9*$F)F9F2*$F)F;F.*&F)F;F*F.F7*&F)F9F*F5F7*$F)\"\"(F2*&F* \"\"'F)F/F2*&F(F/F*F;F.*&F(F/F*F9F7,6*$F*FSF7FFF/FDF7*&F*FSF)F.F.*$F* \"\")F/*&F*F5F)F5F9FGF/*$F)FSF7*&F)FSF*F.F.*$F)FZF/" }}{PARA 12 "" 1 " " {XPPMATH 20 "6#>&%#gbG6#7%%\"xG%\"zG%\"yG7',**$F(\"\"#\"\"\"*$F*F.F/ *$F)F.F/!\"\"F/,6*&F(F/F)\"\"%F.*&F(F/F)F.!\"#*&F*\"\"$F)F9F2*&F*F9F)F /!\"$*&F*F/F)F9F;*&F*\"\"&F)F/F2*&F*F/F)F>F2*&F*F/F)F/F5*&F(F/F*F.F7*& F(F/F*F5F.,.*&F*F.F)F.F/*(F(F/F*F/F)F/F.F0F2F1F2*$F*F5F/*$F)F5F/,8*&F) F9F*F.F2*&F*F.F)F/F9*$F)F9F2*&F*F5F)F/F7*$F)F>F.*&F)F>F*F.F7*&F)F9F*F5 F7*$F)\"\"(F2*&F*\"\"'F)F/F2*&F(F/F*F9F7*&F(F/F*F>F.,6FFF/FDF7*$F*FSF7 *&F*FSF)F.F.*$F*\"\")F/*&F*F5F)F5F9FGF/*$F)FSF7*&F)FSF*F.F.*$F)FZF/" } }{PARA 12 "" 1 "" {XPPMATH 20 "6#>&%#gbG6#7%%\"xG%\"yG%\"zG7',**$F(\" \"#\"\"\"*$F)F.F/*$F*F.F/!\"\"F/,6*&F(F/F*\"\"%F.*&F(F/F*F.!\"#*&F)\" \"$F*F9F2*&F)F9F*F/!\"$*&F)F/F*F9F;*&F)\"\"&F*F/F2*&F)F/F*F>F2*&F)F/F* F/F5*&F(F/F)F.F7*&F(F/F)F5F.,.*&F)F.F*F.F/*(F(F/F)F/F*F/F.F0F2F1F2*$F) F5F/*$F*F5F/,8*&F)F9F*F.F2*$F)F9F2*&F)F/F*F.F9*$F)F>F.*&F)F/F*F5F7*&F) F>F*F.F7*$F)\"\"(F2*&F*F5F)F9F7*&F(F/F*F>F.*&F(F/F*F9F7*&F*\"\"'F)F/F2 ,6FFF/FDF7*$F)FUF7*&F)FUF*F.F.*$F)\"\")F/*&F)F5F*F5F9FGF/*$F*FUF7*&F*F UF)F.F.*$F*FZF/" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 86 "for i in [[y,z,x],[x,z,y],[x,y,z]] do\n equ[i[2],i[3]]:=factor(gb[i][nops(gb[ i])])\nod;" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>&%$equG6$%\"zG%\"xG**,, *$F(\"\"#\"\"\"F(!\"\"*&F(F-F'F-F-F'F.*$F'F,F-F-,,F+F-F(F-F/F.F'F.F0F- F-,,F+F-F(F-F/F-F'F-F0F-F-,,F+F-F(F.F/F.F'F-F0F-F-" }}{PARA 12 "" 1 " " {XPPMATH 20 "6#>&%$equG6$%\"zG%\"yG**,,*$F(\"\"#\"\"\"F(F-*&F(F-F'F- F-F'F-*$F'F,F-F-,,F+F-F(!\"\"F.F1F'F-F/F-F-,,F+F-F(F-F.F1F'F1F/F-F-,,F +F-F(F1F.F-F'F1F/F-F-" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>&%$equG6$%\" yG%\"zG**,,*$F'\"\"#\"\"\"F'F-*&F'F-F(F-F-F(F-*$F(F,F-F-,,F+F-F'!\"\"F .F1F(F-F/F-F-,,F+F-F'F-F.F1F(F1F/F-F-,,F+F-F'F1F.F-F(F1F/F-F-" }}} {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$$!3Ymmmm mmY$*F*$!3$>++++++!GF*7$F-7$$!3?WWWWWWW%*F*$!3pebbbbbbDF*7$7$$!3\">9dG 9dGk*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\"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`HLLLL LL')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$$!33NLLLLLL') 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+++++++w F*$!3]:======cF*7$Fbv7$$!3gyI#p2BpF(F*$\"3;wI#p2BpF$F*7$7$Fgv$\"3lmmmm mm;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$Far $\"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$!3Nl mmmmmY$*F*7$$!3*\\r&G9dG9JF*$!3H*************>*F*7$7$Fc\\lF(Fb[l7$Ff[l 7$$!35@dG9dG9JF*$\"3hOLLLLLL')F*Fgcl7$7$F]t$!3(Hmmmmmm;%F*7$$\"3QeG9 dG9dDF*F\\s7$7$Fg[lF\\s7$$\"3<=dG9dG9BF*$!3l@dG9dG9JF*7$7$$\"3$ymmmmmm 9#F*F0Fedl7$7$$\"3cnmmmmmY@F*F0Fgbl7$Ficl7$FctFat7$7$FitFgtFcel7$Feel7 $F_v$!3\\J9dG9dGzF*7$7$$\"3E<======KF*F]uFgel7$F[fl7$$\"3swI#p2BpF$F*F hw7$7$F^xFgvF_fl7$Fcfl7$F^xFfx7$7$Fjx$!36.++++++gF*Fefl7$7$F`flF^w7$Fd yFby7$7$FhyFduF\\gl7$F^gl7$FgzFez7$7$$\"3UMLLLLL$*GF*FarF`gl7$Fbgl7$F] t$!3_jmmmmmmTF*-%'COLOURG6&%$RGBG\"\"\"\"\"!F^hl-%+AXESLABELSG6$%\"xG% \"yG-%(SCALINGG6#%,CONSTRAINEDG" 2 261 261 261 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 16340 -9477 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "0 0 0" 8 }{VIEWOPTS 1 1 0 1 1 1803 }