Nuprl Lemma : mu_ex_v5_send-token-unit
[es:EO']. [m1,m2,init,p1,p2,i:Id]. [e:E]. [m:Message].
(<i, m> 
mu_ex_v5_main(init;m1;m2;p1;p2)(e) 
(msg-header(m) = [token]) (m = make-Msg([token];Unit;
)))
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),
msg-header: msg-header(m),
Message: Message,
classrel: v X(e),
event-ordering+: EO+(Info),
es-E: E,
Id: Id,
name: Name,
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 :
ifthenelse: if b then t else f fi ,
msg-has-type: msg-has-type(m;T),
assert: 
b,
rev_implies: P 
Q,
and: P 
Q,
label: ...$L... t,
prop: 
,
true: True,
squash: 
T,
iff: P Q,
implies: P Q,
member: t T,
unit: Unit,
name: Name,
uiff: uiff(P;Q),
rev_uimplies: rev_uimplies(P;Q),
guard: {T},
all: x:A. B[x],
uimplies: b supposing a,
sq_type: SQType(T),
uall: [x:A]. B[x],
subtype: S 
T
Lemmas :
unit_subtype_base,
unit_wf2,
event-ordering+_wf,
event-ordering+_inc,
es-E_wf,
mu_ex_v5_main_wf,
Id_wf,
Message_wf,
classrel_wf,
msg-header_wf,
equal_wf,
msg-type_wf2,
it_wf,
type-valueall-type,
eq_term_wf,
assert_functionality_wrt_uiff,
msg-body_wf2,
equal-unit,
msg-body_wf,
valueall-type_wf,
true_wf,
squash_wf,
make-Msg_wf,
mu_ex_v5_observe-unit,
atom_subtype_base,
list_subtype_base,
name_wf,
subtype_base_sq,
Message-eta
\mforall{}[es:EO']. \mforall{}[m1,m2,init,p1,p2,i:Id]. \mforall{}[e:E]. \mforall{}[m:Message].
(<i, m> \mmember{} mu\_ex\_v5\_main(init;m1;m2;p1;p2)(e)
{}\mRightarrow{} (msg-header(m) = [token])
{}\mRightarrow{} (m = make-Msg([token];Unit;\mcdot{})))
Date html generated:
2012_02_20-PM-07_02_44
Last ObjectModification:
2012_02_02-PM-03_02_43
Home
Index