-.4 6 setxrange -.2 .7 setyrange 50 setxunit .3 setxyrapport .4 ymark /sigma 1 def /m 3 def /t 2.8 def /f { m sub sigma div dup mul -2 div Exp 1 2 pi mul sqrt sigma mul div mul } def traceaxes axesarrow xmin t {f} Hachcourbe %t xtick %t dup f point /W {5.5 -.1} def $\epsilon (S|\kappa)$ W uctexlabel $\kappa_2 > \kappa_1$ 2.9 0.54 uctexlabel 2.9 0.53 2.8 0.42 (->) line /V4 {0 0.5} def $P(obs)$ V4 {90} urtexlabel gsave newpath pointilles [t dup f dupp projx] ligne stroke grestore 1.2 setlinewidth {f} courbe setTimesItalic (O) 0 0 dltext % (t) t 0 dctext %/dx_boxit 2 def %/dy_boxit 2 def % %$P (T \leq t) = \Pi (t)$ % %boxit %xmax .75 mul ymax .75 mul cctexlabel % %$\Pi (t)$ % .5 setlinewidth /fillstyle {blanc fill} def /linearc .05 def %boxit %-.5 .15 cctexlabel