FizzBuzz in Haskell

fizzbuzz.hs

--Tells us if x is divisible by y
divby :: (Integral x) => x -> x -> Bool
divby x y = 
  (x `mod` y) == 0

--Internal function that returns output for a single number
isfizzbuzz :: (Integral x) => x -> String
isfizzbuzz x 
	| divby x 3 &&  divby x 5 = "FizzBuzz"
	| divby x 3 = "Fizz"
	| divby x 5 = "Buzz"
	| otherwise = show x

--Method that returns FizzBuzz output on a list of numbers
fizzbuzz :: (Integral x) => [x] -> [String]
fizzbuzz x = 
	map isfizzbuzz x