Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(btree_node_i8_sp2d), | POINTER | :: | node |
SUBROUTINE btree_free_node_i8_sp2d (node) TYPE(btree_node_i8_sp2d), POINTER :: node ! DEALLOCATE (node%keys) DEALLOCATE (node%values) DEALLOCATE (node%subtrees) DEALLOCATE (node) END SUBROUTINE btree_free_node_i8_sp2d