Theorem addcmpblnq0 7384

Description: Lemma showing compatibility of addition on nonnegative fractions. (Contributed by Jim Kingdon, 23-Nov-2019.)

Assertion

Ref	Expression
addcmpblnq0	⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (((𝐴 ·o 𝐷) = (𝐵 ·o 𝐶) ∧ (𝐹 ·o 𝑆) = (𝐺 ·o 𝑅)) → ⟨((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)), (𝐵 ·o 𝐺)⟩ ~Q0 ⟨((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅)), (𝐷 ·o 𝑆)⟩))

Proof of Theorem addcmpblnq0

Dummy variables 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		nndi 6454	. . . . . . . 8 ⊢ ((𝑥 ∈ ω ∧ 𝑦 ∈ ω ∧ 𝑧 ∈ ω) → (𝑥 ·o (𝑦 +o 𝑧)) = ((𝑥 ·o 𝑦) +o (𝑥 ·o 𝑧)))
2	1	adantl 275	. . . . . . 7 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ (𝑥 ∈ ω ∧ 𝑦 ∈ ω ∧ 𝑧 ∈ ω)) → (𝑥 ·o (𝑦 +o 𝑧)) = ((𝑥 ·o 𝑦) +o (𝑥 ·o 𝑧)))
3		simplll 523	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐴 ∈ ω)
4		simprlr 528	. . . . . . . . 9 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐺 ∈ N)
5		pinn 7250	. . . . . . . . 9 ⊢ (𝐺 ∈ N → 𝐺 ∈ ω)
6	4, 5	syl 14	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐺 ∈ ω)
7		nnmcl 6449	. . . . . . . 8 ⊢ ((𝐴 ∈ ω ∧ 𝐺 ∈ ω) → (𝐴 ·o 𝐺) ∈ ω)
8	3, 6, 7	syl2anc 409	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐴 ·o 𝐺) ∈ ω)
9		simpllr 524	. . . . . . . . 9 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐵 ∈ N)
10		pinn 7250	. . . . . . . . 9 ⊢ (𝐵 ∈ N → 𝐵 ∈ ω)
11	9, 10	syl 14	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐵 ∈ ω)
12		simprll 527	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐹 ∈ ω)
13		nnmcl 6449	. . . . . . . 8 ⊢ ((𝐵 ∈ ω ∧ 𝐹 ∈ ω) → (𝐵 ·o 𝐹) ∈ ω)
14	11, 12, 13	syl2anc 409	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐵 ·o 𝐹) ∈ ω)
15		simplrr 526	. . . . . . . . 9 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐷 ∈ N)
16		pinn 7250	. . . . . . . . 9 ⊢ (𝐷 ∈ N → 𝐷 ∈ ω)
17	15, 16	syl 14	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐷 ∈ ω)
18		simprrr 530	. . . . . . . . 9 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝑆 ∈ N)
19		pinn 7250	. . . . . . . . 9 ⊢ (𝑆 ∈ N → 𝑆 ∈ ω)
20	18, 19	syl 14	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝑆 ∈ ω)
21		nnmcl 6449	. . . . . . . 8 ⊢ ((𝐷 ∈ ω ∧ 𝑆 ∈ ω) → (𝐷 ·o 𝑆) ∈ ω)
22	17, 20, 21	syl2anc 409	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐷 ·o 𝑆) ∈ ω)
23		nnacl 6448	. . . . . . . 8 ⊢ ((𝑥 ∈ ω ∧ 𝑦 ∈ ω) → (𝑥 +o 𝑦) ∈ ω)
24	23	adantl 275	. . . . . . 7 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ (𝑥 ∈ ω ∧ 𝑦 ∈ ω)) → (𝑥 +o 𝑦) ∈ ω)
25		nnmcom 6457	. . . . . . . 8 ⊢ ((𝑥 ∈ ω ∧ 𝑦 ∈ ω) → (𝑥 ·o 𝑦) = (𝑦 ·o 𝑥))
26	25	adantl 275	. . . . . . 7 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ (𝑥 ∈ ω ∧ 𝑦 ∈ ω)) → (𝑥 ·o 𝑦) = (𝑦 ·o 𝑥))
27	2, 8, 14, 22, 24, 26	caovdir2d 6018	. . . . . 6 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ·o (𝐷 ·o 𝑆)) = (((𝐴 ·o 𝐺) ·o (𝐷 ·o 𝑆)) +o ((𝐵 ·o 𝐹) ·o (𝐷 ·o 𝑆))))
28		nnmass 6455	. . . . . . . . 9 ⊢ ((𝑥 ∈ ω ∧ 𝑦 ∈ ω ∧ 𝑧 ∈ ω) → ((𝑥 ·o 𝑦) ·o 𝑧) = (𝑥 ·o (𝑦 ·o 𝑧)))
29	28	adantl 275	. . . . . . . 8 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ (𝑥 ∈ ω ∧ 𝑦 ∈ ω ∧ 𝑧 ∈ ω)) → ((𝑥 ·o 𝑦) ·o 𝑧) = (𝑥 ·o (𝑦 ·o 𝑧)))
30		nnmcl 6449	. . . . . . . . 9 ⊢ ((𝑥 ∈ ω ∧ 𝑦 ∈ ω) → (𝑥 ·o 𝑦) ∈ ω)
31	30	adantl 275	. . . . . . . 8 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ (𝑥 ∈ ω ∧ 𝑦 ∈ ω)) → (𝑥 ·o 𝑦) ∈ ω)
32	3, 6, 17, 26, 29, 20, 31	caov4d 6026	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → ((𝐴 ·o 𝐺) ·o (𝐷 ·o 𝑆)) = ((𝐴 ·o 𝐷) ·o (𝐺 ·o 𝑆)))
33	11, 12, 17, 26, 29, 20, 31	caov4d 6026	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → ((𝐵 ·o 𝐹) ·o (𝐷 ·o 𝑆)) = ((𝐵 ·o 𝐷) ·o (𝐹 ·o 𝑆)))
34	32, 33	oveq12d 5860	. . . . . 6 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (((𝐴 ·o 𝐺) ·o (𝐷 ·o 𝑆)) +o ((𝐵 ·o 𝐹) ·o (𝐷 ·o 𝑆))) = (((𝐴 ·o 𝐷) ·o (𝐺 ·o 𝑆)) +o ((𝐵 ·o 𝐷) ·o (𝐹 ·o 𝑆))))
35	27, 34	eqtrd 2198	. . . . 5 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ·o (𝐷 ·o 𝑆)) = (((𝐴 ·o 𝐷) ·o (𝐺 ·o 𝑆)) +o ((𝐵 ·o 𝐷) ·o (𝐹 ·o 𝑆))))
36		oveq1 5849	. . . . . 6 ⊢ ((𝐴 ·o 𝐷) = (𝐵 ·o 𝐶) → ((𝐴 ·o 𝐷) ·o (𝐺 ·o 𝑆)) = ((𝐵 ·o 𝐶) ·o (𝐺 ·o 𝑆)))
37		oveq2 5850	. . . . . 6 ⊢ ((𝐹 ·o 𝑆) = (𝐺 ·o 𝑅) → ((𝐵 ·o 𝐷) ·o (𝐹 ·o 𝑆)) = ((𝐵 ·o 𝐷) ·o (𝐺 ·o 𝑅)))
38	36, 37	oveqan12d 5861	. . . . 5 ⊢ (((𝐴 ·o 𝐷) = (𝐵 ·o 𝐶) ∧ (𝐹 ·o 𝑆) = (𝐺 ·o 𝑅)) → (((𝐴 ·o 𝐷) ·o (𝐺 ·o 𝑆)) +o ((𝐵 ·o 𝐷) ·o (𝐹 ·o 𝑆))) = (((𝐵 ·o 𝐶) ·o (𝐺 ·o 𝑆)) +o ((𝐵 ·o 𝐷) ·o (𝐺 ·o 𝑅))))
39	35, 38	sylan9eq 2219	. . . 4 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ ((𝐴 ·o 𝐷) = (𝐵 ·o 𝐶) ∧ (𝐹 ·o 𝑆) = (𝐺 ·o 𝑅))) → (((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ·o (𝐷 ·o 𝑆)) = (((𝐵 ·o 𝐶) ·o (𝐺 ·o 𝑆)) +o ((𝐵 ·o 𝐷) ·o (𝐺 ·o 𝑅))))
40		nnmcl 6449	. . . . . . . 8 ⊢ ((𝐵 ∈ ω ∧ 𝐺 ∈ ω) → (𝐵 ·o 𝐺) ∈ ω)
41	11, 6, 40	syl2anc 409	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐵 ·o 𝐺) ∈ ω)
42		simplrl 525	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐶 ∈ ω)
43		nnmcl 6449	. . . . . . . 8 ⊢ ((𝐶 ∈ ω ∧ 𝑆 ∈ ω) → (𝐶 ·o 𝑆) ∈ ω)
44	42, 20, 43	syl2anc 409	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐶 ·o 𝑆) ∈ ω)
45		simprrl 529	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝑅 ∈ ω)
46		nnmcl 6449	. . . . . . . 8 ⊢ ((𝐷 ∈ ω ∧ 𝑅 ∈ ω) → (𝐷 ·o 𝑅) ∈ ω)
47	17, 45, 46	syl2anc 409	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐷 ·o 𝑅) ∈ ω)
48		nndi 6454	. . . . . . 7 ⊢ (((𝐵 ·o 𝐺) ∈ ω ∧ (𝐶 ·o 𝑆) ∈ ω ∧ (𝐷 ·o 𝑅) ∈ ω) → ((𝐵 ·o 𝐺) ·o ((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅))) = (((𝐵 ·o 𝐺) ·o (𝐶 ·o 𝑆)) +o ((𝐵 ·o 𝐺) ·o (𝐷 ·o 𝑅))))
49	41, 44, 47, 48	syl3anc 1228	. . . . . 6 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → ((𝐵 ·o 𝐺) ·o ((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅))) = (((𝐵 ·o 𝐺) ·o (𝐶 ·o 𝑆)) +o ((𝐵 ·o 𝐺) ·o (𝐷 ·o 𝑅))))
50	11, 6, 42, 26, 29, 20, 31	caov4d 6026	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → ((𝐵 ·o 𝐺) ·o (𝐶 ·o 𝑆)) = ((𝐵 ·o 𝐶) ·o (𝐺 ·o 𝑆)))
51	11, 6, 17, 26, 29, 45, 31	caov4d 6026	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → ((𝐵 ·o 𝐺) ·o (𝐷 ·o 𝑅)) = ((𝐵 ·o 𝐷) ·o (𝐺 ·o 𝑅)))
52	50, 51	oveq12d 5860	. . . . . 6 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (((𝐵 ·o 𝐺) ·o (𝐶 ·o 𝑆)) +o ((𝐵 ·o 𝐺) ·o (𝐷 ·o 𝑅))) = (((𝐵 ·o 𝐶) ·o (𝐺 ·o 𝑆)) +o ((𝐵 ·o 𝐷) ·o (𝐺 ·o 𝑅))))
53	49, 52	eqtrd 2198	. . . . 5 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → ((𝐵 ·o 𝐺) ·o ((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅))) = (((𝐵 ·o 𝐶) ·o (𝐺 ·o 𝑆)) +o ((𝐵 ·o 𝐷) ·o (𝐺 ·o 𝑅))))
54	53	adantr 274	. . . 4 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ ((𝐴 ·o 𝐷) = (𝐵 ·o 𝐶) ∧ (𝐹 ·o 𝑆) = (𝐺 ·o 𝑅))) → ((𝐵 ·o 𝐺) ·o ((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅))) = (((𝐵 ·o 𝐶) ·o (𝐺 ·o 𝑆)) +o ((𝐵 ·o 𝐷) ·o (𝐺 ·o 𝑅))))
55	39, 54	eqtr4d 2201	. . 3 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ ((𝐴 ·o 𝐷) = (𝐵 ·o 𝐶) ∧ (𝐹 ·o 𝑆) = (𝐺 ·o 𝑅))) → (((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ·o (𝐷 ·o 𝑆)) = ((𝐵 ·o 𝐺) ·o ((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅))))
56		nnacl 6448	. . . . . 6 ⊢ (((𝐴 ·o 𝐺) ∈ ω ∧ (𝐵 ·o 𝐹) ∈ ω) → ((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ∈ ω)
57	8, 14, 56	syl2anc 409	. . . . 5 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → ((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ∈ ω)
58		mulpiord 7258	. . . . . . . 8 ⊢ ((𝐵 ∈ N ∧ 𝐺 ∈ N) → (𝐵 ·N 𝐺) = (𝐵 ·o 𝐺))
59		mulclpi 7269	. . . . . . . 8 ⊢ ((𝐵 ∈ N ∧ 𝐺 ∈ N) → (𝐵 ·N 𝐺) ∈ N)
60	58, 59	eqeltrrd 2244	. . . . . . 7 ⊢ ((𝐵 ∈ N ∧ 𝐺 ∈ N) → (𝐵 ·o 𝐺) ∈ N)
61	60	ad2ant2l 500	. . . . . 6 ⊢ (((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐹 ∈ ω ∧ 𝐺 ∈ N)) → (𝐵 ·o 𝐺) ∈ N)
62	61	ad2ant2r 501	. . . . 5 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐵 ·o 𝐺) ∈ N)
63		nnacl 6448	. . . . . 6 ⊢ (((𝐶 ·o 𝑆) ∈ ω ∧ (𝐷 ·o 𝑅) ∈ ω) → ((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅)) ∈ ω)
64	44, 47, 63	syl2anc 409	. . . . 5 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → ((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅)) ∈ ω)
65		mulpiord 7258	. . . . . . . 8 ⊢ ((𝐷 ∈ N ∧ 𝑆 ∈ N) → (𝐷 ·N 𝑆) = (𝐷 ·o 𝑆))
66		mulclpi 7269	. . . . . . . 8 ⊢ ((𝐷 ∈ N ∧ 𝑆 ∈ N) → (𝐷 ·N 𝑆) ∈ N)
67	65, 66	eqeltrrd 2244	. . . . . . 7 ⊢ ((𝐷 ∈ N ∧ 𝑆 ∈ N) → (𝐷 ·o 𝑆) ∈ N)
68	67	ad2ant2l 500	. . . . . 6 ⊢ (((𝐶 ∈ ω ∧ 𝐷 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N)) → (𝐷 ·o 𝑆) ∈ N)
69	68	ad2ant2l 500	. . . . 5 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐷 ·o 𝑆) ∈ N)
70		enq0breq 7377	. . . . 5 ⊢ (((((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ∈ ω ∧ (𝐵 ·o 𝐺) ∈ N) ∧ (((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅)) ∈ ω ∧ (𝐷 ·o 𝑆) ∈ N)) → (⟨((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)), (𝐵 ·o 𝐺)⟩ ~Q0 ⟨((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅)), (𝐷 ·o 𝑆)⟩ ↔ (((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ·o (𝐷 ·o 𝑆)) = ((𝐵 ·o 𝐺) ·o ((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅)))))
71	57, 62, 64, 69, 70	syl22anc 1229	. . . 4 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (⟨((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)), (𝐵 ·o 𝐺)⟩ ~Q0 ⟨((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅)), (𝐷 ·o 𝑆)⟩ ↔ (((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ·o (𝐷 ·o 𝑆)) = ((𝐵 ·o 𝐺) ·o ((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅)))))
72	71	adantr 274	. . 3 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ ((𝐴 ·o 𝐷) = (𝐵 ·o 𝐶) ∧ (𝐹 ·o 𝑆) = (𝐺 ·o 𝑅))) → (⟨((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)), (𝐵 ·o 𝐺)⟩ ~Q0 ⟨((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅)), (𝐷 ·o 𝑆)⟩ ↔ (((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ·o (𝐷 ·o 𝑆)) = ((𝐵 ·o 𝐺) ·o ((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅)))))
73	55, 72	mpbird 166	. 2 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ ((𝐴 ·o 𝐷) = (𝐵 ·o 𝐶) ∧ (𝐹 ·o 𝑆) = (𝐺 ·o 𝑅))) → ⟨((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)), (𝐵 ·o 𝐺)⟩ ~Q0 ⟨((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅)), (𝐷 ·o 𝑆)⟩)
74	73	ex 114	1 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (((𝐴 ·o 𝐷) = (𝐵 ·o 𝐶) ∧ (𝐹 ·o 𝑆) = (𝐺 ·o 𝑅)) → ⟨((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)), (𝐵 ·o 𝐺)⟩ ~Q0 ⟨((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅)), (𝐷 ·o 𝑆)⟩))

Syntax hints:   → wi 4   ∧ wa 103   ↔ wb 104   ∧ w3a 968   = wceq 1343   ∈ wcel 2136  ⟨cop 3579   class class class wbr 3982  ωcom 4567  (class class class)co 5842   +_o coa 6381   ·_o comu 6382  Ncnpi 7213   ·_N cmi 7215   ~_Q0 ceq0 7227

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-in1 604  ax-in2 605  ax-io 699  ax-5 1435  ax-7 1436  ax-gen 1437  ax-ie1 1481  ax-ie2 1482  ax-8 1492  ax-10 1493  ax-11 1494  ax-i12 1495  ax-bndl 1497  ax-4 1498  ax-17 1514  ax-i9 1518  ax-ial 1522  ax-i5r 1523  ax-13 2138  ax-14 2139  ax-ext 2147  ax-coll 4097  ax-sep 4100  ax-nul 4108  ax-pow 4153  ax-pr 4187  ax-un 4411  ax-setind 4514  ax-iinf 4565

This theorem depends on definitions:  df-bi 116  df-dc 825  df-3an 970  df-tru 1346  df-fal 1349  df-nf 1449  df-sb 1751  df-eu 2017  df-mo 2018  df-clab 2152  df-cleq 2158  df-clel 2161  df-nfc 2297  df-ne 2337  df-ral 2449  df-rex 2450  df-reu 2451  df-rab 2453  df-v 2728  df-sbc 2952  df-csb 3046  df-dif 3118  df-un 3120  df-in 3122  df-ss 3129  df-nul 3410  df-pw 3561  df-sn 3582  df-pr 3583  df-op 3585  df-uni 3790  df-int 3825  df-iun 3868  df-br 3983  df-opab 4044  df-mpt 4045  df-tr 4081  df-id 4271  df-iord 4344  df-on 4346  df-suc 4349  df-iom 4568  df-xp 4610  df-rel 4611  df-cnv 4612  df-co 4613  df-dm 4614  df-rn 4615  df-res 4616  df-ima 4617  df-iota 5153  df-fun 5190  df-fn 5191  df-f 5192  df-f1 5193  df-fo 5194  df-f1o 5195  df-fv 5196  df-ov 5845  df-oprab 5846  df-mpo 5847  df-1st 6108  df-2nd 6109  df-recs 6273  df-irdg 6338  df-oadd 6388  df-omul 6389  df-ni 7245  df-mi 7247  df-enq0 7365

This theorem is referenced by:  addnq0mo  7388