append Interface

public interface append

append a value to the dynamic array and return its position.

Module Procedures

private subroutine append_da_projection(me, val, length, pos, wasadded)

appending a value to the dynamic array

Arguments

Type	Intent	Optional	Attributes		Name
type(dyn_projectionarray_type)				::	me
type(ply_prj_init_type),	intent(in)			::	val
integer,	intent(in),	optional		::	length	optional length to expand the array
integer,	intent(out),	optional		::	pos	position in the array, if the value is found
logical,	intent(out),	optional		::	wasadded	flag to indicate, if val was newly added

private subroutine append_da_vecprojection(me, val, length, pos, wasadded)

appending a sorted list of values to the dynamic array

Arguments

Type	Intent	Optional	Attributes		Name
type(dyn_projectionarray_type)				::	me
type(ply_prj_init_type),	intent(in)			::	val(:)
integer,	intent(in),	optional		::	length	optional length to expand the array
integer,	intent(out),	optional		::	pos(:)	position in the array, the values are found at.
logical,	intent(out),	optional		::	wasadded(:)	flag to indicate, if val was newly added