/C1 {-2 -1 3} def
/C2 {1 1 4} def
gsave
newpath
masque_
C1 cercle-_
clip
orange
hachure
grestore
C1 cercle
bleu
C2 cercle
%% la legende
/A {-5.5 1} def
/B {219 241 rptojpoint} def %% coordonnees lues a la souris
/C {xmin xmax add 2 div -5} def
noir
/dx_boxit 3 def
/dy_boxit 3 def
/linearc .05 def
[A 160 C1 cpoint] ligne
[B 50 C2 cpoint] ligne
boxit_all
/fillstyle {blanc fill} def
setTimes
(A) A cctext
(B) B cctext
<tex>
$\overline A$
</tex>
(C) C cctexlabel
|