%% auteur : 

30 setxunit
30 setyunit
0.5 6.5 setxrange
0 6 setyrange

/O{3.5 3} def
/B{1 3} def
/C{6 3} def
/A{B O -130 rotatepoint} def

O point
pointilles
O 2.5 cercle
continu
[B C] ligne
%A point

setTimesItalic
%(A) A urtext
(B) B ltext
(C) C rtext
(O) O dtext
B O 2 marked
O C 2 marked