12 setfontsize
-1 6 setxrange
-.2 .95 setyrange

50 setxunit
150 setyunit
%[1 1 .5 .5 .1 .1] 
%.7 setlinewidth

/f {
   3 1 Gauss
} def

/i {
   setxvar
   0.5
} def


/j {
   setxvar
   x 1.5 add 
} def



/unites {} def
tracerepere

%marks
.5 ymark

/A {1 0.75} def
/B {2 0.75} def  
/C {3 0.75} def
/D {1 -.1} def
/E {2 -.1} def  
/F {3 -.1} def

A D (-) line
B E (-) line
C F (-) line


/fillstyle {.5 setgray continu hachure} def
% mixte [0 0 1 0 1 0.05] polygone*
% mixte [1 0.05 1 0 2 0 2 0.25] polygone*

 %mixte [2 0   2 0.25  2.5 0.35  2.5 0] polygone*

 %mixte [2.5 0.35  2.5 0  2.75 0 2.75 0.4] polygone*


<tex>
   $\kappa_0$
</tex>
1.1 0.75 uctexlabel

<tex>
   $\kappa_1 > \kappa_0 $
</tex>
2.1 0.75  uctexlabel

<tex>
   $\kappa_2 > \kappa_1 $
</tex>
3.1 0.75  uctexlabel

/V {0 0.7} def
<tex>
   P(obs)
</tex>
V {90} urtexlabel

/W {5.5 -.1} def
<tex>
   $\epsilon (S|\kappa_{it})$
</tex>
W uctexlabel
   
xmin 2 {f} Hachcourbe
1.5 setlinewidth
%gsave
   {f} courbe
%grestore


%setTimesItalic
   %(O) O drtext ext