%% 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 9} def
/J{1 3} def
/K{7 3} def
/P'{2 9.2} def
/I'{-0.9 0} def
[P' I'] (<->) 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] urtext
(9) I' P' milieu [2 2] ltext
(6) P J milieu [2 2] rtext
(3,5) L K milieu [2 2] rtext
(7) P K milieu [2 2] rtext
%% adresse IP : 89.225.78.231