truncate_grwPoints Subroutine

private subroutine truncate_grwPoints(me)

This routine truncates growing array of points

Arguments

Type IntentOptional Attributes Name
type(tem_grwPoints_type), intent(inout) :: me

Growing array of points in each dimension


Calls

proc~~truncate_grwpoints~~CallsGraph proc~truncate_grwpoints truncate_grwPoints interface~truncate~14 truncate proc~truncate_grwpoints->interface~truncate~14 proc~truncate_ga_char truncate_ga_char interface~truncate~14->proc~truncate_ga_char

Called by

proc~~truncate_grwpoints~~CalledByGraph proc~truncate_grwpoints truncate_grwPoints interface~truncate~5 truncate interface~truncate~5->proc~truncate_grwpoints

Source Code

  subroutine truncate_grwPoints(me)
    !---------------------------------------------------------------------------
    !> Growing array of points in each dimension
    type(tem_grwPoints_type), intent(inout) :: me
    !---------------------------------------------------------------------------
    call truncate(me = me%coordX)
    call truncate(me = me%coordY)
    call truncate(me = me%coordZ)
  end subroutine truncate_grwPoints