{VERSION 6 0 "IBM INTEL LINUX" "6.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 
0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 }
{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 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Text Output" -1 2 1 
{CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 0 }1 0 0 
-1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 2 6 1 {CSTYLE "" -1 -1 "" 0 1 0 
0 0 0 0 0 0 0 0 0 2 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "M
aple Output" 0 11 1 {CSTYLE "" -1 -1 "" 0 1 0 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 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 
0 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "read \"numpuiseux.mp
l\":" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "read \"puiseuxmodp.
mpl\":" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "read \"choixp.mpl
\":" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "F:=expand(Y^3-(X^5-2
*(10*X-1)^2));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"FG,,*$)%\"YG\"\"
$\"\"\"F**$)%\"XG\"\"&F*!\"\"*&\"$+#F*)F-\"\"#F*F**&\"#SF*F-F*F/F3F*" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "discrim(F,Y);" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#,$*&\"#F\"\"\"),**$)%\"XG\"\"&F&F&*&\"$+#F&)
F+\"\"#F&!\"\"*&\"#SF&F+F&F&F0F1F0F&F1" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 24 "pol:=X^5-200*X^2+40*X-2;" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%$polG,**$)%\"XG\"\"&\"\"\"F**&\"$+#F*)F(\"\"#F*!\"\"*
&\"#SF*F(F*F*F.F/" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "infole
vel['puiseux']:=5;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%*infolevelG6#
%(puiseuxG\"\"&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "mypuiseu
x(F,X,Y,pol,0);" }}{PARA 6 "" 1 "" {TEXT -1 77 "mypuiseux:   Computing
 Puiseux expansions above roots of   X^5-200*X^2+40*X-2" }}{PARA 6 "" 
1 "" {TEXT -1 48 "mypuiseux:   We are searching the singular parts" }}
{PARA 6 "" 1 "" {TEXT -1 34 "mypuiseux:   working on extensions" }}
{PARA 6 "" 1 "" {TEXT -1 30 "mypuiseux:   running time   0." }}{PARA 
6 "" 1 "" {TEXT -1 40 "mypuiseux:   finding a good prime number" }}
{PARA 6 "" 1 "" {TEXT -1 34 "mypuiseux:   running time   .16e-1" }}
{PARA 6 "" 1 "" {TEXT -1 42 "mypuiseux:   prime number used will be   \+
7" }}{PARA 6 "" 1 "" {TEXT -1 40 "mypuiseux:   Computing the polygon t
rees" }}{PARA 6 "" 1 "" {TEXT -1 34 "mypuiseux:   running time   .36e-
1" }}{PARA 6 "" 1 "" {TEXT -1 45 "mypuiseux:   Beginning numerical com
putations" }}{PARA 6 "" 1 "" {TEXT -1 29 "mypuiseux:   Digits used   2
6" }}{PARA 6 "" 1 "" {TEXT -1 55 "mypuiseux:   Computing roots of the \+
discriminant factor" }}{PARA 6 "" 1 "" {TEXT -1 34 "mypuiseux:   runni
ng time   .20e-1" }}{PARA 6 "" 1 "" {TEXT -1 39 "mypuiseux:   Computin
g numerical shifts" }}{PARA 6 "" 1 "" {TEXT -1 33 "mypuiseux:   runnin
g time   .4e-2" }}{PARA 6 "" 1 "" {TEXT -1 37 "mypuiseux:   Computing \+
singular parts" }}{PARA 6 "" 1 "" {TEXT -1 32 "mypuiseux:   running ti
me   .412" }}{PARA 6 "" 1 "" {TEXT -1 55 "mypuiseux:   numerical compu
tations running time   .444" }}{PARA 6 "" 1 "" {TEXT -1 38 "mypuiseux:
   total running time   .500" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#7'7#7$
/%\"XG,&*$)%\"TG\"\"$\"\"\"F-^$$!;gq\"=Ag*4M%f(>!*H!#D$!;7x'>*))ff2R\"
[`1&F1F-/%\"YG*&^$$\";G53h`R2KQmRf6!#C$!;*f_(HIXSdg^005F:F-F+F-7#7$/F'
,&F)F-^$F/$\";7x'>*))ff2R\"[`1&F1F-/F5*&^$F8$\";*f_(HIXSdg^005F:F-F+F-
7#7$/F',&F)F-$\";$*)z\"=p2iD>Mwx**!#FF-/F5,$*&$\";GyA.8qQZW@7sW!#EF-F+
F-F-7#7$/F',&F)F-$\";\"y>$zO/Xdf'[A+\"FUF-/F5*&^$$\";4oK$p&\\8b041OAFU
$\";\\N9w25MB(4rH(QFUF-F+F-7#7$/F',&F)F-$\";U._1`z>`)o#R!y&F1F-/F5,$*&
$\";Osnnk7mb<FI!\\\"F:F-F+F-F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 0 "" }}}}{MARK "8 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }
{PAGENUMBERS 0 1 2 33 1 1 }