Help for this page
a intersecton: b. (intersection a b)
c := b asSet. a select: [:element | b includes: element].