Comments on: Facebook FizzBuzz

By: Matt Valerio

Matt Valerio — Wed, 28 Jan 2009 22:14:56 +0000

@Claudio — One thing to pay attention to is your unnecessary creation of a linked list [1..n] — very large values of n can cause a lot of memory to be consumed. In this case a sequence expression might be the most efficient route

@Jason — nice!

By: Jason Kikel

Jason Kikel — Tue, 27 Jan 2009 14:39:27 +0000

Unnecessary use of active patterns

let FB n =
    let (|Fizz|Buzz|FizzBuzz|Numeric|) n =
        match n with
        | n when(n % 15 = 0) -> FizzBuzz("FizzBuzz")
        | n when(n % 5 = 0) -> Buzz("Buzz")
        | n when(n % 3 = 0) -> Fizz("Fizz")
        | n -> Numeric(n.ToString())

    let FizzBuzzImpl n =
        match n with
        | FizzBuzz(str)| Buzz(str) | Fizz(str) | Numeric(str) -> printf "%s" str

    [1..n] |> Seq.iter FizzBuzzImpl

By: Art Scott

Art Scott — Sat, 24 Jan 2009 22:34:57 +0000

Hi Claudio.
Clarissmo!
Grazie.
Ciao bene.