diff options
| author | Son HO | 2024-04-05 14:15:55 +0200 |
|---|---|---|
| committer | GitHub | 2024-04-05 14:15:55 +0200 |
| commit | d8650bfc5c4dc78fda13953dac93c9e6c24489d1 (patch) | |
| tree | 314cf0e4f161c3d6038fb5d310c4b85aad495ac1 /backends/lean/Base/Primitives/ArraySlice.lean | |
| parent | 061d7f72bec27de46245afc82149271ca8c75627 (diff) | |
| parent | 65a77968d0abc2d01da92aa8982256855e7519a6 (diff) | |
Merge pull request #114 from AeneasVerif/son/lean-version
Bump the version of Lean to 4.7.0
Diffstat (limited to 'backends/lean/Base/Primitives/ArraySlice.lean')
| -rw-r--r-- | backends/lean/Base/Primitives/ArraySlice.lean | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/backends/lean/Base/Primitives/ArraySlice.lean b/backends/lean/Base/Primitives/ArraySlice.lean index e1a39d40..3bd2aebb 100644 --- a/backends/lean/Base/Primitives/ArraySlice.lean +++ b/backends/lean/Base/Primitives/ArraySlice.lean @@ -2,7 +2,6 @@ import Lean import Lean.Meta.Tactic.Simp import Init.Data.List.Basic -import Mathlib.Tactic.RunCmd import Mathlib.Tactic.Linarith import Base.IList import Base.Primitives.Scalar @@ -269,7 +268,7 @@ def Array.update_subslice (α : Type u) (n : Usize) (a : Array α n) (r : Range . scalar_tac . scalar_tac let na := s_beg.append (s.val.append s_end) - have : na.len = a.val.len := by simp [*] + have : na.len = a.val.len := by simp [na, *] ret ⟨ na, by simp_all [← List.len_eq_length]; scalar_tac ⟩ else fail panic @@ -343,7 +342,7 @@ def Slice.update_subslice (α : Type u) (s : Slice α) (r : Range Usize) (ss : S . scalar_tac . scalar_tac let ns := s_beg.append (ss.val.append s_end) - have : ns.len = s.val.len := by simp [*] + have : ns.len = s.val.len := by simp [ns, *] ret ⟨ ns, by simp_all [← List.len_eq_length]; scalar_tac ⟩ else fail panic |