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

Theorem mulscom 28537
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 7434 . . 3 (𝑥 = 𝑥𝑂 → (𝑥 ·s 𝑦) = (𝑥𝑂 ·s 𝑦))
2 oveq2 7435 . . 3 (𝑥 = 𝑥𝑂 → (𝑦 ·s 𝑥) = (𝑦 ·s 𝑥𝑂))
31, 2eqeq12d 2779 . 2 (𝑥 = 𝑥𝑂 → ((𝑥 ·s 𝑦) = (𝑦 ·s 𝑥) ↔ (𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂)))
4 oveq2 7435 . . 3 (𝑦 = 𝑦𝑂 → (𝑥𝑂 ·s 𝑦) = (𝑥𝑂 ·s 𝑦𝑂))
5 oveq1 7434 . . 3 (𝑦 = 𝑦𝑂 → (𝑦 ·s 𝑥𝑂) = (𝑦𝑂 ·s 𝑥𝑂))
64, 5eqeq12d 2779 . 2 (𝑦 = 𝑦𝑂 → ((𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ↔ (𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂)))
7 oveq1 7434 . . 3 (𝑥 = 𝑥𝑂 → (𝑥 ·s 𝑦𝑂) = (𝑥𝑂 ·s 𝑦𝑂))
8 oveq2 7435 . . 3 (𝑥 = 𝑥𝑂 → (𝑦𝑂 ·s 𝑥) = (𝑦𝑂 ·s 𝑥𝑂))
97, 8eqeq12d 2779 . 2 (𝑥 = 𝑥𝑂 → ((𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥) ↔ (𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂)))
10 oveq1 7434 . . 3 (𝑥 = 𝐴 → (𝑥 ·s 𝑦) = (𝐴 ·s 𝑦))
11 oveq2 7435 . . 3 (𝑥 = 𝐴 → (𝑦 ·s 𝑥) = (𝑦 ·s 𝐴))
1210, 11eqeq12d 2779 . 2 (𝑥 = 𝐴 → ((𝑥 ·s 𝑦) = (𝑦 ·s 𝑥) ↔ (𝐴 ·s 𝑦) = (𝑦 ·s 𝐴)))
13 oveq2 7435 . . 3 (𝑦 = 𝐵 → (𝐴 ·s 𝑦) = (𝐴 ·s 𝐵))
14 oveq1 7434 . . 3 (𝑦 = 𝐵 → (𝑦 ·s 𝐴) = (𝐵 ·s 𝐴))
1513, 14eqeq12d 2779 . 2 (𝑦 = 𝐵 → ((𝐴 ·s 𝑦) = (𝑦 ·s 𝐴) ↔ (𝐴 ·s 𝐵) = (𝐵 ·s 𝐴)))
16 oveq1 7434 . . . . . . . . . . . . . . 15 (𝑥𝑂 = 𝑝 → (𝑥𝑂 ·s 𝑦) = (𝑝 ·s 𝑦))
17 oveq2 7435 . . . . . . . . . . . . . . 15 (𝑥𝑂 = 𝑝 → (𝑦 ·s 𝑥𝑂) = (𝑦 ·s 𝑝))
1816, 17eqeq12d 2779 . . . . . . . . . . . . . 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 4182 . . . . . . . . . . . . . . 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 3580 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → (𝑝 ·s 𝑦) = (𝑦 ·s 𝑝))
24 oveq2 7435 . . . . . . . . . . . . . . 15 (𝑦𝑂 = 𝑞 → (𝑥 ·s 𝑦𝑂) = (𝑥 ·s 𝑞))
25 oveq1 7434 . . . . . . . . . . . . . . 15 (𝑦𝑂 = 𝑞 → (𝑦𝑂 ·s 𝑥) = (𝑞 ·s 𝑥))
2624, 25eqeq12d 2779 . . . . . . . . . . . . . 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 4182 . . . . . . . . . . . . . . 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 3580 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → (𝑥 ·s 𝑞) = (𝑞 ·s 𝑥))
3223, 31oveq12d 7445 . . . . . . . . . . . 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 28278 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → 𝑝 ∈ No)
3533, 34mulscld 28533 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → (𝑦 ·s 𝑝) ∈ No)
3628leftnod 28278 . . . . . . . . . . . . . 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 28533 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → (𝑞 ·s 𝑥) ∈ No)
3935, 38addscomd 28365 . . . . . . . . . . . 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 2798 . . . . . . . . . . 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 7434 . . . . . . . . . . . . 13 (𝑥𝑂 = 𝑝 → (𝑥𝑂 ·s 𝑦𝑂) = (𝑝 ·s 𝑦𝑂))
42 oveq2 7435 . . . . . . . . . . . . 13 (𝑥𝑂 = 𝑝 → (𝑦𝑂 ·s 𝑥𝑂) = (𝑦𝑂 ·s 𝑝))
4341, 42eqeq12d 2779 . . . . . . . . . . . 12 (𝑥𝑂 = 𝑝 → ((𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ↔ (𝑝 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑝)))
44 oveq2 7435 . . . . . . . . . . . . 13 (𝑦𝑂 = 𝑞 → (𝑝 ·s 𝑦𝑂) = (𝑝 ·s 𝑞))
45 oveq1 7434 . . . . . . . . . . . . 13 (𝑦𝑂 = 𝑞 → (𝑦𝑂 ·s 𝑝) = (𝑞 ·s 𝑝))
4644, 45eqeq12d 2779 . . . . . . . . . . . 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 3593 . . . . . . . . . . 11 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑝 ∈ (L‘𝑥) ∧ 𝑞 ∈ (L‘𝑦))) → (𝑝 ·s 𝑞) = (𝑞 ·s 𝑝))
4940, 48oveq12d 7445 . . . . . . . . . 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 2774 . . . . . . . . 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 3228 . . . . . . . 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 3294 . . . . . . . 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 2829 . . . . . 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 7434 . . . . . . . . . . . . . . 15 (𝑥𝑂 = 𝑟 → (𝑥𝑂 ·s 𝑦) = (𝑟 ·s 𝑦))
56 oveq2 7435 . . . . . . . . . . . . . . 15 (𝑥𝑂 = 𝑟 → (𝑦 ·s 𝑥𝑂) = (𝑦 ·s 𝑟))
5755, 56eqeq12d 2779 . . . . . . . . . . . . . 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 4183 . . . . . . . . . . . . . . 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 3580 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → (𝑟 ·s 𝑦) = (𝑦 ·s 𝑟))
63 oveq2 7435 . . . . . . . . . . . . . . 15 (𝑦𝑂 = 𝑠 → (𝑥 ·s 𝑦𝑂) = (𝑥 ·s 𝑠))
64 oveq1 7434 . . . . . . . . . . . . . . 15 (𝑦𝑂 = 𝑠 → (𝑦𝑂 ·s 𝑥) = (𝑠 ·s 𝑥))
6563, 64eqeq12d 2779 . . . . . . . . . . . . . 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 4183 . . . . . . . . . . . . . . 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 3580 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → (𝑥 ·s 𝑠) = (𝑠 ·s 𝑥))
7162, 70oveq12d 7445 . . . . . . . . . . . 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 28280 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → 𝑟 ∈ No)
7472, 73mulscld 28533 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → (𝑦 ·s 𝑟) ∈ No)
7567rightnod 28280 . . . . . . . . . . . . . 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 28533 . . . . . . . . . . . . 13 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → (𝑠 ·s 𝑥) ∈ No)
7874, 77addscomd 28365 . . . . . . . . . . . 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 2798 . . . . . . . . . . 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 7434 . . . . . . . . . . . . 13 (𝑥𝑂 = 𝑟 → (𝑥𝑂 ·s 𝑦𝑂) = (𝑟 ·s 𝑦𝑂))
81 oveq2 7435 . . . . . . . . . . . . 13 (𝑥𝑂 = 𝑟 → (𝑦𝑂 ·s 𝑥𝑂) = (𝑦𝑂 ·s 𝑟))
8280, 81eqeq12d 2779 . . . . . . . . . . . 12 (𝑥𝑂 = 𝑟 → ((𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ↔ (𝑟 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑟)))
83 oveq2 7435 . . . . . . . . . . . . 13 (𝑦𝑂 = 𝑠 → (𝑟 ·s 𝑦𝑂) = (𝑟 ·s 𝑠))
84 oveq1 7434 . . . . . . . . . . . . 13 (𝑦𝑂 = 𝑠 → (𝑦𝑂 ·s 𝑟) = (𝑠 ·s 𝑟))
8583, 84eqeq12d 2779 . . . . . . . . . . . 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 3593 . . . . . . . . . . 11 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑟 ∈ (R‘𝑥) ∧ 𝑠 ∈ (R‘𝑦))) → (𝑟 ·s 𝑠) = (𝑠 ·s 𝑟))
8879, 87oveq12d 7445 . . . . . . . . . 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 2774 . . . . . . . . 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 3228 . . . . . . . 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 3294 . . . . . . . 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 2829 . . . . . 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 4170 . . . . 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 7434 . . . . . . . . . . . . . . . 16 (𝑥𝑂 = 𝑡 → (𝑥𝑂 ·s 𝑦) = (𝑡 ·s 𝑦))
96 oveq2 7435 . . . . . . . . . . . . . . . 16 (𝑥𝑂 = 𝑡 → (𝑦 ·s 𝑥𝑂) = (𝑦 ·s 𝑡))
9795, 96eqeq12d 2779 . . . . . . . . . . . . . . 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 4182 . . . . . . . . . . . . . . . 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 3580 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → (𝑡 ·s 𝑦) = (𝑦 ·s 𝑡))
103 oveq2 7435 . . . . . . . . . . . . . . . 16 (𝑦𝑂 = 𝑢 → (𝑥 ·s 𝑦𝑂) = (𝑥 ·s 𝑢))
104 oveq1 7434 . . . . . . . . . . . . . . . 16 (𝑦𝑂 = 𝑢 → (𝑦𝑂 ·s 𝑥) = (𝑢 ·s 𝑥))
105103, 104eqeq12d 2779 . . . . . . . . . . . . . . 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 4183 . . . . . . . . . . . . . . . 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 3580 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → (𝑥 ·s 𝑢) = (𝑢 ·s 𝑥))
111102, 110oveq12d 7445 . . . . . . . . . . . . 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 28278 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → 𝑡 ∈ No)
114112, 113mulscld 28533 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → (𝑦 ·s 𝑡) ∈ No)
115107rightnod 28280 . . . . . . . . . . . . . . 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 28533 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → (𝑢 ·s 𝑥) ∈ No)
118114, 117addscomd 28365 . . . . . . . . . . . . 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 2798 . . . . . . . . . . . 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 7434 . . . . . . . . . . . . . 14 (𝑥𝑂 = 𝑡 → (𝑥𝑂 ·s 𝑦𝑂) = (𝑡 ·s 𝑦𝑂))
121 oveq2 7435 . . . . . . . . . . . . . 14 (𝑥𝑂 = 𝑡 → (𝑦𝑂 ·s 𝑥𝑂) = (𝑦𝑂 ·s 𝑡))
122120, 121eqeq12d 2779 . . . . . . . . . . . . 13 (𝑥𝑂 = 𝑡 → ((𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ↔ (𝑡 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑡)))
123 oveq2 7435 . . . . . . . . . . . . . 14 (𝑦𝑂 = 𝑢 → (𝑡 ·s 𝑦𝑂) = (𝑡 ·s 𝑢))
124 oveq1 7434 . . . . . . . . . . . . . 14 (𝑦𝑂 = 𝑢 → (𝑦𝑂 ·s 𝑡) = (𝑢 ·s 𝑡))
125123, 124eqeq12d 2779 . . . . . . . . . . . . 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 3593 . . . . . . . . . . . 12 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑡 ∈ (L‘𝑥) ∧ 𝑢 ∈ (R‘𝑦))) → (𝑡 ·s 𝑢) = (𝑢 ·s 𝑡))
128119, 127oveq12d 7445 . . . . . . . . . . 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 2774 . . . . . . . . . 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 3228 . . . . . . . . 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 3294 . . . . . . . . 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 2829 . . . . . . 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 7434 . . . . . . . . . . . . . . . 16 (𝑥𝑂 = 𝑣 → (𝑥𝑂 ·s 𝑦) = (𝑣 ·s 𝑦))
135 oveq2 7435 . . . . . . . . . . . . . . . 16 (𝑥𝑂 = 𝑣 → (𝑦 ·s 𝑥𝑂) = (𝑦 ·s 𝑣))
136134, 135eqeq12d 2779 . . . . . . . . . . . . . . 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 4183 . . . . . . . . . . . . . . . 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 3580 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → (𝑣 ·s 𝑦) = (𝑦 ·s 𝑣))
142 oveq2 7435 . . . . . . . . . . . . . . . 16 (𝑦𝑂 = 𝑤 → (𝑥 ·s 𝑦𝑂) = (𝑥 ·s 𝑤))
143 oveq1 7434 . . . . . . . . . . . . . . . 16 (𝑦𝑂 = 𝑤 → (𝑦𝑂 ·s 𝑥) = (𝑤 ·s 𝑥))
144142, 143eqeq12d 2779 . . . . . . . . . . . . . . 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 4182 . . . . . . . . . . . . . . . 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 3580 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → (𝑥 ·s 𝑤) = (𝑤 ·s 𝑥))
150141, 149oveq12d 7445 . . . . . . . . . . . . 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 28280 . . . . . . . . . . . . . . 15 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → 𝑣 ∈ No)
153151, 152mulscld 28533 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → (𝑦 ·s 𝑣) ∈ No)
154146leftnod 28278 . . . . . . . . . . . . . . 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 28533 . . . . . . . . . . . . . 14 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → (𝑤 ·s 𝑥) ∈ No)
157153, 156addscomd 28365 . . . . . . . . . . . . 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 2798 . . . . . . . . . . . 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 7434 . . . . . . . . . . . . . 14 (𝑥𝑂 = 𝑣 → (𝑥𝑂 ·s 𝑦𝑂) = (𝑣 ·s 𝑦𝑂))
160 oveq2 7435 . . . . . . . . . . . . . 14 (𝑥𝑂 = 𝑣 → (𝑦𝑂 ·s 𝑥𝑂) = (𝑦𝑂 ·s 𝑣))
161159, 160eqeq12d 2779 . . . . . . . . . . . . 13 (𝑥𝑂 = 𝑣 → ((𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ↔ (𝑣 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑣)))
162 oveq2 7435 . . . . . . . . . . . . . 14 (𝑦𝑂 = 𝑤 → (𝑣 ·s 𝑦𝑂) = (𝑣 ·s 𝑤))
163 oveq1 7434 . . . . . . . . . . . . . 14 (𝑦𝑂 = 𝑤 → (𝑦𝑂 ·s 𝑣) = (𝑤 ·s 𝑣))
164162, 163eqeq12d 2779 . . . . . . . . . . . . 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 3593 . . . . . . . . . . . 12 ((((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥𝑂 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥𝑂) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(𝑥𝑂 ·s 𝑦) = (𝑦 ·s 𝑥𝑂) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(𝑥 ·s 𝑦𝑂) = (𝑦𝑂 ·s 𝑥))) ∧ (𝑣 ∈ (R‘𝑥) ∧ 𝑤 ∈ (L‘𝑦))) → (𝑣 ·s 𝑤) = (𝑤 ·s 𝑣))
167158, 166oveq12d 7445 . . . . . . . . . . 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 2774 . . . . . . . . . 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 3228 . . . . . . . . 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 3294 . . . . . . . . 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 2829 . . . . . . 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 4170 . . . . . 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 4159 . . . . . 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 2814 . . . . 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 7445 . . . 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 28507 . . . . 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 28507 . . . . . 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 2808 . . 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 28353 1 ((𝐴 ∈ No ∧ 𝐵 ∈ No) → (𝐴 ·s 𝐵) = (𝐵 ·s 𝐴))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ∧ wa 401   ∧ w3a 1103   = wceq 1569   ∈ wcel 2146  {cab 2741  ∀wral 3079  ∃wrex 3089   ∪ cun 4151  ‘cfv 6546  (class class class)co 7427  Nocsur 28009   |s ccuts 28157  Lcleft 28223  Rcright 28224   +s cadds 28357   −s csubs 28418   ·s cmuls 28504
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1944  ax-6 2001  ax-7 2042  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2196  ax-12 2215  ax-ext 2735  ax-rep 5234  ax-sep 5251  ax-nul 5262  ax-pow 5330  ax-pr 5394  ax-un 7758
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2101  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-ral 3080  df-rex 3090  df-rmo 3368  df-reu 3369  df-rab 3416  df-v 3455  df-sbc 3742  df-csb 3851  df-ss 3900  df-pss 4016  df-dif 4049  df-in 4093  df-un 4153  df-nul 4281  df-if 4485  df-pw 4561  df-sn 4588  df-pr 4590  df-tp 4592  df-op 4838  df-ot 4861  df-uni 4870  df-int 4910  df-iun 4955  df-br 5106  df-opab 5170  df-mpt 5189  df-tr 5215  df-id 5549  df-eprel 5554  df-po 5562  df-so 5563  df-fr 5607  df-se 5608  df-we 5609  df-xp 5660  df-rel 5661  df-cnv 5662  df-co 5663  df-dm 5664  df-rn 5665  df-res 5666  df-ima 5667  df-pred 6310  df-ord 6371  df-on 6372  df-suc 6374  df-iota 6500  df-fun 6548  df-fn 6549  df-f 6550  df-f1 6551  df-fo 6552  df-f1o 6553  df-fv 6554  df-riota 7384  df-ov 7430  df-oprab 7431  df-mpo 7432  df-1st 8008  df-2nd 8009  df-frecs 8310  df-wrecs 8341  df-recs 8390  df-1o 8487  df-2o 8488  df-nadd 8686  df-no 28012  df-lts 28013  df-bday 28014  df-les 28114  df-slts 28156  df-cuts 28158  df-0s 28205  df-made 28225  df-old 28226  df-left 28228  df-right 28229  df-norec 28336  df-norec2 28347  df-adds 28358  df-negs 28419  df-subs 28420  df-muls 28505
This theorem is used by:  mulscomd  28538  muls02  28539  mulslid  28540
  Copyright terms: Public domain W3C validator