Symbol Description Uses
dest 40


File Line number Procedure Code
./pkg/compon_communic/coupsend_r4tiles.F 13 COUPSEND_R4TILES 
      integer count,dtype,dest,tag,comm,ierr
./pkg/compon_communic/coupsend_r4tiles.F 66 COUPSEND_R4TILES 
        dest=rank_component_procs(n,compind)
./pkg/compon_communic/coupsend_r4tiles.F 70 COUPSEND_R4TILES 
     &     dest,' proc=',n,'/',numprocs,' tile=',bibj
./pkg/compon_communic/coupsend_r4tiles.F 73 COUPSEND_R4TILES 
        call MPI_SEND( r4buf, count, dtype, dest, tag, comm, ierr )
./pkg/compon_communic/coupsend_r8tiles.F 13 COUPSEND_R8TILES 
      integer count,dtype,dest,tag,comm,ierr
./pkg/compon_communic/coupsend_r8tiles.F 66 COUPSEND_R8TILES 
        dest=rank_component_procs(n,compind)
./pkg/compon_communic/coupsend_r8tiles.F 70 COUPSEND_R8TILES 
     &     dest,' proc=',n,'/',numprocs,' tile=',bibj
./pkg/compon_communic/coupsend_r8tiles.F 73 COUPSEND_R8TILES 
        call MPI_SEND( r8buf, count, dtype, dest, tag, comm, ierr )
./pkg/compon_communic/mitcomponent_register.F 21 MITCOMPONENT_REGISTER 
      integer count,datatype,dest,tag,comm
./pkg/compon_communic/mitcomponent_register.F 41 MITCOMPONENT_REGISTER 
      dest=my_coupler_rank
./pkg/compon_communic/mitcomponent_register.F 45 MITCOMPONENT_REGISTER 
      call MPI_SEND( ibuf, count, datatype, dest, tag, comm, ierr )
./pkg/compon_communic/compsend_r4.F 12 COMPSEND_R4 
      integer count,datatype,dest,tag,comm,ierr
./pkg/compon_communic/compsend_r4.F 42 COMPSEND_R4 
      dest=my_coupler_rank
./pkg/compon_communic/compsend_r4.F 47 COMPSEND_R4 
       write(LogUnit,*) 'compsend_r4: calling MPI_Send dest=',dest
./pkg/compon_communic/compsend_r4.F 51 COMPSEND_R4 
      call MPI_SEND( r4buf, count, datatype, dest, tag, comm, ierr )
./pkg/compon_communic/compsend_r8tiles.F 12 COMPSEND_R8TILES 
      integer count,datatype,dest,tag,comm,ierr
./pkg/compon_communic/compsend_r8tiles.F 52 COMPSEND_R8TILES 
       dest=my_coupler_rank
./pkg/compon_communic/compsend_r8tiles.F 58 COMPSEND_R8TILES 
     &   'compsend_r8tiles: calling MPI_Send dest=',dest,' tile=',bibj
./pkg/compon_communic/compsend_r8tiles.F 62 COMPSEND_R8TILES 
       call MPI_SEND( r8buf, count, datatype, dest, tag, comm, ierr )
./pkg/compon_communic/coupsend_r4.F 13 COUPSEND_R4 
      integer count,dtype,dest,tag,comm,ierr
./pkg/compon_communic/coupsend_r4.F 63 COUPSEND_R4 
       dest=rank_component_procs(n,compind)
./pkg/compon_communic/coupsend_r4.F 66 COUPSEND_R4 
        write(LogUnit,*) 'coupsend_r4: calling MPI_Send dest=',dest,
./pkg/compon_communic/coupsend_r4.F 70 COUPSEND_R4 
       call MPI_SEND( r4buf, count, dtype, dest, tag, comm, ierr )
./pkg/compon_communic/compsend_r4tiles.F 12 COMPSEND_R4TILES 
      integer count,datatype,dest,tag,comm,ierr
./pkg/compon_communic/compsend_r4tiles.F 52 COMPSEND_R4TILES 
       dest=my_coupler_rank
./pkg/compon_communic/compsend_r4tiles.F 58 COMPSEND_R4TILES 
     &   'compsend_r4tiles: calling MPI_Send dest=',dest,' tile=',bibj
./pkg/compon_communic/compsend_r4tiles.F 62 COMPSEND_R4TILES 
       call MPI_SEND( r4buf, count, datatype, dest, tag, comm, ierr )
./pkg/compon_communic/compsend_r8.F 12 COMPSEND_R8 
      integer count,datatype,dest,tag,comm,ierr
./pkg/compon_communic/compsend_r8.F 42 COMPSEND_R8 
      dest=my_coupler_rank
./pkg/compon_communic/compsend_r8.F 47 COMPSEND_R8 
       write(LogUnit,*) 'compsend_r8: calling MPI_Send dest=',dest
./pkg/compon_communic/compsend_r8.F 51 COMPSEND_R8 
      call MPI_SEND( r8buf, count, datatype, dest, tag, comm, ierr )
./pkg/compon_communic/coupsend_r8.F 13 COUPSEND_R8 
      integer count,dtype,dest,tag,comm,ierr
./pkg/compon_communic/coupsend_r8.F 63 COUPSEND_R8 
       dest=rank_component_procs(n,compind)
./pkg/compon_communic/coupsend_r8.F 66 COUPSEND_R8 
        write(LogUnit,*) 'coupsend_r8: calling MPI_Send dest=',dest,
./pkg/compon_communic/coupsend_r8.F 70 COUPSEND_R8 
       call MPI_SEND( r8buf, count, dtype, dest, tag, comm, ierr )
./pkg/compon_communic/mitcomponent_tile_register.F 23 MITCOMPONENT_TILE_REGISTER 
      integer count,datatype,dest,tag,comm
./pkg/compon_communic/mitcomponent_tile_register.F 62 MITCOMPONENT_TILE_REGISTER 
      dest=my_coupler_rank
./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 88 MITCOMPONENT_TILE_REGISTER 
       dest=my_coupler_rank
./pkg/compon_communic/mitcomponent_tile_register.F 92 MITCOMPONENT_TILE_REGISTER 
       call MPI_SEND( ibuf, count, datatype, dest, tag, comm, ierr )