fizz buzz with f#

gistfile1.fs

module FizzBuzz

let fizzbuzzNumberProc x =
    if x % 15 = 0 then "FizzBuzz"
    elif x % 3 = 0 then "Fizz"
    elif x % 5 = 0 then "Buzz"
    else x.ToString ()

let fizzbuzzNumber x =
    match x with
        | x when x % 15 = 0 -> "FizzBuzz"
        | x when x % 3 = 0 -> "Fizz"
        | x when x % 5 = 0 -> "Buzz"
        | _ -> x.ToString ()
    

let fizzbuzz = 
    List.map (fizzbuzzNumber) [1..100]