clock: Move hints to HINTS.md

exercises/clock/HINTS.md

@@ -0,0 +1,16 @@
+## Hints
+
+To complete this exercise you need to define the data type `Clock`,
+with `Eq`, `Show` and `Num` instances, and implement the functions:
+
+- clockHour
+- clockMin
+- fromHourMin
+- toString
+
+The function `fromInteger`, from `Num`, must convert minutes
+to 24 hour clock time. It is not necessary to have a sensible
+implementation of `abs` or `signum`.
+
+Your can use the provided signatures if you are unsure about the types, but
+don't let them restrict your creativity.

exercises/clock/src/Clock.hs

@@ -1,11 +1,5 @@
 module Clock (clockHour, clockMin, fromHourMin, toString) where
 
--- The task is to create the data type `Clock`, with `Eq`,
--- `Show` and `Num` instances, and implement the functions below.
--- The function `fromInteger`, from `Num`, must converts minutes
--- to 24 hour clock time. It is not necessary to have a sensible
--- implementation of `abs` or `signum`.
-
 clockHour :: Clock -> Int
 clockHour = undefined
 

exercises/clock/test/Tests.hs

@@ -9,11 +9,6 @@ import Clock (fromHourMin, toString)
 main :: IO ()
 main = hspecWith defaultConfig {configFastFail = True} specs
 
--- Clock should define a data type that is an instance of Eq and
--- Num such that the `fromInteger` converts minutes
--- to 24 hour clock time. It is not necessary to have
--- a sensible implementation of `abs` or `signum`.
-
 specs :: Spec
 specs = describe "clock" $ do