Bielecki Contraction Bound Against a Raw State Process
ProvedLevyStochCalc.Ito.Picard.bieleckiNorm_picardStepOnStop_sub_rawStop_le_readableThis gives a Bielecki-norm bound for the difference between a Picard step along a bounded process and a Picard step along a raw state process.
Let the Brownian and Poisson drivers, filtrations, coefficients, and regularity assumptions be as in the type. Let be measurable and progressively measurable coordinatewise with , let be the initial state, let be an -bounded process on , and assume and . Then
The Bielecki norms are ENNReal-valued. This is the contraction estimate used to compare the self-map with a raw process.
Original Lean declaration header
Within namespace LevyStochCalc.Ito.Picard. Shown in its original module context. Proof omitted.
theorem bieleckiNorm_picardStepOnStop_sub_rawStop_le {L : ℝ}
(hLip : LevyStochCalc.Ito.Setting.JumpDiffusionCoeffs.IsLipschitz coeffs ν L)
{Z : ℝ → Ω → (Fin n → ℝ)} (hZm : Measurable (Function.uncurry Z))
(hZa : ∀ i : Fin n, Probability.ProgressivelyMeasurable ℱ' fun ω s => Z s ω i)
(hZb : bieleckiNorm (P := P) 0 T Z < ⊤)
(x₀ : Fin n → ℝ) {β : ℝ} (hβ : 0 < β) (hT : 0 < T)
(X : SBoundedProcess (n := n) P ℱ' T) :
bieleckiNorm (P := P) β T (fun t ω i =>
picardStepOnStop W N hℱW hℱN coeffs hReg hLip X hT.le x₀ t ω i
- picardStepOnRawStop W N hℱW hℱN coeffs hReg hLip hZm hZa hZb hT.le x₀ t ω i)
≤ (ENNReal.ofReal
((3 * ((n : ℝ) * L ^ 2 * T + (n : ℝ) * ((d : ℝ) * L ^ 2) + (n : ℝ) * L ^ 2))
/ (2 * β))) ^ ((1 : ℝ) / 2)
* bieleckiNorm (P := P) β T (fun t ω i => X.X t ω i - Z t ω i)
Module navigation
Module: LevyStochCalc/Ito/PicardContractionEstimate.
Definition modules: LevyStochCalc/Ito/PicardBieleckiNorm, LevyStochCalc/Brownian/Multidim, LevyStochCalc/Poisson/RandomMeasure, LevyStochCalc/Ito/Setting, LevyStochCalc/Poisson/Filtered, LevyStochCalc/Brownian/Filtered, LevyStochCalc/Ito/PicardIntegrandFrozen, LevyStochCalc/Probability/Progressive.
Previous: exists_bieleckiWeight_rate_lt_one.
Source excerpt, lines 432–445 · Frozen source 408915f.
import Definitions.Def_KLSModular_LevyStochCalc_Ito_PicardContractionEstimate
/-
Copyright (c) 2026 Christian Garry. All rights reserved.
Released under Apache 2.0 license as described in the file LICENSE.
Authors: Christian Garry
-/
-- Vendored from https://github.com/cgarryZA/LevyStochCalc at commit 984dbf0b790031eac05d56fe5a84b65e15e1e932 (upstream path LevyStochCalc/Ito/PicardContractionEstimate.lean; Apache-2.0; provenance in formalization/vendor/vendor-lock.json of the KLS repository)
open MeasureTheory ProbabilityTheory
variable {Ω : Type*} [MeasurableSpace Ω] {E : Type*} [MeasurableSpace E]
variable {P : MeasureTheory.Measure Ω} [MeasureTheory.IsProbabilityMeasure P] {ν : MeasureTheory.Measure E} [MeasureTheory.SigmaFinite ν]
variable {n d : ℕ} {ℱ : MeasureTheory.Filtration ℝ ‹MeasurableSpace Ω›} {T : ℝ}
variable (W : LevyStochCalc.Brownian.Multidim.MultidimBrownianMotion P d)
(N : LevyStochCalc.Poisson.PoissonRandomMeasure P ν)
(ℱ' : MeasureTheory.Filtration ℝ ‹MeasurableSpace Ω›) [ℱ'.IsRightContinuous]
(hℱW : ∀ j : Fin d, LevyStochCalc.Brownian.IsBrownianFiltration (W.W j) ℱ')
(hℱN : LevyStochCalc.Poisson.IsPoissonFiltration N ℱ')
(hℱ0 : ∀ t : ℝ, t ≤ 0 → ℱ' 0 ≤ ℱ' t)
(hnull : ∀ s : Set Ω, MeasurableSet s → P s = 0 → MeasurableSet[ℱ' 0] s)
(coeffs : LevyStochCalc.Ito.Setting.JumpDiffusionCoeffs n d E)
(hReg : LevyStochCalc.Ito.Setting.JumpDiffusionCoeffs.IsRegular coeffs ν)
omit [ℱ'.IsRightContinuous]
theorem LevyStochCalc.Ito.Picard.bieleckiNorm_picardStepOnStop_sub_rawStop_le_readable {L : ℝ}
(hLip : LevyStochCalc.Ito.Setting.JumpDiffusionCoeffs.IsLipschitz coeffs ν L)
{Z : ℝ → Ω → (Fin n → ℝ)} (hZm : Measurable (Function.uncurry Z))
(hZa : ∀ i : Fin n, Probability.ProgressivelyMeasurable ℱ' fun ω s => Z s ω i)
(hZb : bieleckiNorm (P := P) 0 T Z < ⊤)
(x₀ : Fin n → ℝ) {β : ℝ} (hβ : 0 < β) (hT : 0 < T)
(X : SBoundedProcess (n := n) P ℱ' T) :
bieleckiNorm (P := P) β T (fun t ω i =>
picardStepOnStop W N hℱW hℱN coeffs hReg hLip X hT.le x₀ t ω i
- picardStepOnRawStop W N hℱW hℱN coeffs hReg hLip hZm hZa hZb hT.le x₀ t ω i)
≤ (ENNReal.ofReal
((3 * ((n : ℝ) * L ^ 2 * T + (n : ℝ) * ((d : ℝ) * L ^ 2) + (n : ℝ) * L ^ 2))
/ (2 * β))) ^ ((1 : ℝ) / 2)
* bieleckiNorm (P := P) β T (fun t ω i => X.X t ω i - Z t ω i) := by sorry