placeat_ga_sphere_vec Subroutine

private subroutine placeat_ga_sphere_vec(me, val, pos, length)

adds the values starting from a given position inside the growing array.

if the requested position is outside the current array bounds, the array will be resized accordingly. if it is inside the current array bounds, the elements starting from the requested position will be replaced up to the element at position pos + size(val) - 1.

Arguments

TypeIntentOptionalAttributesName
type(grw_spherearray_type) :: me
type(tem_sphere_type), intent(in) :: val(:)
integer, intent(in) :: pos
integer, intent(in), optional :: length

optional length to expand the array


Calls

proc~~placeat_ga_sphere_vec~~CallsGraph proc~placeat_ga_sphere_vec placeat_ga_sphere_vec interface~expand~25 expand proc~placeat_ga_sphere_vec->interface~expand~25 proc~expand_ga_sphere expand_ga_sphere interface~expand~25->proc~expand_ga_sphere

Called by

proc~~placeat_ga_sphere_vec~~CalledByGraph proc~placeat_ga_sphere_vec placeat_ga_sphere_vec interface~placeat~15 placeat interface~placeat~15->proc~placeat_ga_sphere_vec

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: ub
integer, private :: ii