quadrant ( pt node -- quadrant )


Vocabulary
quadtrees

Inputs
ptan object
nodean object


Outputs
quadrantan object


Definition
USING: accessors kernel math.vectors ;

IN: quadtrees

: quadrant ( pt node -- quadrant )
[ bounds>> rect-center v- ] keep (quadrant) ;