| Step | Hyp | Ref | Expression | 
|---|
| 1 |  | srgdilem.b | . . . . . . . . . . 11
⊢ 𝐵 = (Base‘𝑅) | 
| 2 |  | eqid 2737 | . . . . . . . . . . 11
⊢
(mulGrp‘𝑅) =
(mulGrp‘𝑅) | 
| 3 |  | srgdilem.p | . . . . . . . . . . 11
⊢  + =
(+g‘𝑅) | 
| 4 |  | srgdilem.t | . . . . . . . . . . 11
⊢  · =
(.r‘𝑅) | 
| 5 |  | eqid 2737 | . . . . . . . . . . 11
⊢
(0g‘𝑅) = (0g‘𝑅) | 
| 6 | 1, 2, 3, 4, 5 | issrg 20185 | . . . . . . . . . 10
⊢ (𝑅 ∈ SRing ↔ (𝑅 ∈ CMnd ∧
(mulGrp‘𝑅) ∈ Mnd
∧ ∀𝑥 ∈
𝐵 (∀𝑦 ∈ 𝐵 ∀𝑧 ∈ 𝐵 ((𝑥 · (𝑦 + 𝑧)) = ((𝑥 · 𝑦) + (𝑥 · 𝑧)) ∧ ((𝑥 + 𝑦) · 𝑧) = ((𝑥 · 𝑧) + (𝑦 · 𝑧))) ∧ (((0g‘𝑅) · 𝑥) = (0g‘𝑅) ∧ (𝑥 ·
(0g‘𝑅)) =
(0g‘𝑅))))) | 
| 7 | 6 | simp3bi 1148 | . . . . . . . . 9
⊢ (𝑅 ∈ SRing →
∀𝑥 ∈ 𝐵 (∀𝑦 ∈ 𝐵 ∀𝑧 ∈ 𝐵 ((𝑥 · (𝑦 + 𝑧)) = ((𝑥 · 𝑦) + (𝑥 · 𝑧)) ∧ ((𝑥 + 𝑦) · 𝑧) = ((𝑥 · 𝑧) + (𝑦 · 𝑧))) ∧ (((0g‘𝑅) · 𝑥) = (0g‘𝑅) ∧ (𝑥 ·
(0g‘𝑅)) =
(0g‘𝑅)))) | 
| 8 | 7 | r19.21bi 3251 | . . . . . . . 8
⊢ ((𝑅 ∈ SRing ∧ 𝑥 ∈ 𝐵) → (∀𝑦 ∈ 𝐵 ∀𝑧 ∈ 𝐵 ((𝑥 · (𝑦 + 𝑧)) = ((𝑥 · 𝑦) + (𝑥 · 𝑧)) ∧ ((𝑥 + 𝑦) · 𝑧) = ((𝑥 · 𝑧) + (𝑦 · 𝑧))) ∧ (((0g‘𝑅) · 𝑥) = (0g‘𝑅) ∧ (𝑥 ·
(0g‘𝑅)) =
(0g‘𝑅)))) | 
| 9 | 8 | simpld 494 | . . . . . . 7
⊢ ((𝑅 ∈ SRing ∧ 𝑥 ∈ 𝐵) → ∀𝑦 ∈ 𝐵 ∀𝑧 ∈ 𝐵 ((𝑥 · (𝑦 + 𝑧)) = ((𝑥 · 𝑦) + (𝑥 · 𝑧)) ∧ ((𝑥 + 𝑦) · 𝑧) = ((𝑥 · 𝑧) + (𝑦 · 𝑧)))) | 
| 10 | 9 | 3ad2antr1 1189 | . . . . . 6
⊢ ((𝑅 ∈ SRing ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐵 ∧ 𝑧 ∈ 𝐵)) → ∀𝑦 ∈ 𝐵 ∀𝑧 ∈ 𝐵 ((𝑥 · (𝑦 + 𝑧)) = ((𝑥 · 𝑦) + (𝑥 · 𝑧)) ∧ ((𝑥 + 𝑦) · 𝑧) = ((𝑥 · 𝑧) + (𝑦 · 𝑧)))) | 
| 11 |  | simpr2 1196 | . . . . . 6
⊢ ((𝑅 ∈ SRing ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐵 ∧ 𝑧 ∈ 𝐵)) → 𝑦 ∈ 𝐵) | 
| 12 |  | rsp 3247 | . . . . . 6
⊢
(∀𝑦 ∈
𝐵 ∀𝑧 ∈ 𝐵 ((𝑥 · (𝑦 + 𝑧)) = ((𝑥 · 𝑦) + (𝑥 · 𝑧)) ∧ ((𝑥 + 𝑦) · 𝑧) = ((𝑥 · 𝑧) + (𝑦 · 𝑧))) → (𝑦 ∈ 𝐵 → ∀𝑧 ∈ 𝐵 ((𝑥 · (𝑦 + 𝑧)) = ((𝑥 · 𝑦) + (𝑥 · 𝑧)) ∧ ((𝑥 + 𝑦) · 𝑧) = ((𝑥 · 𝑧) + (𝑦 · 𝑧))))) | 
| 13 | 10, 11, 12 | sylc 65 | . . . . 5
⊢ ((𝑅 ∈ SRing ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐵 ∧ 𝑧 ∈ 𝐵)) → ∀𝑧 ∈ 𝐵 ((𝑥 · (𝑦 + 𝑧)) = ((𝑥 · 𝑦) + (𝑥 · 𝑧)) ∧ ((𝑥 + 𝑦) · 𝑧) = ((𝑥 · 𝑧) + (𝑦 · 𝑧)))) | 
| 14 |  | simpr3 1197 | . . . . 5
⊢ ((𝑅 ∈ SRing ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐵 ∧ 𝑧 ∈ 𝐵)) → 𝑧 ∈ 𝐵) | 
| 15 |  | rsp 3247 | . . . . 5
⊢
(∀𝑧 ∈
𝐵 ((𝑥 · (𝑦 + 𝑧)) = ((𝑥 · 𝑦) + (𝑥 · 𝑧)) ∧ ((𝑥 + 𝑦) · 𝑧) = ((𝑥 · 𝑧) + (𝑦 · 𝑧))) → (𝑧 ∈ 𝐵 → ((𝑥 · (𝑦 + 𝑧)) = ((𝑥 · 𝑦) + (𝑥 · 𝑧)) ∧ ((𝑥 + 𝑦) · 𝑧) = ((𝑥 · 𝑧) + (𝑦 · 𝑧))))) | 
| 16 | 13, 14, 15 | sylc 65 | . . . 4
⊢ ((𝑅 ∈ SRing ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐵 ∧ 𝑧 ∈ 𝐵)) → ((𝑥 · (𝑦 + 𝑧)) = ((𝑥 · 𝑦) + (𝑥 · 𝑧)) ∧ ((𝑥 + 𝑦) · 𝑧) = ((𝑥 · 𝑧) + (𝑦 · 𝑧)))) | 
| 17 | 16 | simpld 494 | . . 3
⊢ ((𝑅 ∈ SRing ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐵 ∧ 𝑧 ∈ 𝐵)) → (𝑥 · (𝑦 + 𝑧)) = ((𝑥 · 𝑦) + (𝑥 · 𝑧))) | 
| 18 | 17 | caovdig 7647 | . 2
⊢ ((𝑅 ∈ SRing ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) → (𝑋 · (𝑌 + 𝑍)) = ((𝑋 · 𝑌) + (𝑋 · 𝑍))) | 
| 19 | 16 | simprd 495 | . . 3
⊢ ((𝑅 ∈ SRing ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐵 ∧ 𝑧 ∈ 𝐵)) → ((𝑥 + 𝑦) · 𝑧) = ((𝑥 · 𝑧) + (𝑦 · 𝑧))) | 
| 20 | 19 | caovdirg 7650 | . 2
⊢ ((𝑅 ∈ SRing ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) → ((𝑋 + 𝑌) · 𝑍) = ((𝑋 · 𝑍) + (𝑌 · 𝑍))) | 
| 21 | 18, 20 | jca 511 | 1
⊢ ((𝑅 ∈ SRing ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵 ∧ 𝑍 ∈ 𝐵)) → ((𝑋 · (𝑌 + 𝑍)) = ((𝑋 · 𝑌) + (𝑋 · 𝑍)) ∧ ((𝑋 + 𝑌) · 𝑍) = ((𝑋 · 𝑍) + (𝑌 · 𝑍)))) |