Added diagnostics.F90 (had forgotten before)