Não consigo encontrar uma maneira eficaz de escolher todas as permutações de 4 elementos de uma lista de 9 elementos em Haskell. O caminho python para fazer a mesma coisa:

itertools.permutations(range(9+1),4)

Uma maneira não tão eficaz de fazer isso em Haskell:

nub . (map (take 4)) . permutations $ [1..9]

Eu gostaria de encontrar algo como:

permutations 4 [1..9]