diff options
Diffstat (limited to '2022')
| -rw-r--r-- | 2022/day-06/day-06.ipynb | 3 | ||||
| -rw-r--r-- | 2022/day-06/day-06.rkt | 3 |
2 files changed, 2 insertions, 4 deletions
diff --git a/2022/day-06/day-06.ipynb b/2022/day-06/day-06.ipynb index 3468d68..0c89fa1 100644 --- a/2022/day-06/day-06.ipynb +++ b/2022/day-06/day-06.ipynb @@ -22,7 +22,6 @@ "source": [ "(require racket\n", " advent-of-code\n", - " (only-in relation ->list)\n", " (only-in algorithms sliding))\n" ] }, @@ -64,7 +63,7 @@ " (match type\n", " ['start-of-packet 4]\n", " ['start-of-message 14]))\n", - " (for/first ([chunk (in-list (sliding (->list data) n))]\n", + " (for/first ([chunk (in-list (sliding (string->list data) n))]\n", " [i (in-naturals n)]\n", " #:when (= n (~> chunk remove-duplicates length)))\n", " i))\n", diff --git a/2022/day-06/day-06.rkt b/2022/day-06/day-06.rkt index 89b8075..1c167a6 100644 --- a/2022/day-06/day-06.rkt +++ b/2022/day-06/day-06.rkt @@ -1,7 +1,6 @@ #lang racket (require advent-of-code - (only-in relation ->list ->set) (only-in algorithms sliding)) (define buffer (fetch-aoc-input (find-session) 2022 6)) @@ -11,7 +10,7 @@ (case type [(start-of-packet) 4] [(start-of-message) 14])) - (for/first ([chunk (in-list (sliding (->list data) n))] + (for/first ([chunk (in-list (sliding (string->list data) n))] [i (in-naturals n)] #:unless (check-duplicates chunk)) i)) |