Catch divide by zero error in subroutine coefvar()
Catch divide by zero error in subroutine coefvar()

If mean is close to zero, return with coefficient of variation
equal 0 and ierr=1.

mherman09/Hdef,mherman09/Hdef,mherman09/Hdef