File |
Line number |
Procedure |
Code |
./pkg/compon_communic/CPLR_SIG.h |
52 |
NO PROCEDURE |
integer rank_coupler_procs(MAX_PROCS) |
./pkg/compon_communic/CPLR_SIG.h |
56 |
NO PROCEDURE |
& rank_coupler_procs, |
./pkg/compon_communic/mitcplr_init2a.F |
57 |
MITCPLR_INIT2A |
rank_coupler_procs(num_coupler_procs) = ibuf(1) |
./pkg/compon_communic/mitcplr_init2a.F |
82 |
MITCPLR_INIT2A |
my_coupler_rank=rank_coupler_procs(1) |
./pkg/compon_communic/mitcplr_init1.F |
105 |
MITCPLR_INIT1 |
& ( rank_coupler_procs(j),j=1,num_coupler_procs ) |
./pkg/compon_communic/mitcplr_init1.F |
74 |
MITCPLR_INIT1 |
rank_coupler_procs(num_coupler_procs) = ibuf(1) |
./pkg/compon_communic/mitcplr_init1.F |
98 |
MITCPLR_INIT1 |
rank_compcplr_procs(j,compind)=rank_coupler_procs(1) |
./pkg/compon_communic/mitcplr_init2b.F |
64 |
MITCPLR_INIT2B |
rank_coupler_procs(num_coupler_procs) = ibuf(1) |