ptr_abuse_1d_cplx_doub Subroutine

private subroutine ptr_abuse_1d_cplx_doub(arr, ptr)

Arguments

Type IntentOptional Attributes Name
complex(kind=dp), intent(in), target :: arr(:)
integer(kind=int32), intent(inout), pointer :: ptr(:)

Contents