General FizzBuzz: Difference between revisions
m
→{{header|Haskell}}
(→{{header|Haskell}}: Tidied.) |
|||
Line 1,408:
----------------- FIZZETC (USING RULE SET) ---------------
fizzEtc :: [
fizzEtc rules
where
nextLine x a
Line 1,422:
------------------- TEST OF SAMPLE RULES -----------------
▲testFizz :: Int -> [String]
▲testFizz = fizzEtc [(3, "Fizz"), (5, "Buzz"), (7, "Baxx")]
main :: IO ()
main = mapM_ putStrLn
</lang>
{{Out}}
<pre>1
|