Type TColTree Abstract

	Field created=False

	Field x#,y#,z# ' mid point of quadrant
	Field w#,h#,d#

	Field child:TColTree[]
	Field leaf_polys:TPolygon[]

	Method ClearTree() Abstract
	Method CreateTree(mesh:TMesh,max_polys,max_levels) Abstract
	Method Create(polys:TPolygon[],max_polys,max_levels,level=0) Abstract
	Method TreePolysBox:TPolygon[](ax1:Float,ay1:Float,az1:Float,ax2:Float,ay2:Float,az2:Float,polys:TPolygon[]=Null) Abstract
	Method TreePolysLine:TPolygon[](ax:Float,ay:Float,az:Float,bx:Float,by:Float,bz:Float,polys:TPolygon[]=Null) Abstract

End Type