F#でFizzBuzz問題

いろんな所で取り上げられてるプログラミングの初歩の初歩ですが…
F#でFizzBuzz問題解くならこんな感じかなぁ。

let FizzBuzz =
    seq {1..100}
    |> Seq.iter (fun x ->
        match x % 3, x % 5 with
           | 0, 0 -> printfn "FizzBuzz"
           | 0, _ -> printfn "Fizz"
           | _, 0 -> printfn "Buzz"
           | _ -> printfn "%d" x)

SyntaxHighlighterがF#対応してないね。
見づらくてごめんよ。