---

Step * 1 1 1 1 1 1 1 of Lemma free-dl-1


1. T : Type
2. eq : EqDecider(T)
3. x : fset(fset(T))
4. ∀xs,ys:fset(T).  (¬xs ⊆≠ ys) supposing (xs ∈ x and ys ∈ x)
5. {} ∈ x
6. a : fset(T)
7. {} ∈ fset(T)
8. a ∈ x
9. ¬{} ⊆≠ a
⊢ a = {} ∈ fset(T)
BY
{ ((BoolCase ⌜fset-null(a)⌝⋅ THENA Auto) THEN All (RWO "assert-fset-null") THEN Auto) }

1
1. T : Type
2. eq : EqDecider(T)
3. x : fset(fset(T))
4. ∀xs,ys:fset(T).  (¬xs ⊆≠ ys) supposing (xs ∈ x and ys ∈ x)
5. {} ∈ x
6. a : fset(T)
7. ¬(a = {} ∈ fset(T))
8. {} ∈ fset(T)
9. a ∈ x
10. ¬{} ⊆≠ a
⊢ a = {} ∈ fset(T)

---

Latex:

---

Latex:

1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  x  :  fset(fset(T))
4.  \mforall{}xs,ys:fset(T).    (\mneg{}xs  \msubseteq{}\mneq{}  ys)  supposing  (xs  \mmember{}  x  and  ys  \mmember{}  x)
5.  \{\}  \mmember{}  x
6.  a  :  fset(T)
7.  \{\}  \mmember{}  fset(T)
8.  a  \mmember{}  x
9.  \mneg{}\{\}  \msubseteq{}\mneq{}  a
\mvdash{}  a  =  \{\}


By

---

Latex:
((BoolCase  \mkleeneopen{}fset-null(a)\mkleeneclose{}\mcdot{}  THENA  Auto)  THEN  All  (RWO  "assert-fset-null")  THEN  Auto)

---

Home Index