{ 
s:SES. 
es:EO+(Info). 
e:E. 
a:Atom1.
    (Sign(e) has a
    

 (
e 
 Sign) 
 ((a = signature(e)) 
 (a 
 sdata-atoms(signed(e))))) }
{ Proof }
Definitions occuring in Statement : 
ses-signed: signed(e), 
ses-sig: signature(e), 
ses-sign: Sign, 
ses-info: Info, 
security-event-structure: SES, 
sdata-atoms: sdata-atoms(d), 
sdata: SecurityData, 
class-value-has: X(e) has a, 
in-eclass: e 
 X, 
event-ordering+: EO+(Info), 
es-E: E, 
Id: Id, 
assert:
b, 
all:
x:A. B[x], 
iff: P 

 Q, 
or: P 
 Q, 
and: P 
 Q, 
product: x:A 
 B[x], 
equal: s = t, 
l_member: (x 
 l), 
atom: Atom$n
Definitions : 
void: Void, 
lambda:
x.A[x], 
es-E-interface: E(X), 
decide: case b of inl(x) => s[x] | inr(y) => t[y], 
so_lambda: 
x y.t[x; y], 
Id: Id, 
sdata: SecurityData, 
eclass: EClass(A[eo; e]), 
union: left + right, 
or: P 
 Q, 
divides: b | a, 
assoced: a ~ b, 
set_leq: a 
 b, 
set_lt: a <p b, 
grp_lt: a < b, 
cand: A c
 B, 
l_member: (x 
 l), 
l_contains: A 
 B, 
inject: Inj(A;B;f), 
reducible: reducible(a), 
prime: prime(a), 
squash:
T, 
l_exists: (
x
L. P[x]), 
l_all: (
x
L.P[x]), 
fun-connected: y is f*(x), 
qle: r 
 s, 
qless: r < s, 
q-rel: q-rel(r;x), 
i-finite: i-finite(I), 
i-closed: i-closed(I), 
p-outcome: Outcome, 
fset-member: a 
 s, 
f-subset: xs 
 ys, 
