diff package:formatting

diff :: RealFrac n => Bool -> Format r (n -> r)
formatting Formatting.Time
Display a time span as one time relative to another. Input is assumed to be seconds. Typical inputs are NominalDiffTime and DiffTime.
diffComponents :: RealFrac n => Format r (n -> r)
formatting Formatting.Time
Display seconds in the following pattern: 00:00:00:00, which ranges from days to seconds.
customDiffComponents :: RealFrac n => (forall r' . Format r' (Integer -> Integer -> Integer -> Integer -> r')) -> Format r (n -> r)
formatting Formatting.Time
Variation of diffComponents, which lets you explicitly specify how to render each component.