empty_ga_triangle Subroutine

private subroutine empty_ga_triangle(me)

Arguments

Type IntentOptional Attributes Name
type(grw_trianglearray_type) :: me

Called by

proc~~empty_ga_triangle~~CalledByGraph proc~empty_ga_triangle empty_ga_triangle interface~empty~26 empty interface~empty~26->proc~empty_ga_triangle

Contents

Source Code


Source Code

  subroutine empty_ga_triangle(me)
    !------------------------------------------------------------------------
    type(grw_trianglearray_type) :: me !< array to sorttruncate
    !------------------------------------------------------------------------

    me%nvals = 0

  end subroutine empty_ga_triangle