%@AUTEUR:Guillaume Connan

prologues:=2;

verbatimtex
%&latex
\documentclass{article}
\usepackage[upright]{fourier}
\begin{document}
etex

input geometriesyr16

figure(-1.5u,-3.5u,10u,3u);

pair A,B,A',B',D,D',I,J;

A=u*(2,-2); B=u*(3,2);

D=u*(4.5,-3); D'=u*(4,2);
A'=A reflectedabout(D,D'); B'=B reflectedabout(D,D');

I=0.5[A,A'];J=0.5[B,B'];
draw A--I dashed evenly;
draw I--A' dashed evenly withcolor orange;
draw J--A' withcolor orange;
draw J--A;

label.bot(btex $M$ etex, A);
label.bot(btex $M'$ etex,A');
label.ulft(btex $E$ etex,J);
 
trace droite(D,D') withcolor blue withpen pencircle scaled 1.3bp;
label.urt(btex $\mathcal{D}$ etex, D) withcolor blue;

trace codeperp(A',I,D,5);

trace codesegments(A',I,I,A,1);trace codesegments(A',J,J,A,2);

fin;

end