This PR ensures `grind` does not fail when applying `injection` to a hypothesis that cannot be cleared because of forward dependencies.
7 lines
208 B
Text
7 lines
208 B
Text
/-!
|
|
`grind` injection step does not fail at `clear`.
|
|
-/
|
|
|
|
example (n m : Nat) (a : Fin n) (b : Fin m) (h : ∃ h : [n] = [m], (List.cons.inj h).1 ▸ a = b) :
|
|
(List.cons.inj h.1).1 ▸ a = b := by
|
|
grind
|