Handbook
Glossary
quadtree
Vocabulary
quadtrees
Definition
USING:
math.rectangles
;
IN:
quadtrees
TUPLE:
quadtree
{
bounds
rect
initial:
RECT:
{
0 0
}
{
0 0
}
}
point value
ll lr ul ur leaf?
;
Methods
USING:
assocs
quadtrees
quadtrees.private
;
M:
quadtree
>alist
quadtree>alist
;
USING:
assocs
quadtrees
quadtrees.private
;
M:
quadtree
assoc-size
quadtree-size
;
USING:
assocs
quadtrees
quadtrees.private
;
M:
quadtree
at*
at-point
;
USING:
accessors
assocs
kernel
quadtrees
;
M:
quadtree
clear-assoc
t
>>leaf?
f
>>point
f
>>value
drop
;
USING:
assocs
quadtrees
quadtrees.private
;
M:
quadtree
delete-at
erase
;
USING:
kernel
quadtrees
quadtrees.private
;
M:
quadtree
equal?
over
quadtree?
[
tree=
]
[
2drop
f
]
if
;
USING:
assocs
quadtrees
quadtrees.private
;
M:
quadtree
set-at
insert
;