DibyashanuPati/PhysLean
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

refactor: Split files

Browse source
This commit is contained in:
jstoobysmith 2024-12-15 12:42:50 +00:00
parent 625ef5f431
commit dd555b2037
9 changed files with 1721 additions and 1481 deletions
Download patch file Download diff file Expand all files Collapse all files

12
HepLean/Mathematics/List.lean
View file

@ -142,4 +142,16 @@ lemma insertionSort_eq_ofFn {α : Type} {r : α → α → Prop} [DecidableRel r
rw [insertionSortEquiv_get (r := r)]
exact Eq.symm (List.ofFn_get (List.insertionSort r l))
lemma insertionSort_eraseIdx {α : Type} {r : α → α → Prop} [DecidableRel r] :
(l : List α) →
(i : Fin (List.insertionSort r l).length) →
List.eraseIdx (List.insertionSort r l) i =
List.insertionSort r (List.eraseIdx l ((insertionSortEquiv r l).symm i))
| [], i => by
simp
| a :: l, i => by
rw [insertionSortEquiv]
simp
end HepLean.List