Verify Never Matches is sound
Cedar.Thm.verifyNeverMatches_is_sound'
Plain-language statement
Alternate definition of soundness for neverMatches: For a singleton policyset, if symcc says the policy neverMatches, then the spec authorizer should say it never appears in determiningPolicies.
Exact Lean statement
theorem verifyNeverMatches_is_sound' {p : Policy} {εnv : SymEnv} {asserts : Asserts} :
εnv.StronglyWellFormedForPolicy p →
verifyNeverMatches p εnv = .ok asserts →
εnv ⊭ asserts →
∀ env,
env ∈ᵢ εnv →
env.StronglyWellFormedForPolicy p →
p.id ∉ (Spec.isAuthorized env.request env.entities [p]).determiningPoliciesFormal artifact
Lean source
theorem verifyNeverMatches_is_sound' {p : Policy} {εnv : SymEnv} {asserts : Asserts} : εnv.StronglyWellFormedForPolicy p → verifyNeverMatches p εnv = .ok asserts → εnv ⊭ asserts → ∀ env, env ∈ᵢ εnv → env.StronglyWellFormedForPolicy p → p.id ∉ (Spec.isAuthorized env.request env.entities [p]).determiningPolicies:= by intro h₁ h₂ h₃ env h₄ h₅ have := verifyNeverMatches_is_sound h₁ h₂ h₃ env h₄ h₅ simp only [Spec.isAuthorized, Data.Set.isEmpty, Spec.satisfiedPolicies, satisfiedWithEffect, satisfied, Bool.and_eq_true, beq_iff_eq, decide_eq_true_eq, List.filterMap_cons, List.filterMap_nil, Bool.not_eq_eq_eq_not, Bool.not_true, beq_eq_false_iff_ne, ne_eq] cases p.effect <;> simp [Data.Set.make_nil, Data.Set.not_mem_empty, this]- Project
- Cedar Specification
- License
- Apache-2.0
- Commit
- 3f093947b8ae
- Source
- cedar-lean/Cedar/Thm/Verification.lean:199-213
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
Find? ext
Cedar.Data.Map.find?_ext
Plain-language statement
Two well-formed maps are equal if they have the same find? for every key.
Source project: Cedar Specification
Person-level attribution pending.
Find? notmem keys
Cedar.Data.Map.find?_notmem_keys
Plain-language statement
Inverse of find?_mem_toList, except that this requires wf
Source project: Cedar Specification
Person-level attribution pending.
Find? some iff in values
Cedar.Data.Map.find?_some_iff_in_values
Plain-language statement
The mp direction of this does not need the wf precondition and, in fact, is available separately as find?_some_implies_in_values above
Source project: Cedar Specification
Person-level attribution pending.