如何定义生成给定列表的所有旋转的旋转函数?
例如:旋转 [1,2,3,4] =[[1,2,3,4],[2,3,4,1],[3,4,1,2],[4,1,2,3]]
[1,2,3,4] =[[1,2,3,4],[2,3,4,1],[3,4,1,2],[4,1,2,3]]
我写了一个可以重新排列顺序的shift函数
shift ::[Int]->[Int] shift x=tail ++ take 1 x
但我不知道如何生成这些新数组并将它们附加在一起.
haskell
haskell ×1