Step * 2 1 1 2 of Lemma fset-constrained-ac-lub_wf


1. Type
2. eq EqDecider(T)
3. fset(T) ⟶ 𝔹
4. ac1 fset(fset(T))
5. ↑fset-antichain(eq;ac1)
6. fset-all(ac1;a.P a)
7. ac2 fset(fset(T))
8. ↑fset-antichain(eq;ac2)
9. fset-all(ac2;a.P a)
10. ↑fset-antichain(eq;fset-ac-lub(eq;ac1;ac2))
11. fset(T)
12. a ∈ ac2
13. fset-all(ac1 ⋃ ac2;ys.¬bf-proper-subset-dec(eq;ys;a))
14. ∀[P:fset(T) ⟶ 𝔹]. ∀[s:fset(fset(T))].  uiff(fset-all(s;x.P[x]);∀[x:fset(T)]. ↑P[x] supposing x ∈ s)
⊢ ↑(P a)
BY
(RWO "-1" THEN Auto) }


Latex:


Latex:

1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  P  :  fset(T)  {}\mrightarrow{}  \mBbbB{}
4.  ac1  :  fset(fset(T))
5.  \muparrow{}fset-antichain(eq;ac1)
6.  fset-all(ac1;a.P  a)
7.  ac2  :  fset(fset(T))
8.  \muparrow{}fset-antichain(eq;ac2)
9.  fset-all(ac2;a.P  a)
10.  \muparrow{}fset-antichain(eq;fset-ac-lub(eq;ac1;ac2))
11.  a  :  fset(T)
12.  a  \mmember{}  ac2
13.  fset-all(ac1  \mcup{}  ac2;ys.\mneg{}\msubb{}f-proper-subset-dec(eq;ys;a))
14.  \mforall{}[P:fset(T)  {}\mrightarrow{}  \mBbbB{}].  \mforall{}[s:fset(fset(T))].
            uiff(fset-all(s;x.P[x]);\mforall{}[x:fset(T)].  \muparrow{}P[x]  supposing  x  \mmember{}  s)
\mvdash{}  \muparrow{}(P  a)


By


Latex:
(RWO  "-1"  9  THEN  Auto)




Home Index