append Interface

public interface append

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

Calls

interface~~append~32~~CallsGraph interface~append~32 append proc~append_ga_ellipsoid append_ga_ellipsoid interface~append~32->proc~append_ga_ellipsoid proc~append_ga_ellipsoid_vec append_ga_ellipsoid_vec interface~append~32->proc~append_ga_ellipsoid_vec interface~expand~28 expand proc~append_ga_ellipsoid->interface~expand~28 proc~append_ga_ellipsoid_vec->interface~expand~28 proc~expand_ga_ellipsoid expand_ga_ellipsoid interface~expand~28->proc~expand_ga_ellipsoid

Module Procedures

private subroutine append_ga_ellipsoid(me, val, length)

Arguments

Type IntentOptional Attributes Name
type(grw_ellipsoidarray_type) :: me
type(tem_ellipsoid_type), intent(in) :: val
integer, intent(in), optional :: length

optional length to expand the array

private subroutine append_ga_ellipsoid_vec(me, val, length)

Arguments

Type IntentOptional Attributes Name
type(grw_ellipsoidarray_type) :: me
type(tem_ellipsoid_type), intent(in) :: val(:)
integer, intent(in), optional :: length

optional length to expand the array