emulated_intrinsics_implementation Submodule

Uses

- assertions_interface
- Ancestors:
- emulated_intrinsics_interface
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Contents

Functions

exists

Module Procedures

co_broadcast_integer co_sum_integer findloc_character_dim1 findloc_integer_dim1 findloc_logical_dim1

Functions

elemental function exists(image) result(image_exists)

Result true if image number is within the closed range [1,num_images()]

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	image

Return Value logical

Module Procedures

module procedure co_broadcast_integer module subroutine co_broadcast_integer(a, source_image, stat, errmsg)

Binary tree collective broadcast

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	a
integer,	intent(in)			::	source_image
integer,	intent(out),	optional		::	stat
character(len=*),	intent(inout),	optional		::	errmsg

module procedure co_sum_integer module subroutine co_sum_integer(a, result_image, stat, errmsg)

Binary tree collective sum reduction

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	a
integer,	intent(in),	optional		::	result_image
integer,	intent(out),	optional		::	stat
character(len=*),	intent(inout),	optional		::	errmsg

module procedure findloc_character_dim1 pure module function findloc_character_dim1(array, value, dim, back) result(location)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	array(:)
character(len=*),	intent(in)			::	value
integer,	intent(in)			::	dim
logical,	intent(in)			::	back

Return Value integer

module procedure findloc_integer_dim1 pure module function findloc_integer_dim1(array, value, dim, back) result(location)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	array(:)
integer,	intent(in)			::	value
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	back

Return Value integer

module procedure findloc_logical_dim1 pure module function findloc_logical_dim1(array, value, dim, back) result(location)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(in)			::	array(:)
logical,	intent(in)			::	value
integer,	intent(in)			::	dim
logical,	intent(in)			::	back

Return Value integer