MPI_Bcast_Bool_2 Subroutine

subroutine MPI_Bcast_Bool_2(comm, data, root)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: comm
logical, intent(in) :: data(:,:)
integer, intent(in), optional :: root

Calls

proc~~mpi_bcast_bool_2~~CallsGraph proc~mpi_bcast_bool_2 MPI_Bcast_Bool_2 error_mpi error_mpi proc~mpi_bcast_bool_2->error_mpi mpi_bcast mpi_bcast proc~mpi_bcast_bool_2->mpi_bcast

Source Code

subroutine MPI_Bcast_Bool_2(comm,data,root)
  integer,intent(in)          :: comm
  logical,intent(in)          :: data(:,:)
  integer,intent(in),optional :: root
  rank=0;if(present(root))rank=root
  if(comm==MPI_COMM_NULL)return
  call MPI_BCAST(data,size(data),MPI_LOGICAL,rank,comm,ierr)
  call Error_MPI(sub='MPI_Bcast_Bool_2')
end subroutine MPI_Bcast_Bool_2