fset-closed: (s closed under fs), 
l_disjoint: l_disjoint(T;l1;l2), 
cs-not-completed: in state s, a has not completed inning i, 
cs-archived: by state s, a archived v in inning i, 
cs-passed: by state s, a passed inning i without archiving a value, 
cs-inning-committed: in state s, inning i has committed v, 
cs-inning-committable: in state s, inning i could commit v , 
cs-archive-blocked: in state s, ws' blocks ws from archiving v in inning i, 
cs-precondition: state s may consider v in inning i, 
es-causl: (e < e'), 
es-locl: (e <loc e'), 
es-le: e 
loc e' , 
es-causle: e c
 e', 
existse-before:
e<e'.P[e], 
existse-le:
e
e'.P[e], 
alle-lt:
e<e'.P[e], 
alle-le:
e
e'.P[e], 
alle-between1:
e
[e1,e2).P[e], 
existse-between1:
e
[e1,e2).P[e], 
alle-between2:
e
[e1,e2].P[e], 
existse-between2:
e
[e1,e2].P[e], 
existse-between3:
e
(e1,e2].P[e], 
es-fset-loc: i 
 locs(s), 
exists:
x:A. B[x], 
es-r-immediate-pred: es-r-immediate-pred(es;R;e';e), 
same-thread: same-thread(es;p;e;e'), 
implies: P 
 Q, 
collect-event: collect-event(es;X;n;v.num[v];L.P[L];e), 
cut-order: a 
(X;f) b, 
path-goes-thru: x-f*-y thru i, 
lg-edge: lg-edge(g;a;b), 
infix_ap: x f y, 
uimplies: b supposing a, 
decidable: Dec(P), 
ses-signed: signed(e), 
ses-sig: signature(e), 
class-value-has: X(e) has a, 
subtype: S 
 T, 
universe: Type, 
subtype_rel: A 
r B, 
atom: Atom, 
apply: f a, 
top: Top, 
es-base-E: es-base-E(es), 
token: "$token", 
ifthenelse: if b then t else f fi , 
isect:
x:A. B[x], 
uall:
[x:A]. B[x], 
dep-isect: Error :dep-isect, 
eq_atom: x =a y, 
eq_atom: eq_atom$n(x;y), 
record+: record+, 
set: {x:A| B[x]} , 
record-select: r.x, 
event_ordering: EO, 
all:
x:A. B[x], 
function: x:A 
 B[x], 
atom: Atom$n, 
iff: P 

 Q, 
and: P 
 Q, 
product: x:A 
 B[x], 
member: t 
 T, 
event-ordering+: EO+(Info), 
ses-info: Info, 
equal: s = t, 
security-event-structure: SES, 
es-E: E, 
MaAuto: Error :MaAuto, 
ses-sign: Sign, 
in-eclass: e 
 X, 
assert:
b, 
Decide: Error :Decide, 
CollapseTHENA: Error :CollapseTHENA, 
Unfolds: Error :Unfolds, 
CollapseTHEN: Error :CollapseTHEN, 
eclass-val: X(e), 
D: Error :D, 
RepeatFor: Error :RepeatFor, 
fpf: a:A fp-> B[a], 
strong-subtype: strong-subtype(A;B), 
le: A 
 B, 
ge: i 
 j , 
less_than: a < b, 
list: type List, 
guard: {T}, 
sq_type: SQType(T), 
rec: rec(x.A[x]), 
tree: Tree(E), 
bool:
, 
pair: <a, b>, 
prop:
, 
rev_implies: P 
 Q, 
uiff: uiff(P;Q), 
not:
A, 
sdata-atoms: sdata-atoms(d), 
free-from-atom: x:T||a, 
nil: [], 
append: as @ bs, 
es-before: before(e), 
es-le-before:
loc(e), 
map: map(f;as), 
cons: [car / cdr], 
hd: hd(l), 
last: last(L), 
remove-repeats: remove-repeats(eq;L), 
select: l[i], 
nat:
, 
dstype: dstype(TypeNames; d; a), 
fset: FSet{T}, 
string: Error :string, 
IdLnk: IdLnk, 
Knd: Knd, 
MaName: MaName, 
consensus-state3: consensus-state3(T), 
consensus-rcv: consensus-rcv(V;A), 
runEvents: runEvents(r), 
so_apply: x[s], 
eq_knd: a = b, 
fpf-dom: x 
 dom(f), 
limited-type: LimitedType, 
false: False, 
Auto: Error :Auto, 
AssertBY: Error :AssertBY, 
tactic: Error :tactic, 
rev_uimplies: rev_uimplies(P;Q), 
rationals:
, 
int:
, 
so_lambda: 
x.t[x], 
pi2: snd(t), 
pi1: fst(t)
Lemmas : 
es-interface-subtype_rel, 
pi1_wf_top, 
pi2_wf, 
free-from-atom-atom, 
free-from-atom-Id, 
sdata-free-from-atom, 
decidable__l_member, 
false_wf, 
uiff_inversion, 
decidable__atom_equal_1, 
nat_wf, 
l_member_subtype, 
assert_wf, 
l_member_wf, 
rev_implies_wf, 
iff_wf, 
free-from-atom-pair-iff, 
not_functionality_wrt_uiff, 
and_functionality_wrt_uiff3, 
not_wf, 
iff_weakening_uiff, 
iff_functionality_wrt_iff, 
free-from-atom_wf1, 
sdata-atoms_wf, 
decidable_wf, 
eclass-val_wf, 
Id_wf, 
sdata_wf, 
subtype_rel_wf, 
top_wf, 
ses-info_wf, 
event-ordering+_wf, 
event-ordering+_inc, 
subtype_rel_self, 
es-base-E_wf, 
es-E_wf, 
ses-sign_wf, 
es-interface-subtype_rel2, 
es-interface-top, 
member_wf, 
eclass_wf, 
in-eclass_wf, 
decidable__assert, 
security-event-structure_wf
\mforall{}s:SES.  \mforall{}es:EO+(Info).  \mforall{}e:E.  \mforall{}a:Atom1.
    (Sign(e)  has  a  \mLeftarrow{}{}\mRightarrow{}  (\muparrow{}e  \mmember{}\msubb{}  Sign)  \mwedge{}  ((a  =  signature(e))  \mvee{}  (a  \mmember{}  sdata-atoms(signed(e)))))
Date html generated:
2011_08_17-PM-07_17_59
Last ObjectModification:
2011_06_18-PM-01_08_35
Home
Index