**Paste:**#108420**Author:**1HaskellADay**Language:**Haskell**Channel:**-**Created:**2014-07-30 12:13:45 UTC**Revisions:**- 2014-07-30 18:08:11 UTC #108438 (diff): No title (1HaskellADay)
- 2014-07-30 12:13:45 UTC #108420: ACHTUNG! BlinkenLights (1HaskellADay)

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 | import Data.Time.Clock import Data.Time.LocalTime {-- So, now we can count by unary numbers and also by binary numbers. We are living the high life! What more could we ask for? Well, mo' time, of course! Given the current input UTC time, output, however you see fit, the current time as a binary string of 'digits.' ... whatever 'digits' mean to you, including, possibly, the meaning of the word 'BlinkenLights.' https://en.wikipedia.org/wiki/Blinkenlights --} blinkenLights :: Show a => UTCTime -> a blinkenLights theTime = undefined -- A solution is available at http://lpaste.net/108429 |