Présentation de ode_01_rungekutta.jps

/syracuse/var/syracuse/bbgraf/albums/ode/ode_01_rungekutta.png
-5 5 setxrange -7 5 setyrange -5 5 setyrange 30 setxunit gsave masque quadrillage /f { pop 1 exch div } def -5 -.1 setxrange .5 setlinewidth /arrowscale {.5 dup} def .4 setgray %% syntaxe: f s1 s2 l champvecteur --> dessin du champ de vecteur %% on separe en 2 pour eviter les pbms en x=0 %% rque : on aurait egalement pu prendre -4.9 5 setxrange => decalage %% a droite de .1, et on ne passe plus par x=0 -5 -.1 setxrange {f} .5 .5 .5 (->) champvecteur .5 5 setxrange {f} .5 .5 .5 (->) champvecteur -5 5 setxrange /arrowscale {.75 dup} def .7 setlinewidth noir tracerepere 1 setlinewidth %% on represente quelques solutions -3 1 3 { /i exch def bleu [-5 Exp xmax {f} 1 i .1 Rungekutta] ligne rouge [xmin -5 neg Exp {f} -1 i .1 Rungekutta] ligne } for grestore #tex# $y' = {1\over x}$ 0 -6 [2 dup] cctexlabel