util_mod_cpts_cplx_doub Module



Contents


Interfaces

public interface arr_2d_dims

  • private function arr_2d_dims_cplx_doub(arr) result(dims)

    Arguments

    Type IntentOptional Attributes Name
    complex(kind=dp), intent(in) :: arr(:,:)

    Return Value integer(kind=int64), (2)

public interface arr_2d_ptr

  • private function arr_2d_ptr_cplx_doub(arr) result(cptr)

    Arguments

    Type IntentOptional Attributes Name
    complex(kind=dp), intent(inout), target :: arr(:,:)

    Return Value type(c_ptr)

public interface ptr_abuse_1d

  • 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(:)

public interface ptr_abuse_2d

  • private subroutine ptr_abuse_2d_cplx_doub(arr, ptr)

    Arguments

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

public interface ptr_abuse_scalar

  • private subroutine ptr_abuse_scalar_cplx_doub(elem, ptr)

    Arguments

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

Functions

private function arr_2d_dims_cplx_doub(arr) result(dims)

Arguments

Type IntentOptional Attributes Name
complex(kind=dp), intent(in) :: arr(:,:)

Return Value integer(kind=int64), (2)

private function arr_2d_ptr_cplx_doub(arr) result(cptr)

Arguments

Type IntentOptional Attributes Name
complex(kind=dp), intent(inout), target :: arr(:,:)

Return Value type(c_ptr)


Subroutines

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(:)

private subroutine ptr_abuse_2d_cplx_doub(arr, ptr)

Arguments

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

private subroutine ptr_abuse_scalar_cplx_doub(elem, ptr)

Arguments

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