Changeset 7761 for trunk/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90
- Timestamp:
- 2017-03-06T18:58:35+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90
r7646 r7761 376 376 jpim1 = jpi-1 ! inner domain indices 377 377 jpjm1 = jpj-1 ! " " 378 jpkm1 = jpk-1! " "378 jpkm1 = MAX( 1, jpk-1 ) ! " " 379 379 jpij = jpi*jpj ! jpi x j 380 380
Note: See TracChangeset
for help on using the changeset viewer.