(% +d-time +-
    (% internal +-
        {integer : 2^16} year
        {integer : 2^8} month day
        {integer : 2^8} hours mins seconds

        {integer : 2^8} flags
    )

    (% timestamp +-
        {#1} #2
    )

    {internal, timestamp} _
)

(% datetime : +-
    d-time [milliseconds, integer : 2^64]
)
