Nuprl Lemma : co-regext-lemma
∀T:Type. ∀f:T ⟶ coSet{i:l}. ∀B:coSet{i:l}.
  ((∃t:T. ∃g:set-dom(f t) ⟶ coSet{i:l}. seteq(B;mk-coset(set-dom(f t);g)))
  ⇒ (∀R:coSet{i:l} ⟶ coSet{i:l} ⟶ ℙ'
        (coSetRelation(R)
        ⇒  R:(B ⇒ co-regext(mk-coset(T;f)))
        ⇒ (∃b:coSet{i:l}. ((b ∈ co-regext(mk-coset(T;f))) ∧  R:(B ⇒ b) ∧ R:(B ─>> b))))))
Proof
Definitions occuring in Statement : 
co-regext: co-regext(a), 
onto-map: R:(A ─>> B), 
mv-map:  R:(A ⇒ B), 
coset-relation: coSetRelation(R), 
setmem: (x ∈ s), 
seteq: seteq(s1;s2), 
set-dom: set-dom(s), 
mk-coset: mk-coset(T;f), 
coSet: coSet{i:l}, 
prop: ℙ, 
all: ∀x:A. B[x], 
exists: ∃x:A. B[x], 
implies: P ⇒ Q, 
and: P ∧ Q, 
apply: f a, 
function: x:A ⟶ B[x], 
universe: Type
Definitions unfolded in proof : 
onto-map: R:(A ─>> B), 
regextfun: regextfun(f;w), 
cand: A c∧ B, 
pi1: fst(t), 
rev_implies: P ⇐ Q, 
guard: {T}, 
coWsup: coWsup(a;f), 
top: Top, 
uimplies: b supposing a, 
so_apply: x[s], 
so_lambda: λ2x.t[x], 
subtype_rel: A ⊆r B, 
mk-coset: mk-coset(T;f), 
co-regext: co-regext(a), 
exists: ∃x:A. B[x], 
mv-map:  R:(A ⇒ B), 
coset-relation: coSetRelation(R), 
prop: ℙ, 
and: P ∧ Q, 
iff: P ⇐⇒ Q, 
uall: ∀[x:A]. B[x], 
member: t ∈ T, 
implies: P ⇒ Q, 
all: ∀x:A. B[x]
Lemmas referenced : 
seteq_inversion, 
setmem-mk-set-sq, 
onto-map_wf, 
equal_wf, 
setmem_functionality, 
all_wf, 
coW_wf, 
setmem-coset, 
coWsup_wf, 
regextfun_wf, 
seteq_weakening, 
setmem-mk-coset, 
seteq_wf, 
set-dom_wf, 
exists_wf, 
coset-relation_wf, 
set_wf, 
subtype_rel_self, 
coSet_wf, 
subtype_rel_dep_function, 
mv-map_wf, 
setmem_wf, 
setsubset-iff, 
co-regext_wf, 
transitive-set-iff, 
mk-coset_wf, 
co-regext-transitive
Rules used in proof : 
productEquality, 
independent_pairFormation, 
equalitySymmetry, 
equalityTransitivity, 
functionExtensionality, 
dependent_pairFormation, 
voidEquality, 
voidElimination, 
isect_memberEquality, 
rename, 
setElimination, 
independent_isectElimination, 
setEquality, 
universeEquality, 
cumulativity, 
functionEquality, 
lambdaEquality, 
because_Cache, 
instantiate, 
applyEquality, 
sqequalRule, 
promote_hyp, 
allFunctionality, 
independent_functionElimination, 
productElimination, 
hypothesis, 
hypothesisEquality, 
isectElimination, 
thin, 
dependent_functionElimination, 
sqequalHypSubstitution, 
extract_by_obid, 
introduction, 
cut, 
lambdaFormation, 
sqequalReflexivity, 
computationStep, 
sqequalTransitivity, 
sqequalSubstitution
Latex:
\mforall{}T:Type.  \mforall{}f:T  {}\mrightarrow{}  coSet\{i:l\}.  \mforall{}B:coSet\{i:l\}.
    ((\mexists{}t:T.  \mexists{}g:set-dom(f  t)  {}\mrightarrow{}  coSet\{i:l\}.  seteq(B;mk-coset(set-dom(f  t);g)))
    {}\mRightarrow{}  (\mforall{}R:coSet\{i:l\}  {}\mrightarrow{}  coSet\{i:l\}  {}\mrightarrow{}  \mBbbP{}'
                (coSetRelation(R)
                {}\mRightarrow{}    R:(B  {}\mRightarrow{}  co-regext(mk-coset(T;f)))
                {}\mRightarrow{}  (\mexists{}b:coSet\{i:l\}.  ((b  \mmember{}  co-regext(mk-coset(T;f)))  \mwedge{}    R:(B  {}\mRightarrow{}  b)  \mwedge{}  R:(B  {}>>  b))))))
Date html generated:
2018_07_29-AM-10_08_07
Last ObjectModification:
2018_07_21-PM-04_49_46
Theory : constructive!set!theory
Home
Index