util_mod_cpts_int64 Module

Uses

- constants
- SystemData
- HElem
- iso_c_binding
- SymData

Contents

Interfaces

arr_2d_dims arr_2d_ptr ptr_abuse_1d ptr_abuse_2d ptr_abuse_scalar

Functions

arr_2d_dims_int64 arr_2d_ptr_int64

Subroutines

ptr_abuse_1d_int64 ptr_abuse_2d_int64 ptr_abuse_scalar_int64

Interfaces

public interface arr_2d_dims

private function arr_2d_dims_int64(arr) result(dims)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	arr(:,:)

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

public interface arr_2d_ptr

private function arr_2d_ptr_int64(arr) result(cptr)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(inout),		target	::	arr(:,:)

Return Value type(c_ptr)

public interface ptr_abuse_1d

private subroutine ptr_abuse_1d_int64(arr, ptr)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in),		target	::	arr(:)
integer(kind=int32),	intent(inout),		pointer	::	ptr(:)

public interface ptr_abuse_2d

private subroutine ptr_abuse_2d_int64(arr, ptr)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in),		target	::	arr(:,:)
integer(kind=int32),	intent(inout),		pointer	::	ptr(:,:)

public interface ptr_abuse_scalar

private subroutine ptr_abuse_scalar_int64(elem, ptr)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in),		target	::	elem
integer(kind=int32),	intent(inout),		pointer	::	ptr

Functions

private function arr_2d_dims_int64(arr) result(dims)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	arr(:,:)

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

private function arr_2d_ptr_int64(arr) result(cptr)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(inout),		target	::	arr(:,:)

Return Value type(c_ptr)

Subroutines

private subroutine ptr_abuse_1d_int64(arr, ptr)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in),		target	::	arr(:)
integer(kind=int32),	intent(inout),		pointer	::	ptr(:)

private subroutine ptr_abuse_2d_int64(arr, ptr)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in),		target	::	arr(:,:)
integer(kind=int32),	intent(inout),		pointer	::	ptr(:,:)

private subroutine ptr_abuse_scalar_int64(elem, ptr)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in),		target	::	elem
integer(kind=int32),	intent(inout),		pointer	::	ptr