Nuprl Lemma : mu_ex_v5_send-token-to-same-loc2
[es:EO']. 
[m1,m2,init,p1,p2,i,j:Id]. 
[e1,e2:E].
  (<i, make-Msg([token];Unit;
)> 
 mu_ex_v5_main(init;m1;m2;p1;p2)(e1)
  
 <j, make-Msg([token];Unit;
)> 
 mu_ex_v5_main(init;m1;m2;p1;p2)(e2)
  
 (loc(e1) = loc(e2))
  
 (i = j))
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 : 
and: P 
 Q, 
Id: Id, 
prop:
, 
member: t 
 T, 
unit: Unit, 
guard: {T}, 
uimplies: b supposing a, 
sq_type: SQType(T), 
all:
x:A. B[x], 
uall:
[x:A]. B[x], 
iff: P 

 Q, 
squash:
T, 
sq_or: a 
 b, 
implies: P 
 Q, 
subtype: S 
 T
Lemmas : 
atom2_subtype_base, 
subtype_base_sq, 
mu_ex_v5_getOtherProc_wf, 
and_wf, 
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, 
Message_wf, 
event-ordering+_inc, 
es-loc_wf, 
Id_wf, 
equal_wf, 
mu_ex_v5_Token-ilf
\mforall{}[es:EO'].  \mforall{}[m1,m2,init,p1,p2,i,j:Id].  \mforall{}[e1,e2:E].
    (<i,  make-Msg([token];Unit;\mcdot{})>  \mmember{}  mu\_ex\_v5\_main(init;m1;m2;p1;p2)(e1)
    {}\mRightarrow{}  <j,  make-Msg([token];Unit;\mcdot{})>  \mmember{}  mu\_ex\_v5\_main(init;m1;m2;p1;p2)(e2)
    {}\mRightarrow{}  (loc(e1)  =  loc(e2))
    {}\mRightarrow{}  (i  =  j))
Date html generated:
2012_02_20-PM-07_02_35
Last ObjectModification:
2012_02_02-PM-03_02_38
Home
Index