Changeset 902 for codes/icosagcm/trunk/src/time
- Timestamp:
- 06/13/19 16:45:43 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
codes/icosagcm/trunk/src/time/timeloop_gcm.f90
r899 r902 228 228 END IF 229 229 230 CALL check_conserve(f_ps,f_dps,f_u,f_theta_rhodz,f_phis, itau0)230 CALL check_conserve(f_ps,f_dps,f_u,f_theta_rhodz,f_phis,f_q,itau0) 231 231 232 232 Call trace_on … … 362 362 CALL check_conserve_detailed(it, AAM_dyn, & 363 363 f_ps,f_dps,f_u,f_theta_rhodz,f_phis) 364 CALL check_conserve(f_ps,f_dps,f_u,f_theta_rhodz,f_phis, it)364 CALL check_conserve(f_ps,f_dps,f_u,f_theta_rhodz,f_phis,f_q,it) 365 365 ENDIF 366 366 … … 379 379 CALL check_conserve_detailed(it, AAM_dyn, & 380 380 f_ps,f_dps,f_u,f_theta_rhodz,f_phis) 381 CALL check_conserve(f_ps,f_dps,f_u,f_theta_rhodz,f_phis, it)381 CALL check_conserve(f_ps,f_dps,f_u,f_theta_rhodz,f_phis,f_q,it) 382 382 383 383 !$OMP MASTER
Note: See TracChangeset
for help on using the changeset viewer.