Symbol Description Uses
i0 Loop counters 17


File Line number Procedure Code
./pkg/compon_communic/mitcomponent_register.F 29 MITCOMPONENT_REGISTER 
      ibuf(4)=i0
./pkg/compon_communic/mitcomponent_register.F 2 MITCOMPONENT_REGISTER 
      subroutine MITCOMPONENT_REGISTER( nx, ny, i0, j0 )
./pkg/compon_communic/mitcomponent_register.F 35 MITCOMPONENT_REGISTER 
      my_tile_i0(1)=i0
./pkg/compon_communic/mitcomponent_register.F 6 MITCOMPONENT_REGISTER 
      integer nx,ny,i0,j0
./pkg/compon_communic/mitcoupler_register.F 25 MITCOUPLER_REGISTER 
      integer j,numtiles,nx,ny,i0,j0
./pkg/compon_communic/mitcoupler_register.F 61 MITCOUPLER_REGISTER 
       i0=ibuf(4)
./pkg/compon_communic/mitcoupler_register.F 76 MITCOUPLER_REGISTER 
       if (i0.lt.1) then
./pkg/compon_communic/mitcoupler_register.F 77 MITCOUPLER_REGISTER 
        write(LogUnit,*) 'MITCOUPLER_register: i0 = ',i0
./pkg/compon_communic/mitcoupler_register.F 84 MITCOUPLER_REGISTER 
       if (i0+nx-1.gt.nnx) then
./pkg/compon_communic/mitcoupler_register.F 85 MITCOUPLER_REGISTER 
        write(LogUnit,*) 'MITCOUPLER_register: i0 = ',i0
./pkg/compon_communic/mitcoupler_register.F 96 MITCOUPLER_REGISTER 
       component_tile_i0(1,n,compind)=i0