autocrop -5 5 setxrange -7 5 setyrange -5 5 setyrange 30 setxunit gsave masque quadrillage /f { 2 dict begin /y exch def /x exch def x 0 eq x -1 eq or { 0 } { y 1 sub x dup dup mul add div } ifelse end } def .5 setlinewidth /arrowscale {.5 dup} def .4 setgray %% syntaxe: f s1 s2 l champvecteur --> dessin du champ de vecteur {f} .25 .25 .1 (-) champvecteur /arrowscale {.75 dup} def .7 setlinewidth noir tracerepere .3 setlinewidth %% on represente quelques solutions bleu /a 1 def -10 .5 10 { /a exch store -10 -1.01 {} {/t exch def 1 add a t mul 1 t add div} Courbeparam -.99 10 {} {/t exch def 1 a t mul add 1 t add div} Courbeparam } for grestore #tex# $(x + x^2)y' - y = -1$ 0 -6 [2 dup] cctexlabel