Symbol Description Uses
couplerFlag 13


File Line number Procedure Code
./pkg/compon_communic/mitcomponent_init.F 29 MITCOMPONENT_INIT 
      logical couplerFlag
./pkg/compon_communic/mitcomponent_init.F 34 MITCOMPONENT_INIT 
      couplerFlag=.FALSE.
./pkg/compon_communic/mitcomponent_init.F 35 MITCOMPONENT_INIT 
      call MITCPLR_INIT1( myTypeStr, couplerFlag )
./pkg/compon_communic/mitcoupler_init.F 29 MITCOUPLER_INIT 
      logical couplerFlag
./pkg/compon_communic/mitcoupler_init.F 34 MITCOUPLER_INIT 
      couplerFlag=.TRUE.
./pkg/compon_communic/mitcoupler_init.F 35 MITCOUPLER_INIT 
      call MITCPLR_INIT1( myTypeStr, couplerFlag )
./pkg/compon_communic/mitcplr_init1.F 10 MITCPLR_INIT1 
      logical couplerFlag
./pkg/compon_communic/mitcplr_init1.F 176 MITCPLR_INIT1 
      if ( couplerFlag ) then
./pkg/compon_communic/mitcplr_init1.F 193 MITCPLR_INIT1 
      if ( couplerFlag ) then
./pkg/compon_communic/mitcplr_init1.F 221 MITCPLR_INIT1 
      if ( couplerFlag ) j=myid
./pkg/compon_communic/mitcplr_init1.F 229 MITCPLR_INIT1 
      if (.not.couplerFlag)
./pkg/compon_communic/mitcplr_init1.F 56 MITCPLR_INIT1 
       if ( couplerFlag ) ibuf(2)=MITCPLR_COUPLER
./pkg/compon_communic/mitcplr_init1.F 5 MITCPLR_INIT1 
      subroutine MITCPLR_INIT1( myTypeStr, couplerFlag )