anchor.diff:  module Clock
   open System
   
  -type clock = {
  -    hour: int
  -    minute: int
  -}
  +type Clock =
  +    {
  +        Hour: int
  +        Minute: int
  +    }
   
  -let print clock = sprintf "%02i:%02i" clock.hour clock.minute
  +let print clock = sprintf "%02i:%02i" clock.Hour clock.Minute
   
   let convertToTotalMinutes hours minutes = (hours * 60) + minutes
   
  -let normalizeHour (minute:int) = Math.Abs(minute) % 1440
  +let normalizeHour (minute: int) = Math.Abs(minute) % 1440
   
  -let normalizeMinute (minute:int) = Math.Abs(minute) % 60
  +let normalizeMinute (minute: int) = Math.Abs(minute) % 60
   
   let toAnalogHour minute = minute / 60 % 24
   
  
positive.code:     let analogMinute = prepareNegativeMinutes totalMinutes |> toAnalogMinute
      
      {
          hour = analogHour  
          minute = analogMinute
      }
  
  let create hours minutes =
  
negative.code:     |> convertToAnalogClock
  
  let add minutes clock =
      let previousTotalMinutes = (clock.Hour * 60) + clock.Minute
      previousTotalMinutes + minutes
      |> convertToAnalogClock 
  
  let subtract minutes clock =
      let previousTotalMinutes = (clock.Hour * 60) + clock.Minute
      previousTotalMinutes - minutes
      |> convertToAnalogClock 
  
  