center point of overlapping bounding boxes

Tue Oct 11, 2011 3:36 pm   

Hi,

Given to bBoxes that intersect I want to find the center point of the
two. Where do I start?

Thank you,
Eric

Fri Nov 11, 2011 3:07 pm   

PolyPusher wrote, on 10/11/11 14:36:

Eric

procedure(abMultiBoxCenter(@rest boxes)
centerBox(
list(apply('mapcar 'min mapcar('lowerLeft boxes))
apply('mapcar 'max mapcar('upperRight boxes))
)
)
)

You can then do:

abMultiBoxCenter(bBox1 bBox2)

(or indeed abMultiBoxCenter(bBox1 bBox2 bBox3 bBox4...) if you wanted).

Andrew.