Theorem addcmpblnq0 7251

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 6382	. . . . . . . 8 ⊢ ((𝑥 ∈ ω ∧ 𝑦 ∈ ω ∧ 𝑧 ∈ ω) → (𝑥 ·o (𝑦 +o 𝑧)) = ((𝑥 ·o 𝑦) +o (𝑥 ·o 𝑧)))
2	1	adantl 275	. . . . . . 7 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ (𝑥 ∈ ω ∧ 𝑦 ∈ ω ∧ 𝑧 ∈ ω)) → (𝑥 ·o (𝑦 +o 𝑧)) = ((𝑥 ·o 𝑦) +o (𝑥 ·o 𝑧)))
3		simplll 522	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐴 ∈ ω)
4		simprlr 527	. . . . . . . . 9 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐺 ∈ N)
5		pinn 7117	. . . . . . . . 9 ⊢ (𝐺 ∈ N → 𝐺 ∈ ω)
6	4, 5	syl 14	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐺 ∈ ω)
7		nnmcl 6377	. . . . . . . 8 ⊢ ((𝐴 ∈ ω ∧ 𝐺 ∈ ω) → (𝐴 ·o 𝐺) ∈ ω)
8	3, 6, 7	syl2anc 408	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐴 ·o 𝐺) ∈ ω)
9		simpllr 523	. . . . . . . . 9 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐵 ∈ N)
10		pinn 7117	. . . . . . . . 9 ⊢ (𝐵 ∈ N → 𝐵 ∈ ω)
11	9, 10	syl 14	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐵 ∈ ω)
12		simprll 526	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐹 ∈ ω)
13		nnmcl 6377	. . . . . . . 8 ⊢ ((𝐵 ∈ ω ∧ 𝐹 ∈ ω) → (𝐵 ·o 𝐹) ∈ ω)
14	11, 12, 13	syl2anc 408	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐵 ·o 𝐹) ∈ ω)
15		simplrr 525	. . . . . . . . 9 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐷 ∈ N)
16		pinn 7117	. . . . . . . . 9 ⊢ (𝐷 ∈ N → 𝐷 ∈ ω)
17	15, 16	syl 14	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐷 ∈ ω)
18		simprrr 529	. . . . . . . . 9 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝑆 ∈ N)
19		pinn 7117	. . . . . . . . 9 ⊢ (𝑆 ∈ N → 𝑆 ∈ ω)
20	18, 19	syl 14	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝑆 ∈ ω)
21		nnmcl 6377	. . . . . . . 8 ⊢ ((𝐷 ∈ ω ∧ 𝑆 ∈ ω) → (𝐷 ·o 𝑆) ∈ ω)
22	17, 20, 21	syl2anc 408	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐷 ·o 𝑆) ∈ ω)
23		nnacl 6376	. . . . . . . 8 ⊢ ((𝑥 ∈ ω ∧ 𝑦 ∈ ω) → (𝑥 +o 𝑦) ∈ ω)
24	23	adantl 275	. . . . . . 7 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ (𝑥 ∈ ω ∧ 𝑦 ∈ ω)) → (𝑥 +o 𝑦) ∈ ω)
25		nnmcom 6385	. . . . . . . 8 ⊢ ((𝑥 ∈ ω ∧ 𝑦 ∈ ω) → (𝑥 ·o 𝑦) = (𝑦 ·o 𝑥))
26	25	adantl 275	. . . . . . 7 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ (𝑥 ∈ ω ∧ 𝑦 ∈ ω)) → (𝑥 ·o 𝑦) = (𝑦 ·o 𝑥))
27	2, 8, 14, 22, 24, 26	caovdir2d 5947	. . . . . 6 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ·o (𝐷 ·o 𝑆)) = (((𝐴 ·o 𝐺) ·o (𝐷 ·o 𝑆)) +o ((𝐵 ·o 𝐹) ·o (𝐷 ·o 𝑆))))
28		nnmass 6383	. . . . . . . . 9 ⊢ ((𝑥 ∈ ω ∧ 𝑦 ∈ ω ∧ 𝑧 ∈ ω) → ((𝑥 ·o 𝑦) ·o 𝑧) = (𝑥 ·o (𝑦 ·o 𝑧)))
29	28	adantl 275	. . . . . . . 8 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ (𝑥 ∈ ω ∧ 𝑦 ∈ ω ∧ 𝑧 ∈ ω)) → ((𝑥 ·o 𝑦) ·o 𝑧) = (𝑥 ·o (𝑦 ·o 𝑧)))
30		nnmcl 6377	. . . . . . . . 9 ⊢ ((𝑥 ∈ ω ∧ 𝑦 ∈ ω) → (𝑥 ·o 𝑦) ∈ ω)
31	30	adantl 275	. . . . . . . 8 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ (𝑥 ∈ ω ∧ 𝑦 ∈ ω)) → (𝑥 ·o 𝑦) ∈ ω)
32	3, 6, 17, 26, 29, 20, 31	caov4d 5955	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → ((𝐴 ·o 𝐺) ·o (𝐷 ·o 𝑆)) = ((𝐴 ·o 𝐷) ·o (𝐺 ·o 𝑆)))
33	11, 12, 17, 26, 29, 20, 31	caov4d 5955	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → ((𝐵 ·o 𝐹) ·o (𝐷 ·o 𝑆)) = ((𝐵 ·o 𝐷) ·o (𝐹 ·o 𝑆)))
34	32, 33	oveq12d 5792	. . . . . 6 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (((𝐴 ·o 𝐺) ·o (𝐷 ·o 𝑆)) +o ((𝐵 ·o 𝐹) ·o (𝐷 ·o 𝑆))) = (((𝐴 ·o 𝐷) ·o (𝐺 ·o 𝑆)) +o ((𝐵 ·o 𝐷) ·o (𝐹 ·o 𝑆))))
35	27, 34	eqtrd 2172	. . . . 5 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ·o (𝐷 ·o 𝑆)) = (((𝐴 ·o 𝐷) ·o (𝐺 ·o 𝑆)) +o ((𝐵 ·o 𝐷) ·o (𝐹 ·o 𝑆))))
36		oveq1 5781	. . . . . 6 ⊢ ((𝐴 ·o 𝐷) = (𝐵 ·o 𝐶) → ((𝐴 ·o 𝐷) ·o (𝐺 ·o 𝑆)) = ((𝐵 ·o 𝐶) ·o (𝐺 ·o 𝑆)))
37		oveq2 5782	. . . . . 6 ⊢ ((𝐹 ·o 𝑆) = (𝐺 ·o 𝑅) → ((𝐵 ·o 𝐷) ·o (𝐹 ·o 𝑆)) = ((𝐵 ·o 𝐷) ·o (𝐺 ·o 𝑅)))
38	36, 37	oveqan12d 5793	. . . . 5 ⊢ (((𝐴 ·o 𝐷) = (𝐵 ·o 𝐶) ∧ (𝐹 ·o 𝑆) = (𝐺 ·o 𝑅)) → (((𝐴 ·o 𝐷) ·o (𝐺 ·o 𝑆)) +o ((𝐵 ·o 𝐷) ·o (𝐹 ·o 𝑆))) = (((𝐵 ·o 𝐶) ·o (𝐺 ·o 𝑆)) +o ((𝐵 ·o 𝐷) ·o (𝐺 ·o 𝑅))))
39	35, 38	sylan9eq 2192	. . . 4 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ ((𝐴 ·o 𝐷) = (𝐵 ·o 𝐶) ∧ (𝐹 ·o 𝑆) = (𝐺 ·o 𝑅))) → (((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ·o (𝐷 ·o 𝑆)) = (((𝐵 ·o 𝐶) ·o (𝐺 ·o 𝑆)) +o ((𝐵 ·o 𝐷) ·o (𝐺 ·o 𝑅))))
40		nnmcl 6377	. . . . . . . 8 ⊢ ((𝐵 ∈ ω ∧ 𝐺 ∈ ω) → (𝐵 ·o 𝐺) ∈ ω)
41	11, 6, 40	syl2anc 408	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐵 ·o 𝐺) ∈ ω)
42		simplrl 524	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝐶 ∈ ω)
43		nnmcl 6377	. . . . . . . 8 ⊢ ((𝐶 ∈ ω ∧ 𝑆 ∈ ω) → (𝐶 ·o 𝑆) ∈ ω)
44	42, 20, 43	syl2anc 408	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐶 ·o 𝑆) ∈ ω)
45		simprrl 528	. . . . . . . 8 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → 𝑅 ∈ ω)
46		nnmcl 6377	. . . . . . . 8 ⊢ ((𝐷 ∈ ω ∧ 𝑅 ∈ ω) → (𝐷 ·o 𝑅) ∈ ω)
47	17, 45, 46	syl2anc 408	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐷 ·o 𝑅) ∈ ω)
48		nndi 6382	. . . . . . 7 ⊢ (((𝐵 ·o 𝐺) ∈ ω ∧ (𝐶 ·o 𝑆) ∈ ω ∧ (𝐷 ·o 𝑅) ∈ ω) → ((𝐵 ·o 𝐺) ·o ((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅))) = (((𝐵 ·o 𝐺) ·o (𝐶 ·o 𝑆)) +o ((𝐵 ·o 𝐺) ·o (𝐷 ·o 𝑅))))
49	41, 44, 47, 48	syl3anc 1216	. . . . . 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 5955	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → ((𝐵 ·o 𝐺) ·o (𝐶 ·o 𝑆)) = ((𝐵 ·o 𝐶) ·o (𝐺 ·o 𝑆)))
51	11, 6, 17, 26, 29, 45, 31	caov4d 5955	. . . . . . 7 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → ((𝐵 ·o 𝐺) ·o (𝐷 ·o 𝑅)) = ((𝐵 ·o 𝐷) ·o (𝐺 ·o 𝑅)))
52	50, 51	oveq12d 5792	. . . . . 6 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (((𝐵 ·o 𝐺) ·o (𝐶 ·o 𝑆)) +o ((𝐵 ·o 𝐺) ·o (𝐷 ·o 𝑅))) = (((𝐵 ·o 𝐶) ·o (𝐺 ·o 𝑆)) +o ((𝐵 ·o 𝐷) ·o (𝐺 ·o 𝑅))))
53	49, 52	eqtrd 2172	. . . . 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 2175	. . 3 ⊢ (((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) ∧ ((𝐴 ·o 𝐷) = (𝐵 ·o 𝐶) ∧ (𝐹 ·o 𝑆) = (𝐺 ·o 𝑅))) → (((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ·o (𝐷 ·o 𝑆)) = ((𝐵 ·o 𝐺) ·o ((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅))))
56		nnacl 6376	. . . . . 6 ⊢ (((𝐴 ·o 𝐺) ∈ ω ∧ (𝐵 ·o 𝐹) ∈ ω) → ((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ∈ ω)
57	8, 14, 56	syl2anc 408	. . . . 5 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → ((𝐴 ·o 𝐺) +o (𝐵 ·o 𝐹)) ∈ ω)
58		mulpiord 7125	. . . . . . . 8 ⊢ ((𝐵 ∈ N ∧ 𝐺 ∈ N) → (𝐵 ·N 𝐺) = (𝐵 ·o 𝐺))
59		mulclpi 7136	. . . . . . . 8 ⊢ ((𝐵 ∈ N ∧ 𝐺 ∈ N) → (𝐵 ·N 𝐺) ∈ N)
60	58, 59	eqeltrrd 2217	. . . . . . 7 ⊢ ((𝐵 ∈ N ∧ 𝐺 ∈ N) → (𝐵 ·o 𝐺) ∈ N)
61	60	ad2ant2l 499	. . . . . 6 ⊢ (((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐹 ∈ ω ∧ 𝐺 ∈ N)) → (𝐵 ·o 𝐺) ∈ N)
62	61	ad2ant2r 500	. . . . 5 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐵 ·o 𝐺) ∈ N)
63		nnacl 6376	. . . . . 6 ⊢ (((𝐶 ·o 𝑆) ∈ ω ∧ (𝐷 ·o 𝑅) ∈ ω) → ((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅)) ∈ ω)
64	44, 47, 63	syl2anc 408	. . . . 5 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → ((𝐶 ·o 𝑆) +o (𝐷 ·o 𝑅)) ∈ ω)
65		mulpiord 7125	. . . . . . . 8 ⊢ ((𝐷 ∈ N ∧ 𝑆 ∈ N) → (𝐷 ·N 𝑆) = (𝐷 ·o 𝑆))
66		mulclpi 7136	. . . . . . . 8 ⊢ ((𝐷 ∈ N ∧ 𝑆 ∈ N) → (𝐷 ·N 𝑆) ∈ N)
67	65, 66	eqeltrrd 2217	. . . . . . 7 ⊢ ((𝐷 ∈ N ∧ 𝑆 ∈ N) → (𝐷 ·o 𝑆) ∈ N)
68	67	ad2ant2l 499	. . . . . 6 ⊢ (((𝐶 ∈ ω ∧ 𝐷 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N)) → (𝐷 ·o 𝑆) ∈ N)
69	68	ad2ant2l 499	. . . . 5 ⊢ ((((𝐴 ∈ ω ∧ 𝐵 ∈ N) ∧ (𝐶 ∈ ω ∧ 𝐷 ∈ N)) ∧ ((𝐹 ∈ ω ∧ 𝐺 ∈ N) ∧ (𝑅 ∈ ω ∧ 𝑆 ∈ N))) → (𝐷 ·o 𝑆) ∈ N)
70		enq0breq 7244	. . . . 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 1217	. . . 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 962   = wceq 1331   ∈ wcel 1480  ⟨cop 3530   class class class wbr 3929  ωcom 4504  (class class class)co 5774   +_o coa 6310   ·_o comu 6311  Ncnpi 7080   ·_N cmi 7082   ~_Q0 ceq0 7094

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 603  ax-in2 604  ax-io 698  ax-5 1423  ax-7 1424  ax-gen 1425  ax-ie1 1469  ax-ie2 1470  ax-8 1482  ax-10 1483  ax-11 1484  ax-i12 1485  ax-bndl 1486  ax-4 1487  ax-13 1491  ax-14 1492  ax-17 1506  ax-i9 1510  ax-ial 1514  ax-i5r 1515  ax-ext 2121  ax-coll 4043  ax-sep 4046  ax-nul 4054  ax-pow 4098  ax-pr 4131  ax-un 4355  ax-setind 4452  ax-iinf 4502

