1  Théorème de Napoléon
  2  %@GIAC:
  3  A:=point(0);
  4  B:=point(4);
  5  C:=point(3+2*i);
  6  T1:=triangle(A,B,C);
  7  triangle_equilateral(B,A,D);
  8  triangle_equilateral(C,B,E);
  9  triangle_equilateral(A,C,F);
 10  circonscrit(A,B,D);
 11  circonscrit(B,C,E);
 12  circonscrit(C,A,F);
 13  G1:=isobarycentre(A,B,D);
 14  G2:=isobarycentre(C,B,E);
 15  G3:=isobarycentre(A,C,F);
 16  T2:=triangle(G1,G2,G3);
 17  %@STYLE:
 18  global: c=0.4white v=1 cercle_c=blue grille=0
 19  F: p=ulft
 20  E: p=urt
 21  B: p=lrt
 22  D: p=bot
 23  A: p=lft
 24  G: p=bot
 25  G1: p=llft
 26  T1: fill=(0.7,0.72,0.85) 
 27  T2: e=1.5 c=(1,0.6,0.5);
 28  %@EOF: