Class Collection
back
reject: testBlock
^ self select: [:x | (testBlock value: x) not ]