はじめてのHaskellプログラム - FizzBuzz

fizzBuzz.hs

fizzBuzz :: Int -> String
fizzBuzz n
  | isFizzBuzz n = "FizzBuzz"
  | isFizz n = "Fizz"
  | isBuzz n = "Buzz"
  | otherwise = show n
  where isFizz n = (n `mod` 3 == 0)
        isBuzz n = (n `mod` 5 == 0)
        isFizzBuzz n = isFizz n && isBuzz n