Changeset 10100


Ignore:
Timestamp:
2018-09-07T14:42:15+02:00 (22 months ago)
Author:
cbricaud
Message:

change to allow coarsenig running with different meridional sizes ( in particular with eORCA025-jpjglo=1207

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2018/dev_r5003_MERCATOR6_CRS/NEMOGCM/NEMO/OPA_SRC/CRS/crsdom.F90

    r8929 r10100  
    14171417 
    14181418            DO jj=1,jpjglo_crs 
    1419                ijjs=nn_facty*(jj)-5 
    1420                ijje=nn_facty*(jj)-3 
     1419               ijjs=nn_facty*(jj) - 5 + MOD(jpjglo, nn_facty) 
     1420               ijje=nn_facty*(jj) - 3 + MOD(jpjglo, nn_facty) 
    14211421               mjs2_crs(jj)=ijjs 
    14221422               mje2_crs(jj)=ijje 
Note: See TracChangeset for help on using the changeset viewer.