---

Step * 1 1 1 1 1 1 1 of Lemma dlattice-order-free-dl-meet


1. X : Type
2. a1 : X List List
3. b1 : X List List
4. as : X List List
5. b2 : X List List
6. ∀b:X List. ((b ∈ b1) ⇒ (∃a:X List. ((a ∈ a1) ∧ l_subset(X;a;b))))
7. ∀b:X List. ((b ∈ b2) ⇒ (∃a:X List. ((a ∈ as) ∧ l_subset(X;a;b))))
8. b : X List
9. u : X List
10. v : X List
11. (u ∈ b1)
12. (v ∈ b2)
13. b = (u @ v) ∈ (X List)
14. a2 : X List
15. (a2 ∈ a1)
16. l_subset(X;a2;u)
17. a : X List
18. (a ∈ as)
19. l_subset(X;a;v)
20. ∃u,v:X List. ((u ∈ a1) ∧ (v ∈ as) ∧ ((a2 @ a) = (u @ v) ∈ (X List)))
⊢ l_subset(X;a2 @ a;u @ v)
BY
{ (RWO "l_subset_append" 0 THEN Auto) }

1
1. X : Type
2. a1 : X List List
3. b1 : X List List
4. as : X List List
5. b2 : X List List
6. ∀b:X List. ((b ∈ b1) ⇒ (∃a:X List. ((a ∈ a1) ∧ l_subset(X;a;b))))
7. ∀b:X List. ((b ∈ b2) ⇒ (∃a:X List. ((a ∈ as) ∧ l_subset(X;a;b))))
8. b : X List
9. u : X List
10. v : X List
11. (u ∈ b1)
12. (v ∈ b2)
13. b = (u @ v) ∈ (X List)
14. a2 : X List
15. (a2 ∈ a1)
16. l_subset(X;a2;u)
17. a : X List
18. (a ∈ as)
19. l_subset(X;a;v)
20. ∃u,v:X List. ((u ∈ a1) ∧ (v ∈ as) ∧ ((a2 @ a) = (u @ v) ∈ (X List)))
⊢ l_subset(X;a2;u @ v)

2
1. X : Type
2. a1 : X List List
3. b1 : X List List
4. as : X List List
5. b2 : X List List
6. ∀b:X List. ((b ∈ b1) ⇒ (∃a:X List. ((a ∈ a1) ∧ l_subset(X;a;b))))
7. ∀b:X List. ((b ∈ b2) ⇒ (∃a:X List. ((a ∈ as) ∧ l_subset(X;a;b))))
8. b : X List
9. u : X List
10. v : X List
11. (u ∈ b1)
12. (v ∈ b2)
13. b = (u @ v) ∈ (X List)
14. a2 : X List
15. (a2 ∈ a1)
16. l_subset(X;a2;u)
17. a : X List
18. (a ∈ as)
19. l_subset(X;a;v)
20. ∃u,v:X List. ((u ∈ a1) ∧ (v ∈ as) ∧ ((a2 @ a) = (u @ v) ∈ (X List)))
21. l_subset(X;a2;u @ v)
⊢ l_subset(X;a;u @ v)

---

Latex:

---

Latex:

1.  X  :  Type
2.  a1  :  X  List  List
3.  b1  :  X  List  List
4.  as  :  X  List  List
5.  b2  :  X  List  List
6.  \mforall{}b:X  List.  ((b  \mmember{}  b1)  {}\mRightarrow{}  (\mexists{}a:X  List.  ((a  \mmember{}  a1)  \mwedge{}  l\_subset(X;a;b))))
7.  \mforall{}b:X  List.  ((b  \mmember{}  b2)  {}\mRightarrow{}  (\mexists{}a:X  List.  ((a  \mmember{}  as)  \mwedge{}  l\_subset(X;a;b))))
8.  b  :  X  List
9.  u  :  X  List
10.  v  :  X  List
11.  (u  \mmember{}  b1)
12.  (v  \mmember{}  b2)
13.  b  =  (u  @  v)
14.  a2  :  X  List
15.  (a2  \mmember{}  a1)
16.  l\_subset(X;a2;u)
17.  a  :  X  List
18.  (a  \mmember{}  as)
19.  l\_subset(X;a;v)
20.  \mexists{}u,v:X  List.  ((u  \mmember{}  a1)  \mwedge{}  (v  \mmember{}  as)  \mwedge{}  ((a2  @  a)  =  (u  @  v)))
\mvdash{}  l\_subset(X;a2  @  a;u  @  v)


By

---

Latex:
(RWO  "l\_subset\_append"  0  THEN  Auto)

---

Home Index