Symbol Description Uses
dest 48


File Line number Procedure Code
./pkg/compon_communic/compsend_i4vec.F 19 COMPSEND_I4VEC 
      integer count,datatype,dest,tag,comm,ierr
./pkg/compon_communic/compsend_i4vec.F 36 COMPSEND_I4VEC 
      dest = my_coupler_rank
./pkg/compon_communic/compsend_i4vec.F 42 COMPSEND_I4VEC 
     &   'compsend_i4vec: calling MPI_Send dest=',dest
./pkg/compon_communic/compsend_i4vec.F 46 COMPSEND_I4VEC 
      call MPI_SEND( ibuf, count, datatype, dest, tag, comm, ierr )
./pkg/compon_communic/compsend_r4.F 15 COMPSEND_R4 
      integer count,datatype,dest,tag,comm,ierr
./pkg/compon_communic/compsend_r4.F 45 COMPSEND_R4 
      dest=my_coupler_rank
./pkg/compon_communic/compsend_r4.F 50 COMPSEND_R4 
       write(LogUnit,*) 'compsend_r4: calling MPI_Send dest=',dest
./pkg/compon_communic/compsend_r4.F 54 COMPSEND_R4 
      call MPI_SEND( r4buf, count, datatype, dest, tag, comm, ierr )
./pkg/compon_communic/compsend_r4tiles.F 15 COMPSEND_R4TILES 
      integer count,datatype,dest,tag,comm,ierr
./pkg/compon_communic/compsend_r4tiles.F 55 COMPSEND_R4TILES 
       dest=my_coupler_rank
./pkg/compon_communic/compsend_r4tiles.F 61 COMPSEND_R4TILES 
     &   'compsend_r4tiles: calling MPI_Send dest=',dest,' tile=',bibj
./pkg/compon_communic/compsend_r4tiles.F 65 COMPSEND_R4TILES 
       call MPI_SEND( r4buf, count, datatype, dest, tag, comm, ierr )
./pkg/compon_communic/compsend_r8.F 15 COMPSEND_R8 
      integer count,datatype,dest,tag,comm,ierr
./pkg/compon_communic/compsend_r8.F 45 COMPSEND_R8 
      dest=my_coupler_rank
./pkg/compon_communic/compsend_r8.F 50 COMPSEND_R8 
       write(LogUnit,*) 'compsend_r8: calling MPI_Send dest=',dest
./pkg/compon_communic/compsend_r8.F 54 COMPSEND_R8 
      call MPI_SEND( r8buf, count, datatype, dest, tag, comm, ierr )
./pkg/compon_communic/compsend_r8tiles.F 15 COMPSEND_R8TILES 
      integer count,datatype,dest,tag,comm,ierr
./pkg/compon_communic/compsend_r8tiles.F 55 COMPSEND_R8TILES 
       dest=my_coupler_rank
./pkg/compon_communic/compsend_r8tiles.F 61 COMPSEND_R8TILES 
     &   'compsend_r8tiles: calling MPI_Send dest=',dest,' tile=',bibj
./pkg/compon_communic/compsend_r8tiles.F 65 COMPSEND_R8TILES 
       call MPI_SEND( r8buf, count, datatype, dest, tag, comm, ierr )
./pkg/compon_communic/coupsend_i4vec.F 22 COUPSEND_I4VEC 
      integer count,dtype,dest,tag,comm,ierr
./pkg/compon_communic/coupsend_i4vec.F 58 COUPSEND_I4VEC 
       dest = rank_component_procs(n,compind)
./pkg/compon_communic/coupsend_i4vec.F 62 COUPSEND_I4VEC 
     &    'coupsend_i4vec: calling MPI_Send dest=',dest,
./pkg/compon_communic/coupsend_i4vec.F 66 COUPSEND_I4VEC 
       call MPI_SEND( ibuf, count, dtype, dest, tag, comm, ierr )
