- Timestamp:
- 2017-11-20T17:29:54+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_r8126_ROBUST08_no_ghost/NEMOGCM/NEMO/NST_SRC/agrif_user.F90
r7761 r8758 28 28 jpiglo = nbcellsx + 2 + 2*nbghostcells 29 29 jpjglo = nbcellsy + 2 + 2*nbghostcells 30 jpi = ( jpiglo-2* jpreci + (jpni-1+0) ) / jpni + 2*jpreci31 jpj = ( jpjglo-2* jprecj + (jpnj-1+0) ) / jpnj + 2*jprecj30 jpi = ( jpiglo-2*nn_hls + (jpni-1+0) ) / jpni + 2*nn_hls 31 jpj = ( jpjglo-2*nn_hls + (jpnj-1+0) ) / jpnj + 2*nn_hls 32 32 ! JC: change to allow for different vertical levels 33 33 ! jpk is already set
Note: See TracChangeset
for help on using the changeset viewer.