debugging fortran code

- damping=NaN still