Présentation de 217.jps

/syracuse/bbgraf/tmp/217.jpg
%% auteur : Gilles Mora -11 12 setxrange -10 7 setyrange /C1 {-2 -1 3} def /C2 {1 1 4} def /A{0 0} def /E {[A 8 6 0]} def gsave newpath C1 cercle_ clip newpath C2 cercle_ clip orange hachure grestore C1 cercle C2 cercle E ellipse* %% la legende /A {-10 0} def /B {10 3} def %% coordonnees lues a la souris /C {0 -8} def noir /dx_boxit 3 def /dy_boxit 3 def /linearc .05 def [A 180 C1 cpoint] ligne [B 10 C2 cpoint] ligne [C 160 140 rptojpoint] (-*) ligne boxit_all /fillstyle {blanc fill} def setTimes (A) A [2 2] cctext (B) B [2 2] cctext <tex> $A\cap B$ </tex> (C) C [2 2] cctexlabel