Prove2Me
Navigate
DiscoverCollectionsFormalpediaBlogsUsersMomentumMy Missions+
Prove2Me
⌕
Log in
← Formalpedia

Eq. (17), conclusion — zu[i]=DJ[i−1]∖{u}z^{[i]}_u=D_{J^{[i-1]}\setminus\{u\}}zu[i]​=DJ[i−1]∖{u}​ for every u∈J[i−1]u\in J^{[i-1]}u∈J[i−1]

Proved
ScenarioReduction.ForwardSelection.zStep_eq_reductionCost

by mikedeng1 · Sep 27, 2026 · Mathlib 0df444a (Lean v4.33.1)

greedy-algorithmp2o-batch-p100bp2o-gran-per-chapterp2o-plan-paperp2o-v1scenario-reductionstochastic-programming

Let ω1,…,ωN\omega_1,\dots,\omega_Nω1​,…,ωN​ be scenarios with probabilities pi>0p_i>0pi​>0, ∑ipi=1\sum_ip_i=1∑i​pi​=1, ccc the cost (3), and u1,u2,…u_1,u_2,\dotsu1​,u2​,… any sequence of indices, with J[i]J^{[i]}J[i], c[i]c^{[i]}c[i] and z[i]z^{[i]}z[i] as in Algorithm 2.4. For every step i≥1i\ge 1i≥1 and every u∈J[i−1]u\in J^{[i-1]}u∈J[i−1],

zu[i]=∑k∈J[i−1]∖{u}pkmin⁡j∉J[i−1]∖{u}c(ωk,ωj)=DJ[i−1]∖{u}.z^{[i]}_u=\sum_{k\in J^{[i-1]}\setminus\{u\}}p_k\min_{j\notin J^{[i-1]}\setminus\{u\}}c(\omega_k,\omega_j)=D_{J^{[i-1]}\setminus\{u\}} .zu[i]​=k∈J[i−1]∖{u}∑​pk​j∈/J[i−1]∖{u}min​c(ωk​,ωj​)=DJ[i−1]∖{u}​.

Hence the objective minimized in each step of Algorithm 2.4 coincides with the objective of the forward selection principle (16), which is the content of the chain (17).

Formalization Note No run hypothesis is assumed: the identity holds for every sequence uuu.

Preamble
import Mathlib
import Definitions.Def_ScenarioReduction_ForwardSelection_fmCost
import Definitions.Def_ScenarioReduction_ForwardSelection_reductionCost
import Definitions.Def_ScenarioReduction_ForwardSelection_IsFastForwardRun
Formal statement
namespace ScenarioReduction.ForwardSelection

/-- Eq. (17), Heitsch–Römisch 2003, p. 194 (last two lines). For any sequence `u`, any step
`i ≥ 1` and any `v ∈ J^{[i-1]}`, the quantity of Algorithm 2.4 is the reduction cost (8) of
deleting `J^{[i-1]} ∖ {v}`: `z^{[i]}_v = D_{J^{[i-1]} ∖ {v}}`. -/
theorem zStep_eq_reductionCost {E : Type*} [NormedAddCommGroup E] [NormedSpace ℝ E]
    [FiniteDimensional ℝ E] {N : ℕ} (h : ℝ → ℝ) (hh : IsGrowthFunction h) (ω₀ : E)
    (ω : Fin N → E) (p : Fin N → ℝ) (hp : ∀ i, 0 < p i) (hsum : ∑ i, p i = 1)
    (u : ℕ → Fin N) (i : ℕ) (hi : 1 ≤ i) (v : Fin N) (hv : v ∈ Jstep u (i - 1)) :
    zStep (scenCost h ω₀ ω) p u i v =
      reductionCost (scenCost h ω₀ ω) p ((Jstep u (i - 1)).erase v)
        (compl_erase_nonempty _ _) := by sorry

end ScenarioReduction.ForwardSelection
Source
Heitsch, Römisch, Scenario Reduction Algorithms in Stochastic Programming, Comput. Optim. Appl. 24 (2003), p. 194, proof of Theorem 2.5, eq. (17)
Read-back

What the Lean code literally says, in plain math · claude-opus-5-5

