Arvorezinha em HASKELL
Pois bem, depois de seguir atentamente os posts do falso com coisas completamente inúteis… Resolvi fazer a arvore em HASKELL.
Sem mais demoras aqui fica:
-- THIS HASKELL CODE CAN NEVER FAIL
module Main where
main = do putStr (unlines (take 5 (iterate('*':) "*")))
putStrLn "2nd version:"
putStr . unlines . take 5 . iterate ('*' :) $ "*" -- 2nd version
Como podem ver até é bem simples…
Podem instalar o compilador com:
sudo apt-get install ghc6sudo apt-get install haskell-mode
Compilar com:
ghc –make -O2 arvore.hs -o arvorehs
Ou mesmo utilizar o prelude que é bem fixe:
ghci
Versão optimizada por Ashes:
arvore n = (take n (cycle ['*']))
arvorezinha n = putStr (unlines (map arvore [0..n]) )
3 comentários a “Arvorezinha em HASKELL”
(1..5).map { |i| puts ?**i }