./pkg/compon_communic/coupsend_r4.F 22 COUPSEND_R4 
      integer count,dtype,dest,tag,comm,ierr
./pkg/compon_communic/coupsend_r4.F 68 COUPSEND_R4 
       dest=rank_component_procs(n,compind)
./pkg/compon_communic/coupsend_r4.F 71 COUPSEND_R4 
        write(LogUnit,*) 'coupsend_r4: calling MPI_Send dest=',dest,
./pkg/compon_communic/coupsend_r4.F 75 COUPSEND_R4 
       call MPI_SEND( r4buf, count, dtype, dest, tag, comm, ierr )
./pkg/compon_communic/coupsend_r4tiles.F 22 COUPSEND_R4TILES 
      integer count,dtype,dest,tag,comm,ierr
./pkg/compon_communic/coupsend_r4tiles.F 71 COUPSEND_R4TILES 
        dest=rank_component_procs(n,compind)
./pkg/compon_communic/coupsend_r4tiles.F 75 COUPSEND_R4TILES 
     &     dest,' proc=',n,'/',numprocs,' tile=',bibj
./pkg/compon_communic/coupsend_r4tiles.F 78 COUPSEND_R4TILES 
        call MPI_SEND( r4buf, count, dtype, dest, tag, comm, ierr )
./pkg/compon_communic/coupsend_r8.F 22 COUPSEND_R8 
      integer count,dtype,dest,tag,comm,ierr
./pkg/compon_communic/coupsend_r8.F 68 COUPSEND_R8 
       dest=rank_component_procs(n,compind)
./pkg/compon_communic/coupsend_r8.F 71 COUPSEND_R8 
        write(LogUnit,*) 'coupsend_r8: calling MPI_Send dest=',dest,
./pkg/compon_communic/coupsend_r8.F 75 COUPSEND_R8 
       call MPI_SEND( r8buf, count, dtype, dest, tag, comm, ierr )
./pkg/compon_communic/coupsend_r8tiles.F 22 COUPSEND_R8TILES 
      integer count,dtype,dest,tag,comm,ierr
./pkg/compon_communic/coupsend_r8tiles.F 71 COUPSEND_R8TILES 
        dest=rank_component_procs(n,compind)
./pkg/compon_communic/coupsend_r8tiles.F 75 COUPSEND_R8TILES 
     &     dest,' proc=',n,'/',numprocs,' tile=',bibj
./pkg/compon_communic/coupsend_r8tiles.F 78 COUPSEND_R8TILES 
        call MPI_SEND( r8buf, count, dtype, dest, tag, comm, ierr )
./pkg/compon_communic/mitcomponent_register.F 25 MITCOMPONENT_REGISTER 
      integer count,datatype,dest,tag,comm
./pkg/compon_communic/mitcomponent_register.F 46 MITCOMPONENT_REGISTER 
      dest=my_coupler_rank
./pkg/compon_communic/mitcomponent_register.F 50 MITCOMPONENT_REGISTER 
      call MPI_SEND( ibuf, count, datatype, dest, tag, comm, ierr )
./pkg/compon_communic/mitcomponent_tile_register.F 28 MITCOMPONENT_TILE_REGISTER 
      integer count, datatype, dest, tag, comm, ierr
./pkg/compon_communic/mitcomponent_tile_register.F 63 MITCOMPONENT_TILE_REGISTER 
      dest=my_coupler_rank
./pkg/compon_communic/mitcomponent_tile_register.F 67 MITCOMPONENT_TILE_REGISTER 
      call MPI_SEND( ibuf, count, datatype, dest, tag, comm, ierr )
./pkg/compon_communic/mitcomponent_tile_register.F 89 MITCOMPONENT_TILE_REGISTER 
       dest=my_coupler_rank
./pkg/compon_communic/mitcomponent_tile_register.F 93 MITCOMPONENT_TILE_REGISTER 
       call MPI_SEND( ibuf, count, datatype, dest, tag, comm, ierr )