empty_ga_stringkeyvaluepair Subroutine

private subroutine empty_ga_stringkeyvaluepair(me)

Arguments

Type IntentOptional AttributesName
type(grw_stringkeyvaluepairarray_type) :: me

Called by

proc~~empty_ga_stringkeyvaluepair~~CalledByGraph proc~empty_ga_stringkeyvaluepair empty_ga_stringkeyvaluepair interface~empty~7 empty interface~empty~7->proc~empty_ga_stringkeyvaluepair

Contents


Source Code

  subroutine empty_ga_stringkeyvaluepair(me)
    !------------------------------------------------------------------------
    type(grw_stringkeyvaluepairarray_type) :: me !< array to sorttruncate
    !------------------------------------------------------------------------

    me%nvals = 0

  end subroutine empty_ga_stringkeyvaluepair