Skip to content

Instantly share code, notes, and snippets.

@Qata
Created December 21, 2015 04:31
Show Gist options
  • Save Qata/a50f940c3b41b4269ca2 to your computer and use it in GitHub Desktop.
Save Qata/a50f940c3b41b4269ca2 to your computer and use it in GitHub Desktop.
let numbers = map show [1..100]
let fizzes = cycle $ (take 4 $ repeat "") ++ ["FIZZ"]
let buzzes = cycle $ (take 2 $ repeat "") ++ ["BUZZ"]
let fizzbuzzes = zipWith (++) fizzes buzzes
zipWith (max) numbers fizzbuzzes
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment