F#入門

F#はじめました。とりあえずFizzBuzz。

let fizzbuzz1 (tgt : int) =
    [1..tgt]
    |> List.map
        (fun n -> if n % 15 = 0
                  then printf "FizzBuzz\n"
                  else if n % 5 = 0
                  then printf "Buzz\n"
                  else if n % 3 = 0
                  then printf "Fizz\n"
                  else printf "%d\n" n)
    |> ignore

let fizzbuzz2 (tgt : int) =
    [1..tgt]
    |> List.iter
        (fun n ->
            match n with
             | _ when n % 15 = 0 -> printf "FizzBuzz\n"
             | _ when n % 5 = 0 -> printf "Buzz\n"
             | _ when n % 3 = 0 -> printf "Fizz\n"
             |_ -> printf "%d\n" n)
    |> ignore

いちおうプログラミングF#は流し読みしたけれど、 9割がた抜け落ちてるのでコードを書きつつ読み直してみる。