Proof of Theorem cvrval3
Step | Hyp | Ref
| Expression |
1 | | cvrval3.b |
. . . . . 6
⊢ 𝐵 = (Base‘𝐾) |
2 | | eqid 2610 |
. . . . . 6
⊢
(lt‘𝐾) =
(lt‘𝐾) |
3 | | cvrval3.c |
. . . . . 6
⊢ 𝐶 = ( ⋖ ‘𝐾) |
4 | 1, 2, 3 | cvrlt 33575 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) → 𝑋(lt‘𝐾)𝑌) |
5 | | cvrval3.l |
. . . . . 6
⊢ ≤ =
(le‘𝐾) |
6 | | cvrval3.j |
. . . . . 6
⊢ ∨ =
(join‘𝐾) |
7 | | cvrval3.a |
. . . . . 6
⊢ 𝐴 = (Atoms‘𝐾) |
8 | 1, 5, 2, 6, 3, 7 | hlrelat3 33716 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋(lt‘𝐾)𝑌) → ∃𝑝 ∈ 𝐴 (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) |
9 | 4, 8 | syldan 486 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) → ∃𝑝 ∈ 𝐴 (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) |
10 | | simp3l 1082 |
. . . . . . . 8
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝑋𝐶(𝑋 ∨ 𝑝)) |
11 | | simp1l1 1147 |
. . . . . . . . 9
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝐾 ∈ HL) |
12 | | simp1l2 1148 |
. . . . . . . . 9
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝑋 ∈ 𝐵) |
13 | | simp2 1055 |
. . . . . . . . 9
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝑝 ∈ 𝐴) |
14 | 1, 5, 6, 3, 7 | cvr1 33714 |
. . . . . . . . 9
⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑝 ∈ 𝐴) → (¬ 𝑝 ≤ 𝑋 ↔ 𝑋𝐶(𝑋 ∨ 𝑝))) |
15 | 11, 12, 13, 14 | syl3anc 1318 |
. . . . . . . 8
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → (¬ 𝑝 ≤ 𝑋 ↔ 𝑋𝐶(𝑋 ∨ 𝑝))) |
16 | 10, 15 | mpbird 246 |
. . . . . . 7
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → ¬ 𝑝 ≤ 𝑋) |
17 | | hllat 33668 |
. . . . . . . . . . 11
⊢ (𝐾 ∈ HL → 𝐾 ∈ Lat) |
18 | 11, 17 | syl 17 |
. . . . . . . . . 10
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝐾 ∈ Lat) |
19 | 1, 7 | atbase 33594 |
. . . . . . . . . . 11
⊢ (𝑝 ∈ 𝐴 → 𝑝 ∈ 𝐵) |
20 | 19 | 3ad2ant2 1076 |
. . . . . . . . . 10
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝑝 ∈ 𝐵) |
21 | 1, 6 | latjcl 16874 |
. . . . . . . . . 10
⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑝 ∈ 𝐵) → (𝑋 ∨ 𝑝) ∈ 𝐵) |
22 | 18, 12, 20, 21 | syl3anc 1318 |
. . . . . . . . 9
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → (𝑋 ∨ 𝑝) ∈ 𝐵) |
23 | 1, 2, 3 | cvrlt 33575 |
. . . . . . . . 9
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑋 ∨ 𝑝) ∈ 𝐵) ∧ 𝑋𝐶(𝑋 ∨ 𝑝)) → 𝑋(lt‘𝐾)(𝑋 ∨ 𝑝)) |
24 | 11, 12, 22, 10, 23 | syl31anc 1321 |
. . . . . . . 8
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝑋(lt‘𝐾)(𝑋 ∨ 𝑝)) |
25 | | simp3r 1083 |
. . . . . . . 8
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → (𝑋 ∨ 𝑝) ≤ 𝑌) |
26 | | hlpos 33670 |
. . . . . . . . . 10
⊢ (𝐾 ∈ HL → 𝐾 ∈ Poset) |
27 | 11, 26 | syl 17 |
. . . . . . . . 9
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝐾 ∈ Poset) |
28 | | simp1l3 1149 |
. . . . . . . . 9
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝑌 ∈ 𝐵) |
29 | | simp1r 1079 |
. . . . . . . . 9
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝑋𝐶𝑌) |
30 | 1, 5, 2, 3 | cvrnbtwn2 33580 |
. . . . . . . . 9
⊢ ((𝐾 ∈ Poset ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ (𝑋 ∨ 𝑝) ∈ 𝐵) ∧ 𝑋𝐶𝑌) → ((𝑋(lt‘𝐾)(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌) ↔ (𝑋 ∨ 𝑝) = 𝑌)) |
31 | 27, 12, 28, 22, 29, 30 | syl131anc 1331 |
. . . . . . . 8
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → ((𝑋(lt‘𝐾)(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌) ↔ (𝑋 ∨ 𝑝) = 𝑌)) |
32 | 24, 25, 31 | mpbi2and 958 |
. . . . . . 7
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → (𝑋 ∨ 𝑝) = 𝑌) |
33 | 16, 32 | jca 553 |
. . . . . 6
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) |
34 | 33 | 3exp 1256 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) → (𝑝 ∈ 𝐴 → ((𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌) → (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)))) |
35 | 34 | reximdvai 2998 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) → (∃𝑝 ∈ 𝐴 (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌) → ∃𝑝 ∈ 𝐴 (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌))) |
36 | 9, 35 | mpd 15 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) → ∃𝑝 ∈ 𝐴 (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) |
37 | 36 | ex 449 |
. 2
⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋𝐶𝑌 → ∃𝑝 ∈ 𝐴 (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌))) |
38 | | simp3l 1082 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → ¬ 𝑝 ≤ 𝑋) |
39 | | simp11 1084 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → 𝐾 ∈ HL) |
40 | | simp12 1085 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → 𝑋 ∈ 𝐵) |
41 | | simp2 1055 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → 𝑝 ∈ 𝐴) |
42 | 39, 40, 41, 14 | syl3anc 1318 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → (¬ 𝑝 ≤ 𝑋 ↔ 𝑋𝐶(𝑋 ∨ 𝑝))) |
43 | 38, 42 | mpbid 221 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → 𝑋𝐶(𝑋 ∨ 𝑝)) |
44 | | simp3r 1083 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → (𝑋 ∨ 𝑝) = 𝑌) |
45 | 43, 44 | breqtrd 4609 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → 𝑋𝐶𝑌) |
46 | 45 | rexlimdv3a 3015 |
. 2
⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (∃𝑝 ∈ 𝐴 (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌) → 𝑋𝐶𝑌)) |
47 | 37, 46 | impbid 201 |
1
⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋𝐶𝑌 ↔ ∃𝑝 ∈ 𝐴 (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌))) |