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-09/day-09-polynomial.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-09/day-09-polynomial.rkt')
| -rw-r--r-- | aoc2023-other/day-09/day-09-polynomial.rkt | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/aoc2023-other/day-09/day-09-polynomial.rkt b/aoc2023-other/day-09/day-09-polynomial.rkt index 31c0d3d..5bacb1f 100644 --- a/aoc2023-other/day-09/day-09-polynomial.rkt +++ b/aoc2023-other/day-09/day-09-polynomial.rkt @@ -6,8 +6,12 @@ (define histories (for/list ([raw-history (in-lines (open-aoc-input (find-session) 2023 9 #:cache #true))]) - (~>> raw-history string-split (map string->number)))) + (~>> raw-history + string-split + (map string->number)))) -(for/lists (left right #:result (cons (apply + left) (apply + right)))([history (in-list histories)]) +(for/lists (left right #:result (cons (apply + left) (apply + right))) + ([history (in-list histories)]) (define f (interpolate-at-integer-points history)) - (values (f -1) (f (length history)))) + (values (f -1) + (f (length history)))) |