diff options
author | Hunky Jimpjorps <thechairman@thechairman.info> | 2022-12-06 13:06:18 -0500 |
---|---|---|
committer | Hunky Jimpjorps <thechairman@thechairman.info> | 2022-12-06 13:06:18 -0500 |
commit | 1012f0145986ec742519857e0ea810924e3e15e9 (patch) | |
tree | 7ac91af01ddf3cb4a09c20be26fca9b2353ea763 /2022 | |
parent | f5cd4dfa7d3bcdfcc18312d2ca55a476dca956b5 (diff) | |
download | gleam_aoc-1012f0145986ec742519857e0ea810924e3e15e9.tar.gz gleam_aoc-1012f0145986ec742519857e0ea810924e3e15e9.zip |
day 6 cleanup
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)) |