Changeset 14223 for NEMO/trunk/tests/ICE_AGRIF/MY_SRC/usrdef_nam.F90

Timestamp:

2020-12-19T11:22:45+01:00 (4 years ago)

Author:

smasson

Message:

trunk: remove patch for compatibility with the old trunk

File:

• NEMO/trunk/tests/ICE_AGRIF/MY_SRC/usrdef_nam.F90 (modified) (1 diff)

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

@@ -83 +83 @@
       !
       IF( Agrif_Root() ) THEN        ! Global Domain size:  ICE_AGRIF domain is  300 km x 300 Km x 10 m
-         kpi = NINT( 300.e3 / rn_dx ) - 1
-         kpj = NINT( 300.e3 / rn_dy ) - 1
-         kpi = kpi - 2   ! for compatibility with old version (because kerio=7) --> to be removed
-         kpj = kpj - 2   ! for compatibility with old version (because kerio=7) --> to be removed
+         kpi = NINT( 300.e3 / rn_dx ) - 3 
+         kpj = NINT( 300.e3 / rn_dy ) - 3
       ELSE                           ! Global Domain size: add nbghostcells + 1 "land" point on each side
          kpi  = nbcellsx + 2 * ( nbghostcells + 1 )