Changeset 1970 for branches/DEV_r1784_mid_year_merge_2010/NEMO/NST_SRC/agrif_user.F90

Timestamp:

2010-06-25T16:58:03+02:00 (14 years ago)

Author:

acc

Message:

ticket #684 step 5: Add in changes from the trunk between revisions 1821 and 1879.

File:

• branches/DEV_r1784_mid_year_merge_2010/NEMO/NST_SRC/agrif_user.F90 (modified) (2 diffs)

branches/DEV_r1784_mid_year_merge_2010/NEMO/NST_SRC/agrif_user.F90

@@ -73 +73 @@
       USE tradmp
 #endif
+#if defined key_obc   ||   defined key_esopa
+      USE obc_par
+#endif
       USE sol_oce
       USE in_out_manager
@@ -105 +108 @@
       ! no tracer damping on fine grids
       lk_tradmp = .FALSE.
+#endif
+#if defined key_obc || defined key_esopa
+      ! no open boundary on fine grids
+      lk_obc = .FALSE.
 #endif
       ! 1. Declaration of the type of variable which have to be interpolated