Changeset 9927 for NEMO/trunk/src/OCE/SBC
- Timestamp:
- 2018-07-11T14:49:16+02:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/OCE/SBC/sbcice_cice.F90
r9598 r9927 1051 1051 1052 1052 SUBROUTINE sbc_ice_cice ( kt, ksbc ) ! Dummy routine 1053 IMPLICIT NONE 1054 INTEGER, INTENT( in ) :: kt, ksbc 1053 1055 WRITE(*,*) 'sbc_ice_cice: You should not have seen this print! error?', kt 1054 1056 END SUBROUTINE sbc_ice_cice 1055 1057 1056 1058 SUBROUTINE cice_sbc_init (ksbc) ! Dummy routine 1057 WRITE(*,*) 'cice_sbc_init: You should not have seen this print! error?' 1059 IMPLICIT NONE 1060 INTEGER, INTENT( in ) :: ksbc 1061 WRITE(*,*) 'cice_sbc_init: You should not have seen this print! error?', ksbc 1058 1062 END SUBROUTINE cice_sbc_init 1059 1063 1060 1064 SUBROUTINE cice_sbc_final ! Dummy routine 1065 IMPLICIT NONE 1061 1066 WRITE(*,*) 'cice_sbc_final: You should not have seen this print! error?' 1062 1067 END SUBROUTINE cice_sbc_final
Note: See TracChangeset
for help on using the changeset viewer.