Source
%% auteur : 

%% auteur : 
-4.9 7 setxrange
-4.9 4.9 setyrange
50 setxunit
50 setyunit
/cerc{O 4} def
cerc cercle
/I{1 0} def
/J{0 1} def
/K{-4 0} def
/L{4 0} def
/M{0 -4} def
/N{0 4} def
/A{60 cerc cpoint} def
A point
/B {120 cerc cpoint} def
B point
/C{180 cerc cpoint} def
C point
/D{240 cerc cpoint} def
D point
/E{300 cerc cpoint} def
E point
2 setlinewidth
[A B C D E L] polygone
[A D] ligne
[C L] ligne
[B E] ligne
setTimes
(B) A [2 2] urtext
(C) B [2 2]  ultext
(O) O [2 2] dltext
(D) C [2 2]  dltext
(E) D [2 2] dtext
(F) E [2 2] drtext
(A) L [2 2] rtext