File |
Line number |
Procedure |
Code |
./pkg/flt/exch_recv_get_vec.F |
192 |
EXCH_RL_RECV_GET_VEC_X |
& mpiStatus, mpiRC ) |
./pkg/flt/exch_recv_get_vec.F |
372 |
EXCH_RL_RECV_GET_VEC_Y |
& mpiStatus, mpiRC ) |
./eesupp/src/all_proc_die.F |
45 |
ALL_PROC_DIE |
INTEGER mpiRC |
./eesupp/src/all_proc_die.F |
68 |
ALL_PROC_DIE |
CALL MPI_FINALIZE ( mpiRC ) |
./eesupp/src/all_proc_die.F |
69 |
ALL_PROC_DIE |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/all_proc_die.F |
71 |
ALL_PROC_DIE |
& 'S/R FIN_PROCS: MPI_FINALIZE return code', mpiRC |
./pkg/sphere/exch_all_2d_rl.F |
70 |
EXCH_ALLGATHER_2D_RL |
& , MPI_COMM_MODEL, mpiRC |
./eesupp/src/eeboot_minimal.F |
104 |
EEBOOT_MINIMAL |
CALL MPI_COMM_RANK( MPI_COMM_WORLD, mpiMyWId, mpiRC ) |
./eesupp/src/eeboot_minimal.F |
122 |
EEBOOT_MINIMAL |
CALL MPI_COMM_RANK( MPI_COMM_WORLD, mpiMyWId, mpiRC ) |
./eesupp/src/eeboot_minimal.F |
132 |
EEBOOT_MINIMAL |
CALL MPI_COMM_RANK( MPI_COMM_MODEL, mpiMyId, mpiRC ) |
./eesupp/src/eeboot_minimal.F |
133 |
EEBOOT_MINIMAL |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/eeboot_minimal.F |
137 |
EEBOOT_MINIMAL |
& mpiRC |
./eesupp/src/eeboot_minimal.F |
160 |
EEBOOT_MINIMAL |
CALL MPI_BARRIER( MPI_COMM_MODEL, mpiRC ) |
./eesupp/src/eeboot_minimal.F |
161 |
EEBOOT_MINIMAL |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/eeboot_minimal.F |
165 |
EEBOOT_MINIMAL |
& mpiRC |
./eesupp/src/eeboot_minimal.F |
171 |
EEBOOT_MINIMAL |
CALL MPI_COMM_SIZE ( MPI_COMM_MODEL, mpiNProcs, mpiRC ) |
./eesupp/src/eeboot_minimal.F |
172 |
EEBOOT_MINIMAL |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/eeboot_minimal.F |
176 |
EEBOOT_MINIMAL |
& mpiRC |
./eesupp/src/eeboot_minimal.F |
50 |
EEBOOT_MINIMAL |
INTEGER mpiRC |
./eesupp/src/eeboot_minimal.F |
79 |
EEBOOT_MINIMAL |
CALL MPI_INIT( mpiRC ) |
./eesupp/src/eeboot_minimal.F |
80 |
EEBOOT_MINIMAL |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/eeboot_minimal.F |
84 |
EEBOOT_MINIMAL |
& mpiRC |
./eesupp/src/eedie.F |
42 |
EEDIE |
INTEGER mpiRC |
./eesupp/src/eedie.F |
80 |
EEDIE |
IF ( useCoupler) CALL MPI_BARRIER( MPI_COMM_WORLD, mpiRC ) |
./eesupp/src/eedie.F |
85 |
EEDIE |
CALL MPI_FINALIZE ( mpiRC ) |
./eesupp/src/eedie.F |
86 |
EEDIE |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/eedie.F |
91 |
EEDIE |
& mpiRC |
./eesupp/src/global_max.F |
146 |
GLOBAL_MAX_R8 |
INTEGER mpiRC |
./eesupp/src/global_max.F |
168 |
GLOBAL_MAX_R8 |
& MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_max.F |
60 |
GLOBAL_MAX_R4 |
INTEGER mpiRC |
./eesupp/src/global_max.F |
82 |
GLOBAL_MAX_R4 |
& MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_sum.F |
146 |
GLOBAL_SUM_R8 |
INTEGER mpiRC |
./eesupp/src/global_sum.F |
173 |
GLOBAL_SUM_R8 |
& MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_sum.F |
241 |
GLOBAL_SUM_INT |
INTEGER mpiRC |
./eesupp/src/global_sum.F |
263 |
GLOBAL_SUM_INT |
& MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_sum.F |
59 |
GLOBAL_SUM_R4 |
INTEGER mpiRC |
./eesupp/src/global_sum.F |
81 |
GLOBAL_SUM_R4 |
& MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_sum_tile.F |
176 |
GLOBAL_SUM_TILE_RL |
& MPI_SUM,MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_sum_tile.F |
64 |
GLOBAL_SUM_TILE_RL |
INTEGER mpiRC |
./eesupp/src/global_vec_sum.F |
135 |
GLOBAL_VEC_SUM_R8 |
INTEGER mpiRC |
./eesupp/src/global_vec_sum.F |
167 |
GLOBAL_VEC_SUM_R8 |
& MPI_SUM,MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_vec_sum.F |
221 |
GLOBAL_VEC_SUM_INT |
INTEGER mpiRC |
./eesupp/src/global_vec_sum.F |
254 |
GLOBAL_VEC_SUM_INT |
& MPI_SUM,MPI_COMM_MODEL,mpiRC) |
./eesupp/src/global_vec_sum.F |
49 |
GLOBAL_VEC_SUM_R4 |
INTEGER mpiRC |
./eesupp/src/global_vec_sum.F |
81 |
GLOBAL_VEC_SUM_R4 |
& MPI_SUM,MPI_COMM_MODEL,mpiRC) |
./eesupp/src/gsum.F |
147 |
GSUM_R8 |
& MPI_COMM_MODEL,mpiRC) |
./eesupp/src/ini_procs.F |
155 |
INI_PROCS |
O mpiComm, mpiRC ) |
./eesupp/src/ini_procs.F |
156 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
160 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
166 |
INI_PROCS |
CALL MPI_CART_COORDS( mpiComm, mpiMyId, 2, mpiGridSpec, mpiRC ) |
./eesupp/src/ini_procs.F |
167 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
171 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
214 |
INI_PROCS |
CALL MPI_CART_RANK( mpiComm, mpiGridSpec, mpiPidW , mpiRC ) |
./eesupp/src/ini_procs.F |
215 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
219 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
238 |
INI_PROCS |
CALL MPI_CART_RANK( mpiComm, mpiGridSpec, mpiPidE , mpiRC ) |
./eesupp/src/ini_procs.F |
239 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
243 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
253 |
INI_PROCS |
CALL MPI_CART_RANK( mpiComm, mpiGridSpec, mpiPidS , mpiRC ) |
./eesupp/src/ini_procs.F |
254 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
258 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
268 |
INI_PROCS |
CALL MPI_CART_RANK( mpiComm, mpiGridSpec, mpiPidN , mpiRC ) |
./eesupp/src/ini_procs.F |
269 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
273 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
280 |
INI_PROCS |
CALL MPI_GET_PROCESSOR_NAME( mpiProcNam, mpilProcNam, mpiRC ) |
./eesupp/src/ini_procs.F |
281 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
285 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
344 |
INI_PROCS |
& mpiTypeXFaceBlock_xy_r4, mpiRC) |
./eesupp/src/ini_procs.F |
347 |
INI_PROCS |
& mpiTypeXFaceBlock_xy_r4, mpiRC) |
./eesupp/src/ini_procs.F |
349 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
353 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
356 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeXFaceBlock_xy_r4, mpiRC) |
./eesupp/src/ini_procs.F |
357 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
361 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
368 |
INI_PROCS |
& mpiTypeXFaceBlock_xy_r8, mpiRC) |
./eesupp/src/ini_procs.F |
371 |
INI_PROCS |
& mpiTypeXFaceBlock_xy_r8, mpiRC) |
./eesupp/src/ini_procs.F |
373 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
377 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
380 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeXFaceBlock_xy_r8, mpiRC) |
./eesupp/src/ini_procs.F |
381 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
385 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
397 |
INI_PROCS |
& mpiTypeXFaceBlock_xyz_r4, mpiRC) |
./eesupp/src/ini_procs.F |
398 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
402 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
405 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeXFaceBlock_xyz_r4, mpiRC) |
./eesupp/src/ini_procs.F |
406 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
410 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
419 |
INI_PROCS |
& mpiTypeXFaceBlock_xyz_r8, mpiRC) |
./eesupp/src/ini_procs.F |
420 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
424 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
427 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeXFaceBlock_xyz_r8, mpiRC) |
./eesupp/src/ini_procs.F |
428 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
432 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
442 |
INI_PROCS |
& mpiTypeYFaceBlock_xy_r4, mpiRC) |
./eesupp/src/ini_procs.F |
445 |
INI_PROCS |
& mpiTypeYFaceBlock_xy_r4, mpiRC) |
./eesupp/src/ini_procs.F |
447 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
451 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
454 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeYFaceBlock_xy_r4, mpiRC) |
./eesupp/src/ini_procs.F |
455 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
459 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
465 |
INI_PROCS |
& mpiTypeYFaceBlock_xy_r8, mpiRC) |
./eesupp/src/ini_procs.F |
468 |
INI_PROCS |
& mpiTypeYFaceBlock_xy_r8, mpiRC) |
./eesupp/src/ini_procs.F |
470 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
474 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
477 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeYFaceBlock_xy_r8, mpiRC) |
./eesupp/src/ini_procs.F |
478 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
482 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
493 |
INI_PROCS |
& mpiTypeYFaceBlock_xyz_r4, mpiRC) |
./eesupp/src/ini_procs.F |
494 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
498 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
501 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeYFaceBlock_xyz_r4, mpiRC) |
./eesupp/src/ini_procs.F |
502 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
506 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
514 |
INI_PROCS |
& mpiTypeYFaceBlock_xyz_r8, mpiRC) |
./eesupp/src/ini_procs.F |
515 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
519 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
522 |
INI_PROCS |
CALL MPI_TYPE_COMMIT( mpiTypeYFaceBlock_xyz_r8, mpiRC) |
./eesupp/src/ini_procs.F |
523 |
INI_PROCS |
IF ( mpiRC .NE. MPI_SUCCESS ) THEN |
./eesupp/src/ini_procs.F |
527 |
INI_PROCS |
& mpiRC |
./eesupp/src/ini_procs.F |
538 |
INI_PROCS |
CALL MPI_BARRIER(MPI_COMM_MODEL,mpiRC) |
./eesupp/src/ini_procs.F |
55 |
INI_PROCS |
INTEGER mpiRC |
./pkg/autodiff/global_max_ad.F |
168 |
GLOBAL_ADMAX_R8 |
INTEGER mpiRC |
./pkg/autodiff/global_max_ad.F |
190 |
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 |
96 |
GLOBAL_ADMAX_R4 |
& MPI_COMM_MODEL,mpiRC) |