fromUTCBaseTime :: Maybe UTCTime -> Builder
fromUTCBaseTime Nothing = mconcat $ replicate 3 (fromIntegerVLC 0)
fromUTCBaseTime :: Maybe UTCTime -> Builder
fromUTCBaseTime Nothing = mconcat $ replicate 3 (fromIntegerVLC 0)
fromUTCBaseTime Nothing = mconcat $ replicate 3 (fromIntegerVLC 0)