Changeset 44 for vendor/nemo/current/NEMOGCM/NEMO/OPA_SRC/BDY/bdyice_lim2.F90

Timestamp:

08/31/12 15:41:37 (12 years ago)

Author:

cholod

Message:

Load NEMO_TMP into vendor/nemo/current.

File:

• vendor/nemo/current/NEMOGCM/NEMO/OPA_SRC/BDY/bdyice_lim2.F90 (modified) (1 diff)

vendor/nemo/current/NEMOGCM/NEMO/OPA_SRC/BDY/bdyice_lim2.F90

@@ -53 +53 @@
             CYCLE
          CASE(jp_frs)
-            CALL bdy_ice_frs( idx_bdy(ib_bdy), dta_idx(ib_bdy) )
+            CALL bdy_ice_frs( idx_bdy(ib_bdy), dta_bdy(ib_bdy) )
          CASE DEFAULT
             CALL ctl_stop( 'bdy_ice_lim_2 : unrecognised option for open boundaries for ice fields' )