Symbol Description Uses
ibuf 84



File Line number Procedure Code
./pkg/compon_communic/CPLR_SIG.h 41 NO PROCEDURE
      integer ibuf(MAX_IBUF)
./pkg/compon_communic/mitcomponent_register.F 26 MITCOMPONENT_REGISTER
      ibuf(1)=1
./pkg/compon_communic/mitcomponent_register.F 27 MITCOMPONENT_REGISTER
      ibuf(2)=nx
./pkg/compon_communic/mitcomponent_register.F 28 MITCOMPONENT_REGISTER
      ibuf(3)=ny
./pkg/compon_communic/mitcomponent_register.F 29 MITCOMPONENT_REGISTER
      ibuf(4)=i0
./pkg/compon_communic/mitcomponent_register.F 30 MITCOMPONENT_REGISTER
      ibuf(5)=j0
./pkg/compon_communic/mitcomponent_register.F 45 MITCOMPONENT_REGISTER
      call MPI_SEND( ibuf, count, datatype, dest, tag, comm, ierr )
./pkg/compon_communic/mitcplr_init2a.F 33 MITCPLR_INIT2A
       ibuf( 1)=myid
./pkg/compon_communic/mitcplr_init2a.F 34 MITCPLR_INIT2A
       ibuf( 2)=0
./pkg/compon_communic/mitcplr_init2a.F 35 MITCPLR_INIT2A
       ibuf( 3)=0
./pkg/compon_communic/mitcplr_init2a.F 36 MITCPLR_INIT2A
       ibuf( 4)=0
./pkg/compon_communic/mitcplr_init2a.F 37 MITCPLR_INIT2A
       ibuf( 5)=0
./pkg/compon_communic/mitcplr_init2a.F 38 MITCPLR_INIT2A
       ibuf( 6)=0
./pkg/compon_communic/mitcplr_init2a.F 39 MITCPLR_INIT2A
       ibuf( 7)=0
./pkg/compon_communic/mitcplr_init2a.F 40 MITCPLR_INIT2A
       ibuf( 8)=0
./pkg/compon_communic/mitcplr_init2a.F 41 MITCPLR_INIT2A
       ibuf( 9)=0
./pkg/compon_communic/mitcplr_init2a.F 42 MITCPLR_INIT2A
       ibuf(10)=0
./pkg/compon_communic/mitcplr_init2a.F 43 MITCPLR_INIT2A
       ibuf(11)=0
./pkg/compon_communic/mitcplr_init2a.F 44 MITCPLR_INIT2A
       ibuf(12)=0
./pkg/compon_communic/mitcplr_init2a.F 47 MITCPLR_INIT2A
     &               ibuf, lenbuf, MPI_INTEGER,
./pkg/compon_communic/mitcplr_init2a.F 51 MITCPLR_INIT2A
     &    ' MPI_Bcast from ',ibuf(1),ibuf(2),' ierr=',ierr
./pkg/compon_communic/mitcplr_init2a.F 53 MITCPLR_INIT2A
       if ( ibuf(2).eq.MITCPLR_COUPLER ) then
./pkg/compon_communic/mitcplr_init2a.F 57 MITCPLR_INIT2A
        rank_coupler_procs(num_coupler_procs) = ibuf(1)
./pkg/compon_communic/mitcoupler_tile_register.F 48 MITCOUPLER_TILE_REGISTER
       call MPI_RECV(ibuf, count, dtype, rank, tag, comm, stat, ierr)
./pkg/compon_communic/mitcoupler_tile_register.F 57 MITCOUPLER_TILE_REGISTER
       numtiles=ibuf(1)
./pkg/compon_communic/mitcoupler_tile_register.F 72 MITCOUPLER_TILE_REGISTER
        call MPI_RECV(ibuf, count, dtype, rank, tag, comm, stat, ierr)
./pkg/compon_communic/mitcoupler_tile_register.F 81 MITCOUPLER_TILE_REGISTER
        component_tile_nx(j,n,compind)=ibuf(1)
