Présentation de 4182.jps

/syracuse/bbgraf/tmp/4182.jpg
25 setxunit 7.5 setborder 90 setangle_repere -2 10 setxrange -2 10 setyrange 1 1 settkstep .5 .5 setsubtkstep 2 2 setmkstep ticks subticks marks traceaxes axesarrow unites /f {setxvar #rpn# (x-3)^2 + 1 } def /g {setxvar #rpn# x } def gsave bleu .75 setlinewidth pointilles {f} courbe grestore gsave bleu continu /hstep 4 store /hangle 15 store 2 3 {pop ymax 1 add} {f} Hachcourbes grestore 2.8 settailletangente 1 {f} tangente 2 {f} tangente 3 {f} tangente