prune-quadtree ( tree -- tree )
Quadtrees
Prev:in-rect ( tree rect -- values )
Next:descend ( pt node -- pt subnode )


Vocabulary
quadtrees

Inputs and outputs
treea quadtree


Word description
Removes empty nodes from tree.

Definition
USING: kernel quadtrees.private ;

IN: quadtrees

: prune-quadtree ( tree -- tree ) [ (prune) ] keep ;