-1 9 setyrange
-1 18 setxrange
20 setxunit
10 setfontsize
traceaxes
axesarrow

/A {0 8} def
/B {3 2} def
/C {11 2} def
/D {17 7} def


%[A B C D] {times2} plot
[3 9 3 0] ligne
[11 9 11 0] ligne

1 setlinewidth
[A {-80 dir} .. B {-5 dir} .. C {5 dir} .. {45 dir} D] draw

setTimesItalic
   (O) O dltext
setTimes
/vadjust 1 def
   (pannes) 1.5 8 uctext
   (précoces) 1.5 8 dctext
   (vie utile) 7 8 cctext
   (usure) 14 8 cctext

<tex>
$y = \lambda (t)$
</tex>

15 5 bltexlabel