Changeset 13291


Ignore:
Timestamp:
2020-07-10T14:58:55+02:00 (4 weeks ago)
Author:
smasson
Message:

trunk: bugfix in bestpartition, see #2366

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/OCE/LBC/mppini.F90

    r13286 r13291  
    835835         iszitst = ( nx_global+2-2*nn_hls + (ji-1) ) / ji + 2*nn_hls    ! first  dim. 
    836836#else 
    837          iszitst = ( Ni0glo + (ji-1) ) / ji + 2*nn_hls 
     837         iszitst = ( Ni0glo + (ji-1) ) / ji 
    838838#endif 
    839839         IF( iszitst < isziref ) THEN 
     
    846846         iszjtst = ( ny_global+2-2*nn_hls + (ji-1) ) / ji + 2*nn_hls    ! first  dim. 
    847847#else 
    848          iszjtst = ( Nj0glo + (ji-1) ) / ji + 2*nn_hls 
     848         iszjtst = ( Nj0glo + (ji-1) ) / ji 
    849849#endif 
    850850         IF( iszjtst < iszjref ) THEN 
Note: See TracChangeset for help on using the changeset viewer.