%% auteur : 

% auteur : Mora

-3 16 setxrange
-5 8 setyrange
25 setxunit
25 setyunit


/A {-3 0} def
/B{1 3} def
/C{14 3} def
/D{10 0} def
/M{6 6} def
/N'{6 4} def
/M'{6 1.5} def
/N{6 10} def
/P{6 0} def
/Q{6 -4} def
/T{6 2} def
/Z{5.6 1.75} def
/Y{5.6 1.3} def
/K{8 1} def
/L{11 2} def
[K L] (->) ligne
[Z T] ligne
[Z Y] ligne
[A B C D] polygone*
[N M'] ligne
[P Q] ligne
pointilles
[M' P] ligne
continu
2 setlinewidth
[N' M] (->) ligne
<tex>
$P$
</tex>
-1 0 [1.5 dup] ultexlabel

<tex>
$\vec{n}$
</tex>
M N' milieu  [2 dup] urtexlabel

<tex>
$A$
</tex>
K [1.3 dup] dctexlabel

<tex>
$M$
</tex>
L [1.3 dup] dctexlabel