%% auteur :
-5 3 setxrange
-3 3 setyrange
/O1 {1 1} def 
/O2 {-1 1} def
/O3 {-3 1} def
/O4 {-3 -1} def
/O5 {-1 -1} def
/O6 {1 -1} def
/A {2 2} def
/D {2 -2} def
/B {-4 2} def
/C {-4 -2} def
O1 1 cercle
O2 1 cercle
O3 1 cercle
O4 1 cercle
O5 1 cercle
O6 1 cercle


[O1 O2 O3 O4 O5 O6] points
[A B C D] polygone
setTimes
(A) A urtext
(B) B ultext
(C) C dltext
(D) D drtext
(O) O1 rtext
(1) indice
(O) O2 rtext
(2) indice
(O) O3 rtext
(3) indice
(O) O4 rtext
(4) indice
(O) O6 rtext
(6) indice
(O) O5 rtext
(5) indice