---

Step * 1 1 of Lemma face-lattice-le


1. T : Type
2. eq : EqDecider(T)
3. x : {ac:fset(fset(T + T))| 
        (↑fset-antichain(union-deq(T;T;eq;eq);ac))
        ∧ fset-all(ac;a.fset-contains-none(union-deq(T;T;eq;eq);a;x.face-lattice-constraints(x)))} 
4. y : {ac:fset(fset(T + T))| 
        (↑fset-antichain(union-deq(T;T;eq;eq);ac))
        ∧ fset-all(ac;a.fset-contains-none(union-deq(T;T;eq;eq);a;x.face-lattice-constraints(x)))} 
5. x ≤ y ⇒ fset-ac-le(union-deq(T;T;eq;eq);x;y)
6. x ≤ y ⇐ fset-ac-le(union-deq(T;T;eq;eq);x;y)
7. ∀s:fset(T + T). (s ∈ x ⇒ (↓∃t:fset(T + T). (t ∈ y ∧ t ⊆ s)))
8. x1 : fset(T + T)
9. x1 ∈ x
⊢ ↑¬bfset-null({y ∈ y | deq-f-subset(union-deq(T;T;eq;eq)) y x1})
BY
{ ((InstHyp [⌜x1⌝] (-3)⋅ THENA Auto) THEN D -1 THEN Auto) }

1
1. T : Type
2. eq : EqDecider(T)
3. x : {ac:fset(fset(T + T))| 
        (↑fset-antichain(union-deq(T;T;eq;eq);ac))
        ∧ fset-all(ac;a.fset-contains-none(union-deq(T;T;eq;eq);a;x.face-lattice-constraints(x)))} 
4. y : {ac:fset(fset(T + T))| 
        (↑fset-antichain(union-deq(T;T;eq;eq);ac))
        ∧ fset-all(ac;a.fset-contains-none(union-deq(T;T;eq;eq);a;x.face-lattice-constraints(x)))} 
5. x ≤ y ⇒ fset-ac-le(union-deq(T;T;eq;eq);x;y)
6. x ≤ y ⇐ fset-ac-le(union-deq(T;T;eq;eq);x;y)
7. ∀s:fset(T + T). (s ∈ x ⇒ (↓∃t:fset(T + T). (t ∈ y ∧ t ⊆ s)))
8. x1 : fset(T + T)
9. x1 ∈ x
10. ∃t:fset(T + T). (t ∈ y ∧ t ⊆ x1)
⊢ ¬↑fset-null({y ∈ y | deq-f-subset(union-deq(T;T;eq;eq)) y x1})

---

Latex:

---

Latex:

1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  x  :  \{ac:fset(fset(T  +  T))| 
                (\muparrow{}fset-antichain(union-deq(T;T;eq;eq);ac))
                \mwedge{}  fset-all(ac;a.fset-contains-none(union-deq(T;T;eq;eq);a;x.face-lattice-constraints(x)))\} 
4.  y  :  \{ac:fset(fset(T  +  T))| 
                (\muparrow{}fset-antichain(union-deq(T;T;eq;eq);ac))
                \mwedge{}  fset-all(ac;a.fset-contains-none(union-deq(T;T;eq;eq);a;x.face-lattice-constraints(x)))\} 
5.  x  \mleq{}  y  {}\mRightarrow{}  fset-ac-le(union-deq(T;T;eq;eq);x;y)
6.  x  \mleq{}  y  \mLeftarrow{}{}  fset-ac-le(union-deq(T;T;eq;eq);x;y)
7.  \mforall{}s:fset(T  +  T).  (s  \mmember{}  x  {}\mRightarrow{}  (\mdownarrow{}\mexists{}t:fset(T  +  T).  (t  \mmember{}  y  \mwedge{}  t  \msubseteq{}  s)))
8.  x1  :  fset(T  +  T)
9.  x1  \mmember{}  x
\mvdash{}  \muparrow{}\mneg{}\msubb{}fset-null(\{y  \mmember{}  y  |  deq-f-subset(union-deq(T;T;eq;eq))  y  x1\})


By

---

Latex:
((InstHyp  [\mkleeneopen{}x1\mkleeneclose{}]  (-3)\mcdot{}  THENA  Auto)  THEN  D  -1  THEN  Auto)

---

Home Index