フィボナッチ数列でFizzBuzz with Haskell

FizzBuzzをフィボナッチ数列で行うコードをHaskellで書いてみました。
特に意味はないテスト投稿です。

import Control.Monad (forM_)

fib :: [Integer]
fib = 0 : 1 : 1 : [ fib !! (n-2) + fib !! (n-1) | n <- [3..] ]

main :: IO ()
main = forM_ [1..100] $ \i -> do
    putStr $ show i ++ ": "
    print $ fib !! i

表題のwithの使い方合ってるかな…？