Changeset 14275 for NEMO/trunk/src/OCE/DOM/dom_oce.F90

Timestamp:

2021-01-07T13:13:16+01:00 (3 years ago)

Author:

smasson

Message:

trunk: suppress nproc ( = mpprank = narea-1)

File:

• NEMO/trunk/src/OCE/DOM/dom_oce.F90 (modified) (1 diff)

NEMO/trunk/src/OCE/DOM/dom_oce.F90

@@ -86 +86 @@
    !                             !: domain MPP decomposition parameters
    INTEGER             , PUBLIC ::   nimpp, njmpp     !: i- & j-indexes for mpp-subdomain left bottom
-   INTEGER             , PUBLIC ::   nproc            !: number for local processor
-   INTEGER             , PUBLIC ::   narea            !: number for local area
+   INTEGER             , PUBLIC ::   narea            !: number for local area = MPI rank + 1
    INTEGER             , PUBLIC ::   nbondi, nbondj   !: mark of i- and j-direction local boundaries
    INTEGER, ALLOCATABLE, PUBLIC ::   nbondi_bdy(:)    !: mark i-direction local boundaries for BDY open boundaries