Source
%% auteur : Nicolas Roux

/millimetre {[1 1 .5 .5 .1 .1] {orange} Quadrillage} def
30 setxunit
30 setyunit
-4 5 setxrange
-2 2 setyrange
%tracerepere

/A{-2 -1.5} def
/B{1 1.5}def
/C{0 -1.5} def
/D{3 1.5} def
/E{-3 -1} def
/F{4 0.5} def

[A B C D E F] {plus} plot
[A B] ligne
[C D] ligne
[E F] ligne
/G{A B E F interdroite} def
/H{C D E F interdroite} def



H G B .3 (-) tripointarc
F H D .3 (-) tripointarc

%A E D .8 (=) tripointarc
%B E C .4 (=) tripointarc

setTimesItalic
(42°) 2.3 0.2 uctext
(41°) -0.3 -0.4 uctext


#latex# $(d_3)$
F dctexlabel
#latex# $(d_1)$
D cltexlabel
#latex# $(d_2)$
B cltexlabel