diff options
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))) |