Symbol Description Uses
couplerFlag 13



File Line number Procedure Code
./pkg/compon_communic/mitcomponent_init.F 26 MITCOMPONENT_INIT
      logical couplerFlag
./pkg/compon_communic/mitcomponent_init.F 31 MITCOMPONENT_INIT
      couplerFlag=.FALSE.
./pkg/compon_communic/mitcomponent_init.F 32 MITCOMPONENT_INIT
      call MITCPLR_INIT1( myTypeStr, couplerFlag )
./pkg/compon_communic/mitcplr_init1.F 173 MITCPLR_INIT1
      if ( couplerFlag ) then
./pkg/compon_communic/mitcplr_init1.F 190 MITCPLR_INIT1
      if ( couplerFlag ) then
./pkg/compon_communic/mitcplr_init1.F 218 MITCPLR_INIT1
      if ( couplerFlag ) j=myid
./pkg/compon_communic/mitcplr_init1.F 226 MITCPLR_INIT1
      if (.not.couplerFlag) 
./pkg/compon_communic/mitcplr_init1.F 2 MITCPLR_INIT1
      subroutine MITCPLR_INIT1( myTypeStr, couplerFlag )
./pkg/compon_communic/mitcplr_init1.F 53 MITCPLR_INIT1
       if ( couplerFlag ) ibuf(2)=MITCPLR_COUPLER
./pkg/compon_communic/mitcplr_init1.F 7 MITCPLR_INIT1
      logical couplerFlag
./pkg/compon_communic/mitcoupler_init.F 26 MITCOUPLER_INIT
      logical couplerFlag
./pkg/compon_communic/mitcoupler_init.F 31 MITCOUPLER_INIT
      couplerFlag=.TRUE.
./pkg/compon_communic/mitcoupler_init.F 32 MITCOUPLER_INIT
      call MITCPLR_INIT1( myTypeStr, couplerFlag )