All proofs
Project-declaredLean 4.32.0 · mathlib@81a5d257

Wp Except T bind

OracleComp.ProgramLogic.Loom.wp_ExceptT_bind

Plain-language statement

Quantitative Std.Do'.WP interpretation of OracleComp spec valued in ℝ≥0∞. The wpTrans is the existing MAlgOrdered.wp (i.e. expectation of post under evalDist); the EPost.nil argument is ignored since OracleComp has no first-class exception slot. The three WP axioms reduce to the existing MAlgOrdered.{wp_pure, wp_bind, wp_mono} equali...

Exact Lean statement

@[simp]
theorem wp_ExceptT_bind {ε : Type} (x : ExceptT ε (OracleComp spec) α)
    (f : α → ExceptT ε (OracleComp spec) β) (post : β → ℝ≥0∞)
    (epost : EPost.cons (ε → ℝ≥0∞) EPost.nil) :
    Std.Do'.wp (x >>= f) post epost =
      Std.Do'.wp x (fun a => Std.Do'.wp (f a) post epost) epost

Formal artifact

Lean source

Canonical source
Full Lean sourceLean 4
@[simp]theorem wp_ExceptT_bind {ε : Type} (x : ExceptT ε (OracleComp spec) α)    (f : α  ExceptT ε (OracleComp spec) β) (post : β  0∞)    (epost : EPost.cons 0∞) EPost.nil) :    Std.Do'.wp (x >>= f) post epost =      Std.Do'.wp x (fun a => Std.Do'.wp (f a) post epost) epost := by  change MAlgOrdered.wp (m := OracleComp spec) (l := 0∞) ((x >>= f).run)      (epost.pushExcept post) =    MAlgOrdered.wp (m := OracleComp spec) (l := 0∞) x.run      (epost.pushExcept fun a =>        MAlgOrdered.wp (m := OracleComp spec) (l := 0∞) (f a).run          (epost.pushExcept post))  rw [ExceptT.run_bind, MAlgOrdered.wp_bind]  congr 1 with ea  cases ea <;> simp [EPost.cons.pushExcept, MAlgOrdered.wp_pure]
Project
VCVio
License
Apache-2.0
Commit
2ceb2d825ee3
Source
VCVio/ProgramLogic/Unary/Loom/Quantitative.lean:330-344

Reuse this declaration

Bring the exact result into your workflow

The import identifies the source module. Your project still needs the pinned package dependency shown on this page.

What this badge means

This completion status comes from the project or community source. It has not yet been represented here as an independent rebuild and axiom audit.

Continue in this project

Related declarations

Project-declaredLean 4.32.0

Expected Cost Nat eq sum tail probs of pathwise Cost At Most

AddWriterT.expectedCostNat_eq_sum_tail_probs_of_pathwiseCostAtMost

Plain-language statement

Finite tail-sum formula for natural-valued writer cost under a pathwise upper bound. If every execution path of oa incurs cost at most n, then the tail probabilities vanish above n, so the infinite tail sum truncates to Finset.range n.

program verificationseparation logiccryptography

Source project: VCVio

Person-level attribution pending.

View proof record
Project-declaredLean 4.32.0

IND CPA advantage to Real le sum step signed Advantage Real abs

AsymmEncAlg.IND_CPA_advantage_toReal_le_sum_step_signedAdvantageReal_abs

Plain-language statement

Planned generic one-time-to-many-time lift: bounded multi-query IND-CPA advantage is at most the sum of the extracted one-time signed advantages over the first q fresh LR queries.

program verificationseparation logiccryptography

Source project: VCVio

Person-level attribution pending.

View proof record