8160 FD=.39894228#*EXP(-U*U/2)