Intersection[{a, b, a, c}, {d, a, e, b}, {c, a}]