Présentation de 2848.jps

%% auteur : %% auteur : Gilles Mora -11 12 setxrange -7 7 setyrange /C2 {-1 1 4} def /A{0 0} def /E {[A 8 6 0]} def /C1 {[A 7 5 0]} def E ellipse* C1 ellipse C2 cercle %% la legende /A {-10 0} def /B {10 3} def %% coordonnees lues a la souris /C {10 -4} def noir /dx_boxit 3 def /dy_boxit 3 def /linearc .05 def [A 180 C1 cpoint] ligne [B 10 C2 cpoint] ligne [C 7.5 -2] ligne boxit_all /fillstyle {blanc fill} def setTimes (A) A [2 2] cctext (E) B [2 2] cctext (F) C [2 2] cctext