Subroutine to pack an array into a flat array for sending
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ndarray), | intent(in) | :: | this | |||
real(kind=pfdp), | intent(out) | :: | z(:) | |||
integer, | intent(in), | optional | :: | flags |
subroutine ndarray_pack(this, z, flags)
class(ndarray), intent(in ) :: this
real(pfdp), intent( out) :: z(:)
integer, intent(in ), optional :: flags
z = this%flatarray
end subroutine ndarray_pack