Weak attempt at rationalizing naming scheme
CL function find-if more concise.