knzm · August 23, 2012 11:02
diff --git a/fizzbuzz.hs b/fizzbuzz.hs
 fizzbuzz x
 | (mod x 15 == 0) = "FizzBuzz"
 | (mod x  3 == 0) = "Fizz"
 | (mod x  5 == 0) = "Buzz"
 | otherwise       = show x

 main = print $ take 100 $ map fizzbuzz [1..]
	fizzbuzz x
	\| (mod x 15 == 0) = "FizzBuzz"
	\| (mod x 3 == 0) = "Fizz"
	\| (mod x 5 == 0) = "Buzz"
	\| otherwise = show x

	main = print $ take 100 $ map fizzbuzz [1..]
No results found