empty all contents of the array without changing the size or status of any array
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dyn_longarray_type) | :: | me |
subroutine empty_da_long(me)
!------------------------------------------------------------------------
type(dyn_longarray_type) :: me !< array to sorttruncate
!------------------------------------------------------------------------
! reset the number of entries
me%nvals = 0
end subroutine empty_da_long