cov_eq.F90 11 KB