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

refactor: Free simps

Browse source
This commit is contained in:
jstoobysmith 2025-01-29 16:41:10 +00:00
parent e5c85ac109
commit 22636db606
9 changed files with 205 additions and 171 deletions
Download patch file Download diff file Expand all files Collapse all files

7
HepLean/PerturbationTheory/FieldStatistics/Basic.lean
View file

@ -292,11 +292,12 @@ instance : AddMonoid FieldStatistic where
add a b := a * b
nsmul n a := ∏ (i : Fin n), a
zero_add a := by
cases a <;> simp <;> rfl
cases a <;> simp only [instCommGroup] <;> rfl
add_zero a := by
cases a <;> simp <;> rfl
cases a <;>
simp only [instCommGroup] <;> rfl
add_assoc a b c := by
cases a <;> cases b <;> cases c <;> simp <;> rfl
cases a <;> cases b <;> cases c <;> simp only [instCommGroup] <;> rfl
nsmul_zero a := by
simp only [Finset.univ_eq_empty, Finset.prod_const, instCommGroup, Finset.card_empty, pow_zero]
rfl