Fix en smoothing.f90