Symbol Description Uses
jmatch 8


File Line number Procedure Code
./pkg/compon_communic/mitcplr_match_comp.F 18 NO PROCEDURE 
      jmatch=0
./pkg/compon_communic/mitcplr_match_comp.F 21 NO PROCEDURE 
        if ( jmatch .NE. 0 ) then
./pkg/compon_communic/mitcplr_match_comp.F 25 NO PROCEDURE 
         jmatch=j
./pkg/compon_communic/mitcplr_match_comp.F 31 NO PROCEDURE 
      if ( jmatch .EQ. 0) then
./pkg/compon_communic/mitcplr_match_comp.F 36 NO PROCEDURE 
       jmatch=num_components
./pkg/compon_communic/mitcplr_match_comp.F 37 NO PROCEDURE 
       call MITCPLR_INITCOMP( jmatch, carg )
./pkg/compon_communic/mitcplr_match_comp.F 41 NO PROCEDURE 
      mitcplr_match_comp=jmatch
./pkg/compon_communic/mitcplr_match_comp.F 9 NO PROCEDURE 
      integer j,jmatch