---

Step * 1 of Lemma fset-ac-le-implies


1. T : Type
2. eq : EqDecider(T)
3. ac1 : fset(fset(T))
4. ac2 : fset(fset(T))
5. fset-ac-le(eq;ac1;ac2)
6. a : fset(T)
7. a ∈ ac1
⊢ ¬({y ∈ ac2 | deq-f-subset(eq) y a} = {} ∈ fset(fset(T)))
BY
{ (UnfoldTopAb (-3)
   THEN (InstLemma `fset-all-iff` [⌜fset(T)⌝;⌜deq-fset(eq)⌝]⋅ THENA Auto)
   THEN (RWO  "-1" 5 THENA Auto)) }

1
1. T : Type
2. eq : EqDecider(T)
3. ac1 : fset(fset(T))
4. ac2 : fset(fset(T))
5. ∀[x:fset(T)]. ↑¬bfset-null({y ∈ ac2 | deq-f-subset(eq) y x}) supposing x ∈ ac1
6. a : fset(T)
7. a ∈ ac1
8. ∀[P:fset(T) ⟶ 𝔹]. ∀[s:fset(fset(T))].  uiff(fset-all(s;x.P[x]);∀[x:fset(T)]. ↑P[x] supposing x ∈ s)
⊢ ¬({y ∈ ac2 | deq-f-subset(eq) y a} = {} ∈ fset(fset(T)))

---

Latex:

---

Latex:

1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  ac1  :  fset(fset(T))
4.  ac2  :  fset(fset(T))
5.  fset-ac-le(eq;ac1;ac2)
6.  a  :  fset(T)
7.  a  \mmember{}  ac1
\mvdash{}  \mneg{}(\{y  \mmember{}  ac2  |  deq-f-subset(eq)  y  a\}  =  \{\})


By

---

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

---

Home Index