---

Step * 3 of Lemma flattice-order_transitivity


1. [X] : Type
2. as : (X + X) List List
3. bs : (X + X) List List
4. cs : (X + X) List List
5. ∀b:(X + X) List
     ((b ∈ bs) ⇒ ((∃x:X + X. ((x ∈ b) ∧ (∃y∈b. y = flip-union(x) ∈ (X + X)))) ∨ (∃a:(X + X) List. ((a ∈ as) ∧ a ⊆ b))))
6. ∀b:(X + X) List
     ((b ∈ cs) ⇒ ((∃x:X + X. ((x ∈ b) ∧ (∃y∈b. y = flip-union(x) ∈ (X + X)))) ∨ (∃a:(X + X) List. ((a ∈ bs) ∧ a ⊆ b))))
7. b : (X + X) List
8. (b ∈ cs)
9. a : (X + X) List
10. (a ∈ bs)
11. a ⊆ b
12. a1 : (X + X) List
13. (a1 ∈ as)
14. a1 ⊆ a
15. (a1 ∈ as)
⊢ a1 ⊆ b
BY
{ (FLemma `l_contains_transitivity` [11;14] THEN Auto) }

---

Latex:

---

Latex:

1.  [X]  :  Type
2.  as  :  (X  +  X)  List  List
3.  bs  :  (X  +  X)  List  List
4.  cs  :  (X  +  X)  List  List
5.  \mforall{}b:(X  +  X)  List
          ((b  \mmember{}  bs)
          {}\mRightarrow{}  ((\mexists{}x:X  +  X.  ((x  \mmember{}  b)  \mwedge{}  (\mexists{}y\mmember{}b.  y  =  flip-union(x))))  \mvee{}  (\mexists{}a:(X  +  X)  List.  ((a  \mmember{}  as)  \mwedge{}  a  \msubseteq{}  b))))
6.  \mforall{}b:(X  +  X)  List
          ((b  \mmember{}  cs)
          {}\mRightarrow{}  ((\mexists{}x:X  +  X.  ((x  \mmember{}  b)  \mwedge{}  (\mexists{}y\mmember{}b.  y  =  flip-union(x))))  \mvee{}  (\mexists{}a:(X  +  X)  List.  ((a  \mmember{}  bs)  \mwedge{}  a  \msubseteq{}  b))))
7.  b  :  (X  +  X)  List
8.  (b  \mmember{}  cs)
9.  a  :  (X  +  X)  List
10.  (a  \mmember{}  bs)
11.  a  \msubseteq{}  b
12.  a1  :  (X  +  X)  List
13.  (a1  \mmember{}  as)
14.  a1  \msubseteq{}  a
15.  (a1  \mmember{}  as)
\mvdash{}  a1  \msubseteq{}  b


By

---

Latex:
(FLemma  `l\_contains\_transitivity`  [11;14]  THEN  Auto)

---

Home Index