Integrate[E^((x - m)^2/(2 s^2)), {x, 0, 4000}]/(Sqrt[2 \[Pi]] s)