Changeset 15119 for NEMO/trunk/tests/DOME

Timestamp:

2021-07-13T16:43:22+02:00 (3 years ago)

Author:

jchanut

Message:

#2638, changes to accomodate nn_hls=2 and AGRIF zooms crossing cyclic boundaries. E-W case ok, update for North-Fold still needed.

Location:

NEMO/trunk/tests/DOME/MY_SRC

Files:

• usrdef_hgr.F90 (modified) (1 diff)
• usrdef_nam.F90 (modified) (1 diff)

NEMO/trunk/tests/DOME/MY_SRC/usrdef_hgr.F90

@@ -85 +85 @@
          ! deduce offset from parent:
          roffsetx = Agrif_Parent(roffsetx) &
-              & + (-(nbghostcells_x   - 1) + (Agrif_Parent(nbghostcells_x  ) &
+              & + (-(nbghostcells_x_w - 1) + (Agrif_Parent(nbghostcells_x_w) &
               & + Agrif_Ix()-2)*Agrif_Rhox()) * 1.e-3 * rn_dx
          roffsety = Agrif_Parent(roffsety) &

NEMO/trunk/tests/DOME/MY_SRC/usrdef_nam.F90

@@ -104 +104 @@
          kpj  = nbcellsy + ighost_s + ighost_n
 !! JC: number of ghosts are unknown at this stage !
-!!$         kpi  = nbcellsx + nbghostcells_x   + nbghostcells_x   
+!!$         kpi  = nbcellsx + nbghostcells_x_w + nbghostcells_x_e
 !!$         kpj  = nbcellsy + nbghostcells_y_s + nbghostcells_y_n 
       ENDIF