%% auteur : -4 4 setxrange -4 4 setyrange 50 setxunit 50 setyunit /D {-3 0} def /B {3 0} def /O{0 0} def %% le cercle de diametre [AB] /cerc {D B diamcercle} def %% le point du cercle d'angle donne /C {120 cerc cpoint} def /A {-120 cerc cpoint} def [B C] ligne [A B] ligne [A C] ligne pointilles [O C] ligne [O B] ligne A B 2 marked A C 2 marked B C 2 marked continu $\widehat{o}$ 40 O 1 cpoint [2 2] cltexlabel $\widehat{a}$ 40 A 1 cpoint [2 2] cltexlabel cerc cercle setTimesItalic (A) A [2 2] dltext (B) B [2 2] drtext (C) C [2 2] urtext (O) O [2 2] drtext B O C .5 tripointarc B A C .5 tripointarc