append Interface

public interface append

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

Calls

interface~~append~16~~CallsGraph interface~append~16 append proc~append_arrayga2d_char append_arrayga2d_char interface~append~16->proc~append_arrayga2d_char proc~append_singlega2d_char append_singlega2d_char interface~append~16->proc~append_singlega2d_char interface~expand~18 expand proc~append_arrayga2d_char->interface~expand~18 proc~append_singlega2d_char->interface~expand~18 proc~expand_ga2d_real expand_ga2d_real interface~expand~18->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