RosettaCodeData/Task/Loops-Do-while/Haskell/loops-do-while-2.hs

8 lines
65 B
Haskell
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
*Main> mapM_ print $ doWhile ((/=0).(`mod`6)) succ 0
0
1
2
3
4
5