スタートHaskell 2 第2回目演習　FizzBuzz

fizzBuzz.hs

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