如何在Haskell中重复函数列表

Question

我想要有一个循环遍历某些模式的函数的无限列表。例如：[(+), (-), (+), (-), ...]

如果我这样做

fmap repeat [(+), (-)] 

然后我得到的嵌套列表[[a -> a -> a]]。按照这样的模式获得单个无限功能列表的最佳方式是什么？

Answer 1

你所寻找的是cycle :: [a] -> [a]：

cycle [(+),(-)]

类型此表达的是：

Prelude> :t cycle [(+),(-)] 
cycle [(+),(-)] :: Num a => [a -> a -> a] 

cycle接受一个列表[a]和生产，在那里重复给定的列表上，并列表再次。所以cycle [1,2,3]产生[1,2,3,1,2,3,1,2,3,1,...]