Changeset 2884 for branches/2011/dev_r2802_UKMO8_cice/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_cice.F90

Timestamp:

2011-10-03T12:11:05+02:00 (13 years ago)

Author:

charris

Message:

#662 Tidying + changes to make sure NEMO-CICE model will compile OK.

File:

• branches/2011/dev_r2802_UKMO8_cice/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_cice.F90 (modified) (1 diff)

branches/2011/dev_r2802_UKMO8_cice/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_cice.F90

@@ -576 +576 @@
 
 #else
-   SUBROUTINE cice_sbc_hadgam (kt)    ! Dummy routine
-      INTEGER, INTENT( in  ) ::   kt ! ocean time step
+   SUBROUTINE cice_sbc_hadgam( kt )    ! Dummy routine
+      INTEGER, INTENT( in  ) ::   kt   ! ocean time step
       WRITE(*,*) 'cice_sbc_hadgam: You should not have seen this print! error?'
    END SUBROUTINE cice_sbc_hadgam