Card of mem minimal Super Set
SuperSymmetry.SU5.ChargeSpectrum.card_of_mem_minimalSuperSet
Project documentation
Given a collection of charges x in ofFinset S5 S10, the minimal charges y in ofFinset S5 S10 which are a super sets of x. -/ def minimalSuperSet (S5 S10 : Finset 𝓩) (x : ChargeSpectrum 𝓩) : Finset (ChargeSpectrum 𝓩) := let SqHd := if x.qHd.isSome then ∅ else S5.map ⟨fun y => ⟨some y, x.qHu, x.Q5, x.Q10⟩, by intro y1 y2; simp⟩ let SqHu := if x...
Source project: Physlib
Person-level attribution pending.