We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 5a1181c commit 5be9c98Copy full SHA for 5be9c98
1 file changed
Mathlib/Util/AtomM.lean
@@ -45,7 +45,6 @@ put it in the list of atoms and return the new index, otherwise. -/
45
def AtomM.addAtom (e : Expr) : AtomM Nat := do
46
let c ← get
47
for h : i in [:c.atoms.size] do
48
- have : i < c.atoms.size := h.2
49
if ← withTransparency (← read).red <| isDefEq e c.atoms[i] then
50
return i
51
modifyGet fun c ↦ (c.atoms.size, { c with atoms := c.atoms.push e })
0 commit comments