4CLJ - Set intersection