Changeset 9563 for branches/UKMO/dev_r5518_GO6_package_rigorous_compile_fix/NEMOGCM/NEMO/OPA_SRC/C1D/dyncor_c1d.F90
- Timestamp:
- 2018-05-08T15:48:00+02:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_package_rigorous_compile_fix/NEMOGCM/NEMO/OPA_SRC/C1D/dyncor_c1d.F90
r6486 r9563 118 118 END SUBROUTINE cor_c1d 119 119 SUBROUTINE dyn_cor_c1d ( kt ) ! Empty routine 120 INTEGER, INTENT( in ) :: kt ! ocean time-step index 120 121 WRITE(*,*) 'dyn_cor_c1d: You should not have seen this print! error?', kt 121 122 END SUBROUTINE dyn_cor_c1d
Note: See TracChangeset
for help on using the changeset viewer.