main :: IO ()
main = do
    putStrLn greeting
    printSecond greeting
    where greeting = "Yarrrrr"
main :: IO ()
main = do
    putStrLn greeting
    printSecond greeting
    where greeting = "Yarrrrr"
main = do
    putStrLn greeting
    printSecond greeting
    where greeting = "Yarrrrr"