Haskellでfizzbuzz

Haskellの勉強を再開したのでなんとなく書いてみた。

[if x `mod` 15 == 0 then "fizzbazz" else if x `mod` 3 == 0 then "fizz" else if x `mod` 5 == 0 then "buzz" else show x |x <- [1..100]]

全然Haskellっぽくない！！

fizzbuzz :: Int -> String
fizzbuzz x
	| x `mod` 15 == 0 = "fizzbuzz"
	| x `mod`  3 == 0 = "fizz"
	| x `mod`  5 == 0 = "buzz"
	| otherwise = show x
[fizzbuzz x | x <- [1..100]]

ちょっとそれっぽくなったかな。
随時武器が増えるたびに書き足していこう。

ちなみにテキストはこれ使ってます。たのしい。

すごいHaskellたのしく学ぼう!