Skip to content

Instantly share code, notes, and snippets.

@chregon

chregon/fzbz.hs

Last active September 17, 2020 17:17
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save chregon/90fbe3aad639c18e4b327b4735223e3c to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save chregon/90fbe3aad639c18e4b327b4735223e3c to your computer and use it in GitHub Desktop.
Download ZIP
fzbz.hs
Raw
fzbz.hs
l = (\x y a b -> if mod x y == 0 then a else b)
f = map snd [(i,l i 5 (l i 3 "fizzbuzz" "buzz") (l i 3 "fizz" $ show i)) | i <- [1..]]
@chregon
Copy link
Copy Markdown
Author

chregon commented Sep 17, 2020

unreadable by design

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment