%% auteur : 

% auteur : MORA
-2 10 setxrange
-2.5 10 setyrange
20 setxunit
20 setyunit
.7 setlinewidth

/I{0 0} def
/L{9 0} def
/P{3 6} def
/J{I P 0.333 hompoint} def
/K{I L 0.333 hompoint} def
/I'{0 -1} def
/L'{9 -1} def
[I' L'] (<->) ligne

[I L P] polygone
[I L P ] points
[J K] ligne
setTimes
(I)  I [2 2] dltext
(L) L [2 2] drtext
(P) P [2 2] urtext
(J) J [2 2] ultext
(K) K [2 2] dtext
(3) P J milieu [2 2] ltext
(10) I' L' milieu [2 2] dtext
(5) I J milieu [2 2] ltext
(6) I K milieu [2 2] utext
%% adresse IP : 89.225.78.231