Nuprl Lemma : mu_ex_v5_initial-send
es:EO'. 
m1,m2,init,p1,p2,p:Id. 
e:E.
  (<p, make-Msg([token];Unit;
)> 
 mu_ex_v5_main(init;m1;m2;p1;p2)(e)
  
 (
e':E. (e' 
loc e  
 (
 
 mu_ex_v5_Token()(e'))))
  
 (loc(e) = init))
Proof not projected
Definitions occuring in Statement : 
mu_ex_v5_main: mu_ex_v5_main(initial_token;m1;m2;proc1;proc2), 
mu_ex_v5_Token: mu_ex_v5_Token(), 
make-Msg: make-Msg(hdr;typ;val), 
Message: Message, 
classrel: v 
 X(e), 
event-ordering+: EO+(Info), 
es-le: e 
loc e' , 
es-loc: loc(e), 
es-E: E, 
Id: Id, 
it:
, 
all:
x:A. B[x], 
not:
A, 
implies: P 
 Q, 
unit: Unit, 
pair: <a, b>, 
product: x:A 
 B[x], 
cons: [car / cdr], 
nil: [], 
token: "$token", 
equal: s = t
Definitions : 
so_lambda: 
x.t[x], 
prop:
, 
false: False, 
le: A 
 B, 
ge: i 
 j , 
nat:
, 
true: True, 
member: t 
 T, 
squash:
T, 
not:
A, 
unit: Unit, 
implies: P 
 Q, 
all:
x:A. B[x], 
top: Top, 
Accum-loc-class: Accum-loc-class(f;init;X), 
SM4-class-du: SM4-class-du(init;trX1;trX2;trX3;trX4), 
uall:
[x:A]. B[x], 
mu_ex_v5_State: mu_ex_v5_State(initial_token), 
and: P 
 Q, 
assert:
b, 
subtype: S 
 T, 
band: p 
 q, 
ifthenelse: if b then t else f fi , 
btrue: tt, 
so_apply: x[s], 
uiff: uiff(P;Q), 
or: P 
 Q, 
uimplies: b supposing a, 
strongwellfounded: SWellFounded(R[x; y]), 
exists:
x:A. B[x], 
es-locl: (e <loc e'), 
es-p-local-pred: es-p-local-pred(es;P), 
guard: {T}, 
sq_type: SQType(T), 
pi1: fst(t), 
pi2: snd(t), 
spreadn: spread3, 
isl: isl(x), 
mu_ex_v5_onRequest: mu_ex_v5_onRequest(), 
disjoint-union-tr: tr1 + tr2, 
bfalse: ff, 
outr: outr(x), 
mu_ex_v5_onUseSR: mu_ex_v5_onUseSR(), 
mu_ex_v5_onLeaveCS: mu_ex_v5_onLeaveCS(), 
deq: EqDecider(T), 
mu_ex_v5_initState: mu_ex_v5_initState(initial_token), 
it:
, 
eq_id: a = b
Lemmas : 
event-ordering+_wf, 
valueall-type_wf, 
equal-valueall-type, 
make-Msg_wf, 
mu_ex_v5_main_wf, 
Id_wf, 
it_wf, 
equal_wf, 
mu_ex_v5_Token_wf, 
unit_wf2, 
not_wf, 
es-le_wf, 
es-E_wf, 
all_wf, 
btrue_wf, 
mu_ex_v5_State_wf, 
mu_ex_v5_initState_wf, 
primed-class-opt_wf, 
bool_wf, 
classrel_wf, 
primed-class-opt-classrel, 
es-causl_wf, 
le_wf, 
nat_wf, 
less_than_wf, 
ge_wf, 
nat_properties, 
Message_wf, 
event-ordering+_inc, 
es-causl-swellfnd, 
mu_ex_v5_send-token-had-token, 
lifting-loc-2_wf, 
rec-combined-loc-class-opt-1_wf, 
mu_ex_v5_LeaveCS_wf, 
mu_ex_v5_UseSR_wf, 
mu_ex_v5_Request_wf, 
disjoint-union-class_wf, 
mu_ex_v5_onLeaveCS_wf, 
mu_ex_v5_onUseSR_wf, 
uall_wf, 
mu_ex_v5_onToken_wf, 
mu_ex_v5_onRequest_wf, 
disjoint-union-tr_wf, 
simple-loc-comb-2-classrel, 
rec-combined-loc-class-opt-1-classrel, 
es-le_weakening, 
es-locl_transitivity1, 
band_wf, 
and_wf, 
assert_elim, 
assert_of_band, 
bool_subtype_base, 
subtype_base_sq, 
pi1_wf_top, 
pi2_wf, 
disjoint-union-classrel, 
assert_of_bnot, 
eqff_to_assert, 
uiff_transitivity, 
eqtt_to_assert, 
bool_cases, 
bnot_wf, 
assert_wf, 
btrue_neq_bfalse, 
assert-eq-id, 
es-loc_wf, 
deq_wf, 
id-deq_wf, 
bfalse_wf, 
bag-member-single
\mforall{}es:EO'.  \mforall{}m1,m2,init,p1,p2,p:Id.  \mforall{}e:E.
    (<p,  make-Msg([token];Unit;\mcdot{})>  \mmember{}  mu\_ex\_v5\_main(init;m1;m2;p1;p2)(e)
    {}\mRightarrow{}  (\mforall{}e':E.  (e'  \mleq{}loc  e    {}\mRightarrow{}  (\mneg{}\mcdot{}  \mmember{}  mu\_ex\_v5\_Token()(e'))))
    {}\mRightarrow{}  (loc(e)  =  init))
Date html generated:
2012_02_20-PM-07_03_26
Last ObjectModification:
2012_02_02-PM-03_02_59
Home
Index