- Timestamp:
- 2018-05-15T11:50:19+02:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_package/NEMOGCM/NEMO/OPA_SRC/C1D/step_c1d.F90
r6486 r9583 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.