UTCTimeとDay
UTCTime
UTC(Coodinated Universal Time)です、気をつけください。
日を加える(または引く)
NominalDiffTimeは、 \(10^ {-12}\) 秒の精度の時間の長さ
Prelude > :m Data.Time
Prelude Data.Time> now <- getCurrentTime
Prelude Data.Time> addUTCTime ((fromIntegral 86400*1)::NominalDiffTime) now
2021-01-29 19:33:51.379542967 UTC
Prelude Data.Time> addUTCTime ((fromIntegral 86400*(-1))::NominalDiffTime) now
2021-01-27 19:33:51.379542967 UTC
Day
UTCTimeは日と時間部分をもつ
Prelude > :m Data.Time
Prelude Data.Time> now <- getCurrentTime
Prelude Data.Time> utctDay now
2021-01-28
Prelude Data.Time> utctDayTime now
70431.379542967s
Posted on 2021-01-29 04:56:54