Changeset 9656 for NEMO/trunk/src/OCE/SBC/sbcmod.F90

Timestamp:

2018-05-28T11:53:14+02:00 (6 years ago)

Author:

clem

Message:

remove the remaining references to LIM

File:

• NEMO/trunk/src/OCE/SBC/sbcmod.F90 (modified) (3 diffs)

NEMO/trunk/src/OCE/SBC/sbcmod.F90

@@ -34 +34 @@
    USE sbcice_if      ! surface boundary condition: ice-if sea-ice model
 #if defined key_si3
-   USE icestp         ! surface boundary condition: LIM 3.0 sea-ice model
+   USE icestp         ! surface boundary condition: SI3 sea-ice model
 #endif
-   USE sbcice_cice    ! surface boundary condition: CICE    sea-ice model
+   USE sbcice_cice    ! surface boundary condition: CICE sea-ice model
    USE sbcisf         ! surface boundary condition: ice-shelf
    USE sbccpl         ! surface boundary condition: coupled formulation
@@ -216 +216 @@
       CASE( 0 )                        !- no ice in the domain
       CASE( 1 )                        !- Ice-cover climatology ("Ice-if" model)  
-      CASE( 2 )                        !- LIM3 ice model
+      CASE( 2 )                        !- SI3  ice model
       CASE( 3 )                        !- CICE ice model
          IF( .NOT.( ln_blk .OR. ln_cpl ) )   CALL ctl_stop( 'sbc_init : CICE sea-ice model requires ln_blk or ln_cpl = T' )
@@ -427 +427 @@
       CASE(  1 )   ;         CALL sbc_ice_if   ( kt )             ! Ice-cover climatology ("Ice-if" model)
 #if defined key_si3
-      CASE(  2 )   ;         CALL ice_stp  ( kt, nsbc )           ! LIM-3 ice model
+      CASE(  2 )   ;         CALL ice_stp  ( kt, nsbc )           ! SI3 ice model
 #endif
       CASE(  3 )   ;         CALL sbc_ice_cice ( kt, nsbc )       ! CICE ice model