Présentation de 1702.jps

/syracuse/bbgraf/tmp/1702.jpg
25 setxunit 7.5 setborder 90 setangle_repere -4 4 setxrange -4 4 setyrange [1 1 .5 .5 .1 .1] {orange} Quadrillage /quadrillagegray 0.4 def 1 setquadrillagexstep 1 setquadrillageystep quadrillage 1 1 settkstep .5 .5 setsubtkstep 2 2 setmkstep ticks subticks marks traceaxes axesarrow .75 setlinewidth continu noir /X {settvar #rpn# 3*cos(t)+cos(3*t) } def /Y {settvar #rpn# 3*sin(t)+sin(3*t) } def 0 pi {X} {Y} Courbeparam