aboutsummaryrefslogtreecommitdiff
path: root/2022
diff options
context:
space:
mode:
authorHunky Jimpjorps <thechairman@thechairman.info>2022-12-06 13:06:18 -0500
committerHunky Jimpjorps <thechairman@thechairman.info>2022-12-06 13:06:18 -0500
commit1012f0145986ec742519857e0ea810924e3e15e9 (patch)
tree7ac91af01ddf3cb4a09c20be26fca9b2353ea763 /2022
parentf5cd4dfa7d3bcdfcc18312d2ca55a476dca956b5 (diff)
downloadgleam_aoc-1012f0145986ec742519857e0ea810924e3e15e9.tar.gz
gleam_aoc-1012f0145986ec742519857e0ea810924e3e15e9.zip
day 6 cleanup
Diffstat (limited to '2022')
-rw-r--r--2022/day-06/day-06.ipynb3
-rw-r--r--2022/day-06/day-06.rkt3
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))