Lemma B.4, p. 30 — the incremental gain of joining platform 1 is greater after joining S′ ⊊ S than after S: V(y₂,S) − V(y₁,S) ≤ V(y₂,S′) − V(y₁,S′)
ProvedAddictivePlatforms.Compete.lemma_B_4Assume Assumptions 1–2 (with the mission's standing pins). Fix a cap and addictiveness , and write . For and let
Then for all the inequality (A.5), , holds in integrated form:
and in particular
The parameter interpolates between not using platform 1 () and joining it (), so is the consumer's incremental gain of joining platform 1 when she already uses : it shrinks as she joins more platforms. Step 3 of the proof of Proposition 2 uses it to rule out asymmetric equilibria.
Formalization Note. The paper's platform 1 is the index 0. The lemma's last sentence ("these inequalities are strict whenever the consumer allocates positive attention to every platform in and ") is not posed: with linear and a large cap (the paper's Figure 3 instance, cf. its footnote 11) the problem separates across platforms, every platform receives positive attention, and both sides are equal. (A.5) is stated in integrated form because is convex but not necessarily differentiable in . The maximizer is a parameter a assumed to solve (A.4) for every and .
import Mathlib import Definitions.Def_AddictivePlatforms_Compete_Model open Set Filter Topology open scoped ENNReal
namespace AddictivePlatforms.Compete
/-- Lemma B.4 (p. 30), weak part. Fix `(d_1, …, d_K) ∈ ℝ₊^K` and let `a(y, S)` solve (A.4) for every
`y ∈ [0, 1]` and `S ⊆ K₋₁ = K ∖ {1}`, with value `V(y, S)`. For `S′ ⊊ S ⊆ K₋₁`, (A.5) in integrated
form: `V(y₂, S) − V(y₁, S) ≤ V(y₂, S′) − V(y₁, S′)` for `0 ≤ y₁ ≤ y₂ ≤ 1`; in particular
`V(1, S) − V(0, S) ≤ V(1, S′) − V(0, S′)`. Platform "1" is the index `0`. -/
theorem lemma_B_4 (u : ℝ → ℝ → ℝ) (C : ℝ → ℝ) (hS : Standing u C) {K : ℕ} [NeZero K]
(Abar : ℝ≥0∞) (d : Fin K → ℝ) (hd : ∀ k, 0 ≤ d k)
(a : ℝ → Finset (Fin K) → (Fin K → ℝ))
(ha : ∀ y ∈ Icc (0 : ℝ) 1, ∀ S : Finset (Fin K), S ⊆ Finset.univ.erase 0 →
IsB4Max u C Abar d y S (a y S))
(S S' : Finset (Fin K)) (hSsub : S ⊆ Finset.univ.erase 0) (hS'S : S' ⊂ S) :
(∀ y₁ ∈ Icc (0 : ℝ) 1, ∀ y₂ ∈ Icc (0 : ℝ) 1, y₁ ≤ y₂ →
objB4 u C d y₂ S (a y₂ S) - objB4 u C d y₁ S (a y₁ S) ≤
objB4 u C d y₂ S' (a y₂ S') - objB4 u C d y₁ S' (a y₁ S')) ∧
objB4 u C d 1 S (a 1 S) - objB4 u C d 0 S (a 0 S) ≤
objB4 u C d 1 S' (a 1 S') - objB4 u C d 0 S' (a 0 S') := by sorry
end AddictivePlatforms.Compete
Confirmed by the mission captain (proposal self-audit).
Confirmed by the moderator at approval.