Symbol Description Uses
my_tile_j0 13


File Line number Procedure Code
./pkg/compon_communic/CPLR_SIG.h 81 NO PROCEDURE 
      integer my_tile_j0(MAX_TILES)
./pkg/compon_communic/CPLR_SIG.h 99 NO PROCEDURE 
     &  my_tile_j0,
./pkg/compon_communic/comprecv_r4.F 60 COMPRECV_R4 
      if (Jo.ne.my_tile_j0(1)) stop 'comprecv_r4: bad Jo'
./pkg/compon_communic/comprecv_r4tiles.F 66 COMPRECV_R4TILES 
       if (Jo.ne.my_tile_j0(bibj)) stop 'comprecv_r4tiles: bad Jo'
./pkg/compon_communic/comprecv_r8.F 60 COMPRECV_R8 
      if (Jo.ne.my_tile_j0(1)) stop 'comprecv_r8: bad Jo'
./pkg/compon_communic/comprecv_r8tiles.F 66 COMPRECV_R8TILES 
       if (Jo.ne.my_tile_j0(bibj)) stop 'comprecv_r8tiles: bad Jo'
./pkg/compon_communic/compsend_r4.F 27 COMPSEND_R4 
      Jo=my_tile_j0(1)
./pkg/compon_communic/compsend_r4tiles.F 39 COMPSEND_R4TILES 
       r4buf(3)=float( my_tile_j0(bibj) )
./pkg/compon_communic/compsend_r8.F 27 COMPSEND_R8 
      Jo=my_tile_j0(1)
./pkg/compon_communic/compsend_r8tiles.F 39 COMPSEND_R8TILES 
       r8buf(3)=float( my_tile_j0(bibj) )
./pkg/compon_communic/mitcomponent_register.F 41 MITCOMPONENT_REGISTER 
      my_tile_j0(1)=j0
./pkg/compon_communic/mitcomponent_tile_register.F 49 MITCOMPONENT_TILE_REGISTER 
        my_tile_j0(n) = iReg(6,n)
./pkg/compon_communic/mitcomponent_tile_register.F 84 MITCOMPONENT_TILE_REGISTER 
       ibuf(4) = my_tile_j0(n)