c := b asSet.
a select: [:element | b includes: element].