para_bc1ddp()

subroutine parautil::para_bc1ddp	(	real(dp), dimension(:)	arr,
		integer, intent(in)	source
	)

Definition at line 261 of file ompi_kronlininv.f08.

    real(dp) :: arr(:)
    integer,intent(in) :: source
    integer :: mpierr
    call mpi_bcast(arr,size(arr), dp_real_type, source, mpi_comm_world, mpierr)