function estiloi(m,h,T,X0)
    X=procOU(m,h,T,X0);
    z=X(:,$);
    repartition_empirique(z);
    aux=X0*exp(-T);
    x=(aux-5):0.01:(aux+5);
    y=zeros(1,length(x));
    for k=1:1:length(x)
        y(1,k)=cdfnor("PQ",x(1,k),X0*exp(-T),1-exp(-2*T));
    end
    plot(x,y)
endfunction