Présentation de 594.jps

25 setxunit 7.5 setborder 90 setangle_repere -3 3 setxrange -1.5 2 setyrange /quadrillagegray 0.4 def .5 setquadrillagexstep .5 setquadrillageystep quadrillage 1 1 settkstep .5 .5 setsubtkstep 1 1 setmkstep ticks subticks marks traceaxes axesarrow /f {setxvar #rpn# x-(x+1)*(-x Exp)/4 } def /g {setxvar #rpn# x } def gsave bleu .75 setlinewidth continu {f} courbe grestore gsave rouge .75 setlinewidth mixte {g} courbe grestore