gistfile1.txt

proc strat1(guards: Table[int, GuardSchedule]) =
  var bestGuard = -1
  for k, v in guards.pairs:
    if bestGuard != -1:
      let oldSum = foldl(guards[bestGuard], a + b)
      let newSum = foldl(v, a + b)
      if newSum <= oldSum:
        continue
    bestGuard = k
  echo "Guard #", bestGuard, " slept the most"

  let bestGuardSchedule = guards[bestGuard]
  var bestMinute = 0
  for i in 1..59:
    if bestGuardSchedule[i] > bestGuardSchedule[bestMinute]: bestMinute = i
  echo "This guard slept the most in minute ", bestMinute  
  echo bestGuard * bestMinute