Date.fromTime : Time -> Date

This will enable us to get a Date, from current system Time:

    main = (asText . Date.second) <~ (lift Date.fromTime (every second))

Motivation: https://groups.google.com/forum/#!topic/elm-discuss/-xDlPR1IbZs