function - HaskellでputStrLnまたはprintを宣言するにはどうすればよいですか

Question

私の答えは：

関数で印刷を宣言するにはどうすればよいですか?

bisiesto :: Int -> **?**;
bisiesto x = if (x `mod` 4 == 0 && ((x `mod` 100 /= 0) || (x `mod` 400 == 0))) then  print("Es bisiesto") else print("No es bisiesto");

お願いします、誰が私を助けてくれますか? ありがとう。

Answer 1

これは簡略化されたバージョンです（ロジックを変更しました）：

bisiesto :: Int -> IO ()
bisiesto  n | even n = n : print "Es bisiesto"
            | otherwise = print "No es bisiesto"

次のように機能します。

Prelude> bisiesto 2
"Es bisiesto"