./pkg/compon_communic/mitcoupler_tile_register.F 82 MITCOUPLER_TILE_REGISTER
        component_tile_ny(j,n,compind)=ibuf(2)
./pkg/compon_communic/mitcoupler_tile_register.F 83 MITCOUPLER_TILE_REGISTER
        component_tile_i0(j,n,compind)=ibuf(3)
./pkg/compon_communic/mitcoupler_tile_register.F 84 MITCOUPLER_TILE_REGISTER
        component_tile_j0(j,n,compind)=ibuf(4)
./pkg/compon_communic/mitcoupler_tile_register.F 89 MITCOUPLER_TILE_REGISTER
     &   ' proc,tile,nx,ny,i0,j0 = ',n,j,ibuf(1),ibuf(2),ibuf(3),ibuf(4)
./pkg/compon_communic/mitcplr_init1.F 51 MITCPLR_INIT1
       ibuf(1)=myid
./pkg/compon_communic/mitcplr_init1.F 52 MITCPLR_INIT1
       ibuf(2)=0
./pkg/compon_communic/mitcplr_init1.F 53 MITCPLR_INIT1
       if ( couplerFlag ) ibuf(2)=MITCPLR_COUPLER
./pkg/compon_communic/mitcplr_init1.F 54 MITCPLR_INIT1
       ibuf(3)=0
./pkg/compon_communic/mitcplr_init1.F 55 MITCPLR_INIT1
       ibuf(4)=0
./pkg/compon_communic/mitcplr_init1.F 56 MITCPLR_INIT1
       ibuf(5)=0
./pkg/compon_communic/mitcplr_init1.F 57 MITCPLR_INIT1
       ibuf(6)=0
./pkg/compon_communic/mitcplr_init1.F 58 MITCPLR_INIT1
       ibuf(7)=0
./pkg/compon_communic/mitcplr_init1.F 59 MITCPLR_INIT1
       call MITCPLR_CHAR2INT( myTypeStr, ibuf(8) )
./pkg/compon_communic/mitcplr_init1.F 62 MITCPLR_INIT1
     &               ibuf, lenbuf, MPI_INTEGER,
./pkg/compon_communic/mitcplr_init1.F 66 MITCPLR_INIT1
     &    ' MPI_Bcast from ',ibuf(1),ibuf(2),' ierr=',ierr
./pkg/compon_communic/mitcplr_init1.F 67 MITCPLR_INIT1
       call MITCPLR_INT2CHAR( ibuf(8), cbuf )
./pkg/compon_communic/mitcplr_init1.F 71 MITCPLR_INIT1
       if ( ibuf(2).eq.MITCPLR_COUPLER ) then
./pkg/compon_communic/mitcplr_init1.F 74 MITCPLR_INIT1
        rank_coupler_procs(num_coupler_procs) = ibuf(1)
./pkg/compon_communic/mitcplr_init1.F 83 MITCPLR_INIT1
        rank_component_procs(j,compind)=ibuf(1)
./pkg/compon_communic/mitcplr_init2b.F 41 MITCPLR_INIT2B
        ibuf( 1)=myid
./pkg/compon_communic/mitcplr_init2b.F 42 MITCPLR_INIT2B
        ibuf( 2)=MITCPLR_COUPLER
./pkg/compon_communic/mitcplr_init2b.F 43 MITCPLR_INIT2B
        ibuf( 3)=0
./pkg/compon_communic/mitcplr_init2b.F 44 MITCPLR_INIT2B
        ibuf( 4)=0
./pkg/compon_communic/mitcplr_init2b.F 45 MITCPLR_INIT2B
        ibuf( 5)=0
./pkg/compon_communic/mitcplr_init2b.F 46 MITCPLR_INIT2B
        ibuf( 6)=0
./pkg/compon_communic/mitcplr_init2b.F 47 MITCPLR_INIT2B
        ibuf( 7)=0
