Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
FizzBuzzkell
--ghc 7.10 divisibleBy denominator number = number `mod` denominator == 0 ifTrueThat content condition value | condition value = content | otherwise = "" concatenate f1 f2 value = f1 value ++ f2 value orTransform number transform | transform number == "" = show number | otherwise = transform number numberOrFizzBuzz number = number `orTransform` (("Fizz" `ifTrueThat` (divisibleBy 3)) `concatenate` ("Buzz" `ifTrueThat` (divisibleBy 5))) main = print [numberOrFizzBuzz x | x <- [1..100]]
run
|
edit
|
history
|
help
0
Token
mapper
Sierpinski Triangle as lazy list
Traversable
Fibonacci proof
pascal triangle
State
=)
(⁄⁄>⁄▽⁄<⁄⁄)
Factors of a number, prime numbers