n queens in haskell using permutations