truncate_da_long Subroutine

  1. tem_dyn_array.f90
  2. tem_dyn_array_module
  3. truncate_da_long

public subroutine truncate_da_long(me)

truncate the array after the last valid entry and hence cut off the empty trailing empty entries

Arguments

TypeIntentOptionalAttributesName
type(dyn_longarray_type) :: me

Called by

proc~~truncate_da_long~~CalledByGraph proc~truncate_da_long truncate_da_long interface~truncate~12 truncate interface~truncate~12->proc~truncate_da_long

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
integer(kind=long_k), public, allocatable:: swpval(:)
integer, public, allocatable:: swpsort(:)