1 files changed, 5 insertions, 7 deletions
diff --git a/2021/day-07/day-07.rkt b/2021/day-07/day-07.rkt
index 81a2e4f..89d5009 100644
--- a/2021/day-07/day-07.rkt
+++ b/2021/day-07/day-07.rkt
@@ -10,21 +10,19 @@
       (string-split ",")
       (map string->number _)))
 
-(define (gauss-sum n) (/ (* n (+ n 1)) 2))
+(define (gauss-sum n)
+  (/ (* n (+ n 1)) 2))
 (define (compute-fuel-use f crabs align-to)
-  (for/sum ([crab (in-list crabs)])
-    (f (abs (- crab align-to)))))
+  (for/sum ([crab (in-list crabs)]) (f (abs (- crab align-to)))))
 
 ;; using the fact that the optimum location is at the median
 ;; of the crabs' starting location for the linear relationship
 ;; and at a coordinate within 1 unit of the mean for the quadratic one
 
-(~>> crab-data
-     (median <)
-     (compute-fuel-use identity crab-data))
+(~>> crab-data (median <) (compute-fuel-use identity crab-data))
 
 (~>> crab-data
      mean
      ((λ (m) (list (floor m) (ceiling m))))
      (map (curry compute-fuel-use gauss-sum crab-data))
-     (apply min))
-\ No newline at end of file
+     (apply min))