---

Step * 1 1 1 of Lemma fset-minimals-antichain


1. T : Type
2. eq : EqDecider(T)@i
3. s : fset(fset(T))@i
4. xs : fset(T)@i
5. ys : fset(T)@i
6. ys ∈ s
7. fset-all(s;y1.¬bf-proper-subset-dec(eq;y1;ys))
8. xs ∈ s
9. fset-all(s;ys.¬bf-proper-subset-dec(eq;ys;xs))
10. xs ⊆ ys@i
11. ¬(xs = ys ∈ fset(T))@i
⊢ False
BY
{ ((InstLemma `fset-all-iff` [⌜fset(T)⌝;⌜deq-fset(eq)⌝]⋅ THENA Auto) THEN (RWO "-1" (-6) THENA Auto)) }

1
1. T : Type
2. eq : EqDecider(T)@i
3. s : fset(fset(T))@i
4. xs : fset(T)@i
5. ys : fset(T)@i
6. ys ∈ s
7. ∀[y1:fset(T)]. ↑¬bf-proper-subset-dec(eq;y1;ys) supposing y1 ∈ s
8. xs ∈ s
9. fset-all(s;ys.¬bf-proper-subset-dec(eq;ys;xs))
10. xs ⊆ ys@i
11. ¬(xs = ys ∈ fset(T))@i
12. ∀[P:fset(T) ⟶ 𝔹]. ∀[s:fset(fset(T))].  uiff(fset-all(s;x.P[x]);∀[x:fset(T)]. ↑P[x] supposing x ∈ s)
⊢ False

---

Latex:

---

Latex:

1.  T  :  Type
2.  eq  :  EqDecider(T)@i
3.  s  :  fset(fset(T))@i
4.  xs  :  fset(T)@i
5.  ys  :  fset(T)@i
6.  ys  \mmember{}  s
7.  fset-all(s;y1.\mneg{}\msubb{}f-proper-subset-dec(eq;y1;ys))
8.  xs  \mmember{}  s
9.  fset-all(s;ys.\mneg{}\msubb{}f-proper-subset-dec(eq;ys;xs))
10.  xs  \msubseteq{}  ys@i
11.  \mneg{}(xs  =  ys)@i
\mvdash{}  False


By

---

Latex:
((InstLemma  `fset-all-iff`  [\mkleeneopen{}fset(T)\mkleeneclose{};\mkleeneopen{}deq-fset(eq)\mkleeneclose{}]\mcdot{}  THENA  Auto)  THEN  (RWO  "-1"  (-6)  THENA  Auto))

---

Home Index