Skip to content

Instantly share code, notes, and snippets.

@truthadjustr

truthadjustr/secsToWeeks.hs

Created August 4, 2018 11:56
Show Gist options
  • Save truthadjustr/1d839e5e57a9037dabdf0576a7f87566 to your computer and use it in GitHub Desktop.
Save truthadjustr/1d839e5e57a9037dabdf0576a7f87566 to your computer and use it in GitHub Desktop.
Download ZIP
secsToWeeks
Raw
secsToWeeks.hs
secsToWeeks secs =
let perMinute = 60
perHour = 60 * perMinute
perDay = 24 * perHour
perWeek = 7 * perDay
in secs / perWeek
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment