-4 5 setxrange
-1 1 setyrange
20 setxunit

traceOx

xticks
0 xtick
[0 1] {xmark} apply

/A{xmin 0} def   
/B {3 0} def
/C{-3.7 0} def   
/D{3 -0.3} def   
1.7 setlinewidth

[A B] (-]) ligne

%% definition du label
<tex>
$$
   -\infty
$$
</tex>

%% exemple 1 : simple
C dctexlabel 
  
setTimesItalic
   (a) D dctext