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

feat: Update perm_contr two FIn 2

Browse source
This commit is contained in:
jstoobysmith 2024-10-18 10:24:49 +00:00
parent 7358807980
commit d2d75e4d36
3 changed files with 61 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

7
HepLean/Mathematics/Fin.lean
View file

@ -212,6 +212,7 @@ def finExtractTwo {n : ℕ} (i : Fin n.succ.succ) (j : Fin n.succ) :
(Equiv.sumCongr (Equiv.refl (Fin 1)) (finExtractOne j)).trans <|
(Equiv.sumAssoc (Fin 1) (Fin 1) (Fin n)).symm
@[simp]
lemma finExtractTwo_apply_fst {n : ℕ} (i : Fin n.succ.succ) (j : Fin n.succ) :
finExtractTwo i j i = Sum.inl (Sum.inl 0) := by
@ -242,4 +243,10 @@ lemma finExtractTwo_symm_inl_inl_apply {n : ℕ} (i : Fin n.succ.succ) (j : Fin
rw [finExtractTwo]
simp
@[simp]
lemma finExtractTwo_apply_snd {n : ℕ} (i : Fin n.succ.succ) (j : Fin n.succ) :
finExtractTwo i j (i.succAbove j) = Sum.inl (Sum.inr 0) := by
rw [← Equiv.eq_symm_apply]
simp
end HepLean.Fin