theorem capitalShare_eq_one_sub_laborShare {α ρ K L : ℝ}
(hα : 0 < α) (hα1 : α < 1) (hK : 0 < K) (hL : 0 < L) :
capitalShare α ρ K L = 1 - laborShare α ρ K L := by
linarith [capitalShare_plus_laborShare (ρ := ρ) hα hα1 hK hL]Two-Factor CES Production Function (Layer 1 of Macro Extension)