如何使用 Haskell 中的 thyme 庫從 Int 值創建 UTCTime？

Question

我有一個年、月、日、小時和分鍾值（所有這些都是Int類型）-我如何將這些轉換為UTCTime或UniversalTime ？

Answer 1

需要以下導入：

import Control.Lens
import Data.Thyme.Clock
import Data.Thyme.Calendar

進而：

makeUtcTime :: Year -> Month -> DayOfMonth -> Int -> UTCTime
makeUtcTime y m d x =  UTCTime ((YearMonthDay y m d)^.from gregorian) (toEnum x) ^. from utcTime

在ghci內：

:t makeUtcTime 2020 1 1 9143892431
makeUtcTime 2020 1 1 9143892431 :: UTCTime

（也許有更簡單的方法，但這還不算太糟糕）