Step
*
of Lemma
ses-honest_witness
∀[s:SES]. ∀[A:Id].  (Honest(A) 
⇒ (Ax ∈ Honest(A)))
BY
{ (Unfold `security-event-structure` 0 THEN Auto) }
1
1. s : Info:Type
× New:EClass(Atom1)
× Send:EClass(SecurityData)
× Rcv:EClass(SecurityData)
× Encrypt:EClass(SecurityData × Key × Atom1)
× Decrypt:EClass(SecurityData × Key × Atom1)
× Sign:EClass(SecurityData × Id × Atom1)
× Verify:EClass(SecurityData × Id × Atom1)
× Honest:Id ─→ 𝔹
× KeyRel:Key ─→ Key ─→ 𝔹
× PrivKey:Id ─→ Atom1
× Top
2. A : Id
3. Honest(A)@i
⊢ Ax ∈ Honest(A)
Latex:
Latex:
\mforall{}[s:SES].  \mforall{}[A:Id].    (Honest(A)  {}\mRightarrow{}  (Ax  \mmember{}  Honest(A)))
By
Latex:
(Unfold  `security-event-structure`  0  THEN  Auto)
Home
Index