INIT_QUADTREE(6,1)
CREATE_RECTANGLE(ROOM,8,48,4,3)
CREATE_RECTANGLE(WORM,31,54,1,4)
CREATE_RECTANGLE(MOMMA,43,42,15,9)
CREATE_RECTANGLE(DOT,42,22,1,1)
CREATE_RECTANGLE(CUBE,8,24,5,9)
DISPLAY()
TRACE ON
INSERT(MOMMA)
TRACE OFF
DISPLAY()
TRACE ON
INSERT(ROOM)
TRACE OFF
DISPLAY()
TRACE ON
INSERT(CUBE)
TRACE OFF
DISPLAY()
TRACE ON
INSERT(WORM)
TRACE OFF
DISPLAY()
TRACE ON
INSERT(DOT)
TRACE OFF
DISPLAY()
