@options;

@figure;
A = point(-3.5,-0.88) {(-0.1,-0.8)};
B = point(0.3,2.81);
ceAB =cercle(A,B) {i};
C =pointsur(ceAB,11.98);
ceBA =cercle(B,A) {i};
ceCA =cercle(C,A) {i};
D2 =intersection(ceCA,ceBA,1) {i};
D =intersection(ceCA,ceBA,2);
polyABDC =polygone(A,B,D,C) {plein30};
sAD =segment(A,D) {rouge,3};
sBC =segment(B,C) {rouge,3};

@config;
figure=0,0,485,440,ouvert;
script=495,34,251,421,ouvert;
analyse=490,463,257,147,ferme;
enonce=493,3,253,117,ferme;
info=50,470,435,435;
listetransfos=visible;
boutons=point,pointsur,inter,projeteortho,
  segment,droite,demidroite,polygone,vecteur,
  droiteparallele,droiteperpendiculaire,mediatrice,bissectrice,droitev,tangente,
  cercle,cercledia,arc,
  symetrique,deftransfo,imagetransfo,
  mesure,texte,nombres,animation,lieu,
  supprimer,effacerbase,effacertout,renomme,posnom,
  zoomp,zoomm,zoomb,deplacement,repere,rapporteur,
  miseenforme,aide,exporter,configuration,
  escape;