%auteur : Peric
28.45 setxunit
-4 10 setxrange
-5 6 setyrange
/A {0 0} def
/C {-3 27 sqrt} def
/B {9 0} def
/I {B C milieu} def
/G {A C 2 3 div hompoint} def
/H {A C milieu} def
/J {A B milieu} def
/d {A C mediatrice} def
/Q {A H 90 rotatepoint} def
/R {0.5 0} def
/S {R A 120 rotatepoint} def
/E {7 verticale J A IAcercle interdroitecercle pop pop} def
/F {-3 verticale d interdroite} def

%(B) B up 0.2 mulv translatepoint [1.5 dup ] uctext
(120°) R urtext
(B) B [1.5 dup ] drtext
(C) C [1.5 dup ] ultext
(A) A [1.5 dup ] dltext
(H) H up 0.3 mulv translatepoint [1.5 dup ] uctext
(I) I [1.5 dup ] uctext
(G) G down 0.1 mulv translatepoint [1.5 dup ] dltext
(\(E\)) E [1.5 dup ] drtext
(\(F\)) F [1.5 dup ] ultext
[A B C A] ligne
[A I] ligne
%G times2
A G 5 Arc
A R S arcp
A H Q angledroit
B I 2 marked
I C 2 marked

d mixte droite
J A J distance mixte cercle