  33  rw [div_eq_iff hpos.ne', pow_succ]
  34  ring
  35
  36theorem lifetime_pos (k : ℕ) : 0 < lifetime k := pow_pos phi_pos k
  37
  38structure DecaySpectrumCert where
  39  five_channels : Fintype.card DecayChannel = 5
  40  phi_ratio : ∀ k, lifetime (k + 1) / lifetime k = phi
  41  lifetime_always_pos : ∀ k, 0 < lifetime k
  42
  43noncomputable def decaySpectrumCert : DecaySpectrumCert where
  44  five_channels := decayChannel_count
  45  phi_ratio := lifetime_ratio
  46  lifetime_always_pos := lifetime_pos
  47
  48end IndisputableMonolith.Physics.DecaySpectrumFromPhiLadder

papers checked against this theorem

No papers in the current corpus map onto this theorem yet.