Proof of Theorem 5oalem1
| Step | Hyp | Ref
| Expression |
| 1 | | simplll 798 |
. . . 4
⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵) ∧ 𝑣 = (𝑥 +ℎ 𝑦)) ∧ (𝑧 ∈ 𝐶 ∧ (𝑥 −ℎ 𝑧) ∈ 𝑅)) → 𝑥 ∈ 𝐴) |
| 2 | | 5oalem1.1 |
. . . . . . . 8
⊢ 𝐴 ∈
Sℋ |
| 3 | 2 | sheli 28071 |
. . . . . . 7
⊢ (𝑥 ∈ 𝐴 → 𝑥 ∈ ℋ) |
| 4 | 3 | ad2antrr 762 |
. . . . . 6
⊢ (((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵) ∧ 𝑣 = (𝑥 +ℎ 𝑦)) → 𝑥 ∈ ℋ) |
| 5 | | 5oalem1.3 |
. . . . . . . 8
⊢ 𝐶 ∈
Sℋ |
| 6 | 5 | sheli 28071 |
. . . . . . 7
⊢ (𝑧 ∈ 𝐶 → 𝑧 ∈ ℋ) |
| 7 | 6 | adantr 481 |
. . . . . 6
⊢ ((𝑧 ∈ 𝐶 ∧ (𝑥 −ℎ 𝑧) ∈ 𝑅) → 𝑧 ∈ ℋ) |
| 8 | | hvaddsub12 27895 |
. . . . . . . 8
⊢ ((𝑥 ∈ ℋ ∧ 𝑧 ∈ ℋ ∧ 𝑧 ∈ ℋ) → (𝑥 +ℎ (𝑧 −ℎ
𝑧)) = (𝑧 +ℎ (𝑥 −ℎ 𝑧))) |
| 9 | 8 | 3anidm23 1385 |
. . . . . . 7
⊢ ((𝑥 ∈ ℋ ∧ 𝑧 ∈ ℋ) → (𝑥 +ℎ (𝑧 −ℎ
𝑧)) = (𝑧 +ℎ (𝑥 −ℎ 𝑧))) |
| 10 | | hvsubid 27883 |
. . . . . . . . 9
⊢ (𝑧 ∈ ℋ → (𝑧 −ℎ
𝑧) =
0ℎ) |
| 11 | 10 | oveq2d 6666 |
. . . . . . . 8
⊢ (𝑧 ∈ ℋ → (𝑥 +ℎ (𝑧 −ℎ
𝑧)) = (𝑥 +ℎ
0ℎ)) |
| 12 | | ax-hvaddid 27861 |
. . . . . . . 8
⊢ (𝑥 ∈ ℋ → (𝑥 +ℎ
0ℎ) = 𝑥) |
| 13 | 11, 12 | sylan9eqr 2678 |
. . . . . . 7
⊢ ((𝑥 ∈ ℋ ∧ 𝑧 ∈ ℋ) → (𝑥 +ℎ (𝑧 −ℎ
𝑧)) = 𝑥) |
| 14 | 9, 13 | eqtr3d 2658 |
. . . . . 6
⊢ ((𝑥 ∈ ℋ ∧ 𝑧 ∈ ℋ) → (𝑧 +ℎ (𝑥 −ℎ
𝑧)) = 𝑥) |
| 15 | 4, 7, 14 | syl2an 494 |
. . . . 5
⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵) ∧ 𝑣 = (𝑥 +ℎ 𝑦)) ∧ (𝑧 ∈ 𝐶 ∧ (𝑥 −ℎ 𝑧) ∈ 𝑅)) → (𝑧 +ℎ (𝑥 −ℎ 𝑧)) = 𝑥) |
| 16 | | 5oalem1.4 |
. . . . . . 7
⊢ 𝑅 ∈
Sℋ |
| 17 | 5, 16 | shsvai 28223 |
. . . . . 6
⊢ ((𝑧 ∈ 𝐶 ∧ (𝑥 −ℎ 𝑧) ∈ 𝑅) → (𝑧 +ℎ (𝑥 −ℎ 𝑧)) ∈ (𝐶 +ℋ 𝑅)) |
| 18 | 17 | adantl 482 |
. . . . 5
⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵) ∧ 𝑣 = (𝑥 +ℎ 𝑦)) ∧ (𝑧 ∈ 𝐶 ∧ (𝑥 −ℎ 𝑧) ∈ 𝑅)) → (𝑧 +ℎ (𝑥 −ℎ 𝑧)) ∈ (𝐶 +ℋ 𝑅)) |
| 19 | 15, 18 | eqeltrrd 2702 |
. . . 4
⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵) ∧ 𝑣 = (𝑥 +ℎ 𝑦)) ∧ (𝑧 ∈ 𝐶 ∧ (𝑥 −ℎ 𝑧) ∈ 𝑅)) → 𝑥 ∈ (𝐶 +ℋ 𝑅)) |
| 20 | 1, 19 | elind 3798 |
. . 3
⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵) ∧ 𝑣 = (𝑥 +ℎ 𝑦)) ∧ (𝑧 ∈ 𝐶 ∧ (𝑥 −ℎ 𝑧) ∈ 𝑅)) → 𝑥 ∈ (𝐴 ∩ (𝐶 +ℋ 𝑅))) |
| 21 | | simpllr 799 |
. . 3
⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵) ∧ 𝑣 = (𝑥 +ℎ 𝑦)) ∧ (𝑧 ∈ 𝐶 ∧ (𝑥 −ℎ 𝑧) ∈ 𝑅)) → 𝑦 ∈ 𝐵) |
| 22 | 5, 16 | shscli 28176 |
. . . . . 6
⊢ (𝐶 +ℋ 𝑅) ∈
Sℋ |
| 23 | 2, 22 | shincli 28221 |
. . . . 5
⊢ (𝐴 ∩ (𝐶 +ℋ 𝑅)) ∈
Sℋ |
| 24 | | 5oalem1.2 |
. . . . 5
⊢ 𝐵 ∈
Sℋ |
| 25 | 23, 24 | shsvai 28223 |
. . . 4
⊢ ((𝑥 ∈ (𝐴 ∩ (𝐶 +ℋ 𝑅)) ∧ 𝑦 ∈ 𝐵) → (𝑥 +ℎ 𝑦) ∈ ((𝐴 ∩ (𝐶 +ℋ 𝑅)) +ℋ 𝐵)) |
| 26 | 23, 24 | shscomi 28222 |
. . . 4
⊢ ((𝐴 ∩ (𝐶 +ℋ 𝑅)) +ℋ 𝐵) = (𝐵 +ℋ (𝐴 ∩ (𝐶 +ℋ 𝑅))) |
| 27 | 25, 26 | syl6eleq 2711 |
. . 3
⊢ ((𝑥 ∈ (𝐴 ∩ (𝐶 +ℋ 𝑅)) ∧ 𝑦 ∈ 𝐵) → (𝑥 +ℎ 𝑦) ∈ (𝐵 +ℋ (𝐴 ∩ (𝐶 +ℋ 𝑅)))) |
| 28 | 20, 21, 27 | syl2anc 693 |
. 2
⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵) ∧ 𝑣 = (𝑥 +ℎ 𝑦)) ∧ (𝑧 ∈ 𝐶 ∧ (𝑥 −ℎ 𝑧) ∈ 𝑅)) → (𝑥 +ℎ 𝑦) ∈ (𝐵 +ℋ (𝐴 ∩ (𝐶 +ℋ 𝑅)))) |
| 29 | | eleq1 2689 |
. . 3
⊢ (𝑣 = (𝑥 +ℎ 𝑦) → (𝑣 ∈ (𝐵 +ℋ (𝐴 ∩ (𝐶 +ℋ 𝑅))) ↔ (𝑥 +ℎ 𝑦) ∈ (𝐵 +ℋ (𝐴 ∩ (𝐶 +ℋ 𝑅))))) |
| 30 | 29 | ad2antlr 763 |
. 2
⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵) ∧ 𝑣 = (𝑥 +ℎ 𝑦)) ∧ (𝑧 ∈ 𝐶 ∧ (𝑥 −ℎ 𝑧) ∈ 𝑅)) → (𝑣 ∈ (𝐵 +ℋ (𝐴 ∩ (𝐶 +ℋ 𝑅))) ↔ (𝑥 +ℎ 𝑦) ∈ (𝐵 +ℋ (𝐴 ∩ (𝐶 +ℋ 𝑅))))) |
| 31 | 28, 30 | mpbird 247 |
1
⊢ ((((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵) ∧ 𝑣 = (𝑥 +ℎ 𝑦)) ∧ (𝑧 ∈ 𝐶 ∧ (𝑥 −ℎ 𝑧) ∈ 𝑅)) → 𝑣 ∈ (𝐵 +ℋ (𝐴 ∩ (𝐶 +ℋ 𝑅)))) |