Proof of Theorem elpaddn0
Step | Hyp | Ref
| Expression |
1 | | paddfval.l |
. . . 4
⊢ ≤ =
(le‘𝐾) |
2 | | paddfval.j |
. . . 4
⊢ ∨ =
(join‘𝐾) |
3 | | paddfval.a |
. . . 4
⊢ 𝐴 = (Atoms‘𝐾) |
4 | | paddfval.p |
. . . 4
⊢ + =
(+𝑃‘𝐾) |
5 | 1, 2, 3, 4 | elpadd 37740 |
. . 3
⊢ ((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) → (𝑆 ∈ (𝑋 + 𝑌) ↔ ((𝑆 ∈ 𝑋 ∨ 𝑆 ∈ 𝑌) ∨ (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))))) |
6 | 5 | adantr 480 |
. 2
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ (𝑋 + 𝑌) ↔ ((𝑆 ∈ 𝑋 ∨ 𝑆 ∈ 𝑌) ∨ (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))))) |
7 | | simpl2 1190 |
. . . . . 6
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → 𝑋 ⊆ 𝐴) |
8 | 7 | sseld 3916 |
. . . . 5
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ 𝑋 → 𝑆 ∈ 𝐴)) |
9 | | simpll1 1210 |
. . . . . . . . . . . . 13
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) ∧ 𝑟 ∈ 𝑌) → 𝐾 ∈ Lat) |
10 | | ssel2 3912 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑋 ⊆ 𝐴 ∧ 𝑆 ∈ 𝑋) → 𝑆 ∈ 𝐴) |
11 | 10 | 3ad2antl2 1184 |
. . . . . . . . . . . . . . 15
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) → 𝑆 ∈ 𝐴) |
12 | 11 | adantr 480 |
. . . . . . . . . . . . . 14
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) ∧ 𝑟 ∈ 𝑌) → 𝑆 ∈ 𝐴) |
13 | | eqid 2738 |
. . . . . . . . . . . . . . 15
⊢
(Base‘𝐾) =
(Base‘𝐾) |
14 | 13, 3 | atbase 37230 |
. . . . . . . . . . . . . 14
⊢ (𝑆 ∈ 𝐴 → 𝑆 ∈ (Base‘𝐾)) |
15 | 12, 14 | syl 17 |
. . . . . . . . . . . . 13
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) ∧ 𝑟 ∈ 𝑌) → 𝑆 ∈ (Base‘𝐾)) |
16 | | simpl3 1191 |
. . . . . . . . . . . . . . 15
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) → 𝑌 ⊆ 𝐴) |
17 | 16 | sselda 3917 |
. . . . . . . . . . . . . 14
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) ∧ 𝑟 ∈ 𝑌) → 𝑟 ∈ 𝐴) |
18 | 13, 3 | atbase 37230 |
. . . . . . . . . . . . . 14
⊢ (𝑟 ∈ 𝐴 → 𝑟 ∈ (Base‘𝐾)) |
19 | 17, 18 | syl 17 |
. . . . . . . . . . . . 13
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) ∧ 𝑟 ∈ 𝑌) → 𝑟 ∈ (Base‘𝐾)) |
20 | 13, 1, 2 | latlej1 18081 |
. . . . . . . . . . . . 13
⊢ ((𝐾 ∈ Lat ∧ 𝑆 ∈ (Base‘𝐾) ∧ 𝑟 ∈ (Base‘𝐾)) → 𝑆 ≤ (𝑆 ∨ 𝑟)) |
21 | 9, 15, 19, 20 | syl3anc 1369 |
. . . . . . . . . . . 12
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) ∧ 𝑟 ∈ 𝑌) → 𝑆 ≤ (𝑆 ∨ 𝑟)) |
22 | 21 | reximdva0 4282 |
. . . . . . . . . . 11
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) ∧ 𝑌 ≠ ∅) → ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑆 ∨ 𝑟)) |
23 | 22 | exp31 419 |
. . . . . . . . . 10
⊢ ((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) → (𝑆 ∈ 𝑋 → (𝑌 ≠ ∅ → ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑆 ∨ 𝑟)))) |
24 | 23 | com23 86 |
. . . . . . . . 9
⊢ ((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) → (𝑌 ≠ ∅ → (𝑆 ∈ 𝑋 → ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑆 ∨ 𝑟)))) |
25 | 24 | imp 406 |
. . . . . . . 8
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑌 ≠ ∅) → (𝑆 ∈ 𝑋 → ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑆 ∨ 𝑟))) |
26 | 25 | ancld 550 |
. . . . . . 7
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑌 ≠ ∅) → (𝑆 ∈ 𝑋 → (𝑆 ∈ 𝑋 ∧ ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑆 ∨ 𝑟)))) |
27 | | oveq1 7262 |
. . . . . . . . . 10
⊢ (𝑞 = 𝑆 → (𝑞 ∨ 𝑟) = (𝑆 ∨ 𝑟)) |
28 | 27 | breq2d 5082 |
. . . . . . . . 9
⊢ (𝑞 = 𝑆 → (𝑆 ≤ (𝑞 ∨ 𝑟) ↔ 𝑆 ≤ (𝑆 ∨ 𝑟))) |
29 | 28 | rexbidv 3225 |
. . . . . . . 8
⊢ (𝑞 = 𝑆 → (∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟) ↔ ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑆 ∨ 𝑟))) |
30 | 29 | rspcev 3552 |
. . . . . . 7
⊢ ((𝑆 ∈ 𝑋 ∧ ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑆 ∨ 𝑟)) → ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)) |
31 | 26, 30 | syl6 35 |
. . . . . 6
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑌 ≠ ∅) → (𝑆 ∈ 𝑋 → ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) |
32 | 31 | adantrl 712 |
. . . . 5
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ 𝑋 → ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) |
33 | 8, 32 | jcad 512 |
. . . 4
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ 𝑋 → (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)))) |
34 | | simpl3 1191 |
. . . . . 6
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → 𝑌 ⊆ 𝐴) |
35 | 34 | sseld 3916 |
. . . . 5
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ 𝑌 → 𝑆 ∈ 𝐴)) |
36 | | simpll1 1210 |
. . . . . . . . . . . . . . 15
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) ∧ 𝑆 ∈ 𝑌) → 𝐾 ∈ Lat) |
37 | | ssel2 3912 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝑋 ⊆ 𝐴 ∧ 𝑞 ∈ 𝑋) → 𝑞 ∈ 𝐴) |
38 | 37 | 3ad2antl2 1184 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) → 𝑞 ∈ 𝐴) |
39 | 38 | adantr 480 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) ∧ 𝑆 ∈ 𝑌) → 𝑞 ∈ 𝐴) |
40 | 13, 3 | atbase 37230 |
. . . . . . . . . . . . . . . 16
⊢ (𝑞 ∈ 𝐴 → 𝑞 ∈ (Base‘𝐾)) |
41 | 39, 40 | syl 17 |
. . . . . . . . . . . . . . 15
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) ∧ 𝑆 ∈ 𝑌) → 𝑞 ∈ (Base‘𝐾)) |
42 | | simpl3 1191 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) → 𝑌 ⊆ 𝐴) |
43 | 42 | sselda 3917 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) ∧ 𝑆 ∈ 𝑌) → 𝑆 ∈ 𝐴) |
44 | 43, 14 | syl 17 |
. . . . . . . . . . . . . . 15
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) ∧ 𝑆 ∈ 𝑌) → 𝑆 ∈ (Base‘𝐾)) |
45 | 13, 1, 2 | latlej2 18082 |
. . . . . . . . . . . . . . 15
⊢ ((𝐾 ∈ Lat ∧ 𝑞 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → 𝑆 ≤ (𝑞 ∨ 𝑆)) |
46 | 36, 41, 44, 45 | syl3anc 1369 |
. . . . . . . . . . . . . 14
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) ∧ 𝑆 ∈ 𝑌) → 𝑆 ≤ (𝑞 ∨ 𝑆)) |
47 | 46 | ex 412 |
. . . . . . . . . . . . 13
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) → (𝑆 ∈ 𝑌 → 𝑆 ≤ (𝑞 ∨ 𝑆))) |
48 | 47 | ancld 550 |
. . . . . . . . . . . 12
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) → (𝑆 ∈ 𝑌 → (𝑆 ∈ 𝑌 ∧ 𝑆 ≤ (𝑞 ∨ 𝑆)))) |
49 | | oveq2 7263 |
. . . . . . . . . . . . . 14
⊢ (𝑟 = 𝑆 → (𝑞 ∨ 𝑟) = (𝑞 ∨ 𝑆)) |
50 | 49 | breq2d 5082 |
. . . . . . . . . . . . 13
⊢ (𝑟 = 𝑆 → (𝑆 ≤ (𝑞 ∨ 𝑟) ↔ 𝑆 ≤ (𝑞 ∨ 𝑆))) |
51 | 50 | rspcev 3552 |
. . . . . . . . . . . 12
⊢ ((𝑆 ∈ 𝑌 ∧ 𝑆 ≤ (𝑞 ∨ 𝑆)) → ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)) |
52 | 48, 51 | syl6 35 |
. . . . . . . . . . 11
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) → (𝑆 ∈ 𝑌 → ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) |
53 | 52 | impancom 451 |
. . . . . . . . . 10
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑌) → (𝑞 ∈ 𝑋 → ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) |
54 | 53 | ancld 550 |
. . . . . . . . 9
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑌) → (𝑞 ∈ 𝑋 → (𝑞 ∈ 𝑋 ∧ ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)))) |
55 | 54 | eximdv 1921 |
. . . . . . . 8
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑌) → (∃𝑞 𝑞 ∈ 𝑋 → ∃𝑞(𝑞 ∈ 𝑋 ∧ ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)))) |
56 | | n0 4277 |
. . . . . . . 8
⊢ (𝑋 ≠ ∅ ↔
∃𝑞 𝑞 ∈ 𝑋) |
57 | | df-rex 3069 |
. . . . . . . 8
⊢
(∃𝑞 ∈
𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟) ↔ ∃𝑞(𝑞 ∈ 𝑋 ∧ ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) |
58 | 55, 56, 57 | 3imtr4g 295 |
. . . . . . 7
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑌) → (𝑋 ≠ ∅ → ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) |
59 | 58 | impancom 451 |
. . . . . 6
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑋 ≠ ∅) → (𝑆 ∈ 𝑌 → ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) |
60 | 59 | adantrr 713 |
. . . . 5
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ 𝑌 → ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) |
61 | 35, 60 | jcad 512 |
. . . 4
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ 𝑌 → (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)))) |
62 | 33, 61 | jaod 855 |
. . 3
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → ((𝑆 ∈ 𝑋 ∨ 𝑆 ∈ 𝑌) → (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)))) |
63 | | pm4.72 946 |
. . 3
⊢ (((𝑆 ∈ 𝑋 ∨ 𝑆 ∈ 𝑌) → (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) ↔ ((𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)) ↔ ((𝑆 ∈ 𝑋 ∨ 𝑆 ∈ 𝑌) ∨ (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))))) |
64 | 62, 63 | sylib 217 |
. 2
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → ((𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)) ↔ ((𝑆 ∈ 𝑋 ∨ 𝑆 ∈ 𝑌) ∨ (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))))) |
65 | 6, 64 | bitr4d 281 |
1
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ (𝑋 + 𝑌) ↔ (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)))) |