{ [s:SES]. [A:Id].  (encryption-key-atoms(PrivateKey(A)) ~ [Private(A)]) }

{ Proof }



Definitions occuring in Statement :  ses-private-key: PrivateKey(A),  ses-private: Private(A),  security-event-structure: SES,  encryption-key-atoms: encryption-key-atoms(k),  Id: Id,  uall: [x:A]. B[x],  cons: [car / cdr],  nil: [],  sqequal: s ~ t
Definitions :  uall: [x:A]. B[x],  encryption-key-atoms: encryption-key-atoms(k),  ses-private-key: PrivateKey(A),  member: t  T
Lemmas :  Id_wf,  security-event-structure_wf

\mforall{}[s:SES].  \mforall{}[A:Id].    (encryption-key-atoms(PrivateKey(A))  \msim{}  [Private(A)])


Date html generated: 2011_08_17-PM-07_17_24
Last ObjectModification: 2011_06_18-PM-01_07_58

Home Index