         startTime  (:startTime removedAugTTLessonInfo)
         endTime    (:endTime removedAugTTLessonInfo)
         ttRow      (get-in Timetable [day row])
-        minTimeIdx (time-helper/TIME-INDEX-MIN)
-        maxTimeIdx (time-helper/TIME-INDEX-MAX)]
-
+        minTimeIdx time-helper/TIME-INDEX-MIN
+        maxTimeIdx time-helper/TIME-INDEX-MAX]
+
+    (.log js/console "get-largest-consecutive-time-slot-freed-up-by-lesson")
     [
       ; Find the lesson right before the removed lesson
       (let [immediateTTLessonInfoBefore

        startTime  (:startTime removedAugTTLessonInfo)
        endTime    (:endTime removedAugTTLessonInfo)
        ModulesMap (aget js/window "ModulesMap")
        dayRows    (get-in Timetable [day rowNum])

        ; This is the time range freed up by removal of the lesson
        [lowTimeIdx highTimeIdx]

                       (< dayA dayB)))
                lessonInfoSeq))]

    (.log js/console "Hoo hoo")
    (loop [sortedAugTTLessonInfoSeq
           (sort-lesson-info-seq (exclude-lessons-on-empty-rows
                                   removedAugmentedTTLessonInfoSeq))

           nextLessonInfoVec    []]
      (.log js/console "Inside the loop, the loop")
      (cond (and (empty? sortedAugTTLessonInfoSeq) (empty? nextLessonInfoVec))
            nil

