MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  mulscom Structured version   Visualization version   GIF version

Theorem mulscom 28525
Description: Surreal multiplication is commutative. Part of theorem 7 of [Conway] p. 19. (Contributed by Scott Fenton, 6-Mar-2025.)
Assertion
Ref Expression
mulscom ((𝐴 ∈ No ∧ 𝐵 ∈ No) → (𝐴 ·s 𝐵) = (𝐵 ·s 𝐴))

Proof of Theorem mulscom
Dummy variables 𝑥 𝑦 𝑥𝑂 𝑦𝑂 𝑎 𝑏 𝑐 𝑑 𝑝 𝑞 𝑟 𝑠 𝑡 𝑢 𝑣 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 oveq1 7427 . . 3 (𝑥 = 𝑥𝑂 → (𝑥 ·s 𝑦) = (𝑥𝑂 ·s 𝑦))
2 oveq2 7428 . . 3 (𝑥 = 𝑥𝑂 → (𝑦 ·s 𝑥) = (𝑦 ·s 𝑥𝑂))
31, 2eqeq12d 2777 . 2 (𝑥 = 𝑥𝑂 → ((𝑥 ·s 𝑦) = (𝑦 ·s 𝑥) ↔ (𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂)))
4 oveq2 7428 . . 3 (𝑦 = 𝑦𝑂 → (𝑥𝑂 ·s 𝑦) = (𝑥𝑂 ·s 𝑦𝑂))
5 oveq1 7427 . . 3 (𝑦 = 𝑦𝑂 → (𝑦 ·s 𝑥𝑂) = (𝑦𝑂 ·s 𝑥𝑂))
64, 5eqeq12d 2777 . 2 (𝑦 = 𝑦𝑂 → ((𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ↔ (𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂)))
7 oveq1 7427 . . 3 (𝑥 = 𝑥𝑂 → (𝑥 ·s 𝑦𝑂) = (𝑥𝑂 ·s 𝑦𝑂))
8 oveq2 7428 . . 3 (𝑥 = 𝑥𝑂 → (𝑦𝑂 ·s 𝑥) = (𝑦𝑂 ·s 𝑥𝑂))
97, 8eqeq12d 2777 . 2 (𝑥 = 𝑥𝑂 → ((𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥) ↔ (𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂)))
10 oveq1 7427 . . 3 (𝑥 = 𝐴 → (𝑥 ·s 𝑦) = (𝐴 ·s 𝑦))
11 oveq2 7428 . . 3 (𝑥 = 𝐴 → (𝑦 ·s 𝑥) = (𝑦 ·s 𝐴))
1210, 11eqeq12d 2777 . 2 (𝑥 = 𝐴 → ((𝑥 ·s 𝑦) = (𝑦 ·s 𝑥) ↔ (𝐴 ·s 𝑦) = (𝑦 ·s 𝐴)))
13 oveq2 7428 . . 3 (𝑦 = 𝐵 → (𝐴 ·s 𝑦) = (𝐴 ·s 𝐵))
14 oveq1 7427 . . 3 (𝑦 = 𝐵 → (𝑦 ·s 𝐴) = (𝐵 ·s 𝐴))
1513, 14eqeq12d 2777 . 2 (𝑦 = 𝐵 → ((𝐴 ·s 𝑦) = (𝑦 ·s 𝐴) ↔ (𝐴 ·s 𝐵) = (𝐵 ·s 𝐴)))
16 oveq1 7427 . . . . . . . . . . . . . . 15 (𝑥𝑂 = 𝑝 → (𝑥𝑂 ·s 𝑦) = (𝑝 ·s 𝑦))
17 oveq2 7428 . . . . . . . . . . . . . . 15 (𝑥𝑂 = 𝑝 → (𝑦 ·s 𝑥𝑂) = (𝑦 ·s 𝑝))
1816, 17eqeq12d 2777 . . . . . . . . . . . . . 14 (𝑥𝑂 = 𝑝 → ((𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ↔ (𝑝 ·s 𝑦) = (𝑦 ·s 𝑝)))
19 simplr2 1235 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂))
20 simprl 783 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → 𝑝 ∈ (L‘𝑥))
21 elun1 4128 . . . . . . . . . . . . . . 15 (𝑝 ∈ (L‘𝑥) → 𝑝 ∈ ((L‘𝑥) ∪ (R‘𝑥)))
2220, 21syl 18 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → 𝑝 ∈ ((L‘𝑥) ∪ (R‘𝑥)))
2318, 19, 22rspcdva 3578 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → (𝑝 ·s 𝑦) = (𝑦 ·s 𝑝))
24 oveq2 7428 . . . . . . . . . . . . . . 15 (𝑦𝑂 = 𝑞 → (𝑥 ·s 𝑦𝑂) = (𝑥 ·s 𝑞))
25 oveq1 7427 . . . . . . . . . . . . . . 15 (𝑦𝑂 = 𝑞 → (𝑦𝑂 ·s 𝑥) = (𝑞 ·s 𝑥))
2624, 25eqeq12d 2777 . . . . . . . . . . . . . 14 (𝑦𝑂 = 𝑞 → ((𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥) ↔ (𝑥 ·s 𝑞) = (𝑞 ·s 𝑥)))
27 simplr3 1236 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))
28 simprr 785 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → 𝑞 ∈ (L‘𝑦))
29 elun1 4128 . . . . . . . . . . . . . . 15 (𝑞 ∈ (L‘𝑦) → 𝑞 ∈ ((L‘𝑦) ∪ (R‘𝑦)))
3028, 29syl 18 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → 𝑞 ∈ ((L‘𝑦) ∪ (R‘𝑦)))
3126, 27, 30rspcdva 3578 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → (𝑥 ·s 𝑞) = (𝑞 ·s 𝑥))
3223, 31oveq12d 7438 . . . . . . . . . . . 12 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → ((𝑝 ·s 𝑦) +s (𝑥 ·s 𝑞)) = ((𝑦 ·s 𝑝) +s (𝑞 ·s 𝑥)))
33 simpllr 788 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → 𝑦 ∈ No)
3420leftnod 28266 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → 𝑝 ∈ No)
3533, 34mulscld 28521 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → (𝑦 ·s 𝑝) ∈ No)
3628leftnod 28266 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → 𝑞 ∈ No)
37 simplll 787 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → 𝑥 ∈ No)
3836, 37mulscld 28521 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → (𝑞 ·s 𝑥) ∈ No)
3935, 38addscomd 28353 . . . . . . . . . . . 12 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → ((𝑦 ·s 𝑝) +s (𝑞 ·s 𝑥)) = ((𝑞 ·s 𝑥) +s (𝑦 ·s 𝑝)))
4032, 39eqtrd 2796 . . . . . . . . . . 11 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → ((𝑝 ·s 𝑦) +s (𝑥 ·s 𝑞)) = ((𝑞 ·s 𝑥) +s (𝑦 ·s 𝑝)))
41 oveq1 7427 . . . . . . . . . . . . 13 (𝑥𝑂 = 𝑝 → (𝑥𝑂 ·s 𝑦𝑂) = (𝑝 ·s 𝑦𝑂))
42 oveq2 7428 . . . . . . . . . . . . 13 (𝑥𝑂 = 𝑝 → (𝑦𝑂 ·s 𝑥𝑂) = (𝑦𝑂 ·s 𝑝))
4341, 42eqeq12d 2777 . . . . . . . . . . . 12 (𝑥𝑂 = 𝑝 → ((𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ↔ (𝑝 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑝)))
44 oveq2 7428 . . . . . . . . . . . . 13 (𝑦𝑂 = 𝑞 → (𝑝 ·s 𝑦𝑂) = (𝑝 ·s 𝑞))
45 oveq1 7427 . . . . . . . . . . . . 13 (𝑦𝑂 = 𝑞 → (𝑦𝑂 ·s 𝑝) = (𝑞 ·s 𝑝))
4644, 45eqeq12d 2777 . . . . . . . . . . . 12 (𝑦𝑂 = 𝑞 → ((𝑝 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑝) ↔ (𝑝 ·s 𝑞) = (𝑞 ·s 𝑝)))
47 simplr1 1234 . . . . . . . . . . . 12 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂))
4843, 46, 47, 22, 30rspc2dv 3591 . . . . . . . . . . 11 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → (𝑝 ·s 𝑞) = (𝑞 ·s 𝑝))
4940, 48oveq12d 7438 . . . . . . . . . 10 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → (((𝑝 ·s 𝑦) +s (𝑥 ·s 𝑞)) −s (𝑝 ·s 𝑞)) = (((𝑞 ·s 𝑥) +s (𝑦 ·s 𝑝)) −s (𝑞 ·s 𝑝)))
5049eqeq2d 2772 . . . . . . . . 9 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → (𝑎 = (((𝑝 ·s 𝑦) +s (𝑥 ·s 𝑞)) −s (𝑝 ·s 𝑞)) ↔ 𝑎 = (((𝑞 ·s 𝑥) +s (𝑦 ·s 𝑝)) −s (𝑞 ·s 𝑝))))
51502rexbidva 3226 . . . . . . . 8 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → (∃𝑝 ∈ (L‘𝑥)∃𝑞 ∈ (L‘𝑦)𝑎 = (((𝑝 ·s 𝑦) +s (𝑥 ·s 𝑞)) −s (𝑝 ·s 𝑞)) ↔ ∃𝑝 ∈ (L‘𝑥)∃𝑞 ∈ (L‘𝑦)𝑎 = (((𝑞 ·s 𝑥) +s (𝑦 ·s 𝑝)) −s (𝑞 ·s 𝑝))))
52 rexcom 3292 . . . . . . . 8 (∃𝑝 ∈ (L‘𝑥)∃𝑞 ∈ (L‘𝑦)𝑎 = (((𝑞 ·s 𝑥) +s (𝑦 ·s 𝑝)) −s (𝑞 ·s 𝑝)) ↔ ∃𝑞 ∈ (L‘𝑦)∃𝑝 ∈ (L‘𝑥)𝑎 = (((𝑞 ·s 𝑥) +s (𝑦 ·s 𝑝)) −s (𝑞 ·s 𝑝)))
5351, 52bitrdi 290 . . . . . . 7 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → (∃𝑝 ∈ (L‘𝑥)∃𝑞 ∈ (L‘𝑦)𝑎 = (((𝑝 ·s 𝑦) +s (𝑥 ·s 𝑞)) −s (𝑝 ·s 𝑞)) ↔ ∃𝑞 ∈ (L‘𝑦)∃𝑝 ∈ (L‘𝑥)𝑎 = (((𝑞 ·s 𝑥) +s (𝑦 ·s 𝑝)) −s (𝑞 ·s 𝑝))))
5453abbidv 2827 . . . . . 6 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → {𝑎 ∣ ∃𝑝 ∈ (L‘𝑥)∃𝑞 ∈ (L‘𝑦)𝑎 = (((𝑝 ·s 𝑦) +s (𝑥 ·s 𝑞)) −s (𝑝 ·s 𝑞))} = {𝑎 ∣ ∃𝑞 ∈ (L‘𝑦)∃𝑝 ∈ (L‘𝑥)𝑎 = (((𝑞 ·s 𝑥) +s (𝑦 ·s 𝑝)) −s (𝑞 ·s 𝑝))})
55 oveq1 7427 . . . . . . . . . . . . . . 15 (𝑥𝑂 = 𝑟 → (𝑥𝑂 ·s 𝑦) = (𝑟 ·s 𝑦))
56 oveq2 7428 . . . . . . . . . . . . . . 15 (𝑥𝑂 = 𝑟 → (𝑦 ·s 𝑥𝑂) = (𝑦 ·s 𝑟))
5755, 56eqeq12d 2777 . . . . . . . . . . . . . 14 (𝑥𝑂 = 𝑟 → ((𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ↔ (𝑟 ·s 𝑦) = (𝑦 ·s 𝑟)))
58 simplr2 1235 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂))
59 simprl 783 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → 𝑟 ∈ (R‘𝑥))
60 elun2 4129 . . . . . . . . . . . . . . 15 (𝑟 ∈ (R‘𝑥) → 𝑟 ∈ ((L‘𝑥) ∪ (R‘𝑥)))
6159, 60syl 18 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → 𝑟 ∈ ((L‘𝑥) ∪ (R‘𝑥)))
6257, 58, 61rspcdva 3578 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → (𝑟 ·s 𝑦) = (𝑦 ·s 𝑟))
63 oveq2 7428 . . . . . . . . . . . . . . 15 (𝑦𝑂 = 𝑠 → (𝑥 ·s 𝑦𝑂) = (𝑥 ·s 𝑠))
64 oveq1 7427 . . . . . . . . . . . . . . 15 (𝑦𝑂 = 𝑠 → (𝑦𝑂 ·s 𝑥) = (𝑠 ·s 𝑥))
6563, 64eqeq12d 2777 . . . . . . . . . . . . . 14 (𝑦𝑂 = 𝑠 → ((𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥) ↔ (𝑥 ·s 𝑠) = (𝑠 ·s 𝑥)))
66 simplr3 1236 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))
67 simprr 785 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → 𝑠 ∈ (R‘𝑦))
68 elun2 4129 . . . . . . . . . . . . . . 15 (𝑠 ∈ (R‘𝑦) → 𝑠 ∈ ((L‘𝑦) ∪ (R‘𝑦)))
6967, 68syl 18 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → 𝑠 ∈ ((L‘𝑦) ∪ (R‘𝑦)))
7065, 66, 69rspcdva 3578 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → (𝑥 ·s 𝑠) = (𝑠 ·s 𝑥))
7162, 70oveq12d 7438 . . . . . . . . . . . 12 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → ((𝑟 ·s 𝑦) +s (𝑥 ·s 𝑠)) = ((𝑦 ·s 𝑟) +s (𝑠 ·s 𝑥)))
72 simpllr 788 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → 𝑦 ∈ No)
7359rightnod 28268 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → 𝑟 ∈ No)
7472, 73mulscld 28521 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → (𝑦 ·s 𝑟) ∈ No)
7567rightnod 28268 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → 𝑠 ∈ No)
76 simplll 787 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → 𝑥 ∈ No)
7775, 76mulscld 28521 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → (𝑠 ·s 𝑥) ∈ No)
7874, 77addscomd 28353 . . . . . . . . . . . 12 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → ((𝑦 ·s 𝑟) +s (𝑠 ·s 𝑥)) = ((𝑠 ·s 𝑥) +s (𝑦 ·s 𝑟)))
7971, 78eqtrd 2796 . . . . . . . . . . 11 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → ((𝑟 ·s 𝑦) +s (𝑥 ·s 𝑠)) = ((𝑠 ·s 𝑥) +s (𝑦 ·s 𝑟)))
80 oveq1 7427 . . . . . . . . . . . . 13 (𝑥𝑂 = 𝑟 → (𝑥𝑂 ·s 𝑦𝑂) = (𝑟 ·s 𝑦𝑂))
81 oveq2 7428 . . . . . . . . . . . . 13 (𝑥𝑂 = 𝑟 → (𝑦𝑂 ·s 𝑥𝑂) = (𝑦𝑂 ·s 𝑟))
8280, 81eqeq12d 2777 . . . . . . . . . . . 12 (𝑥𝑂 = 𝑟 → ((𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ↔ (𝑟 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑟)))
83 oveq2 7428 . . . . . . . . . . . . 13 (𝑦𝑂 = 𝑠 → (𝑟 ·s 𝑦𝑂) = (𝑟 ·s 𝑠))
84 oveq1 7427 . . . . . . . . . . . . 13 (𝑦𝑂 = 𝑠 → (𝑦𝑂 ·s 𝑟) = (𝑠 ·s 𝑟))
8583, 84eqeq12d 2777 . . . . . . . . . . . 12 (𝑦𝑂 = 𝑠 → ((𝑟 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑟) ↔ (𝑟 ·s 𝑠) = (𝑠 ·s 𝑟)))
86 simplr1 1234 . . . . . . . . . . . 12 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂))
8782, 85, 86, 61, 69rspc2dv 3591 . . . . . . . . . . 11 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → (𝑟 ·s 𝑠) = (𝑠 ·s 𝑟))
8879, 87oveq12d 7438 . . . . . . . . . 10 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → (((𝑟 ·s 𝑦) +s (𝑥 ·s 𝑠)) −s (𝑟 ·s 𝑠)) = (((𝑠 ·s 𝑥) +s (𝑦 ·s 𝑟)) −s (𝑠 ·s 𝑟)))
8988eqeq2d 2772 . . . . . . . . 9 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → (𝑏 = (((𝑟 ·s 𝑦) +s (𝑥 ·s 𝑠)) −s (𝑟 ·s 𝑠)) ↔ 𝑏 = (((𝑠 ·s 𝑥) +s (𝑦 ·s 𝑟)) −s (𝑠 ·s 𝑟))))
90892rexbidva 3226 . . . . . . . 8 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → (∃𝑟 ∈ (R‘𝑥)∃𝑠 ∈ (R‘𝑦)𝑏 = (((𝑟 ·s 𝑦) +s (𝑥 ·s 𝑠)) −s (𝑟 ·s 𝑠)) ↔ ∃𝑟 ∈ (R‘𝑥)∃𝑠 ∈ (R‘𝑦)𝑏 = (((𝑠 ·s 𝑥) +s (𝑦 ·s 𝑟)) −s (𝑠 ·s 𝑟))))
91 rexcom 3292 . . . . . . . 8 (∃𝑟 ∈ (R‘𝑥)∃𝑠 ∈ (R‘𝑦)𝑏 = (((𝑠 ·s 𝑥) +s (𝑦 ·s 𝑟)) −s (𝑠 ·s 𝑟)) ↔ ∃𝑠 ∈ (R‘𝑦)∃𝑟 ∈ (R‘𝑥)𝑏 = (((𝑠 ·s 𝑥) +s (𝑦 ·s 𝑟)) −s (𝑠 ·s 𝑟)))
9290, 91bitrdi 290 . . . . . . 7 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → (∃𝑟 ∈ (R‘𝑥)∃𝑠 ∈ (R‘𝑦)𝑏 = (((𝑟 ·s 𝑦) +s (𝑥 ·s 𝑠)) −s (𝑟 ·s 𝑠)) ↔ ∃𝑠 ∈ (R‘𝑦)∃𝑟 ∈ (R‘𝑥)𝑏 = (((𝑠 ·s 𝑥) +s (𝑦 ·s 𝑟)) −s (𝑠 ·s 𝑟))))
9392abbidv 2827 . . . . . 6 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → {𝑏 ∣ ∃𝑟 ∈ (R‘𝑥)∃𝑠 ∈ (R‘𝑦)𝑏 = (((𝑟 ·s 𝑦) +s (𝑥 ·s 𝑠)) −s (𝑟 ·s 𝑠))} = {𝑏 ∣ ∃𝑠 ∈ (R‘𝑦)∃𝑟 ∈ (R‘𝑥)𝑏 = (((𝑠 ·s 𝑥) +s (𝑦 ·s 𝑟)) −s (𝑠 ·s 𝑟))})
9454, 93uneq12d 4116 . . . . 5 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → ({𝑎 ∣ ∃𝑝 ∈ (L‘𝑥)∃𝑞 ∈ (L‘𝑦)𝑎 = (((𝑝 ·s 𝑦) +s (𝑥 ·s 𝑞)) −s (𝑝 ·s 𝑞))} ∪ {𝑏 ∣ ∃𝑟 ∈ (R‘𝑥)∃𝑠 ∈ (R‘𝑦)𝑏 = (((𝑟 ·s 𝑦) +s (𝑥 ·s 𝑠)) −s (𝑟 ·s 𝑠))}) = ({𝑎 ∣ ∃𝑞 ∈ (L‘𝑦)∃𝑝 ∈ (L‘𝑥)𝑎 = (((𝑞 ·s 𝑥) +s (𝑦 ·s 𝑝)) −s (𝑞 ·s 𝑝))} ∪ {𝑏 ∣ ∃𝑠 ∈ (R‘𝑦)∃𝑟 ∈ (R‘𝑥)𝑏 = (((𝑠 ·s 𝑥) +s (𝑦 ·s 𝑟)) −s (𝑠 ·s 𝑟))}))
95 oveq1 7427 . . . . . . . . . . . . . . . 16 (𝑥𝑂 = 𝑡 → (𝑥𝑂 ·s 𝑦) = (𝑡 ·s 𝑦))
96 oveq2 7428 . . . . . . . . . . . . . . . 16 (𝑥𝑂 = 𝑡 → (𝑦 ·s 𝑥𝑂) = (𝑦 ·s 𝑡))
9795, 96eqeq12d 2777 . . . . . . . . . . . . . . 15 (𝑥𝑂 = 𝑡 → ((𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ↔ (𝑡 ·s 𝑦) = (𝑦 ·s 𝑡)))
98 simplr2 1235 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂))
99 simprl 783 . . . . . . . . . . . . . . . 16 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → 𝑡 ∈ (L‘𝑥))
100 elun1 4128 . . . . . . . . . . . . . . . 16 (𝑡 ∈ (L‘𝑥) → 𝑡 ∈ ((L‘𝑥) ∪ (R‘𝑥)))
10199, 100syl 18 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → 𝑡 ∈ ((L‘𝑥) ∪ (R‘𝑥)))
10297, 98, 101rspcdva 3578 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → (𝑡 ·s 𝑦) = (𝑦 ·s 𝑡))
103 oveq2 7428 . . . . . . . . . . . . . . . 16 (𝑦𝑂 = 𝑢 → (𝑥 ·s 𝑦𝑂) = (𝑥 ·s 𝑢))
104 oveq1 7427 . . . . . . . . . . . . . . . 16 (𝑦𝑂 = 𝑢 → (𝑦𝑂 ·s 𝑥) = (𝑢 ·s 𝑥))
105103, 104eqeq12d 2777 . . . . . . . . . . . . . . 15 (𝑦𝑂 = 𝑢 → ((𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥) ↔ (𝑥 ·s 𝑢) = (𝑢 ·s 𝑥)))
106 simplr3 1236 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))
107 simprr 785 . . . . . . . . . . . . . . . 16 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → 𝑢 ∈ (R‘𝑦))
108 elun2 4129 . . . . . . . . . . . . . . . 16 (𝑢 ∈ (R‘𝑦) → 𝑢 ∈ ((L‘𝑦) ∪ (R‘𝑦)))
109107, 108syl 18 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → 𝑢 ∈ ((L‘𝑦) ∪ (R‘𝑦)))
110105, 106, 109rspcdva 3578 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → (𝑥 ·s 𝑢) = (𝑢 ·s 𝑥))
111102, 110oveq12d 7438 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → ((𝑡 ·s 𝑦) +s (𝑥 ·s 𝑢)) = ((𝑦 ·s 𝑡) +s (𝑢 ·s 𝑥)))
112 simpllr 788 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → 𝑦 ∈ No)
11399leftnod 28266 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → 𝑡 ∈ No)
114112, 113mulscld 28521 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → (𝑦 ·s 𝑡) ∈ No)
115107rightnod 28268 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → 𝑢 ∈ No)
116 simplll 787 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → 𝑥 ∈ No)
117115, 116mulscld 28521 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → (𝑢 ·s 𝑥) ∈ No)
118114, 117addscomd 28353 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → ((𝑦 ·s 𝑡) +s (𝑢 ·s 𝑥)) = ((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)))
119111, 118eqtrd 2796 . . . . . . . . . . . 12 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → ((𝑡 ·s 𝑦) +s (𝑥 ·s 𝑢)) = ((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)))
120 oveq1 7427 . . . . . . . . . . . . . 14 (𝑥𝑂 = 𝑡 → (𝑥𝑂 ·s 𝑦𝑂) = (𝑡 ·s 𝑦𝑂))
121 oveq2 7428 . . . . . . . . . . . . . 14 (𝑥𝑂 = 𝑡 → (𝑦𝑂 ·s 𝑥𝑂) = (𝑦𝑂 ·s 𝑡))
122120, 121eqeq12d 2777 . . . . . . . . . . . . 13 (𝑥𝑂 = 𝑡 → ((𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ↔ (𝑡 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑡)))
123 oveq2 7428 . . . . . . . . . . . . . 14 (𝑦𝑂 = 𝑢 → (𝑡 ·s 𝑦𝑂) = (𝑡 ·s 𝑢))
124 oveq1 7427 . . . . . . . . . . . . . 14 (𝑦𝑂 = 𝑢 → (𝑦𝑂 ·s 𝑡) = (𝑢 ·s 𝑡))
125123, 124eqeq12d 2777 . . . . . . . . . . . . 13 (𝑦𝑂 = 𝑢 → ((𝑡 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑡) ↔ (𝑡 ·s 𝑢) = (𝑢 ·s 𝑡)))
126 simplr1 1234 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂))
127122, 125, 126, 101, 109rspc2dv 3591 . . . . . . . . . . . 12 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → (𝑡 ·s 𝑢) = (𝑢 ·s 𝑡))
128119, 127oveq12d 7438 . . . . . . . . . . 11 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → (((𝑡 ·s 𝑦) +s (𝑥 ·s 𝑢)) −s (𝑡 ·s 𝑢)) = (((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)) −s (𝑢 ·s 𝑡)))
129128eqeq2d 2772 . . . . . . . . . 10 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → (𝑐 = (((𝑡 ·s 𝑦) +s (𝑥 ·s 𝑢)) −s (𝑡 ·s 𝑢)) ↔ 𝑐 = (((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)) −s (𝑢 ·s 𝑡))))
1301292rexbidva 3226 . . . . . . . . 9 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → (∃𝑡 ∈ (L‘𝑥)∃𝑢 ∈ (R‘𝑦)𝑐 = (((𝑡 ·s 𝑦) +s (𝑥 ·s 𝑢)) −s (𝑡 ·s 𝑢)) ↔ ∃𝑡 ∈ (L‘𝑥)∃𝑢 ∈ (R‘𝑦)𝑐 = (((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)) −s (𝑢 ·s 𝑡))))
131 rexcom 3292 . . . . . . . . 9 (∃𝑡 ∈ (L‘𝑥)∃𝑢 ∈ (R‘𝑦)𝑐 = (((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)) −s (𝑢 ·s 𝑡)) ↔ ∃𝑢 ∈ (R‘𝑦)∃𝑡 ∈ (L‘𝑥)𝑐 = (((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)) −s (𝑢 ·s 𝑡)))
132130, 131bitrdi 290 . . . . . . . 8 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → (∃𝑡 ∈ (L‘𝑥)∃𝑢 ∈ (R‘𝑦)𝑐 = (((𝑡 ·s 𝑦) +s (𝑥 ·s 𝑢)) −s (𝑡 ·s 𝑢)) ↔ ∃𝑢 ∈ (R‘𝑦)∃𝑡 ∈ (L‘𝑥)𝑐 = (((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)) −s (𝑢 ·s 𝑡))))
133132abbidv 2827 . . . . . . 7 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → {𝑐 ∣ ∃𝑡 ∈ (L‘𝑥)∃𝑢 ∈ (R‘𝑦)𝑐 = (((𝑡 ·s 𝑦) +s (𝑥 ·s 𝑢)) −s (𝑡 ·s 𝑢))} = {𝑐 ∣ ∃𝑢 ∈ (R‘𝑦)∃𝑡 ∈ (L‘𝑥)𝑐 = (((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)) −s (𝑢 ·s 𝑡))})
134 oveq1 7427 . . . . . . . . . . . . . . . 16 (𝑥𝑂 = 𝑣 → (𝑥𝑂 ·s 𝑦) = (𝑣 ·s 𝑦))
135 oveq2 7428 . . . . . . . . . . . . . . . 16 (𝑥𝑂 = 𝑣 → (𝑦 ·s 𝑥𝑂) = (𝑦 ·s 𝑣))
136134, 135eqeq12d 2777 . . . . . . . . . . . . . . 15 (𝑥𝑂 = 𝑣 → ((𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ↔ (𝑣 ·s 𝑦) = (𝑦 ·s 𝑣)))
137 simplr2 1235 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂))
138 simprl 783 . . . . . . . . . . . . . . . 16 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → 𝑣 ∈ (R‘𝑥))
139 elun2 4129 . . . . . . . . . . . . . . . 16 (𝑣 ∈ (R‘𝑥) → 𝑣 ∈ ((L‘𝑥) ∪ (R‘𝑥)))
140138, 139syl 18 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → 𝑣 ∈ ((L‘𝑥) ∪ (R‘𝑥)))
141136, 137, 140rspcdva 3578 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → (𝑣 ·s 𝑦) = (𝑦 ·s 𝑣))
142 oveq2 7428 . . . . . . . . . . . . . . . 16 (𝑦𝑂 = 𝑤 → (𝑥 ·s 𝑦𝑂) = (𝑥 ·s 𝑤))
143 oveq1 7427 . . . . . . . . . . . . . . . 16 (𝑦𝑂 = 𝑤 → (𝑦𝑂 ·s 𝑥) = (𝑤 ·s 𝑥))
144142, 143eqeq12d 2777 . . . . . . . . . . . . . . 15 (𝑦𝑂 = 𝑤 → ((𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥) ↔ (𝑥 ·s 𝑤) = (𝑤 ·s 𝑥)))
145 simplr3 1236 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))
146 simprr 785 . . . . . . . . . . . . . . . 16 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → 𝑤 ∈ (L‘𝑦))
147 elun1 4128 . . . . . . . . . . . . . . . 16 (𝑤 ∈ (L‘𝑦) → 𝑤 ∈ ((L‘𝑦) ∪ (R‘𝑦)))
148146, 147syl 18 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → 𝑤 ∈ ((L‘𝑦) ∪ (R‘𝑦)))
149144, 145, 148rspcdva 3578 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → (𝑥 ·s 𝑤) = (𝑤 ·s 𝑥))
150141, 149oveq12d 7438 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → ((𝑣 ·s 𝑦) +s (𝑥 ·s 𝑤)) = ((𝑦 ·s 𝑣) +s (𝑤 ·s 𝑥)))
151 simpllr 788 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → 𝑦 ∈ No)
152138rightnod 28268 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → 𝑣 ∈ No)
153151, 152mulscld 28521 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → (𝑦 ·s 𝑣) ∈ No)
154146leftnod 28266 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → 𝑤 ∈ No)
155 simplll 787 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → 𝑥 ∈ No)
156154, 155mulscld 28521 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → (𝑤 ·s 𝑥) ∈ No)
157153, 156addscomd 28353 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → ((𝑦 ·s 𝑣) +s (𝑤 ·s 𝑥)) = ((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)))
158150, 157eqtrd 2796 . . . . . . . . . . . 12 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → ((𝑣 ·s 𝑦) +s (𝑥 ·s 𝑤)) = ((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)))
159 oveq1 7427 . . . . . . . . . . . . . 14 (𝑥𝑂 = 𝑣 → (𝑥𝑂 ·s 𝑦𝑂) = (𝑣 ·s 𝑦𝑂))
160 oveq2 7428 . . . . . . . . . . . . . 14 (𝑥𝑂 = 𝑣 → (𝑦𝑂 ·s 𝑥𝑂) = (𝑦𝑂 ·s 𝑣))
161159, 160eqeq12d 2777 . . . . . . . . . . . . 13 (𝑥𝑂 = 𝑣 → ((𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ↔ (𝑣 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑣)))
162 oveq2 7428 . . . . . . . . . . . . . 14 (𝑦𝑂 = 𝑤 → (𝑣 ·s 𝑦𝑂) = (𝑣 ·s 𝑤))
163 oveq1 7427 . . . . . . . . . . . . . 14 (𝑦𝑂 = 𝑤 → (𝑦𝑂 ·s 𝑣) = (𝑤 ·s 𝑣))
164162, 163eqeq12d 2777 . . . . . . . . . . . . 13 (𝑦𝑂 = 𝑤 → ((𝑣 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑣) ↔ (𝑣 ·s 𝑤) = (𝑤 ·s 𝑣)))
165 simplr1 1234 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂))
166161, 164, 165, 140, 148rspc2dv 3591 . . . . . . . . . . . 12 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → (𝑣 ·s 𝑤) = (𝑤 ·s 𝑣))
167158, 166oveq12d 7438 . . . . . . . . . . 11 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → (((𝑣 ·s 𝑦) +s (𝑥 ·s 𝑤)) −s (𝑣 ·s 𝑤)) = (((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)) −s (𝑤 ·s 𝑣)))
168167eqeq2d 2772 . . . . . . . . . 10 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → (𝑑 = (((𝑣 ·s 𝑦) +s (𝑥 ·s 𝑤)) −s (𝑣 ·s 𝑤)) ↔ 𝑑 = (((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)) −s (𝑤 ·s 𝑣))))
1691682rexbidva 3226 . . . . . . . . 9 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → (∃𝑣 ∈ (R‘𝑥)∃𝑤 ∈ (L‘𝑦)𝑑 = (((𝑣 ·s 𝑦) +s (𝑥 ·s 𝑤)) −s (𝑣 ·s 𝑤)) ↔ ∃𝑣 ∈ (R‘𝑥)∃𝑤 ∈ (L‘𝑦)𝑑 = (((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)) −s (𝑤 ·s 𝑣))))
170 rexcom 3292 . . . . . . . . 9 (∃𝑣 ∈ (R‘𝑥)∃𝑤 ∈ (L‘𝑦)𝑑 = (((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)) −s (𝑤 ·s 𝑣)) ↔ ∃𝑤 ∈ (L‘𝑦)∃𝑣 ∈ (R‘𝑥)𝑑 = (((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)) −s (𝑤 ·s 𝑣)))
171169, 170bitrdi 290 . . . . . . . 8 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → (∃𝑣 ∈ (R‘𝑥)∃𝑤 ∈ (L‘𝑦)𝑑 = (((𝑣 ·s 𝑦) +s (𝑥 ·s 𝑤)) −s (𝑣 ·s 𝑤)) ↔ ∃𝑤 ∈ (L‘𝑦)∃𝑣 ∈ (R‘𝑥)𝑑 = (((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)) −s (𝑤 ·s 𝑣))))
172171abbidv 2827 . . . . . . 7 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → {𝑑 ∣ ∃𝑣 ∈ (R‘𝑥)∃𝑤 ∈ (L‘𝑦)𝑑 = (((𝑣 ·s 𝑦) +s (𝑥 ·s 𝑤)) −s (𝑣 ·s 𝑤))} = {𝑑 ∣ ∃𝑤 ∈ (L‘𝑦)∃𝑣 ∈ (R‘𝑥)𝑑 = (((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)) −s (𝑤 ·s 𝑣))})
173133, 172uneq12d 4116 . . . . . 6 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → ({𝑐 ∣ ∃𝑡 ∈ (L‘𝑥)∃𝑢 ∈ (R‘𝑦)𝑐 = (((𝑡 ·s 𝑦) +s (𝑥 ·s 𝑢)) −s (𝑡 ·s 𝑢))} ∪ {𝑑 ∣ ∃𝑣 ∈ (R‘𝑥)∃𝑤 ∈ (L‘𝑦)𝑑 = (((𝑣 ·s 𝑦) +s (𝑥 ·s 𝑤)) −s (𝑣 ·s 𝑤))}) = ({𝑐 ∣ ∃𝑢 ∈ (R‘𝑦)∃𝑡 ∈ (L‘𝑥)𝑐 = (((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)) −s (𝑢 ·s 𝑡))} ∪ {𝑑 ∣ ∃𝑤 ∈ (L‘𝑦)∃𝑣 ∈ (R‘𝑥)𝑑 = (((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)) −s (𝑤 ·s 𝑣))}))
174 uncom 4105 . . . . . 6 ({𝑐 ∣ ∃𝑢 ∈ (R‘𝑦)∃𝑡 ∈ (L‘𝑥)𝑐 = (((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)) −s (𝑢 ·s 𝑡))} ∪ {𝑑 ∣ ∃𝑤 ∈ (L‘𝑦)∃𝑣 ∈ (R‘𝑥)𝑑 = (((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)) −s (𝑤 ·s 𝑣))}) = ({𝑑 ∣ ∃𝑤 ∈ (L‘𝑦)∃𝑣 ∈ (R‘𝑥)𝑑 = (((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)) −s (𝑤 ·s 𝑣))} ∪ {𝑐 ∣ ∃𝑢 ∈ (R‘𝑦)∃𝑡 ∈ (L‘𝑥)𝑐 = (((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)) −s (𝑢 ·s 𝑡))})
175173, 174eqtrdi 2812 . . . . 5 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → ({𝑐 ∣ ∃𝑡 ∈ (L‘𝑥)∃𝑢 ∈ (R‘𝑦)𝑐 = (((𝑡 ·s 𝑦) +s (𝑥 ·s 𝑢)) −s (𝑡 ·s 𝑢))} ∪ {𝑑 ∣ ∃𝑣 ∈ (R‘𝑥)∃𝑤 ∈ (L‘𝑦)𝑑 = (((𝑣 ·s 𝑦) +s (𝑥 ·s 𝑤)) −s (𝑣 ·s 𝑤))}) = ({𝑑 ∣ ∃𝑤 ∈ (L‘𝑦)∃𝑣 ∈ (R‘𝑥)𝑑 = (((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)) −s (𝑤 ·s 𝑣))} ∪ {𝑐 ∣ ∃𝑢 ∈ (R‘𝑦)∃𝑡 ∈ (L‘𝑥)𝑐 = (((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)) −s (𝑢 ·s 𝑡))}))
17694, 175oveq12d 7438 . . . 4 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → (({𝑎 ∣ ∃𝑝 ∈ (L‘𝑥)∃𝑞 ∈ (L‘𝑦)𝑎 = (((𝑝 ·s 𝑦) +s (𝑥 ·s 𝑞)) −s (𝑝 ·s 𝑞))} ∪ {𝑏 ∣ ∃𝑟 ∈ (R‘𝑥)∃𝑠 ∈ (R‘𝑦)𝑏 = (((𝑟 ·s 𝑦) +s (𝑥 ·s 𝑠)) −s (𝑟 ·s 𝑠))}) |s ({𝑐 ∣ ∃𝑡 ∈ (L‘𝑥)∃𝑢 ∈ (R‘𝑦)𝑐 = (((𝑡 ·s 𝑦) +s (𝑥 ·s 𝑢)) −s (𝑡 ·s 𝑢))} ∪ {𝑑 ∣ ∃𝑣 ∈ (R‘𝑥)∃𝑤 ∈ (L‘𝑦)𝑑 = (((𝑣 ·s 𝑦) +s (𝑥 ·s 𝑤)) −s (𝑣 ·s 𝑤))})) = (({𝑎 ∣ ∃𝑞 ∈ (L‘𝑦)∃𝑝 ∈ (L‘𝑥)𝑎 = (((𝑞 ·s 𝑥) +s (𝑦 ·s 𝑝)) −s (𝑞 ·s 𝑝))} ∪ {𝑏 ∣ ∃𝑠 ∈ (R‘𝑦)∃𝑟 ∈ (R‘𝑥)𝑏 = (((𝑠 ·s 𝑥) +s (𝑦 ·s 𝑟)) −s (𝑠 ·s 𝑟))}) |s ({𝑑 ∣ ∃𝑤 ∈ (L‘𝑦)∃𝑣 ∈ (R‘𝑥)𝑑 = (((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)) −s (𝑤 ·s 𝑣))} ∪ {𝑐 ∣ ∃𝑢 ∈ (R‘𝑦)∃𝑡 ∈ (L‘𝑥)𝑐 = (((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)) −s (𝑢 ·s 𝑡))})))
177 mulsval 28495 . . . . 5 ((𝑥 ∈ No ∧ 𝑦 ∈ No) → (𝑥 ·s 𝑦) = (({𝑎 ∣ ∃𝑝 ∈ (L‘𝑥)∃𝑞 ∈ (L‘𝑦)𝑎 = (((𝑝 ·s 𝑦) +s (𝑥 ·s 𝑞)) −s (𝑝 ·s 𝑞))} ∪ {𝑏 ∣ ∃𝑟 ∈ (R‘𝑥)∃𝑠 ∈ (R‘𝑦)𝑏 = (((𝑟 ·s 𝑦) +s (𝑥 ·s 𝑠)) −s (𝑟 ·s 𝑠))}) |s ({𝑐 ∣ ∃𝑡 ∈ (L‘𝑥)∃𝑢 ∈ (R‘𝑦)𝑐 = (((𝑡 ·s 𝑦) +s (𝑥 ·s 𝑢)) −s (𝑡 ·s 𝑢))} ∪ {𝑑 ∣ ∃𝑣 ∈ (R‘𝑥)∃𝑤 ∈ (L‘𝑦)𝑑 = (((𝑣 ·s 𝑦) +s (𝑥 ·s 𝑤)) −s (𝑣 ·s 𝑤))})))
178177adantr 486 . . . 4 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → (𝑥 ·s 𝑦) = (({𝑎 ∣ ∃𝑝 ∈ (L‘𝑥)∃𝑞 ∈ (L‘𝑦)𝑎 = (((𝑝 ·s 𝑦) +s (𝑥 ·s 𝑞)) −s (𝑝 ·s 𝑞))} ∪ {𝑏 ∣ ∃𝑟 ∈ (R‘𝑥)∃𝑠 ∈ (R‘𝑦)𝑏 = (((𝑟 ·s 𝑦) +s (𝑥 ·s 𝑠)) −s (𝑟 ·s 𝑠))}) |s ({𝑐 ∣ ∃𝑡 ∈ (L‘𝑥)∃𝑢 ∈ (R‘𝑦)𝑐 = (((𝑡 ·s 𝑦) +s (𝑥 ·s 𝑢)) −s (𝑡 ·s 𝑢))} ∪ {𝑑 ∣ ∃𝑣 ∈ (R‘𝑥)∃𝑤 ∈ (L‘𝑦)𝑑 = (((𝑣 ·s 𝑦) +s (𝑥 ·s 𝑤)) −s (𝑣 ·s 𝑤))})))
179 mulsval 28495 . . . . . 6 ((𝑦 ∈ No ∧ 𝑥 ∈ No) → (𝑦 ·s 𝑥) = (({𝑎 ∣ ∃𝑞 ∈ (L‘𝑦)∃𝑝 ∈ (L‘𝑥)𝑎 = (((𝑞 ·s 𝑥) +s (𝑦 ·s 𝑝)) −s (𝑞 ·s 𝑝))} ∪ {𝑏 ∣ ∃𝑠 ∈ (R‘𝑦)∃𝑟 ∈ (R‘𝑥)𝑏 = (((𝑠 ·s 𝑥) +s (𝑦 ·s 𝑟)) −s (𝑠 ·s 𝑟))}) |s ({𝑑 ∣ ∃𝑤 ∈ (L‘𝑦)∃𝑣 ∈ (R‘𝑥)𝑑 = (((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)) −s (𝑤 ·s 𝑣))} ∪ {𝑐 ∣ ∃𝑢 ∈ (R‘𝑦)∃𝑡 ∈ (L‘𝑥)𝑐 = (((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)) −s (𝑢 ·s 𝑡))})))
180179ancoms 464 . . . . 5 ((𝑥 ∈ No ∧ 𝑦 ∈ No) → (𝑦 ·s 𝑥) = (({𝑎 ∣ ∃𝑞 ∈ (L‘𝑦)∃𝑝 ∈ (L‘𝑥)𝑎 = (((𝑞 ·s 𝑥) +s (𝑦 ·s 𝑝)) −s (𝑞 ·s 𝑝))} ∪ {𝑏 ∣ ∃𝑠 ∈ (R‘𝑦)∃𝑟 ∈ (R‘𝑥)𝑏 = (((𝑠 ·s 𝑥) +s (𝑦 ·s 𝑟)) −s (𝑠 ·s 𝑟))}) |s ({𝑑 ∣ ∃𝑤 ∈ (L‘𝑦)∃𝑣 ∈ (R‘𝑥)𝑑 = (((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)) −s (𝑤 ·s 𝑣))} ∪ {𝑐 ∣ ∃𝑢 ∈ (R‘𝑦)∃𝑡 ∈ (L‘𝑥)𝑐 = (((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)) −s (𝑢 ·s 𝑡))})))
181180adantr 486 . . . 4 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → (𝑦 ·s 𝑥) = (({𝑎 ∣ ∃𝑞 ∈ (L‘𝑦)∃𝑝 ∈ (L‘𝑥)𝑎 = (((𝑞 ·s 𝑥) +s (𝑦 ·s 𝑝)) −s (𝑞 ·s 𝑝))} ∪ {𝑏 ∣ ∃𝑠 ∈ (R‘𝑦)∃𝑟 ∈ (R‘𝑥)𝑏 = (((𝑠 ·s 𝑥) +s (𝑦 ·s 𝑟)) −s (𝑠 ·s 𝑟))}) |s ({𝑑 ∣ ∃𝑤 ∈ (L‘𝑦)∃𝑣 ∈ (R‘𝑥)𝑑 = (((𝑤 ·s 𝑥) +s (𝑦 ·s 𝑣)) −s (𝑤 ·s 𝑣))} ∪ {𝑐 ∣ ∃𝑢 ∈ (R‘𝑦)∃𝑡 ∈ (L‘𝑥)𝑐 = (((𝑢 ·s 𝑥) +s (𝑦 ·s 𝑡)) −s (𝑢 ·s 𝑡))})))
182176, 178, 1813eqtr4d 2806 . . 3 (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) → (𝑥 ·s 𝑦) = (𝑦 ·s 𝑥))
183182ex 418 . 2 ((𝑥 ∈ No ∧ 𝑦 ∈ No) → ((∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥)) → (𝑥 ·s 𝑦) = (𝑦 ·s 𝑥)))
1843, 6, 9, 12, 15, 183no2inds 28341 1 ((𝐴 ∈ No ∧ 𝐵 ∈ No) → (𝐴 ·s 𝐵) = (𝐵 ·s 𝐴))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2145  {cab 2739  ∀wral 3077  ∃wrex 3087   ∪ cun 3897  ‘cfv 6538  (class class class)co 7420  Nocsur 27997   |s ccuts 28145  Lcleft 28211  Rcright 28212   +s cadds 28345   −s csubs 28406   ·s cmuls 28492
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7751
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-ot 4593  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6304  df-ord 6365  df-on 6366  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-riota 7377  df-ov 7423  df-oprab 7424  df-mpo 7425  df-1st 8001  df-2nd 8002  df-frecs 8299  df-wrecs 8330  df-recs 8379  df-1o 8476  df-2o 8477  df-nadd 8675  df-no 28000  df-lts 28001  df-bday 28002  df-les 28102  df-slts 28144  df-cuts 28146  df-0s 28193  df-made 28213  df-old 28214  df-left 28216  df-right 28217  df-norec 28324  df-norec2 28335  df-adds 28346  df-negs 28407  df-subs 28408  df-muls 28493
This theorem is used by:  mulscomd  28526  muls02  28527  mulslid  28528
  Copyright terms: Public domain W3C validator