Proof of Theorem cvrval3
Step | Hyp | Ref
| Expression |
1 | | cvrval3.b |
. . . . . 6
⊢ 𝐵 = (Base‘𝐾) |
2 | | eqid 2738 |
. . . . . 6
⊢
(lt‘𝐾) =
(lt‘𝐾) |
3 | | cvrval3.c |
. . . . . 6
⊢ 𝐶 = ( ⋖ ‘𝐾) |
4 | 1, 2, 3 | cvrlt 37284 |
. . . . 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 37426 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋(lt‘𝐾)𝑌) → ∃𝑝 ∈ 𝐴 (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) |
9 | 4, 8 | syldan 591 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) → ∃𝑝 ∈ 𝐴 (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) |
10 | | simp3l 1200 |
. . . . . . . 8
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝑋𝐶(𝑋 ∨ 𝑝)) |
11 | | simp1l1 1265 |
. . . . . . . . 9
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝐾 ∈ HL) |
12 | | simp1l2 1266 |
. . . . . . . . 9
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝑋 ∈ 𝐵) |
13 | | simp2 1136 |
. . . . . . . . 9
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝑝 ∈ 𝐴) |
14 | 1, 5, 6, 3, 7 | cvr1 37424 |
. . . . . . . . 9
⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑝 ∈ 𝐴) → (¬ 𝑝 ≤ 𝑋 ↔ 𝑋𝐶(𝑋 ∨ 𝑝))) |
15 | 11, 12, 13, 14 | syl3anc 1370 |
. . . . . . . 8
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → (¬ 𝑝 ≤ 𝑋 ↔ 𝑋𝐶(𝑋 ∨ 𝑝))) |
16 | 10, 15 | mpbird 256 |
. . . . . . 7
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → ¬ 𝑝 ≤ 𝑋) |
17 | 11 | hllatd 37378 |
. . . . . . . . . 10
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝐾 ∈ Lat) |
18 | 1, 7 | atbase 37303 |
. . . . . . . . . . 11
⊢ (𝑝 ∈ 𝐴 → 𝑝 ∈ 𝐵) |
19 | 18 | 3ad2ant2 1133 |
. . . . . . . . . 10
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝑝 ∈ 𝐵) |
20 | 1, 6 | latjcl 18157 |
. . . . . . . . . 10
⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑝 ∈ 𝐵) → (𝑋 ∨ 𝑝) ∈ 𝐵) |
21 | 17, 12, 19, 20 | syl3anc 1370 |
. . . . . . . . 9
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → (𝑋 ∨ 𝑝) ∈ 𝐵) |
22 | 1, 2, 3 | cvrlt 37284 |
. . . . . . . . 9
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ (𝑋 ∨ 𝑝) ∈ 𝐵) ∧ 𝑋𝐶(𝑋 ∨ 𝑝)) → 𝑋(lt‘𝐾)(𝑋 ∨ 𝑝)) |
23 | 11, 12, 21, 10, 22 | syl31anc 1372 |
. . . . . . . 8
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝑋(lt‘𝐾)(𝑋 ∨ 𝑝)) |
24 | | simp3r 1201 |
. . . . . . . 8
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → (𝑋 ∨ 𝑝) ≤ 𝑌) |
25 | | hlpos 37380 |
. . . . . . . . . 10
⊢ (𝐾 ∈ HL → 𝐾 ∈ Poset) |
26 | 11, 25 | syl 17 |
. . . . . . . . 9
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝐾 ∈ Poset) |
27 | | simp1l3 1267 |
. . . . . . . . 9
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝑌 ∈ 𝐵) |
28 | | simp1r 1197 |
. . . . . . . . 9
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → 𝑋𝐶𝑌) |
29 | 1, 5, 2, 3 | cvrnbtwn2 37289 |
. . . . . . . . 9
⊢ ((𝐾 ∈ Poset ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ (𝑋 ∨ 𝑝) ∈ 𝐵) ∧ 𝑋𝐶𝑌) → ((𝑋(lt‘𝐾)(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌) ↔ (𝑋 ∨ 𝑝) = 𝑌)) |
30 | 26, 12, 27, 21, 28, 29 | syl131anc 1382 |
. . . . . . . 8
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → ((𝑋(lt‘𝐾)(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌) ↔ (𝑋 ∨ 𝑝) = 𝑌)) |
31 | 23, 24, 30 | mpbi2and 709 |
. . . . . . 7
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → (𝑋 ∨ 𝑝) = 𝑌) |
32 | 16, 31 | jca 512 |
. . . . . 6
⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) ∧ 𝑝 ∈ 𝐴 ∧ (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌)) → (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) |
33 | 32 | 3exp 1118 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) → (𝑝 ∈ 𝐴 → ((𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌) → (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)))) |
34 | 33 | reximdvai 3200 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) → (∃𝑝 ∈ 𝐴 (𝑋𝐶(𝑋 ∨ 𝑝) ∧ (𝑋 ∨ 𝑝) ≤ 𝑌) → ∃𝑝 ∈ 𝐴 (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌))) |
35 | 9, 34 | mpd 15 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋𝐶𝑌) → ∃𝑝 ∈ 𝐴 (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) |
36 | 35 | ex 413 |
. 2
⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋𝐶𝑌 → ∃𝑝 ∈ 𝐴 (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌))) |
37 | | simp3l 1200 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → ¬ 𝑝 ≤ 𝑋) |
38 | | simp11 1202 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → 𝐾 ∈ HL) |
39 | | simp12 1203 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → 𝑋 ∈ 𝐵) |
40 | | simp2 1136 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → 𝑝 ∈ 𝐴) |
41 | 38, 39, 40, 14 | syl3anc 1370 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → (¬ 𝑝 ≤ 𝑋 ↔ 𝑋𝐶(𝑋 ∨ 𝑝))) |
42 | 37, 41 | mpbid 231 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → 𝑋𝐶(𝑋 ∨ 𝑝)) |
43 | | simp3r 1201 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → (𝑋 ∨ 𝑝) = 𝑌) |
44 | 42, 43 | breqtrd 5100 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴 ∧ (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌)) → 𝑋𝐶𝑌) |
45 | 44 | rexlimdv3a 3215 |
. 2
⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (∃𝑝 ∈ 𝐴 (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌) → 𝑋𝐶𝑌)) |
46 | 36, 45 | impbid 211 |
1
⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋𝐶𝑌 ↔ ∃𝑝 ∈ 𝐴 (¬ 𝑝 ≤ 𝑋 ∧ (𝑋 ∨ 𝑝) = 𝑌))) |