truncate_da_label Subroutine

public subroutine truncate_da_label(me)

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

Arguments

TypeIntentOptionalAttributesName
type(dyn_labelarray_type) :: me

Called by

proc~~truncate_da_label~~CalledByGraph proc~truncate_da_label truncate_da_label interface~truncate~15 truncate interface~truncate~15->proc~truncate_da_label proc~truncate_possible_variable truncate_possible_variable proc~truncate_possible_variable->interface~truncate~15 proc~tem_create_varmap tem_create_varMap proc~tem_create_varmap->interface~truncate~15 proc~tem_init_tracker tem_init_tracker proc~tem_init_tracker->proc~tem_create_varmap proc~hvs_output_init hvs_output_init proc~tem_init_tracker->proc~hvs_output_init proc~hvs_output_init->proc~tem_create_varmap proc~tem_init_convergence tem_init_convergence proc~tem_init_convergence->proc~tem_create_varmap proc~tem_opvar_reduction_transient_init tem_opVar_reduction_transient_init proc~tem_opvar_reduction_transient_init->proc~tem_create_varmap proc~tem_init_depend tem_init_depend proc~tem_init_depend->proc~tem_create_varmap interface~truncate~29 truncate interface~truncate~29->proc~truncate_possible_variable

Contents


Variables

TypeVisibilityAttributesNameInitial
character(len=labellen), public, allocatable:: swpval(:)
integer, public, allocatable:: swpsort(:)