empty_ga_logical Subroutine

public subroutine empty_ga_logical(me)

Arguments

Type IntentOptional Attributes Name
type(grw_logicalarray_type) :: me

Called by

proc~~empty_ga_logical~~CalledByGraph proc~empty_ga_logical empty_ga_logical interface~empty~11 empty interface~empty~11->proc~empty_ga_logical

Contents

Source Code

empty_ga_logical

Source Code

  subroutine empty_ga_logical(me)
    !------------------------------------------------------------------------
    type(grw_logicalarray_type) :: me !< array to sorttruncate
    !------------------------------------------------------------------------

    me%nvals = 0

  end subroutine empty_ga_logical