RosettaCodeData/Task/Loops-For/Haskell/loops-for-2.hs

4 lines
81 B
Haskell
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
import Data.List (inits)
main = mapM_ putStrLn $ tail $ inits $ replicate 5 '*'