do記法の中でletやlet ... inを使ったサンプル

lets-in-do.hs

main = do
  -- let ... in を使った場合
  let f :: String -> IO ()
      f = putStrLn
   in f "f"
  -- ただの let を使った場合（こっちの方が大抵おすすめ！）
  let g :: String -> IO ()
      g = putStrLn
  g "g"