Symbol Description Uses
num_coupler_procs 18


File Line number Procedure Code
./pkg/compon_communic/CPLR_SIG.h 53 NO PROCEDURE 
      integer num_coupler_procs
./pkg/compon_communic/CPLR_SIG.h 57 NO PROCEDURE 
     &  num_coupler_procs,
./pkg/compon_communic/mitcplr_init1.F 108 MITCPLR_INIT1 
     &   ( rank_coupler_procs(j),j=1,num_coupler_procs )
./pkg/compon_communic/mitcplr_init1.F 51 MITCPLR_INIT1 
      num_coupler_procs = 0
./pkg/compon_communic/mitcplr_init1.F 77 MITCPLR_INIT1 
        num_coupler_procs=num_coupler_procs + 1
./pkg/compon_communic/mitcplr_init1.F 78 MITCPLR_INIT1 
        rank_coupler_procs(num_coupler_procs) = ibuf(1)
./pkg/compon_communic/mitcplr_init1.F 92 MITCPLR_INIT1 
      if ( num_coupler_procs .ne. 1 ) then
./pkg/compon_communic/mitcplr_init2a.F 35 MITCPLR_INIT2A 
      num_coupler_procs=0
./pkg/compon_communic/mitcplr_init2a.F 61 MITCPLR_INIT2A 
        num_coupler_procs=num_coupler_procs + 1
./pkg/compon_communic/mitcplr_init2a.F 63 MITCPLR_INIT2A 
        rank_coupler_procs(num_coupler_procs) = ibuf(1)
./pkg/compon_communic/mitcplr_init2a.F 72 MITCPLR_INIT2A 
      if (num_coupler_procs .ne. 1) then
./pkg/compon_communic/mitcplr_init2b.F 41 MITCPLR_INIT2B 
       num_coupler_procs=0
./pkg/compon_communic/mitcplr_init2b.F 69 MITCPLR_INIT2B 
         num_coupler_procs=num_coupler_procs + 1
./pkg/compon_communic/mitcplr_init2b.F 70 MITCPLR_INIT2B 
         rank_coupler_procs(num_coupler_procs) = ibuf(1)
./pkg/compon_communic/mitcplr_init2b.F 86 MITCPLR_INIT2B 
       if (num_coupler_procs .ne. 1) then