Step
*
of Lemma
regext-transitive
No Annotations
∀a:coSet{i:l}. transitive-set(regext(a))
BY
{ (RWO "transitive-set-iff" 0
THEN Auto
THEN coSetD 1
THEN D 1
THEN All (Fold `mk-coet`)
THEN SetMemDef (-1)
THEN RWO "setsubset-iff" 0
THEN Auto
THEN SetMemDef 0
THEN (RWO "co-seteq-iff" (-3) THENA Auto)) }
1
1. T : Type
2. a1 : T ⟶ coSet{i:l}
3. x : coSet{i:l}@i'
4. b : W(T;x.set-dom(a1 x))@i
5. ∀z:coSet{i:l}. ((z ∈ x)
⇐⇒ (z ∈ regextfun(a1;b)))
6. x1 : coSet{i:l}@i'
7. (x1 ∈ x)
⊢ ∃b:W(T;x.set-dom(a1 x)). seteq(x1;regextfun(a1;b))
Latex:
Latex:
No Annotations
\mforall{}a:coSet\{i:l\}. transitive-set(regext(a))
By
Latex:
(RWO "transitive-set-iff" 0
THEN Auto
THEN coSetD 1
THEN D 1
THEN All (Fold `mk-coet`)
THEN SetMemDef (-1)
THEN RWO "setsubset-iff" 0
THEN Auto
THEN SetMemDef 0
THEN (RWO "co-seteq-iff" (-3) THENA Auto))
Home
Index