Changeset 3289 for branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/NST_SRC/agrif_user.F90

Timestamp:

2012-01-27T15:37:34+01:00 (12 years ago)

Author:

rblod

Message:

Fix agrif for 3_4_beta see ticket #921

File:

• branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/NST_SRC/agrif_user.F90 (modified) (2 diffs)

branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/NST_SRC/agrif_user.F90

@@ -55 +55 @@
       USE nemogcm
       USE tradmp
-#if defined key_obc   ||   defined key_esopa
       USE obc_par
-#endif
+      USE bdy_par
+
       IMPLICIT NONE
       !!----------------------------------------------------------------------
@@ -71 +71 @@
       ! no tracer damping on fine grids
       ln_tradmp = .FALSE.
-#if defined key_obc || defined key_esopa
       ! no open boundary on fine grids
       lk_obc = .FALSE.
-#endif
+      lk_bdy = .FALSE.
 
       CALL nemo_init  ! Initializations of each fine grid