@options;

@figure;
  A = point( -5.7 , 2.57 )  { sansnom , i };
  B = point( 2.36 , 2.57 )  { sansnom , i };
  sAB = segment( A , B )  { i };
  ceAB = cercle( A , B )  { i };
  ceBA = cercle( B , A )  { i };
  perpAsAB = perpendiculaire( A , sAB )  { i };
  perpBsAB = perpendiculaire( B , sAB )  { i };
  C2 = intersection( perpAsAB , ceAB , 1 )  { i };
  C = intersection( perpAsAB , ceAB , 2 )  { i };
  D2 = intersection( perpBsAB , ceBA , 1 )  { i };
  D = intersection( perpBsAB , ceBA , 2 )  { i };
  sDB = segment( D , B )  { i };
  E = point( 5.27 , 4.97 )  { sansnom , i };
  sBE = segment( B , E )  { i };
  t_BE = translation( B , E )  { noir };
  A' = image( t_BE , A )  { i };
  D' = image( t_BE , D )  { i };
  C' = image( t_BE , C )  { i };
  pol1 = polygone( A , B , D , C  );
  pol2 = polygone( A' , E , D' , C'  );
  pol3 = polygone( A , A' , C' , C  );
  pol4 = polygone( B , E , D' , D  );
  P = pointsur( sAB , 0.67 )  { rouge , rond2 , (-0.13,-0.9) };
  dAE = droite( A , E )  { orange , 7 , i };
  paraPdAE = parallele( P , dAE )  { jauneclair , 7 , i };
  dAD = droite( A , D )  { saumon , 7 , i };
  G = intersection( paraPdAE , sBE )  { i };
  I = milieu( A , B )  { i };
  J = milieu( A' , E )  { i };
  K = milieu( A , A' )  { i };
  L = milieu( B , E )  { i };
  H = symetrique( P , I )  { i };
  M = symetrique( G , L )  { i };
  H' = image( t_BE , H )  { i };
  P' = image( t_BE , P )  { i };
  t_BA = translation( B , A )  { noir };
  G' = image( t_BA , G )  { i };
  M' = image( t_BA , M )  { i };
  sPG = segment( P , G )  { i };
  sG'H = segment( G' , H )  { i };
  sM'H' = segment( M' , H' )  { i };
  sP'M = segment( P' , M )  { i };
  N1 = intersection( paraPdAE , sG'H )  { i };
  O = intersection( sM'H' , sG'H )  { i };
  Q = intersection( sM'H' , sP'M )  { i };
  R = intersection( sP'M , paraPdAE )  { i };
  sIB = segment( I , B )  { i };
  perpPsAB = perpendiculaire( P , sAB )  { i };
  P1 = intersection( perpPsAB , sIB )  { (-0.07,-0.93) , i };
  sP1G = segment( P1 , G )  { i };
  paraP1dAE = parallele( P1 , dAE )  { vert , 6 , i };
  G2 = intersection( paraP1dAE , sBE )  { (-0.43,-0.87) , i };
  H2 = symetrique( P1 , I )  { (0.17,-0.73) , i };
  M2 = symetrique( G2 , L )  { (-0.3,-0.9) , i };
  G'2 = image( t_BA , G2 )  { (-0.37,-0.8) , i };
  H'2 = image( t_BE , H2 )  { (-0.07,-0.97) , i };
  M'2 = symetrique( G'2 , K )  { (-0.33,-0.9) , i };
  P'2 = symetrique( H'2 , J )  { (-0.2,-0.93) , i };
  polyPHG'M'H'P'MG = polygone( P1 , H2 , G'2 , M'2 , H'2 , P'2 , M2 , G2  )  { 2 , plein10 };
  paraP1dAD = parallele( P1 , dAD )  { i };
  F2 = intersection( sDB , paraP1dAD )  { i };
  N = milieu( D , B )  { i };
  F2' = symetrique( F2 , N )  { i };
  t_BD = translation( B , D )  { noir };
  S2 = image( t_BD , P1 )  { i };
  S2' = image( t_BD , H2 )  { i };
  F2'' = image( t_BA , F2' )  { i };
  F2''' = image( t_BA , F2 )  { i };
  L2 = image( t_BE , F2 )  { i };
  L2' = image( t_BE , F2' )  { i };
  L2'' = image( t_BD , G2 )  { i };
  L2''' = image( t_BD , M2 )  { i };
  polyPF2F2'S2S2'F2''F2'''H = polygone( P1 , F2 , F2' , S2 , S2' , F2'' , F2''' , H2  )  { 2 , plein10 };
  polyGM2L2L2'L2'''L2''F2'F2 = polygone( G2 , M2 , L2 , L2' , L2''' , L2'' , F2' , F2  )  { 2 , plein10 };
  polyPGF2 = polygone( P1 , G2 , F2  )  { 2 , plein10 };
  polyG'HF2''' = polygone( G'2 , H2 , F2'''  )  { 2 , plein10 };
  polyS2F2'L2'' = polygone( S2 , F2' , L2''  )  { 2 , plein10 };
  paraPdAD = parallele( P , dAD )  { i };
  F = intersection( sDB , paraPdAD )  { i };
  F1 = symetrique( F , N )  { i };
  F1' = image( t_BA , F1 )  { i };
  F' = image( t_BA , F )  { i };
  S = image( t_BD , H )  { i };
  S1 = image( t_BD , P )  { i };
  sPF = segment( P , F )  { i };
  sF1S1 = segment( F1 , S1 )  { i };
  sSF1' = segment( S , F1' )  { i };
  sF'H = segment( F' , H )  { i };
  N11 = intersection( sF'H , sPF )  { i };
  R11 = intersection( sPF , sF1S1 )  { i };
  Q11 = intersection( sSF1' , sF1S1 )  { i };
  O11 = intersection( sF'H , sSF1' )  { i };
  G1 = image( t_BE , F1 )  { i };
  G1' = image( t_BE , F )  { i };
  H1 = image( t_BD , G )  { i };
  H1' = image( t_BD , M )  { (-0.03,0.63) , i };
  sMG1' = segment( M , G1' )  { i };
  sG1H1' = segment( G1 , H1' )  { i };
  sH1F1 = segment( H1 , F1 )  { i };
  sFG = segment( F , G )  { i };
  polyN1OQR = polygone( N1 , O , Q , R  )  { 2 , plein10 };
  polyN11O11Q11R11 = polygone( N11 , O11 , Q11 , R11  )  { 2 , plein10 };
  N21 = intersection( sFG , sMG1' )  { i };
  R21 = intersection( sG1H1' , sMG1' )  { i };
  Q21 = intersection( sG1H1' , sH1F1 )  { i };
  O21 = intersection( sFG , sH1F1 )  { i };
  polyN21R21Q21O21 = polygone( N21 , R21 , Q21 , O21  )  { 2 , plein10 };
  polyN11N1RN21O21R11 = polygone( N11 , N1 , R , N21 , O21 , R11  )  { 2 , plein10 };
  N21' = image( t_BA , N21 )  { i };
  Q21' = image( t_BA , Q21 )  { i };
  O21' = image( t_BA , O21 )  { i };
  polyN11N1ON21'O21'O11 = polygone( N11 , N1 , O , N21' , O21' , O11  )  { 2 , plein10 };
  N1' = image( t_BD , N1 )  { i };
  R' = image( t_BD , R )  { i };
  O' = image( t_BD , O )  { i };
  polyQ11R11O21Q21R'N1' = polygone( Q11 , R11 , O21 , Q21 , R' , N1'  )  { 2 , plein10 };
  polyQ21'O21'O11Q11N1'O' = polygone( Q21' , O21' , O11 , Q11 , N1' , O'  )  { 2 , plein10 };
  H23 = image( t_BA , L2'' )  { i };
  polyH23S2'F2'' = polygone( H23 , S2' , F2''  )  { 2 , plein10 };


@config;
actualisescript=non;