Step | Hyp | Ref
| Expression |
1 | | eqid 2738 |
. . 3
⊢
0ℋ = 0ℋ |
2 | | ioran 981 |
. . . . 5
⊢ (¬
(𝐴 = 0ℋ
∨ (⊥‘𝐴) =
0ℋ) ↔ (¬ 𝐴 = 0ℋ ∧ ¬
(⊥‘𝐴) =
0ℋ)) |
3 | | df-ne 2944 |
. . . . . 6
⊢ (𝐴 ≠ 0ℋ ↔
¬ 𝐴 =
0ℋ) |
4 | | df-ne 2944 |
. . . . . 6
⊢
((⊥‘𝐴)
≠ 0ℋ ↔ ¬ (⊥‘𝐴) = 0ℋ) |
5 | 3, 4 | anbi12i 627 |
. . . . 5
⊢ ((𝐴 ≠ 0ℋ ∧
(⊥‘𝐴) ≠
0ℋ) ↔ (¬ 𝐴 = 0ℋ ∧ ¬
(⊥‘𝐴) =
0ℋ)) |
6 | 2, 5 | bitr4i 277 |
. . . 4
⊢ (¬
(𝐴 = 0ℋ
∨ (⊥‘𝐴) =
0ℋ) ↔ (𝐴 ≠ 0ℋ ∧
(⊥‘𝐴) ≠
0ℋ)) |
7 | | chirred.1 |
. . . . . . . 8
⊢ 𝐴 ∈
Cℋ |
8 | 7 | hatomici 30721 |
. . . . . . 7
⊢ (𝐴 ≠ 0ℋ →
∃𝑝 ∈ HAtoms
𝑝 ⊆ 𝐴) |
9 | 7 | choccli 29669 |
. . . . . . . 8
⊢
(⊥‘𝐴)
∈ Cℋ |
10 | 9 | hatomici 30721 |
. . . . . . 7
⊢
((⊥‘𝐴)
≠ 0ℋ → ∃𝑞 ∈ HAtoms 𝑞 ⊆ (⊥‘𝐴)) |
11 | 8, 10 | anim12i 613 |
. . . . . 6
⊢ ((𝐴 ≠ 0ℋ ∧
(⊥‘𝐴) ≠
0ℋ) → (∃𝑝 ∈ HAtoms 𝑝 ⊆ 𝐴 ∧ ∃𝑞 ∈ HAtoms 𝑞 ⊆ (⊥‘𝐴))) |
12 | | reeanv 3294 |
. . . . . 6
⊢
(∃𝑝 ∈
HAtoms ∃𝑞 ∈
HAtoms (𝑝 ⊆ 𝐴 ∧ 𝑞 ⊆ (⊥‘𝐴)) ↔ (∃𝑝 ∈ HAtoms 𝑝 ⊆ 𝐴 ∧ ∃𝑞 ∈ HAtoms 𝑞 ⊆ (⊥‘𝐴))) |
13 | 11, 12 | sylibr 233 |
. . . . 5
⊢ ((𝐴 ≠ 0ℋ ∧
(⊥‘𝐴) ≠
0ℋ) → ∃𝑝 ∈ HAtoms ∃𝑞 ∈ HAtoms (𝑝 ⊆ 𝐴 ∧ 𝑞 ⊆ (⊥‘𝐴))) |
14 | | simpll 764 |
. . . . . . . . . 10
⊢ (((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) → 𝑝 ∈ HAtoms) |
15 | | simprl 768 |
. . . . . . . . . 10
⊢ (((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) → 𝑞 ∈ HAtoms) |
16 | | atelch 30706 |
. . . . . . . . . . . . . . . 16
⊢ (𝑝 ∈ HAtoms → 𝑝 ∈
Cℋ ) |
17 | | chsscon3 29862 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑝 ∈
Cℋ ∧ 𝐴 ∈ Cℋ )
→ (𝑝 ⊆ 𝐴 ↔ (⊥‘𝐴) ⊆ (⊥‘𝑝))) |
18 | 16, 7, 17 | sylancl 586 |
. . . . . . . . . . . . . . 15
⊢ (𝑝 ∈ HAtoms → (𝑝 ⊆ 𝐴 ↔ (⊥‘𝐴) ⊆ (⊥‘𝑝))) |
19 | 18 | biimpa 477 |
. . . . . . . . . . . . . 14
⊢ ((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) → (⊥‘𝐴) ⊆ (⊥‘𝑝)) |
20 | | sstr 3929 |
. . . . . . . . . . . . . 14
⊢ ((𝑞 ⊆ (⊥‘𝐴) ∧ (⊥‘𝐴) ⊆ (⊥‘𝑝)) → 𝑞 ⊆ (⊥‘𝑝)) |
21 | 19, 20 | sylan2 593 |
. . . . . . . . . . . . 13
⊢ ((𝑞 ⊆ (⊥‘𝐴) ∧ (𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴)) → 𝑞 ⊆ (⊥‘𝑝)) |
22 | 21 | ancoms 459 |
. . . . . . . . . . . 12
⊢ (((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ 𝑞 ⊆ (⊥‘𝐴)) → 𝑞 ⊆ (⊥‘𝑝)) |
23 | | atne0 30707 |
. . . . . . . . . . . . . . 15
⊢ (𝑝 ∈ HAtoms → 𝑝 ≠
0ℋ) |
24 | 23 | adantr 481 |
. . . . . . . . . . . . . 14
⊢ ((𝑝 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝑝)) → 𝑝 ≠ 0ℋ) |
25 | | sseq1 3946 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝑝 = 𝑞 → (𝑝 ⊆ (⊥‘𝑝) ↔ 𝑞 ⊆ (⊥‘𝑝))) |
26 | 25 | bicomd 222 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝑝 = 𝑞 → (𝑞 ⊆ (⊥‘𝑝) ↔ 𝑝 ⊆ (⊥‘𝑝))) |
27 | | chssoc 29858 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝑝 ∈
Cℋ → (𝑝 ⊆ (⊥‘𝑝) ↔ 𝑝 = 0ℋ)) |
28 | 16, 27 | syl 17 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝑝 ∈ HAtoms → (𝑝 ⊆ (⊥‘𝑝) ↔ 𝑝 = 0ℋ)) |
29 | 26, 28 | sylan9bbr 511 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝑝 ∈ HAtoms ∧ 𝑝 = 𝑞) → (𝑞 ⊆ (⊥‘𝑝) ↔ 𝑝 = 0ℋ)) |
30 | 29 | biimpa 477 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝑝 ∈ HAtoms ∧ 𝑝 = 𝑞) ∧ 𝑞 ⊆ (⊥‘𝑝)) → 𝑝 = 0ℋ) |
31 | 30 | an32s 649 |
. . . . . . . . . . . . . . . 16
⊢ (((𝑝 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝑝)) ∧ 𝑝 = 𝑞) → 𝑝 = 0ℋ) |
32 | 31 | ex 413 |
. . . . . . . . . . . . . . 15
⊢ ((𝑝 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝑝)) → (𝑝 = 𝑞 → 𝑝 = 0ℋ)) |
33 | 32 | necon3d 2964 |
. . . . . . . . . . . . . 14
⊢ ((𝑝 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝑝)) → (𝑝 ≠ 0ℋ → 𝑝 ≠ 𝑞)) |
34 | 24, 33 | mpd 15 |
. . . . . . . . . . . . 13
⊢ ((𝑝 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝑝)) → 𝑝 ≠ 𝑞) |
35 | 34 | adantlr 712 |
. . . . . . . . . . . 12
⊢ (((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ 𝑞 ⊆ (⊥‘𝑝)) → 𝑝 ≠ 𝑞) |
36 | 22, 35 | syldan 591 |
. . . . . . . . . . 11
⊢ (((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ 𝑞 ⊆ (⊥‘𝐴)) → 𝑝 ≠ 𝑞) |
37 | 36 | adantrl 713 |
. . . . . . . . . 10
⊢ (((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) → 𝑝 ≠ 𝑞) |
38 | | superpos 30716 |
. . . . . . . . . 10
⊢ ((𝑝 ∈ HAtoms ∧ 𝑞 ∈ HAtoms ∧ 𝑝 ≠ 𝑞) → ∃𝑟 ∈ HAtoms (𝑟 ≠ 𝑝 ∧ 𝑟 ≠ 𝑞 ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) |
39 | 14, 15, 37, 38 | syl3anc 1370 |
. . . . . . . . 9
⊢ (((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) → ∃𝑟 ∈ HAtoms (𝑟 ≠ 𝑝 ∧ 𝑟 ≠ 𝑞 ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) |
40 | | df-3an 1088 |
. . . . . . . . . . . 12
⊢ ((𝑟 ≠ 𝑝 ∧ 𝑟 ≠ 𝑞 ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞)) ↔ ((𝑟 ≠ 𝑝 ∧ 𝑟 ≠ 𝑞) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) |
41 | | neanior 3037 |
. . . . . . . . . . . . 13
⊢ ((𝑟 ≠ 𝑝 ∧ 𝑟 ≠ 𝑞) ↔ ¬ (𝑟 = 𝑝 ∨ 𝑟 = 𝑞)) |
42 | 41 | anbi1i 624 |
. . . . . . . . . . . 12
⊢ (((𝑟 ≠ 𝑝 ∧ 𝑟 ≠ 𝑞) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞)) ↔ (¬ (𝑟 = 𝑝 ∨ 𝑟 = 𝑞) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) |
43 | 40, 42 | bitri 274 |
. . . . . . . . . . 11
⊢ ((𝑟 ≠ 𝑝 ∧ 𝑟 ≠ 𝑞 ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞)) ↔ (¬ (𝑟 = 𝑝 ∨ 𝑟 = 𝑞) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) |
44 | | chirred.2 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑥 ∈
Cℋ → 𝐴 𝐶ℋ 𝑥) |
45 | 7, 44 | chirredlem4 30755 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ (𝑟 ∈ HAtoms ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞))) → (𝑟 = 𝑝 ∨ 𝑟 = 𝑞)) |
46 | 45 | anassrs 468 |
. . . . . . . . . . . . . . 15
⊢
(((((𝑝 ∈ HAtoms
∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ 𝑟 ∈ HAtoms) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞)) → (𝑟 = 𝑝 ∨ 𝑟 = 𝑞)) |
47 | 46 | pm2.24d 151 |
. . . . . . . . . . . . . 14
⊢
(((((𝑝 ∈ HAtoms
∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ 𝑟 ∈ HAtoms) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞)) → (¬ (𝑟 = 𝑝 ∨ 𝑟 = 𝑞) → ¬ 0ℋ =
0ℋ)) |
48 | 47 | ex 413 |
. . . . . . . . . . . . 13
⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ 𝑟 ∈ HAtoms) → (𝑟 ⊆ (𝑝 ∨ℋ 𝑞) → (¬ (𝑟 = 𝑝 ∨ 𝑟 = 𝑞) → ¬ 0ℋ =
0ℋ))) |
49 | 48 | com23 86 |
. . . . . . . . . . . 12
⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ 𝑟 ∈ HAtoms) → (¬ (𝑟 = 𝑝 ∨ 𝑟 = 𝑞) → (𝑟 ⊆ (𝑝 ∨ℋ 𝑞) → ¬ 0ℋ =
0ℋ))) |
50 | 49 | impd 411 |
. . . . . . . . . . 11
⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ 𝑟 ∈ HAtoms) → ((¬ (𝑟 = 𝑝 ∨ 𝑟 = 𝑞) ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞)) → ¬ 0ℋ =
0ℋ)) |
51 | 43, 50 | syl5bi 241 |
. . . . . . . . . 10
⊢ ((((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) ∧ 𝑟 ∈ HAtoms) → ((𝑟 ≠ 𝑝 ∧ 𝑟 ≠ 𝑞 ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞)) → ¬ 0ℋ =
0ℋ)) |
52 | 51 | rexlimdva 3213 |
. . . . . . . . 9
⊢ (((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) → (∃𝑟 ∈ HAtoms (𝑟 ≠ 𝑝 ∧ 𝑟 ≠ 𝑞 ∧ 𝑟 ⊆ (𝑝 ∨ℋ 𝑞)) → ¬ 0ℋ =
0ℋ)) |
53 | 39, 52 | mpd 15 |
. . . . . . . 8
⊢ (((𝑝 ∈ HAtoms ∧ 𝑝 ⊆ 𝐴) ∧ (𝑞 ∈ HAtoms ∧ 𝑞 ⊆ (⊥‘𝐴))) → ¬ 0ℋ =
0ℋ) |
54 | 53 | an4s 657 |
. . . . . . 7
⊢ (((𝑝 ∈ HAtoms ∧ 𝑞 ∈ HAtoms) ∧ (𝑝 ⊆ 𝐴 ∧ 𝑞 ⊆ (⊥‘𝐴))) → ¬ 0ℋ =
0ℋ) |
55 | 54 | ex 413 |
. . . . . 6
⊢ ((𝑝 ∈ HAtoms ∧ 𝑞 ∈ HAtoms) → ((𝑝 ⊆ 𝐴 ∧ 𝑞 ⊆ (⊥‘𝐴)) → ¬ 0ℋ =
0ℋ)) |
56 | 55 | rexlimivv 3221 |
. . . . 5
⊢
(∃𝑝 ∈
HAtoms ∃𝑞 ∈
HAtoms (𝑝 ⊆ 𝐴 ∧ 𝑞 ⊆ (⊥‘𝐴)) → ¬ 0ℋ =
0ℋ) |
57 | 13, 56 | syl 17 |
. . . 4
⊢ ((𝐴 ≠ 0ℋ ∧
(⊥‘𝐴) ≠
0ℋ) → ¬ 0ℋ =
0ℋ) |
58 | 6, 57 | sylbi 216 |
. . 3
⊢ (¬
(𝐴 = 0ℋ
∨ (⊥‘𝐴) =
0ℋ) → ¬ 0ℋ =
0ℋ) |
59 | 1, 58 | mt4 116 |
. 2
⊢ (𝐴 = 0ℋ ∨
(⊥‘𝐴) =
0ℋ) |
60 | | fveq2 6774 |
. . . 4
⊢
((⊥‘𝐴) =
0ℋ → (⊥‘(⊥‘𝐴)) =
(⊥‘0ℋ)) |
61 | 7 | ococi 29767 |
. . . 4
⊢
(⊥‘(⊥‘𝐴)) = 𝐴 |
62 | | choc0 29688 |
. . . 4
⊢
(⊥‘0ℋ) = ℋ |
63 | 60, 61, 62 | 3eqtr3g 2801 |
. . 3
⊢
((⊥‘𝐴) =
0ℋ → 𝐴 = ℋ) |
64 | 63 | orim2i 908 |
. 2
⊢ ((𝐴 = 0ℋ ∨
(⊥‘𝐴) =
0ℋ) → (𝐴 = 0ℋ ∨ 𝐴 = ℋ)) |
65 | 59, 64 | ax-mp 5 |
1
⊢ (𝐴 = 0ℋ ∨
𝐴 =
ℋ) |