Theorem addassnq 10645

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 10582	. . . . . . . 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 7288	. . . . . . . . . . 11 ⊢ ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ V
3		ovex 7288	. . . . . . . . . . 11 ⊢ ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ V
4		fvex 6769	. . . . . . . . . . 11 ⊢ (2nd ‘𝐶) ∈ V
5		mulcompi 10583	. . . . . . . . . . 11 ⊢ (𝑥 ·N 𝑦) = (𝑦 ·N 𝑥)
6		distrpi 10585	. . . . . . . . . . 11 ⊢ (𝑥 ·N (𝑦 +N 𝑧)) = ((𝑥 ·N 𝑦) +N (𝑥 ·N 𝑧))
7	2, 3, 4, 5, 6	caovdir 7484	. . . . . . . . . 10 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ·N (2nd ‘𝐶)) = ((((1st ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶)) +N (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)))
8		mulasspi 10584	. . . . . . . . . . 11 ⊢ (((1st ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶)) = ((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶)))
9	8	oveq1i 7265	. . . . . . . . . 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 2766	. . . . . . . . 9 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ·N (2nd ‘𝐶)) = (((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶))) +N (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)))
11	10	oveq1i 7265	. . . . . . . 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 7288	. . . . . . . . . . 11 ⊢ ((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ V
13		ovex 7288	. . . . . . . . . . 11 ⊢ ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ V
14		fvex 6769	. . . . . . . . . . 11 ⊢ (2nd ‘𝐴) ∈ V
15	12, 13, 14, 5, 6	caovdir 7484	. . . . . . . . . 10 ⊢ ((((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ·N (2nd ‘𝐴)) = ((((1st ‘𝐵) ·N (2nd ‘𝐶)) ·N (2nd ‘𝐴)) +N (((1st ‘𝐶) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐴)))
16		fvex 6769	. . . . . . . . . . . 12 ⊢ (1st ‘𝐵) ∈ V
17		mulasspi 10584	. . . . . . . . . . . 12 ⊢ ((𝑥 ·N 𝑦) ·N 𝑧) = (𝑥 ·N (𝑦 ·N 𝑧))
18	16, 4, 14, 5, 17	caov32 7477	. . . . . . . . . . 11 ⊢ (((1st ‘𝐵) ·N (2nd ‘𝐶)) ·N (2nd ‘𝐴)) = (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶))
19		mulasspi 10584	. . . . . . . . . . . 12 ⊢ (((1st ‘𝐶) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐴)) = ((1st ‘𝐶) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐴)))
20		mulcompi 10583	. . . . . . . . . . . . 13 ⊢ ((2nd ‘𝐵) ·N (2nd ‘𝐴)) = ((2nd ‘𝐴) ·N (2nd ‘𝐵))
21	20	oveq2i 7266	. . . . . . . . . . . 12 ⊢ ((1st ‘𝐶) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐴))) = ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))
22	19, 21	eqtri 2766	. . . . . . . . . . 11 ⊢ (((1st ‘𝐶) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐴)) = ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))
23	18, 22	oveq12i 7267	. . . . . . . . . 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 2766	. . . . . . . . 9 ⊢ ((((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ·N (2nd ‘𝐴)) = ((((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))))
25	24	oveq2i 7266	. . . . . . . 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 2776	. . . . . . 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 10584	. . . . . . 7 ⊢ (((2nd ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶)) = ((2nd ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶)))
28	26, 27	opeq12i 4806	. . . . . 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 10612	. . . . . . . . . 10 ⊢ (𝐴 ∈ Q → 𝐴 ∈ (N × N))
30	29	3ad2ant1 1131	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐴 ∈ (N × N))
31		elpqn 10612	. . . . . . . . . 10 ⊢ (𝐵 ∈ Q → 𝐵 ∈ (N × N))
32	31	3ad2ant2 1132	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐵 ∈ (N × N))
33		addpipq2 10623	. . . . . . . . 9 ⊢ ((𝐴 ∈ (N × N) ∧ 𝐵 ∈ (N × N)) → (𝐴 +pQ 𝐵) = ⟨(((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)
34	30, 32, 33	syl2anc 583	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +pQ 𝐵) = ⟨(((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)
35		relxp 5598	. . . . . . . . 9 ⊢ Rel (N × N)
36		elpqn 10612	. . . . . . . . . 10 ⊢ (𝐶 ∈ Q → 𝐶 ∈ (N × N))
37	36	3ad2ant3 1133	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐶 ∈ (N × N))
38		1st2nd 7853	. . . . . . . . 9 ⊢ ((Rel (N × N) ∧ 𝐶 ∈ (N × N)) → 𝐶 = ⟨(1st ‘𝐶), (2nd ‘𝐶)⟩)
39	35, 37, 38	sylancr 586	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐶 = ⟨(1st ‘𝐶), (2nd ‘𝐶)⟩)
40	34, 39	oveq12d 7273	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +pQ 𝐵) +pQ 𝐶) = (⟨(((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩ +pQ ⟨(1st ‘𝐶), (2nd ‘𝐶)⟩))
41		xp1st 7836	. . . . . . . . . . 11 ⊢ (𝐴 ∈ (N × N) → (1st ‘𝐴) ∈ N)
42	30, 41	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (1st ‘𝐴) ∈ N)
43		xp2nd 7837	. . . . . . . . . . 11 ⊢ (𝐵 ∈ (N × N) → (2nd ‘𝐵) ∈ N)
44	32, 43	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (2nd ‘𝐵) ∈ N)
45		mulclpi 10580	. . . . . . . . . 10 ⊢ (((1st ‘𝐴) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
46	42, 44, 45	syl2anc 583	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
47		xp1st 7836	. . . . . . . . . . 11 ⊢ (𝐵 ∈ (N × N) → (1st ‘𝐵) ∈ N)
48	32, 47	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (1st ‘𝐵) ∈ N)
49		xp2nd 7837	. . . . . . . . . . 11 ⊢ (𝐴 ∈ (N × N) → (2nd ‘𝐴) ∈ N)
50	30, 49	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (2nd ‘𝐴) ∈ N)
51		mulclpi 10580	. . . . . . . . . 10 ⊢ (((1st ‘𝐵) ∈ N ∧ (2nd ‘𝐴) ∈ N) → ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N)
52	48, 50, 51	syl2anc 583	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N)
53		addclpi 10579	. . . . . . . . 9 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N ∧ ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N) → (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ∈ N)
54	46, 52, 53	syl2anc 583	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ∈ N)
55		mulclpi 10580	. . . . . . . . 9 ⊢ (((2nd ‘𝐴) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
56	50, 44, 55	syl2anc 583	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
57		xp1st 7836	. . . . . . . . 9 ⊢ (𝐶 ∈ (N × N) → (1st ‘𝐶) ∈ N)
58	37, 57	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (1st ‘𝐶) ∈ N)
59		xp2nd 7837	. . . . . . . . 9 ⊢ (𝐶 ∈ (N × N) → (2nd ‘𝐶) ∈ N)
60	37, 59	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (2nd ‘𝐶) ∈ N)
61		addpipq 10624	. . . . . . . 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 835	. . . . . . 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 2778	. . . . . 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 7853	. . . . . . . . 9 ⊢ ((Rel (N × N) ∧ 𝐴 ∈ (N × N)) → 𝐴 = ⟨(1st ‘𝐴), (2nd ‘𝐴)⟩)
65	35, 30, 64	sylancr 586	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐴 = ⟨(1st ‘𝐴), (2nd ‘𝐴)⟩)
66		addpipq2 10623	. . . . . . . . 9 ⊢ ((𝐵 ∈ (N × N) ∧ 𝐶 ∈ (N × N)) → (𝐵 +pQ 𝐶) = ⟨(((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))), ((2nd ‘𝐵) ·N (2nd ‘𝐶))⟩)
67	32, 37, 66	syl2anc 583	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐵 +pQ 𝐶) = ⟨(((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))), ((2nd ‘𝐵) ·N (2nd ‘𝐶))⟩)
68	65, 67	oveq12d 7273	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +pQ (𝐵 +pQ 𝐶)) = (⟨(1st ‘𝐴), (2nd ‘𝐴)⟩ +pQ ⟨(((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))), ((2nd ‘𝐵) ·N (2nd ‘𝐶))⟩))
69		mulclpi 10580	. . . . . . . . . 10 ⊢ (((1st ‘𝐵) ∈ N ∧ (2nd ‘𝐶) ∈ N) → ((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
70	48, 60, 69	syl2anc 583	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
71		mulclpi 10580	. . . . . . . . . 10 ⊢ (((1st ‘𝐶) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ N)
72	58, 44, 71	syl2anc 583	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ N)
73		addclpi 10579	. . . . . . . . 9 ⊢ ((((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ N ∧ ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ N) → (((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ∈ N)
74	70, 72, 73	syl2anc 583	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ∈ N)
75		mulclpi 10580	. . . . . . . . 9 ⊢ (((2nd ‘𝐵) ∈ N ∧ (2nd ‘𝐶) ∈ N) → ((2nd ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
76	44, 60, 75	syl2anc 583	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((2nd ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
77		addpipq 10624	. . . . . . . 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 835	. . . . . . 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 2778	. . . . . 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 2805	. . . . 5 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +pQ 𝐵) +pQ 𝐶) = (𝐴 +pQ (𝐵 +pQ 𝐶)))
81	80	fveq2d 6760	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ([Q]‘((𝐴 +pQ 𝐵) +pQ 𝐶)) = ([Q]‘(𝐴 +pQ (𝐵 +pQ 𝐶))))
82		adderpq 10643	. . . 4 ⊢ (([Q]‘(𝐴 +pQ 𝐵)) +Q ([Q]‘𝐶)) = ([Q]‘((𝐴 +pQ 𝐵) +pQ 𝐶))
83		adderpq 10643	. . . 4 ⊢ (([Q]‘𝐴) +Q ([Q]‘(𝐵 +pQ 𝐶))) = ([Q]‘(𝐴 +pQ (𝐵 +pQ 𝐶)))
84	81, 82, 83	3eqtr4g 2804	. . 3 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (([Q]‘(𝐴 +pQ 𝐵)) +Q ([Q]‘𝐶)) = (([Q]‘𝐴) +Q ([Q]‘(𝐵 +pQ 𝐶))))
85		addpqnq 10625	. . . . 5 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (𝐴 +Q 𝐵) = ([Q]‘(𝐴 +pQ 𝐵)))
86	85	3adant3 1130	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +Q 𝐵) = ([Q]‘(𝐴 +pQ 𝐵)))
87		nqerid 10620	. . . . . 6 ⊢ (𝐶 ∈ Q → ([Q]‘𝐶) = 𝐶)
88	87	eqcomd 2744	. . . . 5 ⊢ (𝐶 ∈ Q → 𝐶 = ([Q]‘𝐶))
89	88	3ad2ant3 1133	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐶 = ([Q]‘𝐶))
90	86, 89	oveq12d 7273	. . 3 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +Q 𝐵) +Q 𝐶) = (([Q]‘(𝐴 +pQ 𝐵)) +Q ([Q]‘𝐶)))
91		nqerid 10620	. . . . . 6 ⊢ (𝐴 ∈ Q → ([Q]‘𝐴) = 𝐴)
92	91	eqcomd 2744	. . . . 5 ⊢ (𝐴 ∈ Q → 𝐴 = ([Q]‘𝐴))
93	92	3ad2ant1 1131	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐴 = ([Q]‘𝐴))
94		addpqnq 10625	. . . . 5 ⊢ ((𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐵 +Q 𝐶) = ([Q]‘(𝐵 +pQ 𝐶)))
95	94	3adant1 1128	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐵 +Q 𝐶) = ([Q]‘(𝐵 +pQ 𝐶)))
96	93, 95	oveq12d 7273	. . 3 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +Q (𝐵 +Q 𝐶)) = (([Q]‘𝐴) +Q ([Q]‘(𝐵 +pQ 𝐶))))
97	84, 90, 96	3eqtr4d 2788	. 2 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶)))
98		addnqf 10635	. . . 4 ⊢ +Q :(Q × Q)⟶Q
99	98	fdmi 6596	. . 3 ⊢ dom +Q = (Q × Q)
100		0nnq 10611	. . 3 ⊢ ¬ ∅ ∈ Q
101	99, 100	ndmovass 7438	. 2 ⊢ (¬ (𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶)))
102	97, 101	pm2.61i 182	1 ⊢ ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶))

