{ 
a,b:Id. 
S:Id List. 
k:Knd.
    (
rcvset(a;b;S;k)
    

 
i,j:Id. ((i 
 S) 
 (j 
 S) 
 (k = rcv((link(a) from i to j),b)))) }
{ Proof }
Definitions occuring in Statement : 
rcvset: rcvset(a;b;S;k), 
rcv: rcv(l,tg), 
Knd: Knd, 
mk_lnk: (link(n) from i to j), 
Id: Id, 
assert:
b, 
all:
x:A. B[x], 
exists:
x:A. B[x], 
iff: P 

 Q, 
and: P 
 Q, 
list: type List, 
equal: s = t, 
l_member: (x 
 l)
Definitions : 
all:
x:A. B[x], 
Knd: Knd, 
iff: P 

 Q, 
and: P 
 Q, 
implies: P 
 Q, 
rev_implies: P 
 Q, 
member: t 
 T, 
exists:
x:A. B[x], 
l_member: (x 
 l), 
band: p 
 q, 
btrue: tt, 
bfalse: ff, 
ifthenelse: if b then t else f fi , 
false: False, 
prop:
, 
cand: A c
 B, 
not:
A, 
le: A 
 B, 
rcvset: rcvset(a;b;S;k), 
assert:
b, 
IdLnk: IdLnk, 
isrcv: isrcv(k), 
tagof: tag(k), 
lname: lname(l), 
lnk: lnk(k), 
lsrc: source(l), 
ldst: destination(l), 
isl: isl(x), 
pi2: snd(t), 
outl: outl(x), 
pi1: fst(t), 
bool:
, 
unit: Unit, 
nat:
, 
sq_type: SQType(T), 
guard: {T}, 
it:
, 
rcv: rcv(l,tg), 
mk_lnk: (link(n) from i to j)
Lemmas : 
IdLnk_wf, 
assert_wf, 
band_wf, 
eq_id_wf, 
deq-member_wf, 
id-deq_wf, 
l_member_wf, 
bool_wf, 
iff_transitivity, 
eqtt_to_assert, 
assert-eq-id, 
bnot_wf, 
not_wf, 
eqff_to_assert, 
assert_of_bnot, 
not_functionality_wrt_iff, 
bfalse_wf, 
assert-deq-member, 
nat_wf, 
length_wf1, 
select_wf, 
assert_of_band, 
and_functionality_wrt_iff, 
rcv_wf, 
mk_lnk_wf, 
Id_wf, 
Id_sq, 
Knd_sq
\mforall{}a,b:Id.  \mforall{}S:Id  List.  \mforall{}k:Knd.
    (\muparrow{}rcvset(a;b;S;k)  \mLeftarrow{}{}\mRightarrow{}  \mexists{}i,j:Id.  ((i  \mmember{}  S)  \mwedge{}  (j  \mmember{}  S)  \mwedge{}  (k  =  rcv((link(a)  from  i  to  j),b))))
Date html generated:
2010_08_26-PM-11_38_59
Last ObjectModification:
2009_03_22-PM-01_24_40
Home
Index