Présentation de 2287.jps

25 setxunit 7.5 setborder 90 setangle_repere -500 500 setxrange -1000 1000 setyrange 1 1 settkstep .5 .5 setsubtkstep 2 2 setmkstep ticks subticks marks traceaxes axesarrow unites /f {setxvar #rpn# -x*sin(sqrt(abs(x)))-y*sin(sqrt(y)) } def gsave bleu .75 setlinewidth continu xmin .500 neg {f} Courbe .500 xmax {f} Courbe grestore