%% 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



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

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

setTimesItalic
(107°) -1.2 -0.2 uctext
(107°) 1.2 0.2 uctext

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