Changeset 10232 for branches/UKMO/dev_r5518_GO6_package_FOAMv14_bgcupdates/NEMOGCM/NEMO/OPA_SRC/C1D/step_c1d.F90
- Timestamp:
- 2018-10-26T15:25:58+02:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_package_FOAMv14_bgcupdates/NEMOGCM/NEMO/OPA_SRC/C1D/step_c1d.F90
r6486 r10232 165 165 !!---------------------------------------------------------------------- 166 166 CONTAINS 167 SUBROUTINE stp_c1d ( kt ) ! dummy routine 168 WRITE(*,*) 'stp_c1d: You should not have seen this print! error?', kt 167 SUBROUTINE stp_c1d ( kstp ) ! dummy routine 168 IMPLICIT NONE 169 INTEGER, INTENT(in) :: kstp ! ocean time-step index 170 WRITE(*,*) 'stp_c1d: You should not have seen this print! error?', kstp 169 171 END SUBROUTINE stp_c1d 170 172 #endif
Note: See TracChangeset
for help on using the changeset viewer.