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
Knight Journey
project euler 5, haskell
Fibonacci proof
Is Preorder BST
Lambda Parser with long ids
State
hard 1.1
Quicksort in Haskell
Kleintjes
equiv_strings