Proof of Theorem atcvat3i
Step | Hyp | Ref
| Expression |
1 | | atcvat3.1 |
. . . . . . . . . . 11
⊢ 𝐴 ∈
Cℋ |
2 | | chcv1 30696 |
. . . . . . . . . . 11
⊢ ((𝐴 ∈
Cℋ ∧ 𝐶 ∈ HAtoms) → (¬ 𝐶 ⊆ 𝐴 ↔ 𝐴 ⋖ℋ (𝐴 ∨ℋ 𝐶))) |
3 | 1, 2 | mpan 686 |
. . . . . . . . . 10
⊢ (𝐶 ∈ HAtoms → (¬
𝐶 ⊆ 𝐴 ↔ 𝐴 ⋖ℋ (𝐴 ∨ℋ 𝐶))) |
4 | 3 | biimpa 476 |
. . . . . . . . 9
⊢ ((𝐶 ∈ HAtoms ∧ ¬ 𝐶 ⊆ 𝐴) → 𝐴 ⋖ℋ (𝐴 ∨ℋ 𝐶)) |
5 | 4 | ad2ant2lr 744 |
. . . . . . . 8
⊢ (((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) ∧ (¬
𝐶 ⊆ 𝐴 ∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶))) → 𝐴 ⋖ℋ (𝐴 ∨ℋ 𝐶)) |
6 | | atelch 30685 |
. . . . . . . . . . . 12
⊢ (𝐵 ∈ HAtoms → 𝐵 ∈
Cℋ ) |
7 | | atelch 30685 |
. . . . . . . . . . . 12
⊢ (𝐶 ∈ HAtoms → 𝐶 ∈
Cℋ ) |
8 | 6, 7 | anim12i 612 |
. . . . . . . . . . 11
⊢ ((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) → (𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ
)) |
9 | | chjcom 29847 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
→ (𝐵
∨ℋ 𝐶) =
(𝐶 ∨ℋ
𝐵)) |
10 | 9 | oveq2d 7284 |
. . . . . . . . . . . . . . . 16
⊢ ((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
→ (𝐴
∨ℋ (𝐵
∨ℋ 𝐶))
= (𝐴 ∨ℋ
(𝐶 ∨ℋ
𝐵))) |
11 | | chjass 29874 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝐴 ∈
Cℋ ∧ 𝐶 ∈ Cℋ
∧ 𝐵 ∈
Cℋ ) → ((𝐴 ∨ℋ 𝐶) ∨ℋ 𝐵) = (𝐴 ∨ℋ (𝐶 ∨ℋ 𝐵))) |
12 | 1, 11 | mp3an1 1446 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝐶 ∈
Cℋ ∧ 𝐵 ∈ Cℋ )
→ ((𝐴
∨ℋ 𝐶)
∨ℋ 𝐵) =
(𝐴 ∨ℋ
(𝐶 ∨ℋ
𝐵))) |
13 | 12 | ancoms 458 |
. . . . . . . . . . . . . . . 16
⊢ ((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
→ ((𝐴
∨ℋ 𝐶)
∨ℋ 𝐵) =
(𝐴 ∨ℋ
(𝐶 ∨ℋ
𝐵))) |
14 | 10, 13 | eqtr4d 2782 |
. . . . . . . . . . . . . . 15
⊢ ((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
→ (𝐴
∨ℋ (𝐵
∨ℋ 𝐶))
= ((𝐴
∨ℋ 𝐶)
∨ℋ 𝐵)) |
15 | 14 | adantr 480 |
. . . . . . . . . . . . . 14
⊢ (((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶)) → (𝐴 ∨ℋ (𝐵 ∨ℋ 𝐶)) = ((𝐴 ∨ℋ 𝐶) ∨ℋ 𝐵)) |
16 | | simpl 482 |
. . . . . . . . . . . . . . . 16
⊢ ((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
→ 𝐵 ∈
Cℋ ) |
17 | | chjcl 29698 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝐴 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
→ (𝐴
∨ℋ 𝐶)
∈ Cℋ ) |
18 | 1, 17 | mpan 686 |
. . . . . . . . . . . . . . . . 17
⊢ (𝐶 ∈
Cℋ → (𝐴 ∨ℋ 𝐶) ∈ Cℋ
) |
19 | 18 | adantl 481 |
. . . . . . . . . . . . . . . 16
⊢ ((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
→ (𝐴
∨ℋ 𝐶)
∈ Cℋ ) |
20 | | chlej2 29852 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝐵 ∈
Cℋ ∧ (𝐴 ∨ℋ 𝐶) ∈ Cℋ
∧ (𝐴
∨ℋ 𝐶)
∈ Cℋ ) ∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶)) → ((𝐴 ∨ℋ 𝐶) ∨ℋ 𝐵) ⊆ ((𝐴 ∨ℋ 𝐶) ∨ℋ (𝐴 ∨ℋ 𝐶))) |
21 | 20 | ex 412 |
. . . . . . . . . . . . . . . 16
⊢ ((𝐵 ∈
Cℋ ∧ (𝐴 ∨ℋ 𝐶) ∈ Cℋ
∧ (𝐴
∨ℋ 𝐶)
∈ Cℋ ) → (𝐵 ⊆ (𝐴 ∨ℋ 𝐶) → ((𝐴 ∨ℋ 𝐶) ∨ℋ 𝐵) ⊆ ((𝐴 ∨ℋ 𝐶) ∨ℋ (𝐴 ∨ℋ 𝐶)))) |
22 | 16, 19, 19, 21 | syl3anc 1369 |
. . . . . . . . . . . . . . 15
⊢ ((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
→ (𝐵 ⊆ (𝐴 ∨ℋ 𝐶) → ((𝐴 ∨ℋ 𝐶) ∨ℋ 𝐵) ⊆ ((𝐴 ∨ℋ 𝐶) ∨ℋ (𝐴 ∨ℋ 𝐶)))) |
23 | 22 | imp 406 |
. . . . . . . . . . . . . 14
⊢ (((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶)) → ((𝐴 ∨ℋ 𝐶) ∨ℋ 𝐵) ⊆ ((𝐴 ∨ℋ 𝐶) ∨ℋ (𝐴 ∨ℋ 𝐶))) |
24 | 15, 23 | eqsstrd 3963 |
. . . . . . . . . . . . 13
⊢ (((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶)) → (𝐴 ∨ℋ (𝐵 ∨ℋ 𝐶)) ⊆ ((𝐴 ∨ℋ 𝐶) ∨ℋ (𝐴 ∨ℋ 𝐶))) |
25 | | chjidm 29861 |
. . . . . . . . . . . . . . 15
⊢ ((𝐴 ∨ℋ 𝐶) ∈
Cℋ → ((𝐴 ∨ℋ 𝐶) ∨ℋ (𝐴 ∨ℋ 𝐶)) = (𝐴 ∨ℋ 𝐶)) |
26 | 18, 25 | syl 17 |
. . . . . . . . . . . . . 14
⊢ (𝐶 ∈
Cℋ → ((𝐴 ∨ℋ 𝐶) ∨ℋ (𝐴 ∨ℋ 𝐶)) = (𝐴 ∨ℋ 𝐶)) |
27 | 26 | ad2antlr 723 |
. . . . . . . . . . . . 13
⊢ (((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶)) → ((𝐴 ∨ℋ 𝐶) ∨ℋ (𝐴 ∨ℋ 𝐶)) = (𝐴 ∨ℋ 𝐶)) |
28 | 24, 27 | sseqtrd 3965 |
. . . . . . . . . . . 12
⊢ (((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶)) → (𝐴 ∨ℋ (𝐵 ∨ℋ 𝐶)) ⊆ (𝐴 ∨ℋ 𝐶)) |
29 | | simpr 484 |
. . . . . . . . . . . . . 14
⊢ ((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
→ 𝐶 ∈
Cℋ ) |
30 | | chjcl 29698 |
. . . . . . . . . . . . . 14
⊢ ((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
→ (𝐵
∨ℋ 𝐶)
∈ Cℋ ) |
31 | | chub2 29849 |
. . . . . . . . . . . . . . 15
⊢ ((𝐶 ∈
Cℋ ∧ 𝐵 ∈ Cℋ )
→ 𝐶 ⊆ (𝐵 ∨ℋ 𝐶)) |
32 | 31 | ancoms 458 |
. . . . . . . . . . . . . 14
⊢ ((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
→ 𝐶 ⊆ (𝐵 ∨ℋ 𝐶)) |
33 | | chlej2 29852 |
. . . . . . . . . . . . . . 15
⊢ (((𝐶 ∈
Cℋ ∧ (𝐵 ∨ℋ 𝐶) ∈ Cℋ
∧ 𝐴 ∈
Cℋ ) ∧ 𝐶 ⊆ (𝐵 ∨ℋ 𝐶)) → (𝐴 ∨ℋ 𝐶) ⊆ (𝐴 ∨ℋ (𝐵 ∨ℋ 𝐶))) |
34 | 1, 33 | mp3anl3 1455 |
. . . . . . . . . . . . . 14
⊢ (((𝐶 ∈
Cℋ ∧ (𝐵 ∨ℋ 𝐶) ∈ Cℋ )
∧ 𝐶 ⊆ (𝐵 ∨ℋ 𝐶)) → (𝐴 ∨ℋ 𝐶) ⊆ (𝐴 ∨ℋ (𝐵 ∨ℋ 𝐶))) |
35 | 29, 30, 32, 34 | syl21anc 834 |
. . . . . . . . . . . . 13
⊢ ((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
→ (𝐴
∨ℋ 𝐶)
⊆ (𝐴
∨ℋ (𝐵
∨ℋ 𝐶))) |
36 | 35 | adantr 480 |
. . . . . . . . . . . 12
⊢ (((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶)) → (𝐴 ∨ℋ 𝐶) ⊆ (𝐴 ∨ℋ (𝐵 ∨ℋ 𝐶))) |
37 | 28, 36 | eqssd 3942 |
. . . . . . . . . . 11
⊢ (((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶)) → (𝐴 ∨ℋ (𝐵 ∨ℋ 𝐶)) = (𝐴 ∨ℋ 𝐶)) |
38 | 8, 37 | sylan 579 |
. . . . . . . . . 10
⊢ (((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) ∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶)) → (𝐴 ∨ℋ (𝐵 ∨ℋ 𝐶)) = (𝐴 ∨ℋ 𝐶)) |
39 | 38 | breq2d 5090 |
. . . . . . . . 9
⊢ (((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) ∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶)) → (𝐴 ⋖ℋ (𝐴 ∨ℋ (𝐵 ∨ℋ 𝐶)) ↔ 𝐴 ⋖ℋ (𝐴 ∨ℋ 𝐶))) |
40 | 39 | adantrl 712 |
. . . . . . . 8
⊢ (((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) ∧ (¬
𝐶 ⊆ 𝐴 ∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶))) → (𝐴 ⋖ℋ (𝐴 ∨ℋ (𝐵 ∨ℋ 𝐶)) ↔ 𝐴 ⋖ℋ (𝐴 ∨ℋ 𝐶))) |
41 | 5, 40 | mpbird 256 |
. . . . . . 7
⊢ (((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) ∧ (¬
𝐶 ⊆ 𝐴 ∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶))) → 𝐴 ⋖ℋ (𝐴 ∨ℋ (𝐵 ∨ℋ 𝐶))) |
42 | 41 | ex 412 |
. . . . . 6
⊢ ((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) → ((¬
𝐶 ⊆ 𝐴 ∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶)) → 𝐴 ⋖ℋ (𝐴 ∨ℋ (𝐵 ∨ℋ 𝐶)))) |
43 | 30, 1 | jctil 519 |
. . . . . . . 8
⊢ ((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
→ (𝐴 ∈
Cℋ ∧ (𝐵 ∨ℋ 𝐶) ∈ Cℋ
)) |
44 | 6, 7, 43 | syl2an 595 |
. . . . . . 7
⊢ ((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) → (𝐴 ∈
Cℋ ∧ (𝐵 ∨ℋ 𝐶) ∈ Cℋ
)) |
45 | | cvexch 30715 |
. . . . . . 7
⊢ ((𝐴 ∈
Cℋ ∧ (𝐵 ∨ℋ 𝐶) ∈ Cℋ )
→ ((𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ⋖ℋ
(𝐵 ∨ℋ
𝐶) ↔ 𝐴 ⋖ℋ (𝐴 ∨ℋ (𝐵 ∨ℋ 𝐶)))) |
46 | 44, 45 | syl 17 |
. . . . . 6
⊢ ((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) → ((𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ⋖ℋ (𝐵 ∨ℋ 𝐶) ↔ 𝐴 ⋖ℋ (𝐴 ∨ℋ (𝐵 ∨ℋ 𝐶)))) |
47 | 42, 46 | sylibrd 258 |
. . . . 5
⊢ ((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) → ((¬
𝐶 ⊆ 𝐴 ∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶)) → (𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ⋖ℋ (𝐵 ∨ℋ 𝐶))) |
48 | 47 | adantr 480 |
. . . 4
⊢ (((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) ∧ ¬
𝐵 = 𝐶) → ((¬ 𝐶 ⊆ 𝐴 ∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶)) → (𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ⋖ℋ (𝐵 ∨ℋ 𝐶))) |
49 | | chincl 29840 |
. . . . . . . 8
⊢ ((𝐴 ∈
Cℋ ∧ (𝐵 ∨ℋ 𝐶) ∈ Cℋ )
→ (𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ∈
Cℋ ) |
50 | 1, 30, 49 | sylancr 586 |
. . . . . . 7
⊢ ((𝐵 ∈
Cℋ ∧ 𝐶 ∈ Cℋ )
→ (𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ∈
Cℋ ) |
51 | 6, 7, 50 | syl2an 595 |
. . . . . 6
⊢ ((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) → (𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ∈ Cℋ
) |
52 | | simpl 482 |
. . . . . 6
⊢ ((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) → 𝐵 ∈ HAtoms) |
53 | | simpr 484 |
. . . . . 6
⊢ ((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) → 𝐶 ∈ HAtoms) |
54 | | atcvat2 30730 |
. . . . . 6
⊢ (((𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ∈ Cℋ
∧ 𝐵 ∈ HAtoms ∧
𝐶 ∈ HAtoms) →
((¬ 𝐵 = 𝐶 ∧ (𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ⋖ℋ (𝐵 ∨ℋ 𝐶)) → (𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ∈ HAtoms)) |
55 | 51, 52, 53, 54 | syl3anc 1369 |
. . . . 5
⊢ ((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) → ((¬
𝐵 = 𝐶 ∧ (𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ⋖ℋ (𝐵 ∨ℋ 𝐶)) → (𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ∈ HAtoms)) |
56 | 55 | expdimp 452 |
. . . 4
⊢ (((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) ∧ ¬
𝐵 = 𝐶) → ((𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ⋖ℋ (𝐵 ∨ℋ 𝐶) → (𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ∈ HAtoms)) |
57 | 48, 56 | syld 47 |
. . 3
⊢ (((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) ∧ ¬
𝐵 = 𝐶) → ((¬ 𝐶 ⊆ 𝐴 ∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶)) → (𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ∈ HAtoms)) |
58 | 57 | exp4b 430 |
. 2
⊢ ((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) → (¬
𝐵 = 𝐶 → (¬ 𝐶 ⊆ 𝐴 → (𝐵 ⊆ (𝐴 ∨ℋ 𝐶) → (𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ∈ HAtoms)))) |
59 | 58 | imp4c 423 |
1
⊢ ((𝐵 ∈ HAtoms ∧ 𝐶 ∈ HAtoms) → (((¬
𝐵 = 𝐶 ∧ ¬ 𝐶 ⊆ 𝐴) ∧ 𝐵 ⊆ (𝐴 ∨ℋ 𝐶)) → (𝐴 ∩ (𝐵 ∨ℋ 𝐶)) ∈ HAtoms)) |