Corollary 1, p. 496 — the quantity hedge region and size shrink, and Ω₁ expands in a₁⁰ and contracts in a₂⁰
ProvedMitigateSupplyRisk.DualSourcing.corollary_1Work in the setting of Theorem 2: deterministic demand, no committed cost (), , for every reliability index , and . Let be the single-sourcing region, the quantity-hedge region, and the optimal total order of Theorem 2 at reliability indices and demand .
Raise one supplier's reliability index from to , keeping the other index fixed. Then:
- (a) the quantity-hedge region contracts, , and for every demand the quantity hedge size does not increase:
- (b) the single-sourcing region expands when supplier 1's index is raised, , and contracts when supplier 2's index is raised, .
As suppliers become more reliable, the firm has less need to over-order to hedge against capacity shortfalls.
Formalization Note. The regions and total order are those of Theorem 2 with corrected bounds; the hedge region is unchanged by the correction. Under the labelling hypothesis of Theorem 2 reads , and the upper end of does not depend on , so the contraction in holds with equality. Strict increase of is not needed for these statements and is not assumed.
import Mathlib import Definitions.Def_MitigateSupplyRisk_DualSourcing_Model import Definitions.Def_MitigateSupplyRisk_DualSourcing_Regions open MeasureTheory ProbabilityTheory
namespace MitigateSupplyRisk.DualSourcing
/-- Corollary 1 (Wang, Gilland, Tomlin 2010, p. 496), in the setting of Theorem 2 (`η = 0`,
`0 < φ_i < 1`, `G_i(K_i, a) = 1` at every reliability index, and `φ₁ ≥ φ₂`, which is the
ordering `φ₁ G₁(K₁) ≥ φ₂ G₂(K₂)` under `G_i(K_i) = 1`). Raise supplier `i`'s reliability index
from `s` to `s' ≥ s`, the other index fixed. Then
(a) the quantity-hedge region `Ω₃ ∪ Ω₄ ∪ Ω₅` contracts, and for every demand `x ≥ 0` the hedge
size `[q₁* + q₂* − x]⁺` of Theorem 2's optimal vector does not increase;
(b) the single-sourcing region `Ω₁` expands when `i` is supplier 1 and contracts when `i` is
supplier 2. -/
theorem corollary_1 (M : Model)
(hη : ∀ i, M.η i = 0)
(hφpos : ∀ i, 0 < M.phi i) (hφlt : ∀ i, M.phi i < 1)
(hGK : ∀ i a, M.G i (M.K i) a = 1)
(hord : M.phi 1 ≤ M.phi 0)
(i : Fin 2) (a : Fin 2 → ℝ) (s s' : ℝ) (hss' : s ≤ s') :
-- (a) the hedge region contracts
M.hedgeRegion (Function.update a i s') ⊆ M.hedgeRegion (Function.update a i s) ∧
-- (a) the hedge size decreases
(∀ x : ℝ, 0 ≤ x →
max (M.qstarTotal (Function.update a i s') x - x) 0 ≤
max (M.qstarTotal (Function.update a i s) x - x) 0) ∧
-- (b) Ω₁ expands as supplier 1's index increases
(i = 0 → M.singleRegion (Function.update a i s) ⊆ M.singleRegion (Function.update a i s')) ∧
-- (b) Ω₁ contracts as supplier 2's index increases
(i = 1 → M.singleRegion (Function.update a i s') ⊆ M.singleRegion (Function.update a i s)) := by sorry
end MitigateSupplyRisk.DualSourcing
Confirmed by the mission captain (proposal self-audit).
Confirmed by the moderator at approval.