| File |
Line number |
Procedure |
Code |
|
./pkg/compon_communic/CPLR_SIG.h |
107 |
NO PROCEDURE |
integer rank_component_procs(MAX_PROCS,MAX_COMPONENTS) |
|
./pkg/compon_communic/CPLR_SIG.h |
120 |
NO PROCEDURE |
& rank_component_procs, |
|
./pkg/compon_communic/couprecv_r4.F |
49 |
COUPRECV_R4 |
rank=rank_component_procs(n,compind) |
|
./pkg/compon_communic/couprecv_r4tiles.F |
52 |
COUPRECV_R4TILES |
rank=rank_component_procs(n,compind) |
|
./pkg/compon_communic/couprecv_r8.F |
49 |
COUPRECV_R8 |
rank=rank_component_procs(n,compind) |
|
./pkg/compon_communic/couprecv_r8tiles.F |
52 |
COUPRECV_R8TILES |
rank=rank_component_procs(n,compind) |
|
./pkg/compon_communic/coupsend_r4.F |
66 |
COUPSEND_R4 |
dest=rank_component_procs(n,compind) |
|
./pkg/compon_communic/coupsend_r4tiles.F |
69 |
COUPSEND_R4TILES |
dest=rank_component_procs(n,compind) |
|
./pkg/compon_communic/coupsend_r8.F |
66 |
COUPSEND_R8 |
dest=rank_component_procs(n,compind) |
|
./pkg/compon_communic/coupsend_r8tiles.F |
69 |
COUPSEND_R8TILES |
dest=rank_component_procs(n,compind) |
|
./pkg/compon_communic/mitcoupler_register.F |
49 |
MITCOUPLER_REGISTER |
rank=rank_component_procs(n,compind) |
|
./pkg/compon_communic/mitcoupler_tile_register.F |
49 |
MITCOUPLER_TILE_REGISTER |
rank=rank_component_procs(n,compind) |
|
./pkg/compon_communic/mitcoupler_tile_register.F |
73 |
MITCOUPLER_TILE_REGISTER |
rank=rank_component_procs(n,compind) |
|
./pkg/compon_communic/mitcplr_init1.F |
112 |
MITCPLR_INIT1 |
& ( rank_component_procs(j,n),j=1,num_component_procs(n) ) |
|
./pkg/compon_communic/mitcplr_init1.F |
134 |
MITCPLR_INIT1 |
& rank_component_procs(1,n), |
|
./pkg/compon_communic/mitcplr_init1.F |
86 |
MITCPLR_INIT1 |
rank_component_procs(j,compind)=ibuf(1) |
|
./pkg/compon_communic/mitcplr_init1.F |
98 |
MITCPLR_INIT1 |
rank_compcplr_procs(j,compind)=rank_component_procs(j,compind) |
|
./pkg/compon_communic/mitcplr_init2b.F |
75 |
MITCPLR_INIT2B |
rank_component_procs(j,compind)=ibuf(1) |
|
./pkg/compon_communic/mitcplr_init2b.F |
94 |
MITCPLR_INIT2B |
& ' comp. ranks = ',(rank_component_procs(j,compind), |