function f=unconorm(y,m,s) ;
f=y-m ;
f=exp(-(f.*f)./(2.0*s*s))./(sqrt(2.0*pi)*s) ;
