Nuprl Lemma : glued-first
[Info:Type]
es:EO+(Info)
[A,B:Type].
Ias:EClass(A) List. Ibs:EClass(B) List. f:E(first-class(Ias)) 
B.
((i:
||Ias||. glued(es;B;f;Ias[i];Ibs[i])) 
glued(es;B;f;first-class(Ias);first-class(Ibs))) supposing
((||Ias|| = ||Ibs||) and
(Ib1,Ib2
Ibs. Ib1 
Ib2 = 0) and
(Ia1,Ia2Ias. es:EO+(Info). e,e':E. (
(loc(e) = loc(e'))) supposing ((
e' 
Ia2) and (e Ia1))))
Proof not projected
Definitions occuring in Statement :
glued: glued(es;B;f;Ia;Ib),
es-interface-disjoint: X Y = 0,
es-E-interface: E(X),
first-class: first-class(L),
in-eclass: e X,
eclass: EClass(A[eo; e]),
event-ordering+: EO+(Info),
es-loc: loc(e),
es-E: E,
Id: Id,
select: l[i],
length: ||as||,
assert: b,
int_seg: {i..j
},
uimplies: b supposing a,
uall: [x:A]. B[x],
all: x:A. B[x],
not: A,
implies: P Q,
function: x:A B[x],
list: type List,
natural_number: $n,
int: 
,
universe: Type,
equal: s = t,
pairwise: (x,yL. P[x; y])
Definitions :
uall: [x:A]. B[x],
all: x:A. B[x],
uimplies: b supposing a,
pairwise: (x,yL. P[x; y]),
not: A,
es-interface-disjoint: X Y = 0,
implies: P Q,
prop: 
,
and: P 
Q,
member: t T,
subtype: S 
T,
false: False,
le: A 
B,
so_lambda: 
x y.t[x; y],
cand: A c B,
so_lambda: x.t[x],
suptype: suptype(S; T),
Q-R-glued: Ia:Qa f Ib:Rb,
es-E-interface: E(X),
l_exists: (
xL. P[x]),
exists: x:A. B[x],
int_seg: {i..j},
so_apply: x[s1;s2],
lelt: i j < k,
so_apply: x[s],
iff: P 
Q,
rev_implies: P Q,
glued: glued(es;B;f;Ia;Ib),
glues: g glues Ia f Ib
Lemmas :
Q-R-glued-first,
event-ordering+_wf,
es-le_wf,
event-ordering+_inc,
es-E_wf,
Id_wf,
es-loc_wf,
assert_wf,
in-eclass_wf,
select_wf,
eclass_wf,
top_wf,
es-interface-top,
length_wf,
int_seg_wf,
all_wf,
glued_wf,
es-E-interface_wf,
first-class_wf,
equal_wf,
pairwise_wf,
es-interface-disjoint_wf,
isect_wf,
not_wf,
glued-Q-R-glued,
and_wf,
es-le-loc,
subtype_rel_sets,
subtype_rel_self,
is-first-class,
select_member,
l_member_wf
\mforall{}[Info:Type]
\mforall{}es:EO+(Info)
\mforall{}[A,B:Type].
\mforall{}Ias:EClass(A) List. \mforall{}Ibs:EClass(B) List. \mforall{}f:E(first-class(Ias)) {}\mrightarrow{} B.
((\mforall{}i:\mBbbN{}||Ias||. glued(es;B;f;Ias[i];Ibs[i]))
{}\mRightarrow{} glued(es;B;f;first-class(Ias);first-class(Ibs))) supposing
((||Ias|| = ||Ibs||) and
(\mforall{}Ib1,Ib2\mmember{}Ibs. Ib1 \mcap{} Ib2 = 0) and
(\mforall{}Ia1,Ia2\mmember{}Ias. \mforall{}es:EO+(Info). \mforall{}e,e':E.
(\mneg{}(loc(e) = loc(e'))) supposing ((\muparrow{}e' \mmember{}\msubb{} Ia2) and (\muparrow{}e \mmember{}\msubb{} Ia1))))
Date html generated:
2012_01_23-PM-12_29_39
Last ObjectModification:
2011_12_19-PM-05_05_47
Home
Index