Non-blocking version of mpi copy
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(redist_type), | intent(inout) | :: | f | |||
complex, | intent(in), | dimension (f%from_low(1):, f%from_low(2):, f%from_low(3):) | :: | from_here | ||
complex, | intent(inout), | dimension (f%to_low(1):, f%to_low(2):, f%to_low(3):) | :: | to_here |
subroutine c_fill_3_mpi_copy_nonblock (f, from_here, to_here)
implicit none
type (redist_type), intent (in out) :: f
complex, dimension (f%from_low(1):, &
f%from_low(2):, &
f%from_low(3):), intent (in) :: from_here
complex, dimension (f%to_low(1):, &
f%to_low(2):, &
f%to_low(3):), intent (in out) :: to_here
call c_redist_33_mpi_copy_nonblock(f,from_here,to_here)
end subroutine c_fill_3_mpi_copy_nonblock