Changeset 14223 for NEMO/trunk/src/OCE/DOM/domain.F90
- Timestamp:
- 2020-12-19T11:22:45+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/OCE/DOM/domain.F90
r14171 r14223 283 283 mig0(:) = mig(:) - nn_hls 284 284 mjg0(:) = mjg(:) - nn_hls 285 ! WARNING: to keep compatibility with the trunk that was including periodocity into the input data,286 ! we must define mig0 and mjg0 as bellow.287 ! Once we decide to forget trunk compatibility, we must simply define mig0 and mjg0 as:288 mig0_oldcmp(:) = mig0(:) + COUNT( (/ jperio == 1 .OR. jperio == 4 .OR. jperio == 6 .OR. jperio == 7 /) )289 mjg0_oldcmp(:) = mjg0(:) + COUNT( (/ jperio == 2 .OR. jperio == 7 /) )290 !291 285 ! ! global domain, including halos, indices ==> local domain indices 292 286 ! ! (return (m.0,m.1)=(1,0) if data domain gridpoint is to the west/south of the
Note: See TracChangeset
for help on using the changeset viewer.