haskell - 如何将 UTCTime/NominalDiffTime 格式化为人类可读的表示？

Question

我试过谷歌搜索，但很难找到一个具体的例子，或者我应该为此使用哪些库。

我想格式化 NominalDiffTime 类型的值( NominalDiffTime ) 例如为 05/10/2017 10:10AM .

Answer 1

弄清楚了。我认为由于类型别名存在一些混淆:type POSIXTime = NominalDiffTime ( https://hackage.haskell.org/package/time-1.8.0.3/docs/Data-Time-Clock-POSIX.html#t:POSIXTime )。

import Data.Time.Clock
import Data.Time.Format
import Data.Time.Clock.POSIX

myFormatUtcTime :: UTCTime -> String
myFormatUtcTime = formatTime defaultTimeLocale "%H:%M %d/%m/%Y"

myFormatDiffTime :: NominalDiffTime -> String
myFormatDiffTime = formatTime defaultTimeLocale "%H:%M" . posixSecondsToUTCTime