append Interface

public interface append

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

Calls

interface~~append~20~~CallsGraph interface~append~20 append proc~append_arrayga2d_char append_arrayga2d_char interface~append~20->proc~append_arrayga2d_char proc~append_singlega2d_char append_singlega2d_char interface~append~20->proc~append_singlega2d_char interface~expand~22 expand proc~append_arrayga2d_char->interface~expand~22 proc~append_singlega2d_char->interface~expand~22 proc~expand_ga2d_real expand_ga2d_real interface~expand~22->proc~expand_ga2d_real

Module Procedures

public subroutine append_singlega2d_char(me, val, pos1, pos2, length)

append a single value to the growing 2d array.

Arguments

Type IntentOptional Attributes Name
type(grw_char2darray_type) :: me

array to append the value to
character(len=1), intent(in) :: val

value to append
integer, intent(in) :: pos1

position in first dimension (cannot grow)
integer, intent(out), optional :: pos2

the position in second dimension the element were added to
integer, intent(in), optional :: length

optional length to expand the array

public subroutine append_arrayga2d_char(me, val, length, pos)

append an array of values to the growing 2d array.

Arguments

Type IntentOptional Attributes Name
type(grw_char2darray_type) :: me

array to append the value to
character(len=1), intent(in) :: val(:)

array of values to append
integer, intent(in), optional :: length

optional length to expand the array
integer, intent(out), optional :: pos

the position in second dimension the elements were added to