Функция Haskell, которая принимает один аргумент и выводит строку на вывод

Question

Сейчас я изучаю haskell. Теперь я хочу написать функцию, которая принимает один аргумент (например, Int), печатает некоторую строку на выходе и возвращает этот аргумент. Я пытаюсь сделать что-то вроде этого:

test :: Int -> Int 
test h = do 
     putStrLn "Here will be number!" 
     h 

main = print $ test 200 

Теперь я получаю такую ​​ошибку:

Couldn't match expected type `Int' with actual type `m0 b0' 
Expected type: m0 a0 -> m0 b0 -> Int 
    Actual type: m0 a0 -> m0 b0 -> m0 b0 
In a stmt of a 'do' block: h 
In the expression: 
    do { putStrLn "Here will be number!"; 
     h } 

Есть ли способ осуществить то, что я хочу?

Answer 1

Поскольку тест производит выходные данные, видимые пользователю, он должен вернуть IO Int, а не Int. Посмотрите на introduction to IO на вики Haskell.

Answer 2

test :: Int -> IO() 
test n = putStrLn (show n) 

main :: IO() 
main = test 200