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-21/day-21.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-21/day-21.rkt')
| -rw-r--r-- | aoc2023-other/day-21/day-21.rkt | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/aoc2023-other/day-21/day-21.rkt b/aoc2023-other/day-21/day-21.rkt index 8d73a7f..b5478eb 100644 --- a/aoc2023-other/day-21/day-21.rkt +++ b/aoc2023-other/day-21/day-21.rkt @@ -27,7 +27,9 @@ (for ([neighbor (in-list (neighbors cons))] #:when (hash-has-key? g neighbor)) (hash-set! update neighbor 'on))) (hash-union! g update #:combine/key (λ (_k _v v) v))) - (for/fold ([_ void] #:result (~>> g hash-values (count (curry equal? 'on)))) ([i (in-range n)]) + (for/fold ([_ void] + #:result (~>> g hash-values (count (curry equal? 'on)))) + ([i (in-range n)]) (displayln i) (make-one-step))) |