aboutsummaryrefslogtreecommitdiff
path: root/aoc2023-other/day-24/day-24b.rkt
diff options
context:
space:
mode:
Diffstat (limited to 'aoc2023-other/day-24/day-24b.rkt')
-rw-r--r--aoc2023-other/day-24/day-24b.rkt4
1 files changed, 2 insertions, 2 deletions
diff --git a/aoc2023-other/day-24/day-24b.rkt b/aoc2023-other/day-24/day-24b.rkt
index a173a98..f14cc94 100644
--- a/aoc2023-other/day-24/day-24b.rkt
+++ b/aoc2023-other/day-24/day-24b.rkt
@@ -10,11 +10,11 @@
(define input (fetch-aoc-input (find-session) 2023 24 #:cache #true))
(define (->struct f str)
- (~> str (string-split ",") (map (λ~> string-trim string->number) _) (apply f _)))
+ (~> str (string-split _ ",") (map (λ~> string-trim string->number) _) (apply f _)))
(define (parse-hail-record str)
(match-define (list p v) (string-split str " @ "))
- (hail (->struct p posn) (->struct v vel)))
+ (hail (->struct posn p) (->struct vel v)))
(define hail-paths
(for/list ([hail (in-list (string-split input "\n"))] ;