New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 5180 for trunk/NEMOGCM/NEMO/LIM_SRC_3/limthd_dif.F90 – NEMO

Ignore:
Timestamp:
2015-03-27T11:16:58+01:00 (9 years ago)
Author:
vancop
Message:

Remove out-of-bound exceptions

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/NEMOGCM/NEMO/LIM_SRC_3/limthd_dif.F90

    r5167 r5180  
    679679         END DO 
    680680 
    681          DO numeq = nlay_i + nlay_s + 1, nlay_s + 2, -1 
     681         DO numeq = nlay_i + nlay_s, nlay_s + 2, -1 
    682682            DO ji = kideb , kiut 
    683683               jk    =  numeq - nlay_s - 1 
Note: See TracChangeset for help on using the changeset viewer.