This theorem depends on definitions:  df-bi 116  df-dc 820  df-3an 964  df-tru 1334  df-fal 1337  df-nf 1437  df-sb 1736  df-eu 2002  df-mo 2003  df-clab 2126  df-cleq 2132  df-clel 2135  df-nfc 2270  df-ne 2309  df-ral 2421  df-rex 2422  df-reu 2423  df-rab 2425  df-v 2688  df-sbc 2910  df-csb 3004  df-dif 3073  df-un 3075  df-in 3077  df-ss 3084  df-nul 3364  df-pw 3512  df-sn 3533  df-pr 3534  df-op 3536  df-uni 3737  df-int 3772  df-iun 3815  df-br 3930  df-opab 3990  df-mpt 3991  df-tr 4027  df-id 4215  df-iord 4288  df-on 4290  df-suc 4293  df-iom 4505  df-xp 4545  df-rel 4546  df-cnv 4547  df-co 4548  df-dm 4549  df-rn 4550  df-res 4551  df-ima 4552  df-iota 5088  df-fun 5125  df-fn 5126  df-f 5127  df-f1 5128  df-fo 5129  df-f1o 5130  df-fv 5131  df-ov 5777  df-oprab 5778  df-mpo 5779  df-1st 6038  df-2nd 6039  df-recs 6202  df-irdg 6267  df-oadd 6317  df-omul 6318  df-ni 7112  df-mi 7114  df-enq0 7232

This theorem is referenced by:  addnq0mo  7255