Changeset 2045 for branches/DEV_r1879_FCM/NEMOGCM/NEMO/NST_SRC/agrif_user.F90

Timestamp:

2010-08-12T17:21:43+02:00 (14 years ago)

Author:

smasson

Message:

update DEV_r1879_FCM with the trunk

File:

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

branches/DEV_r1879_FCM/NEMOGCM/NEMO/NST_SRC/agrif_user.F90

@@ -101 +101 @@
 #endif
 
-      Call opa_init  ! Initializations of each fine grid
-      Call agrif_opa_init
-
       ! Specific fine grid Initializations
 #if defined key_tradmp || defined key_esopa
@@ -113 +110 @@
       lk_obc = .FALSE.
 #endif
+
+      Call opa_init  ! Initializations of each fine grid
+      Call agrif_opa_init
+
       ! 1. Declaration of the type of variable which have to be interpolated
       !---------------------------------------------------------------------