sorttruncate_da_attribute Subroutine

private subroutine sorttruncate_da_attribute(me)

fixing the dynamic array

truncate the array after the last valid entry and hence cut off the empty trailing empty entries store the array in the sorted order according to the sorted( ) array

Arguments

TypeIntentOptionalAttributesName
type(dyn_attributearray_type) :: me

Calls

proc~~sorttruncate_da_attribute~~CallsGraph proc~sorttruncate_da_attribute sorttruncate_da_attribute interface~init~11 init proc~sorttruncate_da_attribute->interface~init~11 interface~append~11 append proc~sorttruncate_da_attribute->interface~append~11 interface~destroy~7 destroy proc~sorttruncate_da_attribute->interface~destroy~7 proc~destroy_da_attribute destroy_da_attribute interface~destroy~7->proc~destroy_da_attribute

Called by

proc~~sorttruncate_da_attribute~~CalledByGraph proc~sorttruncate_da_attribute sorttruncate_da_attribute interface~sorttruncate sorttruncate interface~sorttruncate->proc~sorttruncate_da_attribute

Contents


Variables

TypeVisibilityAttributesNameInitial
type(dyn_attributearray_type), private :: tarray
integer, private :: ival
integer, private :: dpos