mp_type_make Interface

public interface mp_type_make

Module Procedures

private function mp_type_make_i(ptr, vector_descriptor, index_descriptor) result(type_descriptor)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int_4),			DIMENSION(:), POINTER	::	ptr
integer,	intent(in),	optional,	DIMENSION(2)	::	vector_descriptor
type(mp_indexing_meta_type),	intent(in),	optional		::	index_descriptor

Return Value type(mp_type_descriptor_type)

private function mp_type_make_l(ptr, vector_descriptor, index_descriptor) result(type_descriptor)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int_8),			DIMENSION(:), POINTER	::	ptr
integer,	intent(in),	optional,	DIMENSION(2)	::	vector_descriptor
type(mp_indexing_meta_type),	intent(in),	optional		::	index_descriptor

Return Value type(mp_type_descriptor_type)

private function mp_type_make_d(ptr, vector_descriptor, index_descriptor) result(type_descriptor)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real_8),			DIMENSION(:), POINTER	::	ptr
integer,	intent(in),	optional,	DIMENSION(2)	::	vector_descriptor
type(mp_indexing_meta_type),	intent(in),	optional		::	index_descriptor

Return Value type(mp_type_descriptor_type)

private function mp_type_make_r(ptr, vector_descriptor, index_descriptor) result(type_descriptor)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real_4),			DIMENSION(:), POINTER	::	ptr
integer,	intent(in),	optional,	DIMENSION(2)	::	vector_descriptor
type(mp_indexing_meta_type),	intent(in),	optional		::	index_descriptor

Return Value type(mp_type_descriptor_type)

private function mp_type_make_z(ptr, vector_descriptor, index_descriptor) result(type_descriptor)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=real_8),			DIMENSION(:), POINTER	::	ptr
integer,	intent(in),	optional,	DIMENSION(2)	::	vector_descriptor
type(mp_indexing_meta_type),	intent(in),	optional		::	index_descriptor

Return Value type(mp_type_descriptor_type)

private function mp_type_make_c(ptr, vector_descriptor, index_descriptor) result(type_descriptor)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=real_4),			DIMENSION(:), POINTER	::	ptr
integer,	intent(in),	optional,	DIMENSION(2)	::	vector_descriptor
type(mp_indexing_meta_type),	intent(in),	optional		::	index_descriptor

Return Value type(mp_type_descriptor_type)

private function mp_type_make_struct(subtypes, vector_descriptor, index_descriptor) result(type_descriptor)

Arguments

Type	Intent	Optional	Attributes		Name
type(mp_type_descriptor_type),	intent(in),		DIMENSION(:)	::	subtypes
integer,	intent(in),	optional,	DIMENSION(2)	::	vector_descriptor
type(mp_indexing_meta_type),	intent(in),	optional		::	index_descriptor

Return Value type(mp_type_descriptor_type)