Présentation de 799.jps

/syracuse/bbgraf/tmp/799.jpg
1 setxyrapport 1 setxunit 1 setborder 1 setangle_repere -5 5 setxrange -5 5 setyrange 1 1 settkstep .5 .5 setsubtkstep 2 2 setmkstep ticks subticks marks traceaxes axesarrow unites /R {settvar #rpn# 2+cos(t/2) } def 0 4 pi mul settrange gsave .75 setlinewidth continu vert (R) courbepolar grestore