chore: missing @[grind] annotation for Array
diff --git a/src/Init/Data/Array/Basic.lean b/src/Init/Data/Array/Basic.lean index 512abd7..41b70b9 100644 --- a/src/Init/Data/Array/Basic.lean +++ b/src/Init/Data/Array/Basic.lean
@@ -112,7 +112,7 @@ rw [Array.mem_def, ← getElem_toList] apply List.getElem_mem -@[simp] theorem emptyWithCapacity_eq {α n} : @emptyWithCapacity α n = #[] := rfl +@[simp, grind =] theorem emptyWithCapacity_eq {α n} : @emptyWithCapacity α n = #[] := rfl @[simp] theorem mkEmpty_eq {α n} : @mkEmpty α n = #[] := rfl
diff --git a/src/Init/Data/Array/Lemmas.lean b/src/Init/Data/Array/Lemmas.lean index b8ac56f..93193aa 100644 --- a/src/Init/Data/Array/Lemmas.lean +++ b/src/Init/Data/Array/Lemmas.lean
@@ -182,7 +182,7 @@ · simp at h simp [getElem_push_lt, Nat.le_antisymm (Nat.le_of_lt_succ h) (Nat.ge_of_not_lt h')] -theorem getElem?_push {xs : Array α} {x} : (xs.push x)[i]? = if i = xs.size then some x else xs[i]? := by +@[grind =] theorem getElem?_push {xs : Array α} {x} : (xs.push x)[i]? = if i = xs.size then some x else xs[i]? := by simp [getElem?_def, getElem_push] (repeat' split) <;> first | rfl | omega