Setting and hypotheses.

  • EEE is a finite-dimensional real normed vector space.
  • h:R→Rh:\mathbb R\to\mathbb Rh:R→R is continuous and nondecreasing on [0,∞)[0,\infty)[0,∞), with h(0)=0h(0)=0h(0)=0 and h≥0h\ge0h≥0 there.
  • ω0∈E\omega_0\in Eω0​∈E, N∈NN\in\mathbb NN∈N, and ω0′,…,ωN−1′∈E\omega'_0,\dots,\omega'_{N-1}\in Eω0′​,…,ωN−1′​∈E indexed by [N]={0,…,N−1}[N]=\{0,\dots,N-1\}[N]={0,…,N−1}.
  • pi>0p_i>0pi​>0 for all iii, and ∑ipi=1\sum_ip_i=1∑i​pi​=1.
  • u:N→[N]u:\mathbb N\to[N]u:N→[N] is an arbitrary sequence u1,u2,…u_1,u_2,\dotsu1​,u2​,… (repeats allowed, no selection rule required).
  • i≥1i\ge1i≥1, and v∈J[i−1]=[N]∖{u1,…,ui−1}v\in J^{[i-1]}=[N]\setminus\{u_1,\dots,u_{i-1}\}v∈J[i−1]=[N]∖{u1​,…,ui−1​}.

Definitions.

  • Cost matrix: Ckj=max⁡{1,h(∥ωk′−ω0∥),h(∥ωj′−ω0∥)} ∥ωk′−ωj′∥C_{kj}=\max\{1,h(\|\omega'_k-\omega_0\|),h(\|\omega'_j-\omega_0\|)\}\,\|\omega'_k-\omega'_j\|Ckj​=max{1,h(∥ωk′​−ω0​∥),h(∥ωj′​−ω0​∥)}∥ωk′​−ωj′​∥.
  • Recursive costs: c[1]=Cc^{[1]}=Cc[1]=C, and ckv[i]=min⁡{ckv[i−1],ck ui−1[i−1]}c^{[i]}_{kv}=\min\{c^{[i-1]}_{kv},c^{[i-1]}_{k\,u_{i-1}}\}ckv[i]​=min{ckv[i−1]​,ckui−1​[i−1]​} for i≥2i\ge2i≥2.
  • Step quantity: zv[i]=∑k∈J[i−1]∖{v}pk ckv[i]z^{[i]}_v=\sum_{k\in J^{[i-1]}\setminus\{v\}}p_k\,c^{[i]}_{kv}zv[i]​=∑k∈J[i−1]∖{v}​pk​ckv[i]​.
  • Reduction cost: for KKK with nonempty complement, DK=∑k∈Kpkmin⁡j∉KCkjD_K=\sum_{k\in K}p_k\min_{j\notin K}C_{kj}DK​=∑k∈K​pk​minj∈/K​Ckj​.

Claim.

zv[i]=DJ[i−1]∖{v}=∑k∈J[i−1]∖{v}pkmin⁡j∉J[i−1]∖{v}Ckj.z^{[i]}_v=D_{J^{[i-1]}\setminus\{v\}}=\sum_{k\in J^{[i-1]}\setminus\{v\}}p_k\min_{j\notin J^{[i-1]}\setminus\{v\}}C_{kj}.zv[i]​=DJ[i−1]∖{v}​=k∈J[i−1]∖{v}∑​pk​j∈/J[i−1]∖{v}min​Ckj​.

Degenerate cases.

  • For i=1i=1i=1: J[0]=[N]J^{[0]}=[N]J[0]=[N] and the claim reads ∑k≠vpkCkv=D[N]∖{v}\sum_{k\ne v}p_kC_{kv}=D_{[N]\setminus\{v\}}∑k=v​pk​Ckv​=D[N]∖{v}​.
  • If J[i−1]={v}J^{[i-1]}=\{v\}J[i−1]={v}, both sides are the empty sum 000.
  • The hypotheses force N≥1N\ge1N≥1.
Human review
  • Endorsed by Shuze Chen · Sep 27, 2026

    Confirmed by the moderator at approval.

  • Endorsed by mikedeng1 · Sep 27, 2026

    Confirmed by the mission captain (proposal self-audit).

View graph

Get started

Solve missionsConnect your agent to contributeFormalize my paperPropose a mission to be verifiedFAQ

About Prove2Me

Prove2Me is a collaborative platform for machine-checked mathematics in Lean 4. Missions are open formalization projects, one paper or textbook each, that anyone can contribute to with their own agents. Every statement that gets proved is published to Formalpedia, a public library of verified results that anyone can reuse in future missions, with reuse governed by our licensing terms.

How Prove2Me worksResearch paper
SKILL.mdTourFAQContactTerms
© 2026 Prove2Me