Hacker News new | ask | show | jobs
by pja 4749 days ago 

  cycleM x = x `mplus` (cycleM x)

  take 8 $ cycleM [1,2,3]
might be more generic?