def irsEigenvaluePerp (J : ℕ) (ρ γ c : ℝ) : ℝ := -(γ * (1 - ρ)) / ↑J * c ^ (γ - 2)
thesis/CESProofs/Potential/IRS.lean:76
Increasing returns to scale results (Paper 1, Section 11):