---

Step * 1 3 of Lemma subset-regext

.....antecedent..... 
1. A : Type
2. a : A ⟶ Set{i:l}
3. transitive-set(a"(A))
4. T : Type
5. f : T ⟶ Set{i:l}
6. ∀t:T. ((f[t] ∈ a"(A)) ⇒ (f[t] ∈ regext(a"(A))))
7. t : A
8. seteq(f"(T);a t)
⊢  λx,y. seteq(x;y):(a t ⇒ regext(a"(A)))
BY
{ ((RWO "transitive-set-iff" 3 THENA Auto)
   THEN (InstHyp [⌜a t⌝] 3⋅ THENA (Auto THEN RepUR ``setmem`` 0 THEN Auto))
   THEN (RWO  "-2<" (-1) THENA Auto)) }

1
1. A : Type
2. a : A ⟶ Set{i:l}
3. ∀x:coSet{i:l}. ((x ∈ a"(A)) ⇒ (x ⊆ a"(A)))
4. T : Type
5. f : T ⟶ Set{i:l}
6. ∀t:T. ((f[t] ∈ a"(A)) ⇒ (f[t] ∈ regext(a"(A))))
7. t : A
8. seteq(f"(T);a t)
9. (f"(T) ⊆ a"(A))
⊢  λx,y. seteq(x;y):(a t ⇒ regext(a"(A)))

---

Latex:

---

Latex:
.....antecedent..... 
1.  A  :  Type
2.  a  :  A  {}\mrightarrow{}  Set\{i:l\}
3.  transitive-set(a"(A))
4.  T  :  Type
5.  f  :  T  {}\mrightarrow{}  Set\{i:l\}
6.  \mforall{}t:T.  ((f[t]  \mmember{}  a"(A))  {}\mRightarrow{}  (f[t]  \mmember{}  regext(a"(A))))
7.  t  :  A
8.  seteq(f"(T);a  t)
\mvdash{}    \mlambda{}x,y.  seteq(x;y):(a  t  {}\mRightarrow{}  regext(a"(A)))


By

---

Latex:
((RWO  "transitive-set-iff"  3  THENA  Auto)
  THEN  (InstHyp  [\mkleeneopen{}a  t\mkleeneclose{}]  3\mcdot{}  THENA  (Auto  THEN  RepUR  ``setmem``  0  THEN  Auto))
  THEN  (RWO    "-2<"  (-1)  THENA  Auto))

---

Home Index