Intersection[tes1, tes2] >{{0, 2}, {1, 2}} Select[tes1, MemberQ[tes2, #] &] > {{1, 2}, {0, 2}}