This routine truncates growing array of points
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(tem_grwPoints_type), | intent(inout) | :: | me |
Growing array of points in each dimension |
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