@options;

@figure;
  A = point( -2 , 1.5 )  { rouge , sansnom };
  B = point( 2 , 1.5 )  { rouge , sansnom };
  sAB = segment( A , B )  { i };
  ceAB = cercle( A , B )  { i };
  perpAsAB = perpendiculaire( A , sAB )  { i };
  C = intersection( perpAsAB , ceAB , 2 )  { i };
  perpCperpAsAB = perpendiculaire( C , perpAsAB )  { i };
  perpBsAB = perpendiculaire( B , sAB )  { i };
  I = milieu( A , B )  { i };
  J = milieu( I , B )  { i };
  K = milieu( A , I )  { i };
  L = milieu( A , K )  { i };
  M = milieu( K , I )  { i };
  N = milieu( I , J )  { i };
  O = milieu( J , B )  { i };
  perpKsAB = perpendiculaire( K , sAB )  { i };
  perpMsAB = perpendiculaire( M , sAB )  { i };
  perpIsAB = perpendiculaire( I , sAB )  { i };
  perpNsAB = perpendiculaire( N , sAB )  { i };
  perpJsAB = perpendiculaire( J , sAB )  { i };
  perpOsAB = perpendiculaire( O , sAB )  { i };
  perpLsAB = perpendiculaire( L , sAB )  { i };
  P = milieu( A , C )  { i };
  Q = milieu( P , C )  { i };
  R = milieu( P , Q )  { i };
  S = milieu( P , A )  { i };
  T = milieu( Q , C )  { i };
  U = milieu( A , S )  { i };
  V = milieu( S , P )  { i };
  perpVperpAsAB = perpendiculaire( V , perpAsAB )  { i };
  perpSperpAsAB = perpendiculaire( S , perpAsAB )  { i };
  perpUperpAsAB = perpendiculaire( U , perpAsAB )  { i };
  perpPperpAsAB = perpendiculaire( P , perpAsAB )  { i };
  perpRperpAsAB = perpendiculaire( R , perpAsAB )  { i };
  perpQperpAsAB = perpendiculaire( Q , perpAsAB )  { i };
  perpTperpAsAB = perpendiculaire( T , perpAsAB )  { i };
  D = intersection( perpAsAB , sAB )  { i };
  E = intersection( sAB , perpLsAB )  { i };
  F = intersection( perpAsAB , perpUperpAsAB )  { i };
  G = intersection( perpLsAB , perpUperpAsAB )  { i };
  polyDEGFD = polygone( D , E , G , F , D  )  { noir , plein100 };
  H = intersection( perpKsAB , sAB )  { i };
  W = intersection( perpUperpAsAB , perpKsAB )  { i };
  X = intersection( perpMsAB , sAB )  { i };
  Y = intersection( perpMsAB , perpUperpAsAB )  { i };
  Z = intersection( sAB , perpIsAB )  { i };
  M1 = intersection( sAB , perpNsAB )  { i };
  M2 = intersection( perpJsAB , sAB )  { i };
  M3 = intersection( perpOsAB , sAB )  { i };
  M4 = intersection( sAB , perpBsAB )  { i };
  M5 = intersection( perpUperpAsAB , perpIsAB )  { i };
  M6 = intersection( perpUperpAsAB , perpNsAB )  { i };
  M7 = intersection( perpUperpAsAB , perpJsAB )  { i };
  M8 = intersection( perpUperpAsAB , perpOsAB )  { i };
  M9 = intersection( perpBsAB , perpUperpAsAB )  { i };
  polyHXYW = polygone( H , X , Y , W  )  { noir , plein100 };
  polyM5ZM1M6 = polygone( M5 , Z , M1 , M6  )  { noir , plein100 };
  polyEHWG = polygone( E , H , W , G  )  { blanc , plein100 };
  polyXYM5Z = polygone( X , Y , M5 , Z  )  { blanc , plein100 };
  polyM1M2M7M6 = polygone( M1 , M2 , M7 , M6  )  { blanc , plein100 };
  polyM7M2M3M8 = polygone( M7 , M2 , M3 , M8  )  { noir , plein100 };
  polyM3M8M9M4 = polygone( M3 , M8 , M9 , M4  )  { blanc , plein100 };
  M10 = intersection( perpSperpAsAB , perpAsAB )  { i };
  M11 = intersection( perpLsAB , perpSperpAsAB )  { i };
  M12 = intersection( perpSperpAsAB , perpKsAB )  { i };
  M13 = intersection( perpSperpAsAB , perpMsAB )  { i };
  M14 = intersection( perpSperpAsAB , perpIsAB )  { i };
  M15 = intersection( perpSperpAsAB , perpNsAB )  { i };
  M16 = intersection( perpSperpAsAB , perpJsAB )  { i };
  M17 = intersection( perpSperpAsAB , perpOsAB )  { i };
  M18 = intersection( perpSperpAsAB , perpBsAB )  { i };
  polyFGM11M10 = polygone( F , G , M11 , M10  )  { blanc , plein100 };
  polyM11GWM12 = polygone( M11 , G , W , M12  )  { noir , plein100 };
  polyM12WYM13 = polygone( M12 , W , Y , M13  )  { blanc , plein100 };
  polyYM13M14M5 = polygone( Y , M13 , M14 , M5  )  { noir , plein100 };
  polyM6M15M16M7 = polygone( M6 , M15 , M16 , M7  )  { noir , plein100 };
  polyM5M6M15M14 = polygone( M5 , M6 , M15 , M14  )  { blanc , plein100 };
  polyM8M7M16M17 = polygone( M8 , M7 , M16 , M17  )  { blanc , plein100 };
  polyM17M8M9M18 = polygone( M17 , M8 , M9 , M18  )  { noir , plein100 };
  M19 = intersection( perpVperpAsAB , perpAsAB )  { i };
  M20 = intersection( perpVperpAsAB , perpLsAB )  { i };
  M21 = intersection( perpVperpAsAB , perpKsAB )  { i };
  M22 = intersection( perpMsAB , perpVperpAsAB )  { i };
  M23 = intersection( perpVperpAsAB , perpIsAB )  { i };
  M24 = intersection( perpVperpAsAB , perpNsAB )  { i };
  M25 = intersection( perpJsAB , perpVperpAsAB )  { i };
  M26 = intersection( perpOsAB , perpVperpAsAB )  { i };
  M27 = intersection( perpVperpAsAB , perpBsAB )  { i };
  polyM10M19M20M11 = polygone( M10 , M19 , M20 , M11  )  { noir , plein100 };
  polyM20M11M12M21 = polygone( M20 , M11 , M12 , M21  )  { blanc , plein100 };
  polyM21M12M13M22 = polygone( M21 , M12 , M13 , M22  )  { noir , plein100 };
  polyM13M22M23M14 = polygone( M13 , M22 , M23 , M14  )  { blanc , plein100 };
  polyM14M23M24M15 = polygone( M14 , M23 , M24 , M15  )  { noir , plein100 };
  polyM15M24M25M16 = polygone( M15 , M24 , M25 , M16  )  { blanc , plein100 };
  polyM16M25M26M17 = polygone( M16 , M25 , M26 , M17  )  { noir , plein100 };
  polyM26M17M18M27 = polygone( M26 , M17 , M18 , M27  )  { blanc , plein100 };
  M28 = intersection( perpAsAB , perpPperpAsAB )  { i };
  M29 = intersection( perpLsAB , perpPperpAsAB )  { i };
  M30 = intersection( perpKsAB , perpPperpAsAB )  { i };
  M31 = intersection( perpPperpAsAB , perpMsAB )  { i };
  M32 = intersection( perpIsAB , perpPperpAsAB )  { i };
  M33 = intersection( perpPperpAsAB , perpNsAB )  { i };
  M34 = intersection( perpPperpAsAB , perpJsAB )  { i };
  M35 = intersection( perpPperpAsAB , perpOsAB )  { i };
  M36 = intersection( perpPperpAsAB , perpBsAB )  { i };
  polyM19M20M29M28 = polygone( M19 , M20 , M29 , M28  )  { blanc , plein100 };
  polyM20M29M30M21 = polygone( M20 , M29 , M30 , M21  )  { noir , plein100 };
  polyM21M30M31M22 = polygone( M21 , M30 , M31 , M22  )  { blanc , plein100 };
  polyM23M32M33M24 = polygone( M23 , M32 , M33 , M24  )  { blanc , plein100 };
  polyM24M33M34M25 = polygone( M24 , M33 , M34 , M25  )  { noir , plein100 };
  polyM25M34M35M26 = polygone( M25 , M34 , M35 , M26  )  { blanc , plein100 };
  polyM26M35M36M27 = polygone( M26 , M35 , M36 , M27  )  { noir , plein100 };
  polyM22M23M32M31 = polygone( M22 , M23 , M32 , M31  )  { noir , plein100 };
  M37 = intersection( perpAsAB , perpRperpAsAB )  { i };
  M38 = intersection( perpRperpAsAB , perpLsAB )  { i };
  M39 = intersection( perpRperpAsAB , perpKsAB )  { i };
  M40 = intersection( perpMsAB , perpRperpAsAB )  { i };
  M41 = intersection( perpRperpAsAB , perpIsAB )  { i };
  M42 = intersection( perpRperpAsAB , perpNsAB )  { i };
  M43 = intersection( perpRperpAsAB , perpJsAB )  { i };
  M44 = intersection( perpRperpAsAB , perpOsAB )  { i };
  M45 = intersection( perpBsAB , perpRperpAsAB )  { i };
  polyM28M29M38M37 = polygone( M28 , M29 , M38 , M37  )  { noir , plein100 };
  polyM29M38M39M30 = polygone( M29 , M38 , M39 , M30  )  { blanc , plein100 };
  polyM30M39M40M31 = polygone( M30 , M39 , M40 , M31  )  { noir , plein100 };
  polyM31M40M41M32 = polygone( M31 , M40 , M41 , M32  )  { blanc , plein100 };
  polyM32M41M42M33 = polygone( M32 , M41 , M42 , M33  )  { noir , plein100 };
  polyM33M42M43M34 = polygone( M33 , M42 , M43 , M34  )  { blanc , plein100 };
  polyM34M43M44M35 = polygone( M34 , M43 , M44 , M35  )  { noir , plein100 };
  polyM35M44M45M36 = polygone( M35 , M44 , M45 , M36  )  { blanc , plein100 };
  M46 = intersection( perpAsAB , perpQperpAsAB )  { i };
  M47 = intersection( perpLsAB , perpQperpAsAB )  { i };
  M48 = intersection( perpQperpAsAB , perpKsAB )  { i };
  M49 = intersection( perpQperpAsAB , perpMsAB )  { i };
  M50 = intersection( perpQperpAsAB , perpIsAB )  { i };
  M51 = intersection( perpQperpAsAB , perpNsAB )  { i };
  M52 = intersection( perpJsAB , perpQperpAsAB )  { i };
  M53 = intersection( perpOsAB , perpQperpAsAB )  { i };
  M54 = intersection( perpBsAB , perpQperpAsAB )  { i };
  polyM37M46M47M38 = polygone( M37 , M46 , M47 , M38  )  { blanc , plein100 };
  polyM38M47M48M39 = polygone( M38 , M47 , M48 , M39  )  { noir , plein100 };
  polyM39M48M49M40 = polygone( M39 , M48 , M49 , M40  )  { blanc , plein100 };
  polyM40M49M50M41 = polygone( M40 , M49 , M50 , M41  )  { noir , plein100 };
  polyM41M50M51M42 = polygone( M41 , M50 , M51 , M42  )  { blanc , plein100 };
  polyM42M51M52M43 = polygone( M42 , M51 , M52 , M43  )  { noir , plein100 };
  polyM43M52M53M44 = polygone( M43 , M52 , M53 , M44  )  { blanc , plein100 };
  polyM44M53M54M45 = polygone( M44 , M53 , M54 , M45  )  { noir , plein100 };
  M55 = intersection( perpAsAB , perpTperpAsAB )  { i };
  M56 = intersection( perpLsAB , perpTperpAsAB )  { i };
  M57 = intersection( perpKsAB , perpTperpAsAB )  { i };
  M58 = intersection( perpTperpAsAB , perpMsAB )  { i };
  M59 = intersection( perpIsAB , perpTperpAsAB )  { i };
  M60 = intersection( perpTperpAsAB , perpNsAB )  { i };
  M61 = intersection( perpJsAB , perpTperpAsAB )  { i };
  M62 = intersection( perpOsAB , perpTperpAsAB )  { i };
  M63 = intersection( perpTperpAsAB , perpBsAB )  { i };
  polyM46M47M56M55 = polygone( M46 , M47 , M56 , M55  )  { noir , plein100 };
  polyM47M56M57M48 = polygone( M47 , M56 , M57 , M48  )  { blanc , plein100 };
  polyM48M57M58M49 = polygone( M48 , M57 , M58 , M49  )  { noir , plein100 };
  polyM49M58M59M50 = polygone( M49 , M58 , M59 , M50  )  { blanc , plein100 };
  polyM59M50M51M60 = polygone( M59 , M50 , M51 , M60  )  { noir , plein100 };
  polyM51M60M61M52 = polygone( M51 , M60 , M61 , M52  )  { blanc , plein100 };
  polyM52M53M62M61 = polygone( M52 , M53 , M62 , M61  )  { noir , plein100 };
  polyM53M54M63M62 = polygone( M53 , M54 , M63 , M62  )  { blanc , plein100 };
  M64 = intersection( perpAsAB , perpCperpAsAB )  { i };
  M65 = intersection( perpLsAB , perpCperpAsAB )  { i };
  M66 = intersection( perpCperpAsAB , perpKsAB )  { i };
  M67 = intersection( perpCperpAsAB , perpMsAB )  { i };
  M68 = intersection( perpCperpAsAB , perpIsAB )  { i };
  M69 = intersection( perpNsAB , perpCperpAsAB )  { i };
  M70 = intersection( perpCperpAsAB , perpJsAB )  { i };
  M71 = intersection( perpCperpAsAB , perpOsAB )  { i };
  M72 = intersection( perpBsAB , perpCperpAsAB )  { i };
  polyM55M64M65M56 = polygone( M55 , M64 , M65 , M56  )  { blanc , plein100 };
  polyM56M65M66M57 = polygone( M56 , M65 , M66 , M57  )  { noir , plein100 };
  polyM57M66M67M58 = polygone( M57 , M66 , M67 , M58  )  { blanc , plein100 };
  polyM58M67M68M59 = polygone( M58 , M67 , M68 , M59  )  { noir , plein100 };
  polyM68M59M60M69 = polygone( M68 , M59 , M60 , M69  )  { blanc , plein100 };
  polyM69M60M61M70 = polygone( M69 , M60 , M61 , M70  )  { noir , plein100 };
  polyM70M61M62M71 = polygone( M70 , M61 , M62 , M71  )  { blanc , plein100 };
  polyM71M62M63M72 = polygone( M71 , M62 , M63 , M72  )  { noir , plein100 };
  player1 = point( -3.5 , 0 );
  player2 = point( 3 , 0 );

@analyse;