A library to handle zoned time.
import Time
-- 1970-01-04T13:54:12.123Z
original : ZonedTime
original = fromPosix Time.utc (Time.millisToPosix 309252123)
midnight : ZonedTime
midnight = setToMidnight original
sample : Maybe ZonedTime
sample =
fromGregorianUtc
{ year = 2000
, month = Time.Jun
, day = 10
}
|> Maybe.map (addHours 22)
|> Maybe.map (addMinutes 33)
|> Maybe.map (addSeconds 44)
|> Maybe.map (addMillis 55)
import Time
posix : Maybe Time.Posix
posix =
sample
|> Maybe.map toPosix
zone : Maybe Time.Zone
zone =
sample
|> Maybe.map toZone