diff options
author | HJ <thechairman@thechairman.info> | 2023-12-25 11:24:39 -0500 |
---|---|---|
committer | HJ <thechairman@thechairman.info> | 2023-12-25 11:24:39 -0500 |
commit | 40eb8465f7958ac056a3843d38234848b15464f7 (patch) | |
tree | 6a22b862107f219c6b1c354c4ac70792e9d41ce8 /aoc2023-other/day-06/day-06.rkt | |
parent | f3dfb53b1d59febe1f3bac746150372362f313a9 (diff) | |
download | gleam_aoc-40eb8465f7958ac056a3843d38234848b15464f7.tar.gz gleam_aoc-40eb8465f7958ac056a3843d38234848b15464f7.zip |
day 1-24 end-of-year style cleanup
Diffstat (limited to 'aoc2023-other/day-06/day-06.rkt')
-rw-r--r-- | aoc2023-other/day-06/day-06.rkt | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/aoc2023-other/day-06/day-06.rkt b/aoc2023-other/day-06/day-06.rkt index 399c131..53ca9ee 100644 --- a/aoc2023-other/day-06/day-06.rkt +++ b/aoc2023-other/day-06/day-06.rkt @@ -1,8 +1,7 @@ #lang racket (require advent-of-code - threading - ) + threading) (match-define (list times distances) (~> (open-aoc-input (find-session) 2023 6 #:cache #true) port->lines)) @@ -20,7 +19,8 @@ (find-bound rtime dist rtime -1)) (for/fold ([acc 1]) - ([race-time (in-list (get-numbers times))] [distance (in-list (get-numbers distances))]) + ([race-time (in-list (get-numbers times))] + [distance (in-list (get-numbers distances))]) (* acc (add1 (- (upper-bound race-time distance) (lower-bound race-time distance))))) ;; part 2 |