Nuprl Lemma : mu_ex_v5_send-token-from-same-loc
[es:EO']. [m1,m2,init,p1,p2,p:Id]. [e1,e2:E].
(<p, make-Msg([token];Unit;
)> 
mu_ex_v5_main(init;m1;m2;p1;p2)(e1)
<p, make-Msg([token];Unit;)> mu_ex_v5_main(init;m1;m2;p1;p2)(e2)
(loc(e1) = loc(e2)))
Proof not projected
Definitions occuring in Statement :
mu_ex_v5_main: mu_ex_v5_main(initial_token;m1;m2;proc1;proc2),
make-Msg: make-Msg(hdr;typ;val),
Message: Message,
classrel: v X(e),
event-ordering+: EO+(Info),
es-loc: loc(e),
es-E: E,
Id: Id,
it: ,
uall: [x:A]. B[x],
implies: P Q,
unit: Unit,
pair: <a, b>,
product: x:A 
B[x],
cons: [car / cdr],
nil: [],
token: "$token",
equal: s = t
Definitions :
guard: {T},
prop: 
,
member: t T,
unit: Unit,
Id: Id,
uiff: uiff(P;Q),
bfalse: ff,
btrue: tt,
ifthenelse: if b then t else f fi ,
false: False,
deq: EqDecider(T),
all: x:A. B[x],
uimplies: b supposing a,
sq_type: SQType(T),
uall: [x:A]. B[x],
iff: P 
Q,
not: 
A,
or: P 
Q,
squash: 
T,
mu_ex_v5_getOtherProc: mu_ex_v5_getOtherProc(proc1;proc2),
sq_or: a b,
and: P 
Q,
implies: P Q,
subtype: S 
T
Lemmas :
not_functionality_wrt_uiff,
assert_of_bnot,
eqff_to_assert,
assert-deq,
eqtt_to_assert,
uiff_transitivity,
bool_subtype_base,
bool_cases,
event-ordering+_wf,
es-E_wf,
it_wf,
valueall-type_wf,
equal-valueall-type,
unit_wf2,
make-Msg_wf,
mu_ex_v5_main_wf,
classrel_wf,
not_wf,
bnot_wf,
assert_wf,
equal_wf,
Message_wf,
event-ordering+_inc,
es-loc_wf,
bool_wf,
Id_wf,
deq_wf,
id-deq_wf,
atom2_subtype_base,
subtype_base_sq,
mu_ex_v5_Token-ilf
\mforall{}[es:EO']. \mforall{}[m1,m2,init,p1,p2,p:Id]. \mforall{}[e1,e2:E].
(<p, make-Msg([token];Unit;\mcdot{})> \mmember{} mu\_ex\_v5\_main(init;m1;m2;p1;p2)(e1)
{}\mRightarrow{} <p, make-Msg([token];Unit;\mcdot{})> \mmember{} mu\_ex\_v5\_main(init;m1;m2;p1;p2)(e2)
{}\mRightarrow{} (loc(e1) = loc(e2)))
Date html generated:
2012_02_20-PM-07_02_19
Last ObjectModification:
2012_02_02-PM-03_02_30
Home
Index