Syntax hints:   ∧ w3a 1085   = wceq 1539   ∈ wcel 2108  ⟨cop 4564   × cxp 5578  Rel wrel 5585  ‘cfv 6418  (class class class)co 7255  1^st c1st 7802  2^nd c2nd 7803  Ncnpi 10531   +_N cpli 10532   ·_N cmi 10533   +_pQ cplpq 10535  Qcnq 10539  [Q]cerq 10541   +_Q cplq 10542

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-sep 5218  ax-nul 5225  ax-pr 5347  ax-un 7566

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-ral 3068  df-rex 3069  df-reu 3070  df-rmo 3071  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-iun 4923  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-pred 6191  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-ov 7258  df-oprab 7259  df-mpo 7260  df-om 7688  df-1st 7804  df-2nd 7805  df-frecs 8068  df-wrecs 8099  df-recs 8173  df-rdg 8212  df-1o 8267  df-oadd 8271  df-omul 8272  df-er 8456  df-ni 10559  df-pli 10560  df-mi 10561  df-lti 10562  df-plpq 10595  df-enq 10598  df-nq 10599  df-erq 10600  df-plq 10601  df-1nq 10603

This theorem is referenced by:  ltaddnq  10661  addasspr  10709  prlem934  10720  ltexprlem7  10729