File |
Line number |
Procedure |
Code |
./pkg/flt/exch_recv_get_vec.F |
159 |
EXCH_RECV_GET_VEC_X_RL |
& mpiStatus, mpiRC ) |
./pkg/flt/exch_recv_get_vec.F |
347 |
EXCH_RECV_GET_VEC_Y_RL |
& mpiStatus, mpiRC ) |
./eesupp/src/all_proc_die.F |
48 |
ALL_PROC_DIE |
INTEGER mpiRC |
./eesupp/src/all_proc_die.F |
81 |
ALL_PROC_DIE |
CALL MPI_FINALIZE ( mpiRC ) |
./eesupp/src/all_proc_die.F |
82 |
ALL_PROC_DIE |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/all_proc_die.F |
84 |
ALL_PROC_DIE |
& 'S/R FIN_PROCS: MPI_FINALIZE return code', mpiRC |
./pkg/sphere/exch_all_2d_rl.F |
68 |
EXCH_ALLGATHER_2D_RL |
& , MPI_COMM_MODEL, mpiRC |
./pkg/streamice/streamice_cg_solve_petsc.F |
114 |
STREAMICE_CG_SOLVE_PETSC |
CALL MPI_COMM_RANK( MPI_COMM_WORLD, mpiMyWId, mpiRC ) |
./pkg/streamice/streamice_cg_solve_petsc.F |
99 |
STREAMICE_CG_SOLVE_PETSC |
integer mpiRC, mpiMyWid |
./pkg/streamice/streamice_petsc_numerate.F |
101 |
STREAMICE_PETSC_NUMERATE |
CALL MPI_COMM_RANK( MPI_COMM_WORLD, mpiMyWId, mpiRC ) |
./pkg/streamice/streamice_petsc_numerate.F |
106 |
STREAMICE_PETSC_NUMERATE |
& MPI_INTEGER, MPI_SUM,MPI_COMM_MODEL,mpiRC) |
./pkg/streamice/streamice_petsc_numerate.F |
38 |
STREAMICE_PETSC_NUMERATE |
integer mpiRC, mpiMyWid |
./pkg/streamice/streamice_velmask_upd.F |
47 |
STREAMICE_VELMASK_UPD |
integer mpiRC, mpiMyWid |
./eesupp/src/check_threads.F |
111 |
CHECK_THREADS |
& MPI_SUM,MPI_COMM_MODEL,mpiRC ) |
./eesupp/src/check_threads.F |
64 |
CHECK_THREADS |
INTEGER myErr, mpiRC |
./eesupp/src/check_threads.F |
95 |
CHECK_THREADS |
& MPI_SUM,MPI_COMM_MODEL,mpiRC ) |
./eesupp/src/eeboot_minimal.F |
106 |
EEBOOT_MINIMAL |
CALL MPI_INITIALIZED( mpiIsInitialized, mpiRC ) |
./eesupp/src/eeboot_minimal.F |
112 |
EEBOOT_MINIMAL |
CALL MPI_INIT( mpiRC ) |
./eesupp/src/eeboot_minimal.F |
113 |
EEBOOT_MINIMAL |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/eeboot_minimal.F |
116 |
EEBOOT_MINIMAL |
& 'EEBOOT_MINIMAL: MPI_INIT return code', mpiRC |
./eesupp/src/eeboot_minimal.F |
144 |
EEBOOT_MINIMAL |
CALL MPI_COMM_RANK( MPI_COMM_WORLD, mpiMyWId, mpiRC ) |
./eesupp/src/eeboot_minimal.F |
151 |
EEBOOT_MINIMAL |
CALL MPI_COMM_RANK( MPI_COMM_WORLD, mpiMyWId, mpiRC ) |
./eesupp/src/eeboot_minimal.F |
168 |
EEBOOT_MINIMAL |
CALL MPI_COMM_RANK( MPI_COMM_WORLD, mpiMyWId, mpiRC ) |
./eesupp/src/eeboot_minimal.F |
178 |
EEBOOT_MINIMAL |
CALL MPI_COMM_RANK( MPI_COMM_MODEL, mpiMyId, mpiRC ) |
./eesupp/src/eeboot_minimal.F |
179 |
EEBOOT_MINIMAL |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/eeboot_minimal.F |
182 |
EEBOOT_MINIMAL |
& 'EEBOOT_MINIMAL: MPI_COMM_RANK return code', mpiRC |
./eesupp/src/eeboot_minimal.F |
234 |
EEBOOT_MINIMAL |
CALL MPI_BARRIER( MPI_COMM_MODEL, mpiRC ) |
./eesupp/src/eeboot_minimal.F |
235 |
EEBOOT_MINIMAL |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/eeboot_minimal.F |
238 |
EEBOOT_MINIMAL |
& 'EEBOOT_MINIMAL: MPI_BARRIER return code', mpiRC |
./eesupp/src/eeboot_minimal.F |
244 |
EEBOOT_MINIMAL |
CALL MPI_COMM_SIZE ( MPI_COMM_MODEL, mpiNProcs, mpiRC ) |
./eesupp/src/eeboot_minimal.F |
245 |
EEBOOT_MINIMAL |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/eeboot_minimal.F |
248 |
EEBOOT_MINIMAL |
& 'EEBOOT_MINIMAL: MPI_COMM_SIZE return code', mpiRC |
./eesupp/src/eeboot_minimal.F |
59 |
EEBOOT_MINIMAL |
INTEGER mpiRC |
./eesupp/src/eedie.F |
102 |
EEDIE |
& mpiRC |
./eesupp/src/eedie.F |
37 |
EEDIE |
INTEGER mpiRC |
./eesupp/src/eedie.F |
91 |
EEDIE |
IF ( useCoupler) CALL MPI_BARRIER( MPI_COMM_WORLD, mpiRC ) |
./eesupp/src/eedie.F |
96 |
EEDIE |
CALL MPI_FINALIZE ( mpiRC ) |
./eesupp/src/eedie.F |
97 |
EEDIE |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/eeset_parms.F |
233 |
EESET_PARMS |
CALL MPI_BARRIER( MPI_COMM_MODEL, mpiRC ) |
./eesupp/src/eeset_parms.F |
63 |
EESET_PARMS |
INTEGER mpiRC |
./eesupp/src/global_max.F |
143 |
GLOBAL_MAX_R8 |
INTEGER mpiRC |
./eesupp/src/global_max.F |
163 |
GLOBAL_MAX_R8 |
& MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_max.F |
60 |
GLOBAL_MAX_R4 |
INTEGER mpiRC |
./eesupp/src/global_max.F |
80 |
GLOBAL_MAX_R4 |
& MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_sum.F |
142 |
GLOBAL_SUM_R8 |
INTEGER mpiRC |
./eesupp/src/global_sum.F |
167 |
GLOBAL_SUM_R8 |
& MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_sum.F |
233 |
GLOBAL_SUM_INT |
INTEGER mpiRC |
./eesupp/src/global_sum.F |
253 |
GLOBAL_SUM_INT |
& MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_sum.F |
59 |
GLOBAL_SUM_R4 |
INTEGER mpiRC |
./eesupp/src/global_sum.F |
79 |
GLOBAL_SUM_R4 |
& MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_sum_tile.F |
186 |
GLOBAL_SUM_TILE_RL |
& MPI_DOUBLE_PRECISION, MPI_SUM, MPI_COMM_MODEL, mpiRC ) |
./eesupp/src/global_sum_tile.F |
215 |
GLOBAL_SUM_TILE_RL |
& MPI_SUM,MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_sum_tile.F |
68 |
GLOBAL_SUM_TILE_RL |
INTEGER mpiRC |
./eesupp/src/global_vec_sum.F |
130 |
GLOBAL_VEC_SUM_R8 |
INTEGER mpiRC |
./eesupp/src/global_vec_sum.F |
153 |
GLOBAL_VEC_SUM_R8 |
& MPI_SUM,MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_vec_sum.F |
212 |
GLOBAL_VEC_SUM_INT |
INTEGER mpiRC |
./eesupp/src/global_vec_sum.F |
235 |
GLOBAL_VEC_SUM_INT |
& MPI_SUM,MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_vec_sum.F |
48 |
GLOBAL_VEC_SUM_R4 |
INTEGER mpiRC |
./eesupp/src/global_vec_sum.F |
71 |
GLOBAL_VEC_SUM_R4 |
& MPI_SUM,MPI_COMM_MODEL,mpiRC) |
./eesupp/src/gsum.F |
145 |
GSUM_R8 |
& MPI_COMM_MODEL,mpiRC) |
./eesupp/src/ini_procs.F |
148 |
INI_PROCS |
O mpiComm, mpiRC ) |
./eesupp/src/ini_procs.F |
149 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
153 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
159 |
INI_PROCS |
CALL MPI_CART_COORDS( mpiComm, mpiMyId, 2, mpiGridSpec, mpiRC ) |
./eesupp/src/ini_procs.F |
160 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
164 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
207 |
INI_PROCS |
CALL MPI_CART_RANK( mpiComm, mpiGridSpec, mpiPidW , mpiRC ) |
./eesupp/src/ini_procs.F |
208 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
212 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
231 |
INI_PROCS |
CALL MPI_CART_RANK( mpiComm, mpiGridSpec, mpiPidE , mpiRC ) |
./eesupp/src/ini_procs.F |
232 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
236 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
246 |
INI_PROCS |
CALL MPI_CART_RANK( mpiComm, mpiGridSpec, mpiPidS , mpiRC ) |
./eesupp/src/ini_procs.F |
247 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
251 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
261 |
INI_PROCS |
CALL MPI_CART_RANK( mpiComm, mpiGridSpec, mpiPidN , mpiRC ) |
./eesupp/src/ini_procs.F |
262 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
266 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
273 |
INI_PROCS |
CALL MPI_GET_PROCESSOR_NAME( mpiProcNam, mpilProcNam, mpiRC ) |
./eesupp/src/ini_procs.F |
274 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
278 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
337 |
INI_PROCS |
& mpiTypeXFaceBlock_xy_r4, mpiRC) |
./eesupp/src/ini_procs.F |
340 |
INI_PROCS |
& mpiTypeXFaceBlock_xy_r4, mpiRC) |
./eesupp/src/ini_procs.F |
342 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
346 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
349 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeXFaceBlock_xy_r4, mpiRC) |
./eesupp/src/ini_procs.F |
350 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
354 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
361 |
INI_PROCS |
& mpiTypeXFaceBlock_xy_r8, mpiRC) |
./eesupp/src/ini_procs.F |
364 |
INI_PROCS |
& mpiTypeXFaceBlock_xy_r8, mpiRC) |
./eesupp/src/ini_procs.F |
366 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
370 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
373 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeXFaceBlock_xy_r8, mpiRC) |
./eesupp/src/ini_procs.F |
374 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
378 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
390 |
INI_PROCS |
& mpiTypeXFaceBlock_xyz_r4, mpiRC) |
./eesupp/src/ini_procs.F |
391 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
395 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
398 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeXFaceBlock_xyz_r4, mpiRC) |
./eesupp/src/ini_procs.F |
399 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
403 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
412 |
INI_PROCS |
& mpiTypeXFaceBlock_xyz_r8, mpiRC) |
./eesupp/src/ini_procs.F |
413 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
417 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
420 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeXFaceBlock_xyz_r8, mpiRC) |
./eesupp/src/ini_procs.F |
421 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
425 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
435 |
INI_PROCS |
& mpiTypeYFaceBlock_xy_r4, mpiRC) |
./eesupp/src/ini_procs.F |
438 |
INI_PROCS |
& mpiTypeYFaceBlock_xy_r4, mpiRC) |
./eesupp/src/ini_procs.F |
440 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
444 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
447 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeYFaceBlock_xy_r4, mpiRC) |
./eesupp/src/ini_procs.F |
448 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
452 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
458 |
INI_PROCS |
& mpiTypeYFaceBlock_xy_r8, mpiRC) |
./eesupp/src/ini_procs.F |
461 |
INI_PROCS |
& mpiTypeYFaceBlock_xy_r8, mpiRC) |
./eesupp/src/ini_procs.F |
463 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
467 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
470 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeYFaceBlock_xy_r8, mpiRC) |
./eesupp/src/ini_procs.F |
471 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
475 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
486 |
INI_PROCS |
& mpiTypeYFaceBlock_xyz_r4, mpiRC) |
./eesupp/src/ini_procs.F |
487 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
491 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
494 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeYFaceBlock_xyz_r4, mpiRC) |
./eesupp/src/ini_procs.F |
495 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
499 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
507 |
INI_PROCS |
& mpiTypeYFaceBlock_xyz_r8, mpiRC) |
./eesupp/src/ini_procs.F |
508 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
512 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
515 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeYFaceBlock_xyz_r8, mpiRC) |
./eesupp/src/ini_procs.F |
516 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
51 |
INI_PROCS |
INTEGER mpiRC |
./eesupp/src/ini_procs.F |
520 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
530 |
INI_PROCS |
CALL MPI_BARRIER(MPI_COMM_MODEL,mpiRC) |
./pkg/autodiff/global_max_ad.F |
165 |
GLOBAL_ADMAX_R8 |
INTEGER mpiRC |
./pkg/autodiff/global_max_ad.F |
185 |
GLOBAL_ADMAX_R8 |
& MPI_COMM_MODEL,mpiRC) |
./pkg/autodiff/global_max_ad.F |
74 |
GLOBAL_ADMAX_R4 |
INTEGER mpiRC |
./pkg/autodiff/global_max_ad.F |
94 |
GLOBAL_ADMAX_R4 |
& MPI_COMM_MODEL,mpiRC) |
./eesupp/src/open_copy_data_file.F |
166 |
OPEN_COPY_DATA_FILE |
CALL MPI_BARRIER( MPI_COMM_MODEL, mpiRC ) |
./eesupp/src/open_copy_data_file.F |
58 |
OPEN_COPY_DATA_FILE |
INTEGER mpiRC |
./pkg/compon_communic/mitcplr_all_check.F |
35 |
MITCPLR_ALL_CHECK |
INTEGER errCount, errLoc, mpiRC |
./pkg/compon_communic/mitcplr_all_check.F |
46 |
MITCPLR_ALL_CHECK |
& MPI_COMM_WORLD, mpiRC ) |
./pkg/compon_communic/mitcplr_all_check.F |
57 |
MITCPLR_ALL_CHECK |
CALL MPI_FINALIZE( mpiRC ) |