Theorem addassnq 10382

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 10319	. . . . . . . 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 7191	. . . . . . . . . . 11 ⊢ ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ V
3		ovex 7191	. . . . . . . . . . 11 ⊢ ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ V
4		fvex 6685	. . . . . . . . . . 11 ⊢ (2nd ‘𝐶) ∈ V
5		mulcompi 10320	. . . . . . . . . . 11 ⊢ (𝑥 ·N 𝑦) = (𝑦 ·N 𝑥)
6		distrpi 10322	. . . . . . . . . . 11 ⊢ (𝑥 ·N (𝑦 +N 𝑧)) = ((𝑥 ·N 𝑦) +N (𝑥 ·N 𝑧))
7	2, 3, 4, 5, 6	caovdir 7384	. . . . . . . . . 10 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ·N (2nd ‘𝐶)) = ((((1st ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶)) +N (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)))
8		mulasspi 10321	. . . . . . . . . . 11 ⊢ (((1st ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶)) = ((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶)))
9	8	oveq1i 7168	. . . . . . . . . 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 2846	. . . . . . . . 9 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ·N (2nd ‘𝐶)) = (((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶))) +N (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)))
11	10	oveq1i 7168	. . . . . . . 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 7191	. . . . . . . . . . 11 ⊢ ((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ V
13		ovex 7191	. . . . . . . . . . 11 ⊢ ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ V
14		fvex 6685	. . . . . . . . . . 11 ⊢ (2nd ‘𝐴) ∈ V
15	12, 13, 14, 5, 6	caovdir 7384	. . . . . . . . . 10 ⊢ ((((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ·N (2nd ‘𝐴)) = ((((1st ‘𝐵) ·N (2nd ‘𝐶)) ·N (2nd ‘𝐴)) +N (((1st ‘𝐶) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐴)))
16		fvex 6685	. . . . . . . . . . . 12 ⊢ (1st ‘𝐵) ∈ V
17		mulasspi 10321	. . . . . . . . . . . 12 ⊢ ((𝑥 ·N 𝑦) ·N 𝑧) = (𝑥 ·N (𝑦 ·N 𝑧))
18	16, 4, 14, 5, 17	caov32 7377	. . . . . . . . . . 11 ⊢ (((1st ‘𝐵) ·N (2nd ‘𝐶)) ·N (2nd ‘𝐴)) = (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶))
19		mulasspi 10321	. . . . . . . . . . . 12 ⊢ (((1st ‘𝐶) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐴)) = ((1st ‘𝐶) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐴)))
20		mulcompi 10320	. . . . . . . . . . . . 13 ⊢ ((2nd ‘𝐵) ·N (2nd ‘𝐴)) = ((2nd ‘𝐴) ·N (2nd ‘𝐵))
21	20	oveq2i 7169	. . . . . . . . . . . 12 ⊢ ((1st ‘𝐶) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐴))) = ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))
22	19, 21	eqtri 2846	. . . . . . . . . . 11 ⊢ (((1st ‘𝐶) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐴)) = ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))
23	18, 22	oveq12i 7170	. . . . . . . . . 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 2846	. . . . . . . . 9 ⊢ ((((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ·N (2nd ‘𝐴)) = ((((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))))
25	24	oveq2i 7169	. . . . . . . 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 2856	. . . . . . 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 10321	. . . . . . 7 ⊢ (((2nd ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶)) = ((2nd ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶)))
28	26, 27	opeq12i 4810	. . . . . 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 10349	. . . . . . . . . 10 ⊢ (𝐴 ∈ Q → 𝐴 ∈ (N × N))
30	29	3ad2ant1 1129	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐴 ∈ (N × N))
31		elpqn 10349	. . . . . . . . . 10 ⊢ (𝐵 ∈ Q → 𝐵 ∈ (N × N))
32	31	3ad2ant2 1130	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐵 ∈ (N × N))
33		addpipq2 10360	. . . . . . . . 9 ⊢ ((𝐴 ∈ (N × N) ∧ 𝐵 ∈ (N × N)) → (𝐴 +pQ 𝐵) = ⟨(((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)
34	30, 32, 33	syl2anc 586	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +pQ 𝐵) = ⟨(((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)
35		relxp 5575	. . . . . . . . 9 ⊢ Rel (N × N)
36		elpqn 10349	. . . . . . . . . 10 ⊢ (𝐶 ∈ Q → 𝐶 ∈ (N × N))
37	36	3ad2ant3 1131	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐶 ∈ (N × N))
38		1st2nd 7740	. . . . . . . . 9 ⊢ ((Rel (N × N) ∧ 𝐶 ∈ (N × N)) → 𝐶 = ⟨(1st ‘𝐶), (2nd ‘𝐶)⟩)
39	35, 37, 38	sylancr 589	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐶 = ⟨(1st ‘𝐶), (2nd ‘𝐶)⟩)
40	34, 39	oveq12d 7176	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +pQ 𝐵) +pQ 𝐶) = (⟨(((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩ +pQ ⟨(1st ‘𝐶), (2nd ‘𝐶)⟩))
41		xp1st 7723	. . . . . . . . . . 11 ⊢ (𝐴 ∈ (N × N) → (1st ‘𝐴) ∈ N)
42	30, 41	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (1st ‘𝐴) ∈ N)
43		xp2nd 7724	. . . . . . . . . . 11 ⊢ (𝐵 ∈ (N × N) → (2nd ‘𝐵) ∈ N)
44	32, 43	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (2nd ‘𝐵) ∈ N)
45		mulclpi 10317	. . . . . . . . . 10 ⊢ (((1st ‘𝐴) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
46	42, 44, 45	syl2anc 586	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
47		xp1st 7723	. . . . . . . . . . 11 ⊢ (𝐵 ∈ (N × N) → (1st ‘𝐵) ∈ N)
48	32, 47	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (1st ‘𝐵) ∈ N)
49		xp2nd 7724	. . . . . . . . . . 11 ⊢ (𝐴 ∈ (N × N) → (2nd ‘𝐴) ∈ N)
50	30, 49	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (2nd ‘𝐴) ∈ N)
51		mulclpi 10317	. . . . . . . . . 10 ⊢ (((1st ‘𝐵) ∈ N ∧ (2nd ‘𝐴) ∈ N) → ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N)
52	48, 50, 51	syl2anc 586	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N)
53		addclpi 10316	. . . . . . . . 9 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N ∧ ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N) → (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ∈ N)
54	46, 52, 53	syl2anc 586	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ∈ N)
55		mulclpi 10317	. . . . . . . . 9 ⊢ (((2nd ‘𝐴) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
56	50, 44, 55	syl2anc 586	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
57		xp1st 7723	. . . . . . . . 9 ⊢ (𝐶 ∈ (N × N) → (1st ‘𝐶) ∈ N)
58	37, 57	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (1st ‘𝐶) ∈ N)
59		xp2nd 7724	. . . . . . . . 9 ⊢ (𝐶 ∈ (N × N) → (2nd ‘𝐶) ∈ N)
60	37, 59	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (2nd ‘𝐶) ∈ N)
61		addpipq 10361	. . . . . . . 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 836	. . . . . . 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 2858	. . . . . 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 7740	. . . . . . . . 9 ⊢ ((Rel (N × N) ∧ 𝐴 ∈ (N × N)) → 𝐴 = ⟨(1st ‘𝐴), (2nd ‘𝐴)⟩)
65	35, 30, 64	sylancr 589	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐴 = ⟨(1st ‘𝐴), (2nd ‘𝐴)⟩)
66		addpipq2 10360	. . . . . . . . 9 ⊢ ((𝐵 ∈ (N × N) ∧ 𝐶 ∈ (N × N)) → (𝐵 +pQ 𝐶) = ⟨(((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))), ((2nd ‘𝐵) ·N (2nd ‘𝐶))⟩)
67	32, 37, 66	syl2anc 586	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐵 +pQ 𝐶) = ⟨(((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))), ((2nd ‘𝐵) ·N (2nd ‘𝐶))⟩)
68	65, 67	oveq12d 7176	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +pQ (𝐵 +pQ 𝐶)) = (⟨(1st ‘𝐴), (2nd ‘𝐴)⟩ +pQ ⟨(((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))), ((2nd ‘𝐵) ·N (2nd ‘𝐶))⟩))
69		mulclpi 10317	. . . . . . . . . 10 ⊢ (((1st ‘𝐵) ∈ N ∧ (2nd ‘𝐶) ∈ N) → ((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
70	48, 60, 69	syl2anc 586	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
71		mulclpi 10317	. . . . . . . . . 10 ⊢ (((1st ‘𝐶) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ N)
72	58, 44, 71	syl2anc 586	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ N)
73		addclpi 10316	. . . . . . . . 9 ⊢ ((((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ N ∧ ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ N) → (((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ∈ N)
74	70, 72, 73	syl2anc 586	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ∈ N)
75		mulclpi 10317	. . . . . . . . 9 ⊢ (((2nd ‘𝐵) ∈ N ∧ (2nd ‘𝐶) ∈ N) → ((2nd ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
76	44, 60, 75	syl2anc 586	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((2nd ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
77		addpipq 10361	. . . . . . . 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 836	. . . . . . 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 2858	. . . . . 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 2884	. . . . 5 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +pQ 𝐵) +pQ 𝐶) = (𝐴 +pQ (𝐵 +pQ 𝐶)))
81	80	fveq2d 6676	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ([Q]‘((𝐴 +pQ 𝐵) +pQ 𝐶)) = ([Q]‘(𝐴 +pQ (𝐵 +pQ 𝐶))))
82		adderpq 10380	. . . 4 ⊢ (([Q]‘(𝐴 +pQ 𝐵)) +Q ([Q]‘𝐶)) = ([Q]‘((𝐴 +pQ 𝐵) +pQ 𝐶))
83		adderpq 10380	. . . 4 ⊢ (([Q]‘𝐴) +Q ([Q]‘(𝐵 +pQ 𝐶))) = ([Q]‘(𝐴 +pQ (𝐵 +pQ 𝐶)))
84	81, 82, 83	3eqtr4g 2883	. . 3 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (([Q]‘(𝐴 +pQ 𝐵)) +Q ([Q]‘𝐶)) = (([Q]‘𝐴) +Q ([Q]‘(𝐵 +pQ 𝐶))))
85		addpqnq 10362	. . . . 5 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (𝐴 +Q 𝐵) = ([Q]‘(𝐴 +pQ 𝐵)))
86	85	3adant3 1128	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +Q 𝐵) = ([Q]‘(𝐴 +pQ 𝐵)))
87		nqerid 10357	. . . . . 6 ⊢ (𝐶 ∈ Q → ([Q]‘𝐶) = 𝐶)
88	87	eqcomd 2829	. . . . 5 ⊢ (𝐶 ∈ Q → 𝐶 = ([Q]‘𝐶))
89	88	3ad2ant3 1131	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐶 = ([Q]‘𝐶))
90	86, 89	oveq12d 7176	. . 3 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +Q 𝐵) +Q 𝐶) = (([Q]‘(𝐴 +pQ 𝐵)) +Q ([Q]‘𝐶)))
91		nqerid 10357	. . . . . 6 ⊢ (𝐴 ∈ Q → ([Q]‘𝐴) = 𝐴)
92	91	eqcomd 2829	. . . . 5 ⊢ (𝐴 ∈ Q → 𝐴 = ([Q]‘𝐴))
93	92	3ad2ant1 1129	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐴 = ([Q]‘𝐴))
94		addpqnq 10362	. . . . 5 ⊢ ((𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐵 +Q 𝐶) = ([Q]‘(𝐵 +pQ 𝐶)))
95	94	3adant1 1126	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐵 +Q 𝐶) = ([Q]‘(𝐵 +pQ 𝐶)))
96	93, 95	oveq12d 7176	. . 3 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +Q (𝐵 +Q 𝐶)) = (([Q]‘𝐴) +Q ([Q]‘(𝐵 +pQ 𝐶))))
97	84, 90, 96	3eqtr4d 2868	. 2 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶)))
98		addnqf 10372	. . . 4 ⊢ +Q :(Q × Q)⟶Q
99	98	fdmi 6526	. . 3 ⊢ dom +Q = (Q × Q)
100		0nnq 10348	. . 3 ⊢ ¬ ∅ ∈ Q
101	99, 100	ndmovass 7338	. 2 ⊢ (¬ (𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶)))
102	97, 101	pm2.61i 184	1 ⊢ ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶))

