%% auteur : 

%% auteur : Mora

-2 12 setxrange
-3 10 setyrange
30 setxunit
30 setyunit
.7 setlinewidth

/A{0 0} def
/B{0 7} def
/C{10 0} def
/D  {B C milieu} def
/E  {A C 0.5 hompoint} def
[A B C] polygone
[A B C] points
D point
E point
 D E droite
B A C angledroit
B D 2 marked
C D 2 marked
setTimes
(A)  A [2 2] dltext
(B) B [2 2] urtext
(C) C [2 2] drtext
(D) D [2 2] urtext
(E) E [2 2] drtext


%% adresse IP : 193.52.218.80