./pkg/compon_communic/mitcplr_init2b.F 48 MITCPLR_INIT2B
        ibuf( 8)=0
./pkg/compon_communic/mitcplr_init2b.F 49 MITCPLR_INIT2B
        ibuf( 9)=0
./pkg/compon_communic/mitcplr_init2b.F 50 MITCPLR_INIT2B
        ibuf(10)=0
./pkg/compon_communic/mitcplr_init2b.F 51 MITCPLR_INIT2B
        ibuf(11)=0
./pkg/compon_communic/mitcplr_init2b.F 52 MITCPLR_INIT2B
        ibuf(12)=0
./pkg/compon_communic/mitcplr_init2b.F 55 MITCPLR_INIT2B
     &               ibuf, lenbuf, MPI_INTEGER,
./pkg/compon_communic/mitcplr_init2b.F 59 MITCPLR_INIT2B
     &    ' MPI_Bcast from ',ibuf(1),ibuf(2),' ierr=',ierr
./pkg/compon_communic/mitcplr_init2b.F 61 MITCPLR_INIT2B
        if ( ibuf(2).eq.MITCPLR_COUPLER ) then
./pkg/compon_communic/mitcplr_init2b.F 64 MITCPLR_INIT2B
         rank_coupler_procs(num_coupler_procs) = ibuf(1)
./pkg/compon_communic/mitcplr_init2b.F 67 MITCPLR_INIT2B
         rank_compcplr_procs(j,compind)=ibuf(1)
./pkg/compon_communic/mitcplr_init2b.F 72 MITCPLR_INIT2B
         rank_component_procs(j,compind)=ibuf(1)
./pkg/compon_communic/mitcplr_init2b.F 75 MITCPLR_INIT2B
         rank_compcplr_procs(j,compind)=ibuf(1)
./pkg/compon_communic/mitcoupler_register.F 48 MITCOUPLER_REGISTER
       call MPI_RECV(ibuf, count, dtype, rank, tag, comm, stat, ierr)
./pkg/compon_communic/mitcoupler_register.F 58 MITCOUPLER_REGISTER
       numtiles=ibuf(1)
./pkg/compon_communic/mitcoupler_register.F 59 MITCOUPLER_REGISTER
       nx=ibuf(2)
./pkg/compon_communic/mitcoupler_register.F 60 MITCOUPLER_REGISTER
       ny=ibuf(3)
./pkg/compon_communic/mitcoupler_register.F 61 MITCOUPLER_REGISTER
       i0=ibuf(4)
./pkg/compon_communic/mitcoupler_register.F 62 MITCOUPLER_REGISTER
       j0=ibuf(5)
./pkg/compon_communic/mitcomponent_tile_register.F 57 MITCOMPONENT_TILE_REGISTER
      ibuf(1)=num_tiles
./pkg/compon_communic/mitcomponent_tile_register.F 66 MITCOMPONENT_TILE_REGISTER
      call MPI_SEND( ibuf, count, datatype, dest, tag, comm, ierr )
./pkg/compon_communic/mitcomponent_tile_register.F 80 MITCOMPONENT_TILE_REGISTER
       ibuf(1)=my_tile_nx(bibj)
./pkg/compon_communic/mitcomponent_tile_register.F 81 MITCOMPONENT_TILE_REGISTER
       ibuf(2)=my_tile_ny(bibj)
./pkg/compon_communic/mitcomponent_tile_register.F 82 MITCOMPONENT_TILE_REGISTER
       ibuf(3)=my_tile_i0(bibj)
./pkg/compon_communic/mitcomponent_tile_register.F 83 MITCOMPONENT_TILE_REGISTER
       ibuf(4)=my_tile_j0(bibj)
./pkg/compon_communic/mitcomponent_tile_register.F 92 MITCOMPONENT_TILE_REGISTER
       call MPI_SEND( ibuf, count, datatype, dest, tag, comm, ierr )