Syntax hints:   ∧ w3a 1083   = wceq 1537   ∈ wcel 2114  ⟨cop 4575   × cxp 5555  Rel wrel 5562  ‘cfv 6357  (class class class)co 7158  1^st c1st 7689  2^nd c2nd 7690  Ncnpi 10268   +_N cpli 10269   ·_N cmi 10270   +_pQ cplpq 10272  Qcnq 10276  [Q]cerq 10278   +_Q cplq 10279

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 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2795  ax-sep 5205  ax-nul 5212  ax-pow 5268  ax-pr 5332  ax-un 7463

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2802  df-cleq 2816  df-clel 2895  df-nfc 2965  df-ne 3019  df-ral 3145  df-rex 3146  df-reu 3147  df-rmo 3148  df-rab 3149  df-v 3498  df-sbc 3775  df-csb 3886  df-dif 3941  df-un 3943  df-in 3945  df-ss 3954  df-pss 3956  df-nul 4294  df-if 4470  df-pw 4543  df-sn 4570  df-pr 4572  df-tp 4574  df-op 4576  df-uni 4841  df-iun 4923  df-br 5069  df-opab 5131  df-mpt 5149  df-tr 5175  df-id 5462  df-eprel 5467  df-po 5476  df-so 5477  df-fr 5516  df-we 5518  df-xp 5563  df-rel 5564  df-cnv 5565  df-co 5566  df-dm 5567  df-rn 5568  df-res 5569  df-ima 5570  df-pred 6150  df-ord 6196  df-on 6197  df-lim 6198  df-suc 6199  df-iota 6316  df-fun 6359  df-fn 6360  df-f 6361  df-f1 6362  df-fo 6363  df-f1o 6364  df-fv 6365  df-ov 7161  df-oprab 7162  df-mpo 7163  df-om 7583  df-1st 7691  df-2nd 7692  df-wrecs 7949  df-recs 8010  df-rdg 8048  df-1o 8104  df-oadd 8108  df-omul 8109  df-er 8291  df-ni 10296  df-pli 10297  df-mi 10298  df-lti 10299  df-plpq 10332  df-enq 10335  df-nq 10336  df-erq 10337  df-plq 10338  df-1nq 10340

This theorem is referenced by:  ltaddnq  10398  addasspr  10446  prlem934  10457  ltexprlem7  10466