wip

mdr · Dec 2, 2024 · a6f0bd7 · a6f0bd7
1 parent 9bc72ba
commit a6f0bd7
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 0 deletions.
diff --git a/Aoc2024/Day02/Solve.lean b/Aoc2024/Day02/Solve.lean
@@ -18,6 +18,9 @@ private def decreasingSlowly: HashSet Int := HashSet.ofList [-1, -2, -3]
 private def isSubsetOf [Hashable α] [BEq α] (xs: HashSet α) (ys: HashSet α) : Bool :=
   xs.all ys.contains
 
+#guard isSubsetOf (HashSet.ofList [1, 3]) (HashSet.ofList [1, 2, 3]) == true
+#guard isSubsetOf (HashSet.ofList [1, 4]) (HashSet.ofList [1, 2, 3]) == false
+
 private def isSafe (report : Report) : Bool :=
   let diffs := differences report |> HashSet.ofList
   isSubsetOf diffs increasingSlowly || isSubsetOf diffs decreasingSlowly

diff --git a/notes.md b/notes.md
@@ -2,6 +2,7 @@
 * https://github.com/chenson2018/advent-of-code/blob/main/2024/lean/AoC/Day01.lean
 * https://github.com/kiranandcode/lean-aoc/blob/main/Solutions/Day1.lean
 * https://github.com/anurudhp/aoc2022/blob/main/Aoc/Day02.lean
+* https://github.com/mfornet/advent-of-code-2024
 
 ## Questions
 * How does this syntax work?