Theorem addassnq 10841

Description: Addition of positive fractions is associative. (Contributed by NM, 2-Sep-1995.) (Revised by Mario Carneiro, 28-Apr-2013.) (New usage is discouraged.)

Assertion

Ref	Expression
addassnq	⊢ ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶))

Proof of Theorem addassnq

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

Step	Hyp	Ref	Expression
1		addasspi 10778	. . . . . . . 8 ⊢ ((((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶))) +N (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶))) +N ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))) = (((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶))) +N ((((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))))
2		ovex 7374	. . . . . . . . . . 11 ⊢ ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ V
3		ovex 7374	. . . . . . . . . . 11 ⊢ ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ V
4		fvex 6830	. . . . . . . . . . 11 ⊢ (2nd ‘𝐶) ∈ V
5		mulcompi 10779	. . . . . . . . . . 11 ⊢ (𝑥 ·N 𝑦) = (𝑦 ·N 𝑥)
6		distrpi 10781	. . . . . . . . . . 11 ⊢ (𝑥 ·N (𝑦 +N 𝑧)) = ((𝑥 ·N 𝑦) +N (𝑥 ·N 𝑧))
7	2, 3, 4, 5, 6	caovdir 7575	. . . . . . . . . 10 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ·N (2nd ‘𝐶)) = ((((1st ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶)) +N (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)))
8		mulasspi 10780	. . . . . . . . . . 11 ⊢ (((1st ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶)) = ((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶)))
9	8	oveq1i 7351	. . . . . . . . . 10 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶)) +N (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶))) = (((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶))) +N (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)))
10	7, 9	eqtri 2753	. . . . . . . . 9 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ·N (2nd ‘𝐶)) = (((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶))) +N (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)))
11	10	oveq1i 7351	. . . . . . . 8 ⊢ (((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))) = ((((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶))) +N (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶))) +N ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))))
12		ovex 7374	. . . . . . . . . . 11 ⊢ ((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ V
13		ovex 7374	. . . . . . . . . . 11 ⊢ ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ V
14		fvex 6830	. . . . . . . . . . 11 ⊢ (2nd ‘𝐴) ∈ V
15	12, 13, 14, 5, 6	caovdir 7575	. . . . . . . . . 10 ⊢ ((((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ·N (2nd ‘𝐴)) = ((((1st ‘𝐵) ·N (2nd ‘𝐶)) ·N (2nd ‘𝐴)) +N (((1st ‘𝐶) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐴)))
16		fvex 6830	. . . . . . . . . . . 12 ⊢ (1st ‘𝐵) ∈ V
17		mulasspi 10780	. . . . . . . . . . . 12 ⊢ ((𝑥 ·N 𝑦) ·N 𝑧) = (𝑥 ·N (𝑦 ·N 𝑧))
18	16, 4, 14, 5, 17	caov32 7568	. . . . . . . . . . 11 ⊢ (((1st ‘𝐵) ·N (2nd ‘𝐶)) ·N (2nd ‘𝐴)) = (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶))
19		mulasspi 10780	. . . . . . . . . . . 12 ⊢ (((1st ‘𝐶) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐴)) = ((1st ‘𝐶) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐴)))
20		mulcompi 10779	. . . . . . . . . . . . 13 ⊢ ((2nd ‘𝐵) ·N (2nd ‘𝐴)) = ((2nd ‘𝐴) ·N (2nd ‘𝐵))
21	20	oveq2i 7352	. . . . . . . . . . . 12 ⊢ ((1st ‘𝐶) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐴))) = ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))
22	19, 21	eqtri 2753	. . . . . . . . . . 11 ⊢ (((1st ‘𝐶) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐴)) = ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))
23	18, 22	oveq12i 7353	. . . . . . . . . 10 ⊢ ((((1st ‘𝐵) ·N (2nd ‘𝐶)) ·N (2nd ‘𝐴)) +N (((1st ‘𝐶) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐴))) = ((((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))))
24	15, 23	eqtri 2753	. . . . . . . . 9 ⊢ ((((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ·N (2nd ‘𝐴)) = ((((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))))
25	24	oveq2i 7352	. . . . . . . 8 ⊢ (((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶))) +N ((((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ·N (2nd ‘𝐴))) = (((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶))) +N ((((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))))
26	1, 11, 25	3eqtr4i 2763	. . . . . . 7 ⊢ (((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))) = (((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶))) +N ((((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ·N (2nd ‘𝐴)))
27		mulasspi 10780	. . . . . . 7 ⊢ (((2nd ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶)) = ((2nd ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶)))
28	26, 27	opeq12i 4828	. . . . . 6 ⊢ ⟨(((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))), (((2nd ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶))⟩ = ⟨(((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶))) +N ((((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶)))⟩
29		elpqn 10808	. . . . . . . . . 10 ⊢ (𝐴 ∈ Q → 𝐴 ∈ (N × N))
30	29	3ad2ant1 1133	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐴 ∈ (N × N))
31		elpqn 10808	. . . . . . . . . 10 ⊢ (𝐵 ∈ Q → 𝐵 ∈ (N × N))
32	31	3ad2ant2 1134	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐵 ∈ (N × N))
33		addpipq2 10819	. . . . . . . . 9 ⊢ ((𝐴 ∈ (N × N) ∧ 𝐵 ∈ (N × N)) → (𝐴 +pQ 𝐵) = ⟨(((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)
34	30, 32, 33	syl2anc 584	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +pQ 𝐵) = ⟨(((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)
35		relxp 5632	. . . . . . . . 9 ⊢ Rel (N × N)
36		elpqn 10808	. . . . . . . . . 10 ⊢ (𝐶 ∈ Q → 𝐶 ∈ (N × N))
37	36	3ad2ant3 1135	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐶 ∈ (N × N))
38		1st2nd 7966	. . . . . . . . 9 ⊢ ((Rel (N × N) ∧ 𝐶 ∈ (N × N)) → 𝐶 = ⟨(1st ‘𝐶), (2nd ‘𝐶)⟩)
39	35, 37, 38	sylancr 587	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐶 = ⟨(1st ‘𝐶), (2nd ‘𝐶)⟩)
40	34, 39	oveq12d 7359	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +pQ 𝐵) +pQ 𝐶) = (⟨(((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩ +pQ ⟨(1st ‘𝐶), (2nd ‘𝐶)⟩))
41		xp1st 7948	. . . . . . . . . . 11 ⊢ (𝐴 ∈ (N × N) → (1st ‘𝐴) ∈ N)
42	30, 41	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (1st ‘𝐴) ∈ N)
43		xp2nd 7949	. . . . . . . . . . 11 ⊢ (𝐵 ∈ (N × N) → (2nd ‘𝐵) ∈ N)
44	32, 43	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (2nd ‘𝐵) ∈ N)
45		mulclpi 10776	. . . . . . . . . 10 ⊢ (((1st ‘𝐴) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
46	42, 44, 45	syl2anc 584	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
47		xp1st 7948	. . . . . . . . . . 11 ⊢ (𝐵 ∈ (N × N) → (1st ‘𝐵) ∈ N)
48	32, 47	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (1st ‘𝐵) ∈ N)
49		xp2nd 7949	. . . . . . . . . . 11 ⊢ (𝐴 ∈ (N × N) → (2nd ‘𝐴) ∈ N)
50	30, 49	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (2nd ‘𝐴) ∈ N)
51		mulclpi 10776	. . . . . . . . . 10 ⊢ (((1st ‘𝐵) ∈ N ∧ (2nd ‘𝐴) ∈ N) → ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N)
52	48, 50, 51	syl2anc 584	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N)
53		addclpi 10775	. . . . . . . . 9 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N ∧ ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N) → (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ∈ N)
54	46, 52, 53	syl2anc 584	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ∈ N)
55		mulclpi 10776	. . . . . . . . 9 ⊢ (((2nd ‘𝐴) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
56	50, 44, 55	syl2anc 584	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
57		xp1st 7948	. . . . . . . . 9 ⊢ (𝐶 ∈ (N × N) → (1st ‘𝐶) ∈ N)
58	37, 57	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (1st ‘𝐶) ∈ N)
59		xp2nd 7949	. . . . . . . . 9 ⊢ (𝐶 ∈ (N × N) → (2nd ‘𝐶) ∈ N)
60	37, 59	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (2nd ‘𝐶) ∈ N)
61		addpipq 10820	. . . . . . . 8 ⊢ ((((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ∈ N ∧ ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N) ∧ ((1st ‘𝐶) ∈ N ∧ (2nd ‘𝐶) ∈ N)) → (⟨(((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩ +pQ ⟨(1st ‘𝐶), (2nd ‘𝐶)⟩) = ⟨(((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))), (((2nd ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶))⟩)
62	54, 56, 58, 60, 61	syl22anc 838	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (⟨(((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩ +pQ ⟨(1st ‘𝐶), (2nd ‘𝐶)⟩) = ⟨(((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))), (((2nd ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶))⟩)
63	40, 62	eqtrd 2765	. . . . . 6 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +pQ 𝐵) +pQ 𝐶) = ⟨(((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))), (((2nd ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶))⟩)
64		1st2nd 7966	. . . . . . . . 9 ⊢ ((Rel (N × N) ∧ 𝐴 ∈ (N × N)) → 𝐴 = ⟨(1st ‘𝐴), (2nd ‘𝐴)⟩)
65	35, 30, 64	sylancr 587	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐴 = ⟨(1st ‘𝐴), (2nd ‘𝐴)⟩)
66		addpipq2 10819	. . . . . . . . 9 ⊢ ((𝐵 ∈ (N × N) ∧ 𝐶 ∈ (N × N)) → (𝐵 +pQ 𝐶) = ⟨(((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))), ((2nd ‘𝐵) ·N (2nd ‘𝐶))⟩)
67	32, 37, 66	syl2anc 584	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐵 +pQ 𝐶) = ⟨(((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))), ((2nd ‘𝐵) ·N (2nd ‘𝐶))⟩)
68	65, 67	oveq12d 7359	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +pQ (𝐵 +pQ 𝐶)) = (⟨(1st ‘𝐴), (2nd ‘𝐴)⟩ +pQ ⟨(((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))), ((2nd ‘𝐵) ·N (2nd ‘𝐶))⟩))
69		mulclpi 10776	. . . . . . . . . 10 ⊢ (((1st ‘𝐵) ∈ N ∧ (2nd ‘𝐶) ∈ N) → ((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
70	48, 60, 69	syl2anc 584	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
71		mulclpi 10776	. . . . . . . . . 10 ⊢ (((1st ‘𝐶) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ N)
72	58, 44, 71	syl2anc 584	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ N)
73		addclpi 10775	. . . . . . . . 9 ⊢ ((((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ N ∧ ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ N) → (((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ∈ N)
74	70, 72, 73	syl2anc 584	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ∈ N)
75		mulclpi 10776	. . . . . . . . 9 ⊢ (((2nd ‘𝐵) ∈ N ∧ (2nd ‘𝐶) ∈ N) → ((2nd ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
76	44, 60, 75	syl2anc 584	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((2nd ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
77		addpipq 10820	. . . . . . . 8 ⊢ ((((1st ‘𝐴) ∈ N ∧ (2nd ‘𝐴) ∈ N) ∧ ((((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ∈ N ∧ ((2nd ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)) → (⟨(1st ‘𝐴), (2nd ‘𝐴)⟩ +pQ ⟨(((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))), ((2nd ‘𝐵) ·N (2nd ‘𝐶))⟩) = ⟨(((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶))) +N ((((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶)))⟩)
78	42, 50, 74, 76, 77	syl22anc 838	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (⟨(1st ‘𝐴), (2nd ‘𝐴)⟩ +pQ ⟨(((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))), ((2nd ‘𝐵) ·N (2nd ‘𝐶))⟩) = ⟨(((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶))) +N ((((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶)))⟩)
79	68, 78	eqtrd 2765	. . . . . 6 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +pQ (𝐵 +pQ 𝐶)) = ⟨(((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶))) +N ((((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶)))⟩)
80	28, 63, 79	3eqtr4a 2791	. . . . 5 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +pQ 𝐵) +pQ 𝐶) = (𝐴 +pQ (𝐵 +pQ 𝐶)))
81	80	fveq2d 6821	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ([Q]‘((𝐴 +pQ 𝐵) +pQ 𝐶)) = ([Q]‘(𝐴 +pQ (𝐵 +pQ 𝐶))))
82		adderpq 10839	. . . 4 ⊢ (([Q]‘(𝐴 +pQ 𝐵)) +Q ([Q]‘𝐶)) = ([Q]‘((𝐴 +pQ 𝐵) +pQ 𝐶))
83		adderpq 10839	. . . 4 ⊢ (([Q]‘𝐴) +Q ([Q]‘(𝐵 +pQ 𝐶))) = ([Q]‘(𝐴 +pQ (𝐵 +pQ 𝐶)))
84	81, 82, 83	3eqtr4g 2790	. . 3 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (([Q]‘(𝐴 +pQ 𝐵)) +Q ([Q]‘𝐶)) = (([Q]‘𝐴) +Q ([Q]‘(𝐵 +pQ 𝐶))))
85		addpqnq 10821	. . . . 5 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (𝐴 +Q 𝐵) = ([Q]‘(𝐴 +pQ 𝐵)))
86	85	3adant3 1132	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +Q 𝐵) = ([Q]‘(𝐴 +pQ 𝐵)))
87		nqerid 10816	. . . . . 6 ⊢ (𝐶 ∈ Q → ([Q]‘𝐶) = 𝐶)
88	87	eqcomd 2736	. . . . 5 ⊢ (𝐶 ∈ Q → 𝐶 = ([Q]‘𝐶))
89	88	3ad2ant3 1135	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐶 = ([Q]‘𝐶))
90	86, 89	oveq12d 7359	. . 3 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +Q 𝐵) +Q 𝐶) = (([Q]‘(𝐴 +pQ 𝐵)) +Q ([Q]‘𝐶)))
91		nqerid 10816	. . . . . 6 ⊢ (𝐴 ∈ Q → ([Q]‘𝐴) = 𝐴)
92	91	eqcomd 2736	. . . . 5 ⊢ (𝐴 ∈ Q → 𝐴 = ([Q]‘𝐴))
93	92	3ad2ant1 1133	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐴 = ([Q]‘𝐴))
94		addpqnq 10821	. . . . 5 ⊢ ((𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐵 +Q 𝐶) = ([Q]‘(𝐵 +pQ 𝐶)))
95	94	3adant1 1130	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐵 +Q 𝐶) = ([Q]‘(𝐵 +pQ 𝐶)))
96	93, 95	oveq12d 7359	. . 3 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +Q (𝐵 +Q 𝐶)) = (([Q]‘𝐴) +Q ([Q]‘(𝐵 +pQ 𝐶))))
97	84, 90, 96	3eqtr4d 2775	. 2 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶)))
98		addnqf 10831	. . . 4 ⊢ +Q :(Q × Q)⟶Q
99	98	fdmi 6658	. . 3 ⊢ dom +Q = (Q × Q)
100		0nnq 10807	. . 3 ⊢ ¬ ∅ ∈ Q
101	99, 100	ndmovass 7529	. 2 ⊢ (¬ (𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶)))
102	97, 101	pm2.61i 182	1 ⊢ ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶))

