Simplify rect-intersects? procedure.