Proof of Theorem hlatexch4
Step | Hyp | Ref
| Expression |
1 | | simp11 1091 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝐾 ∈ HL) |
2 | | simp2l 1087 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑅 ∈ 𝐴) |
3 | | simp2r 1088 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑆 ∈ 𝐴) |
4 | | eqid 2622 |
. . . . . . . 8
⊢
(le‘𝐾) =
(le‘𝐾) |
5 | | hlatexch4.j |
. . . . . . . 8
⊢ ∨ =
(join‘𝐾) |
6 | | hlatexch4.a |
. . . . . . . 8
⊢ 𝐴 = (Atoms‘𝐾) |
7 | 4, 5, 6 | hlatlej2 34662 |
. . . . . . 7
⊢ ((𝐾 ∈ HL ∧ 𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) → 𝑆(le‘𝐾)(𝑅 ∨ 𝑆)) |
8 | 1, 2, 3, 7 | syl3anc 1326 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑆(le‘𝐾)(𝑅 ∨ 𝑆)) |
9 | | simp33 1099 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆)) |
10 | 8, 9 | breqtrrd 4681 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑆(le‘𝐾)(𝑃 ∨ 𝑄)) |
11 | | simp12 1092 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑃 ∈ 𝐴) |
12 | | simp13 1093 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑄 ∈ 𝐴) |
13 | | simp32 1098 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑄 ≠ 𝑆) |
14 | 13 | necomd 2849 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑆 ≠ 𝑄) |
15 | 4, 5, 6 | hlatexch2 34682 |
. . . . . 6
⊢ ((𝐾 ∈ HL ∧ (𝑆 ∈ 𝐴 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ 𝑆 ≠ 𝑄) → (𝑆(le‘𝐾)(𝑃 ∨ 𝑄) → 𝑃(le‘𝐾)(𝑆 ∨ 𝑄))) |
16 | 1, 3, 11, 12, 14, 15 | syl131anc 1339 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → (𝑆(le‘𝐾)(𝑃 ∨ 𝑄) → 𝑃(le‘𝐾)(𝑆 ∨ 𝑄))) |
17 | 10, 16 | mpd 15 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑃(le‘𝐾)(𝑆 ∨ 𝑄)) |
18 | 5, 6 | hlatjcom 34654 |
. . . . 5
⊢ ((𝐾 ∈ HL ∧ 𝑆 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) → (𝑆 ∨ 𝑄) = (𝑄 ∨ 𝑆)) |
19 | 1, 3, 12, 18 | syl3anc 1326 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → (𝑆 ∨ 𝑄) = (𝑄 ∨ 𝑆)) |
20 | 17, 19 | breqtrd 4679 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑃(le‘𝐾)(𝑄 ∨ 𝑆)) |
21 | 4, 5, 6 | hlatlej2 34662 |
. . . . . 6
⊢ ((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) → 𝑄(le‘𝐾)(𝑃 ∨ 𝑄)) |
22 | 1, 11, 12, 21 | syl3anc 1326 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑄(le‘𝐾)(𝑃 ∨ 𝑄)) |
23 | 22, 9 | breqtrd 4679 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑄(le‘𝐾)(𝑅 ∨ 𝑆)) |
24 | 4, 5, 6 | hlatexch2 34682 |
. . . . 5
⊢ ((𝐾 ∈ HL ∧ (𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ 𝑄 ≠ 𝑆) → (𝑄(le‘𝐾)(𝑅 ∨ 𝑆) → 𝑅(le‘𝐾)(𝑄 ∨ 𝑆))) |
25 | 1, 12, 2, 3, 13, 24 | syl131anc 1339 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → (𝑄(le‘𝐾)(𝑅 ∨ 𝑆) → 𝑅(le‘𝐾)(𝑄 ∨ 𝑆))) |
26 | 23, 25 | mpd 15 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑅(le‘𝐾)(𝑄 ∨ 𝑆)) |
27 | | hllat 34650 |
. . . . 5
⊢ (𝐾 ∈ HL → 𝐾 ∈ Lat) |
28 | 1, 27 | syl 17 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝐾 ∈ Lat) |
29 | | eqid 2622 |
. . . . . 6
⊢
(Base‘𝐾) =
(Base‘𝐾) |
30 | 29, 6 | atbase 34576 |
. . . . 5
⊢ (𝑃 ∈ 𝐴 → 𝑃 ∈ (Base‘𝐾)) |
31 | 11, 30 | syl 17 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑃 ∈ (Base‘𝐾)) |
32 | 29, 6 | atbase 34576 |
. . . . 5
⊢ (𝑅 ∈ 𝐴 → 𝑅 ∈ (Base‘𝐾)) |
33 | 2, 32 | syl 17 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑅 ∈ (Base‘𝐾)) |
34 | 29, 5, 6 | hlatjcl 34653 |
. . . . 5
⊢ ((𝐾 ∈ HL ∧ 𝑄 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) → (𝑄 ∨ 𝑆) ∈ (Base‘𝐾)) |
35 | 1, 12, 3, 34 | syl3anc 1326 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → (𝑄 ∨ 𝑆) ∈ (Base‘𝐾)) |
36 | 29, 4, 5 | latjle12 17062 |
. . . 4
⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾) ∧ (𝑄 ∨ 𝑆) ∈ (Base‘𝐾))) → ((𝑃(le‘𝐾)(𝑄 ∨ 𝑆) ∧ 𝑅(le‘𝐾)(𝑄 ∨ 𝑆)) ↔ (𝑃 ∨ 𝑅)(le‘𝐾)(𝑄 ∨ 𝑆))) |
37 | 28, 31, 33, 35, 36 | syl13anc 1328 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → ((𝑃(le‘𝐾)(𝑄 ∨ 𝑆) ∧ 𝑅(le‘𝐾)(𝑄 ∨ 𝑆)) ↔ (𝑃 ∨ 𝑅)(le‘𝐾)(𝑄 ∨ 𝑆))) |
38 | 20, 26, 37 | mpbi2and 956 |
. 2
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → (𝑃 ∨ 𝑅)(le‘𝐾)(𝑄 ∨ 𝑆)) |
39 | | simp31 1097 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → 𝑃 ≠ 𝑅) |
40 | 4, 5, 6 | ps-1 34763 |
. . 3
⊢ ((𝐾 ∈ HL ∧ (𝑃 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴 ∧ 𝑃 ≠ 𝑅) ∧ (𝑄 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴)) → ((𝑃 ∨ 𝑅)(le‘𝐾)(𝑄 ∨ 𝑆) ↔ (𝑃 ∨ 𝑅) = (𝑄 ∨ 𝑆))) |
41 | 1, 11, 2, 39, 12, 3, 40 | syl132anc 1344 |
. 2
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → ((𝑃 ∨ 𝑅)(le‘𝐾)(𝑄 ∨ 𝑆) ↔ (𝑃 ∨ 𝑅) = (𝑄 ∨ 𝑆))) |
42 | 38, 41 | mpbid 222 |
1
⊢ (((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑅 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) ∧ (𝑃 ≠ 𝑅 ∧ 𝑄 ≠ 𝑆 ∧ (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑆))) → (𝑃 ∨ 𝑅) = (𝑄 ∨ 𝑆)) |