@options; @figure; A = point( -5.08 , -0.2 ); B = point( 5.35 , -0.2 ); sAB = segment( A , B ); O = milieu( sAB ) { stop }; M = milieu( A , O ) { / }; N = milieu( O , B ) { stop , / }; ceOA = cercle( O , A ); ceMA = cercle( M , A ) { stop }; perpOsAB = perpendiculaire( O , sAB ) { sansnom }; C = intersection( perpOsAB , ceOA , 2 ); D = intersection( perpOsAB , ceOA , 1 ) { stop }; dCM = droite( C , M ) { sansnom }; E = intersection( dCM , ceMA , 2 ); F = intersection( dCM , ceMA , 1 ) { stop }; ceCE = cercle( C , E ); G = intersection( ceCE , ceOA , 1 ); H = intersection( ceCE , ceOA , 2 ) { stop }; ceCF = cercle( C , F ); I = intersection( ceCF , ceOA , 1 ); J = intersection( ceCF , ceOA , 2 ) { stop }; polyGIDJH = polygone( G , I , D , J , H ) { stop , rouge , plein30 };