aboutsummaryrefslogtreecommitdiff
path: root/LeanAStar
diff options
context:
space:
mode:
authorAndreas Grois <andi@grois.info>2025-11-16 13:47:12 +0100
committerAndreas Grois <andi@grois.info>2025-11-16 13:47:12 +0100
commit7480e42e0a7ef6631b01fb7208b2b3b9c7fcc354 (patch)
tree8c6b0356c792c9767a6a19b4028b65afe5d42c88 /LeanAStar
parent2539ac49ab6af74b31d91e03d7dbfceedc9c1f02 (diff)
Lean 4.23
Diffstat (limited to 'LeanAStar')
-rw-r--r--LeanAStar/Finite.lean2
-rw-r--r--LeanAStar/HashSet.lean2
2 files changed, 2 insertions, 2 deletions
diff --git a/LeanAStar/Finite.lean b/LeanAStar/Finite.lean
index cbd8ee3..e028cf6 100644
--- a/LeanAStar/Finite.lean
+++ b/LeanAStar/Finite.lean
@@ -164,7 +164,7 @@ protected theorem Finite.set_worker_size (α : Type u) [Finite α] [BEq α] [Has
split
case h_1 m isLt he =>
simp at he
- simp[Std.HashSet.size_insert, Std.HashSet.mem_iff_contains, h₂, he]
+ simp[Std.HashSet.size_insert, h₂, he]
case h_2 m isLt he =>
simp
have h₄ : m < n := have : n = m.succ := Fin.val_eq_of_eq he; this.substr (Nat.lt_succ_self m)
diff --git a/LeanAStar/HashSet.lean b/LeanAStar/HashSet.lean
index 87f351a..31691ed 100644
--- a/LeanAStar/HashSet.lean
+++ b/LeanAStar/HashSet.lean
@@ -23,7 +23,7 @@ protected theorem size_le_finite_worker_size (α : Type u) [Finite α] [BEq α]
cases h₄ : set.contains (Finite.nth ⟨0,h₂⟩)
case false =>
have h₅ : ∀(o : Fin (Finite.cardinality α)), Finite.nth o ∉ set := by
- simp[←Bool.not_eq_true, ←HashSet.mem_iff_contains] at h₄
+ simp[←Bool.not_eq_true] at h₄
intro o
cases o
case mk o ho =>