Changeset 2305 for branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/SBC

Timestamp:

2010-10-25T16:13:35+02:00 (14 years ago)

Author:

davestorkey

Message:

Updates to BDY - DOCTOR standards

File:

• branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90 (modified) (2 diffs)

branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90

@@ -36 +36 @@
    USE closea           ! closed sea
    USE bdy_par         ! unstructured open boundary data variables
-   USE bdyice          ! unstructured open boundary data  (bdy_ice routine)
+   USE bdyice          ! unstructured open boundary data  (bdy_ice_frs routine)
 
    USE prtctl           ! Print control                    (prt_ctl routine)
@@ -241 +241 @@
          !                                                      
       CASE(  2 )   ;       CALL sbc_ice_lim_2( kt, nsbc )             ! LIM 2.0 ice model
-                           IF( lk_bdy ) CALL bdy_ice( kt )
+                           IF( lk_bdy ) CALL bdy_ice_frs( kt )
          !                                                     
       CASE(  3 )   ;       CALL sbc_ice_lim  ( kt, nsbc, nn_ico_cpl)  ! LIM 3.0 ice model