leaf= ( a b -- ? )

Vocabulary

quadtrees.private

Inputs

a	an object
b	an object

Outputs

?

an object

Definition

USING: accessors arrays kernel ;

IN: quadtrees.private

: leaf= ( a b -- ? )
    [ [ point>> ] [ value>> ] bi 2array ] same? ;