aboutsummaryrefslogtreecommitdiff
path: root/src/View/Time.elm
blob: 363a0b67e143f230a777cca78455639c105fca09 (plain)
1
2
3
4
5
6
7
8
9
10
module View.Time
  ( timeView
  ) where

import Time (Time)

timeView : Time -> String
timeView time =
  let s = truncate (time / 1000)
  in  (toString s) ++ " seconds"