Destroy node.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(node_object), | intent(inout) | :: | self | Node object. |
elemental subroutine destroy(self)
!< Destroy node.
class(node_object), intent(inout) :: self !< Node object.
type(node_object) :: fresh !< Fresh instance of node object.
self = fresh
endsubroutine destroy