pos_1d_cmplx_int64 Function

private function pos_1d_cmplx_int64(this, i) result(pt)

Type Bound

shared_ragged_array_cmplx_t

Arguments

Type IntentOptional Attributes Name
class(shared_ragged_array_cmplx_t), intent(inout) :: this
integer(kind=int64), intent(in) :: i

Return Value complex(kind=dp), pointer, (:)


Contents

Source Code

pos_1d_cmplx_int64

Source Code

    function pos_1d_cmplx_int64(this, i) result(pt)
        class(shared_ragged_array_cmplx_t), intent(inout) :: this
        integer(int64), intent(in) :: i
        complex(dp), pointer :: pt(:)

        pt => this%ptr(i)%res
    end function pos_1d_cmplx_int64