Syntax hints:   ∧ w3a 1086   = wceq 1541   ∈ wcel 2110  ⟨cop 4580   × cxp 5612  Rel wrel 5619  ‘cfv 6477  (class class class)co 7341  1^st c1st 7914  2^nd c2nd 7915  Ncnpi 10727   +_N cpli 10728   ·_N cmi 10729   +_pQ cplpq 10731  Qcnq 10735  [Q]cerq 10737   +_Q cplq 10738

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2112  ax-9 2120  ax-10 2143  ax-11 2159  ax-12 2179  ax-ext 2702  ax-sep 5232  ax-nul 5242  ax-pr 5368  ax-un 7663

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-ral 3046  df-rex 3055  df-rmo 3344  df-reu 3345  df-rab 3394  df-v 3436  df-sbc 3740  df-csb 3849  df-dif 3903  df-un 3905  df-in 3907  df-ss 3917  df-pss 3920  df-nul 4282  df-if 4474  df-pw 4550  df-sn 4575  df-pr 4577  df-op 4581  df-uni 4858  df-iun 4941  df-br 5090  df-opab 5152  df-mpt 5171  df-tr 5197  df-id 5509  df-eprel 5514  df-po 5522  df-so 5523  df-fr 5567  df-we 5569  df-xp 5620  df-rel 5621  df-cnv 5622  df-co 5623  df-dm 5624  df-rn 5625  df-res 5626  df-ima 5627  df-pred 6244  df-ord 6305  df-on 6306  df-lim 6307  df-suc 6308  df-iota 6433  df-fun 6479  df-fn 6480  df-f 6481  df-f1 6482  df-fo 6483  df-f1o 6484  df-fv 6485  df-ov 7344  df-oprab 7345  df-mpo 7346  df-om 7792  df-1st 7916  df-2nd 7917  df-frecs 8206  df-wrecs 8237  df-recs 8286  df-rdg 8324  df-1o 8380  df-oadd 8384  df-omul 8385  df-er 8617  df-ni 10755  df-pli 10756  df-mi 10757  df-lti 10758  df-plpq 10791  df-enq 10794  df-nq 10795  df-erq 10796  df-plq 10797  df-1nq 10799

This theorem is referenced by:  ltaddnq  10857  addasspr  10905  prlem934  10916  ltexprlem7  10925