将double转换为UTCTime

Question

标题就是全部。

假设我有一个替身：

let d = 11241241.10124012 :: Double

如何获取对应于unix秒中的d，d的UTCTime实例？

Answer 1

您需要将双精度数转换为小数，以便将其理解为NominalDiffTime值(这是Fractional的一个实例)。一旦它被理解为NominalDiffTime值，那么posixSecondsToUTCTime将处理转换(POSIXTime是NominalDiffTime的类型同义词)。

import Data.Time.Clock
import Data.Time.Clock.POSIX(posixSecondsToUTCTime)

doubleToUTCTime d = posixSecondsToUTCTime $ realToFrac d