OAI/Geometry/ProjectionBodies/Homothety.lean
26 declarations, 0 contain sorry, 0 declared as axioms
- lemma
OAI.PettyProjection.quantile_first_momentline 11 - theorem
OAI.PettyProjection.slice_transport_equalityline 32Source documentation
Equality in slice transport forces the two full marginal distributions to be translates. In particular both projection endpoints differ by the difference of their first moments.
theorem slice_transport_equality {m : ℕ} (hm : 0 < m) {a b l r L R : ℝ} (ha : 0 < a) (hb : 0 < b) (hab : a+b=1) (hlr : l<r) (hLR : L<R) {f g h : ℝ → ℝ} (hf : ContinuousOn f (Ioo l r)) (hg : ContinuousOn g (Ioo L R)) (hfi : IntervalIntegrable f volume l r) (hgi : IntervalIntegrable g volume L R) (hfp : ∀ x ∈ Ioo l r, 0 < f x) (hgp : ∀ x ∈ Ioo L R, 0 < g x) (hfI : (∫ x in l..r, f x)=1) (hgI : (∫ x in L..R, g x)=1) (hhi : IntervalIntegrable h volume (a*l+b*L) (a*r+b*R)) (hbound : ∀ x ∈ Ioo l r, ∀ y ∈ Ioo L R, (a*(f x)^((m:ℝ)⁻¹)+b*(g y)^((m:ℝ)⁻¹))^m ≤ h (a*x+b*y)) (hI : (∫ z in (a*l+b*L)..(a*r+b*R), h z)=1) : l-L=(∫ x in l..r, x*f x)-(∫ y in L..R, y*g y) ∧ … - lemma
OAI.PettyProjection.sliceDensity_moment_indicatorline 152 - lemma
OAI.PettyProjection.sliceDensity_moment_integrableline 163 - lemma
OAI.PettyProjection.sliceDensity_momentline 170 - lemma
OAI.PettyProjection.sliceDensity_interval_momentline 179 - theorem
OAI.PettyProjection.brunnMinkowski_product_unit_equalityline 203Source documentation
Equality in the actual product-body step identifies both extreme heights with the difference of the (unit-volume) vertical first moments.
theorem brunnMinkowski_product_unit_equality {m : ℕ} (hm0 : 0 < m) (hm : BrunnMinkowskiRoot E m) {K M : Set (E × ℝ)} (hK : IsCompact K) (hcK : Convex ℝ K) (hiK : (interior K).Nonempty) (hM : IsCompact M) (hcM : Convex ℝ M) (hiM : (interior M).Nonempty) (hvK : volume.real K=1) (hvM : volume.real M=1) {a b : ℝ} (ha : 0 < a) (hb : 0 < b) (hab : a+b=1) (hvC : volume.real (a • K+b • M)=1) {l r L R : ℝ} (hlr : l<r) (hLR : L<R) (hpr : Prod.snd '' K=Icc l r) (hPR : Prod.snd '' M=Icc L R) : l-L=(∫ x in K, x.2)-(∫ x in M, x.2) ∧ r-R=(∫ x in K, x.2)-(∫ x in M, x.2) := by …Mentions: OAI.PettyProjection.BrunnMinkowskiRoot
- def
OAI.PettyProjection.firstMomentline 265Source documentation
The unnormalized Euclidean first moment. It is the barycenter for unit volume bodies, the only place where it is used below.
def firstMoment {n : ℕ} (K : Set (Space n)) : Space n := ∫ x in K, xMentions: OAI.PettyProjection.Space
- lemma
OAI.PettyProjection.shadowContinuousEquiv_innerline 267 - lemma
OAI.PettyProjection.shadow_vertical_imageline 274 - lemma
OAI.PettyProjection.shadow_firstMomentline 284 - lemma
OAI.PettyProjection.perpendicular_finrankline 293 - theorem
OAI.PettyProjection.brunnMinkowski_unit_support_equalityline 305Source documentation
Equality for an intermediate Minkowski combination of unit-volume bodies identifies every directional support difference with the first-moment shift.
theorem brunnMinkowski_unit_support_equality {n : ℕ} (hn : 2 ≤ n) {K M : Set (Space n)} (hK : IsCompact K) (hcK : Convex ℝ K) (hiK : (interior K).Nonempty) (hM : IsCompact M) (hcM : Convex ℝ M) (hiM : (interior M).Nonempty) (hvK : volume.real K=1) (hvM : volume.real M=1) {a b : ℝ} (ha : 0 < a) (hb : 0 < b) (hab : a+b=1) (hvC : volume.real (a • K+b • M)=1) (u : Sphere n) : support K u-support M u=⟪(u : Space n),firstMoment K-firstMoment M⟫ := by …Mentions: OAI.PettyProjection.Space, OAI.PettyProjection.support, OAI.PettyProjection.firstMoment
- lemma
OAI.PettyProjection.support_translateline 348 - theorem
OAI.PettyProjection.brunnMinkowski_unit_equalityline 362Source documentation
The unrestricted translated-body equality case of the unit-volume Brunn--Minkowski inequality (no origin symmetry or boundary regularity).
theorem brunnMinkowski_unit_equality {n : ℕ} (hn : 2 ≤ n) {K M : Set (Space n)} (hK : IsCompact K) (hcK : Convex ℝ K) (hiK : (interior K).Nonempty) (hM : IsCompact M) (hcM : Convex ℝ M) (hiM : (interior M).Nonempty) (hvK : volume.real K=1) (hvM : volume.real M=1) {a b : ℝ} (ha : 0 < a) (hb : 0 < b) (hab : a+b=1) (hvC : volume.real (a • K+b • M)=1) : K=(fun x => firstMoment K-firstMoment M+x) '' M := by …Mentions: OAI.PettyProjection.Space, OAI.PettyProjection.firstMoment
- def
OAI.PettyProjection.volumeRootline 395 - lemma
OAI.PettyProjection.volumeRoot_posline 397 - lemma
OAI.PettyProjection.volumeRoot_powline 401 - lemma
OAI.PettyProjection.volumeRoot_smulline 405 - lemma
OAI.PettyProjection.interior_add_nonempty_leftline 413 - theorem
OAI.PettyProjection.brunnMinkowski_addline 422Source documentation
The homogeneous, additive form of Brunn--Minkowski.
theorem brunnMinkowski_add {n : ℕ} (hn : 0 < n) {K M : Set (Space n)} (hK : IsCompact K) (hcK : Convex ℝ K) (hiK : (interior K).Nonempty) (hM : IsCompact M) (hcM : Convex ℝ M) (hiM : (interior M).Nonempty) : volumeRoot K+volumeRoot M ≤ volumeRoot (K+M) := by …Mentions: OAI.PettyProjection.Space, OAI.PettyProjection.volumeRoot
- theorem
OAI.PettyProjection.brunnMinkowski_add_equalityline 434Source documentation
Equality in the homogeneous additive form, retaining arbitrary translation.
theorem brunnMinkowski_add_equality {n : ℕ} (hn : 2 ≤ n) {K M : Set (Space n)} (hK : IsCompact K) (hcK : Convex ℝ K) (hiK : (interior K).Nonempty) (hM : IsCompact M) (hcM : Convex ℝ M) (hiM : (interior M).Nonempty) (hv : volumeRoot (K+M)=volumeRoot K+volumeRoot M) : ∃ z : Space n, ∃ c : ℝ, 0 < c ∧ K=(fun x => z+c • x) '' M := by …Mentions: OAI.PettyProjection.Space, OAI.PettyProjection.volumeRoot
- lemma
OAI.PettyProjection.minkowski_parameter_comboline 487 - lemma
OAI.PettyProjection.minkowski_volumeRoot_concaveline 494 - lemma
OAI.PettyProjection.volumeRoot_diff_factorline 508 - theorem
OAI.PettyProjection.minkowski_derivative_bound_equalityline 521Source documentation
The sharp first-variation inequality together with its global translated homothety equality implication, derived from actual Brunn--Minkowski concavity.
theorem minkowski_derivative_bound_equality {n : ℕ} (hn : 2 ≤ n) {K M : Set (Space n)} (hK : IsCompact K) (hcK : Convex ℝ K) (hiK : (interior K).Nonempty) (hM : IsCompact M) (hcM : Convex ℝ M) (hiM : (interior M).Nonempty) {d : ℝ} (hd : HasDerivWithinAt (fun t : ℝ => volume.real (K+t • M)) d (Ici 0) 0) : (n:ℝ)*volumeRoot K^(n-1)*volumeRoot M ≤ d ∧ (d=(n:ℝ)*volumeRoot K^(n-1)*volumeRoot M → ∃ z : Space n, ∃ c : ℝ, 0 < c ∧ K=(fun x => z+c • x) '' M) := by …Mentions: OAI.PettyProjection.Space, OAI.PettyProjection.volumeRoot