Fichier 4503.jps — Modifié le 2 Septembre 2009 à 17 h 09
% auteur :
-1 3 setxrange
-1 2 setyrange
100 setxunit
%% definition des points
/A {1 1.732} def
/B {0 0} def
/C {2 0} def
/H {1 0} def
/E {-0.732 0} def
/fillstyle {.7 setgray continu hachure} def
[A B C] polygone*
[A H] ligne
A H C angledroit
continu
B A H .2 tripointarc
H A C 0.3 tripointarc
C B A 0.2 tripointarc
A C B 0.2 tripointarc
A B 2 marked
A C 2 marked
B H 3 marked
C H 3 marked
setTimesItalic
(A) A [2 2] ultext
(B) B [2 2] ultext
(C) C [2 2] rtext
(H) H [2 2] dltext
(4) A C milieu [2 2] urtext
15 setfontsize
setTimes
(60°) 20 B 0.3 cpoint cctext
(60°) 140 C 0.3 cpoint cctext
(30°) -100 A 0.3 cpoint cctext
(30°) -70 A 0.4 cpoint cctext