INIT_QUADTREE( 8 )
CREATE_RECTANGLE( BLISS, 64, 64, 64, 64 )
CREATE_RECTANGLE( 1000T, 64, 128, 64, 64 )
CREATE_RECTANGLE( GISKAR, 128, 64, 64, 64 )
CREATE_RECTANGLE( 0LIVAW, 128, 128, 64, 64 )
INSERT( BLISS )
INSERT( 1000T )
INSERT( GISKAR )
INSERT( 0LIVAW )
WITHIN( BLISS, 2 )
CREATE_RECTANGLE( C1R, 0, 0, 5, 5 )
CREATE_RECTANGLE( 10T, 240, 240, 5, 5 )
CREATE_RECTANGLE( GIS, 240, 0, 5, 5 )
CREATE_RECTANGLE( 0LI, 0, 240, 5, 5 )
CREATE_RECTANGLE( UFO, 500, 500, 5, 5 )
TRACE ON
INSERT( C1R )
INSERT( 10T )
INSERT( GIS )
INSERT( 0LI )
WITHIN( 10T, 2 )
WITHIN( UFO, 2 )