%% auteur : 

-1 6 setxrange
-1 4 setyrange
50 setxunit
50 setyunit
/A{0 0} def
/B{5 0} def
/C{5 3} def
/D{0 3} def
/M{5 1.2} def
/N{3.8 0} def
[A B C D] polygone
[A N M C D] polygone

/fillstyle {.5 setgray continu hachure} def

    mixte [A N M C D] polygone* 


setTimes
(A) A [1.5 1.5] dltext
(B) B [1.5 1.5] dtext
(C) C [1.5 1.5] urtext
(D) D [1.5 1.5] ultext
(M) M [1.5 1.5] rtext
(N) N [1.5 1.5] dtext



 
%% adresse IP : 85.168.108.103