unpack_pipelined_f128 Subroutine

private pure subroutine unpack_pipelined_f128(in, out, dims, locals)

Unpacks part of contiguous buffer recieved from a single rank, complex(real64) version.

For 3D arrays:

out(x + in_displacement, y, z) = in(out_displacement + z * nxx * nyy + y * nxx + x)

where out buffer x,y,z are full slab indices, while in buffer x,y,z are indices that were sent from neighbor rank.

Arguments

Type IntentOptional Attributes Name
complex(kind=real64), intent(in) :: in(*)

Source host-allocated buffer
complex(kind=real64), intent(inout) :: out(*)

Target host-allocated buffer
integer(kind=int32), intent(in) :: dims(:)

Dimensions of the array
integer(kind=int32), intent(in) :: locals(*)

Neighbor data

Called by

proc~~unpack_pipelined_f128~~CalledByGraph proc~unpack_pipelined_f128 unpack_pipelined_f128 proc~execute_f128 execute_f128 proc~execute_f128->proc~unpack_pipelined_f128 proc~unpack_f128 unpack_f128 proc~execute_f128->proc~unpack_f128 proc~unpack_f128->proc~unpack_pipelined_f128