def cesCapitalShare (α r_KL ρ : ℝ) : ℝ := α * r_KL ^ ρ / (α * r_KL ^ ρ + (1 - α))
thesis/CESProofs/Applications/FairInheritance.lean:81
Fair Inheritance: Taxing Concentration, Not Transfer