hs-irc/Main.hs

module Main where

main :: IO ()
main = cena

cena :: IO ()
cena = putStrLn "ganda cena mano"