prologues:=2;

input geometriesyr16
input outilssyr

figure(-5u,-5u,15u,15u);
pair A,B,C,D;
A=u*(1,1);
B-A=u*(7,3);
C=rotation(B,A,35);
D=1.75[A,C];
trace demidroite(A,B);
trace demidroite(A,C);
trace rapporteurdouble(A,5/7[A,B],1);
trace regle(C,B,1);
trace compas(B,rotation(C,B,-180),1);
trace cercles(B,C) dashed evenly;
trace equerre(D,C,D,1,1);
trace crayon(D,rotation(C,D,90),1/2,1);
nomme.bot(A);
marque_p:="croix";
nomme.top(B);
nomme.ulft(C);
marque_p:="non";
fin;

end