- Timestamp:
- 2021-06-14T10:07:36+02:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2021/ticket2680_C1D_PAPA/src/OCE/LBC/mppini.F90
r14920 r14984 78 78 njmpp = 1 79 79 nidom = FLIO_DOM_NONE 80 ! 81 mpiSnei(:,:) = -1 82 mpiRnei(:,:) = -1 83 l_SelfPerio(1:2) = l_Iperio ! west, east periodicity by itself 84 l_SelfPerio(3:4) = l_Jperio ! south, north periodicity by itself 85 l_SelfPerio(5:8) = l_Iperio .AND. l_Jperio ! corners bi-periodicity by itself 86 l_IdoNFold = l_NFold ! is this process doing North fold? 80 87 ! 81 88 CALL init_doloop ! set start/end indices or do-loop depending on the halo width value (nn_hls)
Note: See TracChangeset
for help on using the changeset viewer.