Présentation de 11895.jps

/syracuse/bbgraf/albums/belles_02/11895.jpg
25 setxunit 7.5 setborder -15 15 setxrange -15 15 setyrange jpegmode /a 5 def /b 3 def /c 4.5 def /resolution 500 def 2 2 settkstep 1 1 setsubtkstep 2 2 setmkstep ticks traceaxes axesarrow unites .75 setlinewidth continu bleu /X {settvar a b add t Cos mul c t 1 a b div add mul Cos mul sub } def /Y {settvar a b add t Sin mul c t 1 a b div add mul Sin mul sub } def 0 20 pi mul {X} {Y} Courbeparam