diff --git a/haskell.html.markdown b/haskell.html.markdown
index c909880d..01b7e1fe 100644
--- a/haskell.html.markdown
+++ b/haskell.html.markdown
@@ -307,6 +307,7 @@ Just 1
main :: IO ()
main = putStrLn "Hello, sky! " ++ (say Blue)
+-- putStrLn has type putStrLn :: String -> IO()
-- It is easiest to do IO if you can implement your program as
-- a function from String to String.