Data.List: add permutations