noncomputable def sectorGeneralEffectiveCurvature
(e : WeightedNSectorEconomy N) (n : Fin N) : ℝ :=
let K_n := sectorGeneralCurvature e n
let Tstar_n := sectorCriticalFriction e.toNSectorEconomy n
K_n * max 0 (1 - e.T n / Tstar_n)## Weighted N-Sector Economy