RosettaCodeData/Task/FizzBuzz/Haskell/fizzbuzz-4.hs

fizzBuzz :: Int -> String
fizzBuzz x
    | x `mod` 5 == 0 && x `mod` 3 == 0 = "FizzBuzz"
    | x `mod` 5 == 0 = "Buzz"
    | x `mod` 3 == 0 = "Fizz"
    | otherwise = show x