title: Instance of Fractional Int required for definition
body: <pre><code>time :: Int -&gt; (Int,Int,Int)
  time x = ((x/3600),(x`mod`3600)/60,((x`mod`3600)`mod`60))   
  </code></pre>
  
  <p>Instance of Fractional Int required for definition of time</p>
  
  <p>expample = </p>
  
  <p>time x = (hours, minutes, seconds)</p>
  
  <p>time 3600 = (1,0,0)</p>
  
  <p>given a time in seconds, must show it like this (hours, minutes, seconds) in the example 3600 is 1h 0m 0s  </p>