destroy_grwPoints Subroutine

private subroutine destroy_grwPoints(me)

This routine destroys 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~~destroy_grwpoints~~CallsGraph proc~destroy_grwpoints destroy_grwPoints interface~destroy~20 destroy proc~destroy_grwpoints->interface~destroy~20 proc~destroy_ga2d_real destroy_ga2d_real interface~destroy~20->proc~destroy_ga2d_real

Called by

proc~~destroy_grwpoints~~CalledByGraph proc~destroy_grwpoints destroy_grwPoints interface~destroy~6 destroy interface~destroy~6->proc~destroy_grwpoints

Source Code

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