empty_ga_dynlong Subroutine

public subroutine empty_ga_dynlong(me)

Arguments

Type IntentOptional Attributes Name
type(grw_dynlongarray_type) :: me

Source Code

  subroutine empty_ga_dynlong(me)
    !------------------------------------------------------------------------
    type(grw_dynlongarray_type) :: me !< array to sorttruncate
    !------------------------------------------------------------------------

    me%nvals = 0

  end subroutine empty_ga_dynlong