2つの日時の差を求める
関数diffUTCTime
2つの日時の差を求めるには関数diffUTCTimeを使います。
code: (haskell)
--- time
:module Data.Time
t1 <- getCurrentTime
t2 <- getCurrentTime
t1
2017-04-07 02:44:45.508774829 UTC
t2
2017-04-07 02:44:53.140380382 UTC
t2 diffUTCTime t1
7.631605553s
関数diffUTCTimeの型は、つぎのようになります。
code: (haskell)
diffUTCTime :: UTCTime -> UTCTime -> NominalDiffTime
型NominalDiffTime
型NominalDiffTimeは型クラスNumやRealFracなどのインスタンスなので、
四則演算や、ほかの数値型への変換ができます。
code: (haskell)
let d1 = it
d1
7.631605553s
t3 <- getCurrentTime
2017-04-07 02:53:16.927440788 UTC
t3 diffUTCTime t2
503.787060406s
d1 + it
511.418665959s
fromRational $ toRational it :: Double
511.418665959
関連項目
UTC時刻とローカルな時刻の変換は、(ここにリンクを置く)を、
現在時刻を取得するには、(ここにリンクを置く)を参照してください。