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 15033 for NEMO/trunk/src/TOP/oce_trc.F90 – NEMO

Ignore:
Timestamp:
2021-06-21T12:24:45+02:00 (3 years ago)
Author:
smasson
Message:

trunk: suppress jpim1 et jpjm1, #2699

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/TOP/oce_trc.F90

    r14433 r15033  
    1212   USE par_oce , ONLY :   jpj      =>   jpj        !: second dimension of grid --> j   
    1313   USE par_oce , ONLY :   jpk      =>   jpk        !: number of levels   
    14    USE par_oce , ONLY :   jpim1    =>   jpim1      !: jpi - 1 
    15    USE par_oce , ONLY :   jpjm1    =>   jpjm1      !: jpj - 1  
    1614   USE par_oce , ONLY :   jpkm1    =>   jpkm1      !: jpk - 1   
    1715   USE par_oce , ONLY :   jpij     =>   jpij       !: jpi x jpj 
Note: See TracChangeset for help on using the changeset viewer.