Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(Vector2D_t), | intent(inout) | :: | this |
subroutine Free_Vector2D_t(this)
implicit none
class(Vector2D_t),intent(inout) :: this
this%interp => null()
this%nVar = 0
this%nElem = 0
deallocate(this%interior)
deallocate(this%boundary)
deallocate(this%boundaryNormal)
deallocate(this%extBoundary)
deallocate(this%avgBoundary)
deallocate(this%meta)
deallocate(this%eqn)
endsubroutine Free_Vector2D_t