function value=esatta(e,x)
%c=1/(1-exp(1/e));
%value=c*(1-exp(1/e.*x));
value=1-(1-exp((x-1)/e))/(1-exp(-1/e));
