Changeset 13291

Timestamp:

2020-07-10T14:58:55+02:00 (4 years ago)

Author:

smasson

Message:

trunk: bugfix in bestpartition, see #2366

File:

• NEMO/trunk/src/OCE/LBC/mppini.F90 (modified) (2 diffs)

NEMO/trunk/src/OCE/LBC/mppini.F90

@@ -835 +835 @@
          iszitst = ( nx_global+2-2*nn_hls + (ji-1) ) / ji + 2*nn_hls    ! first  dim.
 #else
-         iszitst = ( Ni0glo + (ji-1) ) / ji + 2*nn_hls
+         iszitst = ( Ni0glo + (ji-1) ) / ji
 #endif
          IF( iszitst < isziref ) THEN
@@ -846 +846 @@
          iszjtst = ( ny_global+2-2*nn_hls + (ji-1) ) / ji + 2*nn_hls    ! first  dim.
 #else
-         iszjtst = ( Nj0glo + (ji-1) ) / ji + 2*nn_hls
+         iszjtst = ( Nj0glo + (ji-1) ) / ji
 #endif
          IF( iszjtst < iszjref ) THEN