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 7762 for branches/2016/dev_v3_6_STABLE_r6506_AGRIF_LIM3/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90 – NEMO

Ignore:
Timestamp:
2017-03-06T19:01:42+01:00 (7 years ago)
Author:
clem
Message:

cosmetic changes

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2016/dev_v3_6_STABLE_r6506_AGRIF_LIM3/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90

    r7510 r7762  
    355355         jpim1 = jpi-1                                            ! inner domain indices 
    356356         jpjm1 = jpj-1                                            !   "           " 
    357          jpkm1 = jpk-1                                            !   "           " 
     357         jpkm1 = MAX( 1, jpk-1 )                                  !   "           " 
    358358         jpij  = jpi*jpj                                          !  jpi x j 
    359359 
Note: See TracChangeset for help on using the changeset viewer.