Présentation de 2691.jps

25 setxunit 7.5 setborder 90 setangle_repere -5 5 setxrange -1.5 1.5 setyrange \pi/2 \pi/2 settkstep .5 .5 setsubtkstep \pi/2 \pi/2 setmkstep ticks traceaxes axesarrow unites /f {setxvar #rpn# cos(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 gsave orange continu /hstep 6 store /hangle 45 store {f} {g} hachcourbes grestore gsave gris continu /hstep 4 store /hangle -45 store {pop ymin 1 sub} {g} hachcourbes grestore 2.8 settailletangente 1 {f} tangente 2 {f} tangente 3 {f} tangente