MinimumDistOtherBoxesPoints Subroutine

public recursive subroutine MinimumDistOtherBoxesPoints(Point, tree, BandRegion, Radius, New_sqrDist, PointsIndex, LeafIndex, new_index)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rp),	intent(in)			::	Point(:)
type(KDtree),	intent(inout)			::	tree
type(IBMpoints),	intent(in)			::	BandRegion
real(kind=rp),	intent(in)			::	Radius
real(kind=rp),	intent(inout)			::	New_sqrDist
integer,	intent(in)			::	PointsIndex(:)
integer,	intent(in)			::	LeafIndex
integer,	intent(inout)			::	new_index