input geometriesyr12;
figure(0,0,8u,6u);
pair A,B,C,D;
A=u*(0.75,0.75);
B=u*(4,0.75);
C=u*(6.5,0.75);
D=u*(0.75,4);
trace triangle(A,C,D);
trace B--D;
trace codeperp(D,A,C,5);
trace appelation(D,C,2mm,btex $7\,m$ etex);
trace appelation(D,B,2mm,btex $5\,m$ etex);
marque_a:=10;
trace marqueangle(D,B,A,0);
label.ulft(btex 60$^\circ$ etex,w);
marque_a:=20;
trace marqueangle(D,C,A,0);
label.lft(btex 45$^\circ$ etex,w);
nomme.llft(A);
nomme.bot(B);
nomme.lrt(C);
nomme.top(D);
fin;
figure(0,0,8u,7u);
pair A,B,C,D,J,L;
D=u*(1,3);
A=u*(1,5);
L=rotation(A,D,-90);
B=u*(7,5);
C-B=D-A;
J=rotation(L,D,-60);
trace A--B--C--D--cycle;
trace D--J--L;
trace codesegments(L,J,J,D,2);
trace codesegments(L,D,D,A,2);
trace appelation(J,L,-3mm,btex $x$ etex);
trace appelation(A,B,2mm,btex $x+4$ etex);
nomme.lft(D);
nomme.ulft(A);
nomme.urt(B);
nomme.lrt(C);
nomme.lrt(L);
nomme.bot(J);
fin;
end
