| File |
Line number |
Procedure |
Code |
|
./pkg/sphere/exch_all_2d_rl.F |
74 |
EXCH_ALLGATHER_2D_RL |
do iproc = 1, numberOfProcs |
|
./eesupp/src/eeboot_minimal.F |
180 |
EEBOOT_MINIMAL |
numberOfProcs = mpiNProcs |
|
./eesupp/src/eeboot_minimal.F |
183 |
EEBOOT_MINIMAL |
IF ( numberOfProcs .GT. MAX_NO_PROCS ) THEN |
|
./eesupp/src/eeboot_minimal.F |
187 |
EEBOOT_MINIMAL |
& numberOfProcs, MAX_NO_PROCS |
|
./eesupp/src/eeboot_minimal.F |
199 |
EEBOOT_MINIMAL |
IF ( numberOfProcs .NE. nPx*nPy ) THEN |
|
./eesupp/src/eeboot_minimal.F |
204 |
EEBOOT_MINIMAL |
& numberOfProcs, nptmp |
|
./eesupp/src/eeboot_minimal.F |
62 |
EEBOOT_MINIMAL |
numberOfProcs = 1 |
|
./eesupp/src/gather_vector.F |
59 |
GATHER_VECTOR |
DO npe = 1, numberOfProcs-1 |
|
./eesupp/src/gather_xz.F |
63 |
GATHER_XZ |
DO npe = 1, numberOfProcs-1 |
|
./eesupp/src/gather_yz.F |
63 |
GATHER_YZ |
DO npe = 1, numberOfProcs-1 |
|
./eesupp/src/global_sum_singlecpu.F |
123 |
GLOBAL_SUM_SINGLECPU_RL |
DO npe = 1, numberOfProcs-1 |
|
./eesupp/src/global_sum_tile.F |
121 |
GLOBAL_SUM_TILE_RL |
DO npe = 1, numberOfProcs-1 |
|
./eesupp/src/global_sum_tile.F |
150 |
GLOBAL_SUM_TILE_RL |
DO npe = 1, numberOfProcs-1 |
|
./eesupp/src/ini_procs.F |
187 |
INI_PROCS |
DO npe = 0, numberOfProcs-1 |
|
./eesupp/src/print.F |
135 |
PRINT_MESSAGE |
IF ( numberOfProcs .EQ. 1 .AND. nThreads .EQ. 1 |
|
./eesupp/src/print.F |
209 |
PRINT_ERROR |
IF ( numberOfProcs .EQ. 0 .AND. nThreads .EQ. 1 ) THEN |
|
./eesupp/src/print.F |
248 |
PRINT_ERROR |
IF ( numberOfProcs.EQ.1 .AND. iEnd.NE.0 ) THEN |
|
./eesupp/src/print.F |
93 |
PRINT_MESSAGE |
IF ( numberOfProcs .EQ. 0 .AND. nThreads .EQ. 1 ) THEN |
|
./eesupp/src/scatter_vector.F |
58 |
SCATTER_VECTOR |
DO npe = 1, numberOfProcs-1 |
|
./eesupp/src/scatter_xz.F |
63 |
SCATTER_XZ |
DO npe = 1, numberOfProcs-1 |
|
./eesupp/src/scatter_yz.F |
63 |
SCATTER_YZ |
DO npe = 1, numberOfProcs-1 |
|
./eesupp/inc/EEPARAMS.h |
223 |
NO PROCEDURE |
& numberOfProcs, pidIO, myProcId, |
|
./eesupp/inc/EEPARAMS.h |
247 |
NO PROCEDURE |
INTEGER numberOfProcs |
|
./pkg/ecco/cost_geoid.F |
90 |
COST_GEOID |
jsize = ncshc / numberOfProcs |
|
./pkg/ecco/cost_geoid.F |
91 |
COST_GEOID |
if (jsize*numberOfProcs .lt. ncshc ) then |