expand_da_label Subroutine

public subroutine expand_da_label(me, increment, length)

expanding the dynamic array

this is a helping subroutine, which doubles the container of the given dynamic array. as the container might be initially 0-sized, a module variable minlength has been introduced, which is used here, to at least create a container of this size.

Arguments

TypeIntentOptionalAttributesName
type(dyn_labelarray_type) :: me
integer, optional :: increment
integer, intent(in), optional :: length

optional length to expand the array


Called by

proc~~expand_da_label~~CalledByGraph proc~expand_da_label expand_da_label interface~expand~19 expand interface~expand~19->proc~expand_da_label proc~append_da_vecint append_da_vecint proc~append_da_vecint->interface~expand~19 proc~append_da_real append_da_real proc~append_da_real->interface~expand~19 proc~append_da_int append_da_int proc~append_da_int->interface~expand~19 proc~append_da_veclabel append_da_veclabel proc~append_da_veclabel->interface~expand~19 proc~append_da_label append_da_label proc~append_da_label->interface~expand~19 proc~append_da_long append_da_long proc~append_da_long->interface~expand~19 proc~append_da_vecreal append_da_vecreal proc~append_da_vecreal->interface~expand~19 proc~append_da_veclong append_da_veclong proc~append_da_veclong->interface~expand~19 interface~append~19 append interface~append~19->proc~append_da_vecint interface~append~19->proc~append_da_int interface~append~20 append interface~append~20->proc~append_da_real interface~append~20->proc~append_da_vecreal interface~append~18 append interface~append~18->proc~append_da_long interface~append~18->proc~append_da_veclong interface~append~21 append interface~append~21->proc~append_da_veclabel interface~append~21->proc~append_da_label

Contents


Variables

TypeVisibilityAttributesNameInitial
character(len=labellen), public, allocatable:: swpval(:)
integer, public, allocatable:: swpsort(:)
integer, public :: addvals
integer, public :: explen