Wf of Type right inverse cedar Type?
Cedar.Thm.wf_ofType_right_inverse_cedarType?
Plain-language statement
TermType.ofType is a right inverse of CedarType.cedarType? when applied to a well-formed CedarType.
Exact Lean statement
theorem wf_ofType_right_inverse_cedarType?
{Γ : TypeEnv} {ty : CedarType}
(hwf : Γ.WellFormed)
(hwf_ty : CedarType.WellFormed Γ ty) :
(TermType.ofType ty).cedarType? = ty.liftBoolTypesFormal artifact
Lean source
theorem wf_ofType_right_inverse_cedarType? {Γ : TypeEnv} {ty : CedarType} (hwf : Γ.WellFormed) (hwf_ty : CedarType.WellFormed Γ ty) : (TermType.ofType ty).cedarType? = ty.liftBoolTypes:= by cases ty with | bool _ | int | string | entity _ | ext _ => simp only [ TermType.ofType, TermType.cedarType?, CedarType.liftBoolTypes, BoolType.lift, ] | set sty => cases hwf_ty with | set_wf hwf_sty => have := wf_ofType_right_inverse_cedarType? hwf hwf_sty simp [ TermType.ofType, TermType.cedarType?, this, CedarType.liftBoolTypes, ] | record rty => simp only [ TermType.ofType, TermType.cedarType?, Option.bind_eq_bind, CedarType.liftBoolTypes, ] rw [Map.mapMOnValues₂_eq_mapMOnValues _ (TermType.cedarType?.qualifiedType? ·)] have := ofRecordType_forall₂ rty.1 hwf_ty have := List.mapM_some_iff_forall₂.mpr this simp [this, RecordType.liftBoolTypes, Map.mapOnValues₂_eq_mapOnValues, Map.mapMOnValues, Map.mapOnValues, Map.deprecated_toList_def]- Project
- Cedar Specification
- License
- Apache-2.0
- Commit
- 3f093947b8ae
- Source
- cedar-lean/Cedar/Thm/SymCC/Env/ofEnv.lean:445-473
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.