Changeset 4889 for branches/2014

Timestamp:

2014-11-27T09:48:51+01:00 (9 years ago)

Author:

vancop

Message:

bugs ORCA2_OFF_PISCES and SBC

File:

• branches/2014/dev_4728_CNRS04_coupled_interface/NEMOGCM/NEMO/OPA_SRC/SBC/sbcblk_core.F90 (modified) (1 diff)

branches/2014/dev_4728_CNRS04_coupled_interface/NEMOGCM/NEMO/OPA_SRC/SBC/sbcblk_core.F90

@@ -39 +39 @@
    USE prtctl          ! Print control
    USE sbcwave,ONLY :  cdn_wave !wave module 
-#if defined key_lim3
-   USE sbc_ice,ONLY :  cldf_ice, tatm_ice ! Surface boundary condition: ice fields
-#endif
-#if defined key_lim2
-   USE sbc_ice,ONLY :  cldf_ice ! Surface boundary condition: ice fields
-#endif
+   USE sbc_ice         ! Surface boundary condition: ice fields
    USE lib_fortran     ! to use key_nosignedzero