diff options
| author | Joris Guyonvarch | 2015-03-08 13:26:52 +0100 |
|---|---|---|
| committer | Joris Guyonvarch | 2015-03-08 13:29:01 +0100 |
| commit | 97e494a7c5a105bba6a48f5025e71a376fc8673d (patch) | |
| tree | 9cd83b9fedfa4787e6237fadce4dfd2d43faa0d6 /src/View/Time.elm | |
| parent | 6c1f5e10631a3f66f4c85a45b6f28ffd366105c5 (diff) | |
| download | catchvoid-97e494a7c5a105bba6a48f5025e71a376fc8673d.tar.gz catchvoid-97e494a7c5a105bba6a48f5025e71a376fc8673d.tar.bz2 catchvoid-97e494a7c5a105bba6a48f5025e71a376fc8673d.zip | |
Save round durations
Diffstat (limited to 'src/View/Time.elm')
| -rw-r--r-- | src/View/Time.elm | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/src/View/Time.elm b/src/View/Time.elm new file mode 100644 index 0000000..363a0b6 --- /dev/null +++ b/src/View/Time.elm @@ -0,0 +1,10 @@ +module View.Time + ( timeView + ) where + +import Time (Time) + +timeView : Time -> String +timeView time = + let s = truncate (time / 1000) + in (toString s) ++ " seconds" |