Theorem addassnq 10987

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 10924	. . . . . . . 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 7457	. . . . . . . . . . 11 ⊢ ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ V
3		ovex 7457	. . . . . . . . . . 11 ⊢ ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ V
4		fvex 6913	. . . . . . . . . . 11 ⊢ (2nd ‘𝐶) ∈ V
5		mulcompi 10925	. . . . . . . . . . 11 ⊢ (𝑥 ·N 𝑦) = (𝑦 ·N 𝑥)
6		distrpi 10927	. . . . . . . . . . 11 ⊢ (𝑥 ·N (𝑦 +N 𝑧)) = ((𝑥 ·N 𝑦) +N (𝑥 ·N 𝑧))
7	2, 3, 4, 5, 6	caovdir 7659	. . . . . . . . . 10 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ·N (2nd ‘𝐶)) = ((((1st ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶)) +N (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)))
8		mulasspi 10926	. . . . . . . . . . 11 ⊢ (((1st ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶)) = ((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶)))
9	8	oveq1i 7434	. . . . . . . . . 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 2755	. . . . . . . . 9 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ·N (2nd ‘𝐶)) = (((1st ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶))) +N (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)))
11	10	oveq1i 7434	. . . . . . . 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 7457	. . . . . . . . . . 11 ⊢ ((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ V
13		ovex 7457	. . . . . . . . . . 11 ⊢ ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ V
14		fvex 6913	. . . . . . . . . . 11 ⊢ (2nd ‘𝐴) ∈ V
15	12, 13, 14, 5, 6	caovdir 7659	. . . . . . . . . 10 ⊢ ((((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ·N (2nd ‘𝐴)) = ((((1st ‘𝐵) ·N (2nd ‘𝐶)) ·N (2nd ‘𝐴)) +N (((1st ‘𝐶) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐴)))
16		fvex 6913	. . . . . . . . . . . 12 ⊢ (1st ‘𝐵) ∈ V
17		mulasspi 10926	. . . . . . . . . . . 12 ⊢ ((𝑥 ·N 𝑦) ·N 𝑧) = (𝑥 ·N (𝑦 ·N 𝑧))
18	16, 4, 14, 5, 17	caov32 7652	. . . . . . . . . . 11 ⊢ (((1st ‘𝐵) ·N (2nd ‘𝐶)) ·N (2nd ‘𝐴)) = (((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶))
19		mulasspi 10926	. . . . . . . . . . . 12 ⊢ (((1st ‘𝐶) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐴)) = ((1st ‘𝐶) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐴)))
20		mulcompi 10925	. . . . . . . . . . . . 13 ⊢ ((2nd ‘𝐵) ·N (2nd ‘𝐴)) = ((2nd ‘𝐴) ·N (2nd ‘𝐵))
21	20	oveq2i 7435	. . . . . . . . . . . 12 ⊢ ((1st ‘𝐶) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐴))) = ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))
22	19, 21	eqtri 2755	. . . . . . . . . . 11 ⊢ (((1st ‘𝐶) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐴)) = ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵)))
23	18, 22	oveq12i 7436	. . . . . . . . . 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 2755	. . . . . . . . 9 ⊢ ((((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ·N (2nd ‘𝐴)) = ((((1st ‘𝐵) ·N (2nd ‘𝐴)) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N ((2nd ‘𝐴) ·N (2nd ‘𝐵))))
25	24	oveq2i 7435	. . . . . . . 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 2765	. . . . . . 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 10926	. . . . . . 7 ⊢ (((2nd ‘𝐴) ·N (2nd ‘𝐵)) ·N (2nd ‘𝐶)) = ((2nd ‘𝐴) ·N ((2nd ‘𝐵) ·N (2nd ‘𝐶)))
28	26, 27	opeq12i 4881	. . . . . 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 10954	. . . . . . . . . 10 ⊢ (𝐴 ∈ Q → 𝐴 ∈ (N × N))
30	29	3ad2ant1 1130	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐴 ∈ (N × N))
31		elpqn 10954	. . . . . . . . . 10 ⊢ (𝐵 ∈ Q → 𝐵 ∈ (N × N))
32	31	3ad2ant2 1131	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐵 ∈ (N × N))
33		addpipq2 10965	. . . . . . . . 9 ⊢ ((𝐴 ∈ (N × N) ∧ 𝐵 ∈ (N × N)) → (𝐴 +pQ 𝐵) = ⟨(((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)
34	30, 32, 33	syl2anc 582	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +pQ 𝐵) = ⟨(((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩)
35		relxp 5698	. . . . . . . . 9 ⊢ Rel (N × N)
36		elpqn 10954	. . . . . . . . . 10 ⊢ (𝐶 ∈ Q → 𝐶 ∈ (N × N))
37	36	3ad2ant3 1132	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐶 ∈ (N × N))
38		1st2nd 8047	. . . . . . . . 9 ⊢ ((Rel (N × N) ∧ 𝐶 ∈ (N × N)) → 𝐶 = ⟨(1st ‘𝐶), (2nd ‘𝐶)⟩)
39	35, 37, 38	sylancr 585	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐶 = ⟨(1st ‘𝐶), (2nd ‘𝐶)⟩)
40	34, 39	oveq12d 7442	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +pQ 𝐵) +pQ 𝐶) = (⟨(((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))), ((2nd ‘𝐴) ·N (2nd ‘𝐵))⟩ +pQ ⟨(1st ‘𝐶), (2nd ‘𝐶)⟩))
41		xp1st 8029	. . . . . . . . . . 11 ⊢ (𝐴 ∈ (N × N) → (1st ‘𝐴) ∈ N)
42	30, 41	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (1st ‘𝐴) ∈ N)
43		xp2nd 8030	. . . . . . . . . . 11 ⊢ (𝐵 ∈ (N × N) → (2nd ‘𝐵) ∈ N)
44	32, 43	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (2nd ‘𝐵) ∈ N)
45		mulclpi 10922	. . . . . . . . . 10 ⊢ (((1st ‘𝐴) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
46	42, 44, 45	syl2anc 582	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
47		xp1st 8029	. . . . . . . . . . 11 ⊢ (𝐵 ∈ (N × N) → (1st ‘𝐵) ∈ N)
48	32, 47	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (1st ‘𝐵) ∈ N)
49		xp2nd 8030	. . . . . . . . . . 11 ⊢ (𝐴 ∈ (N × N) → (2nd ‘𝐴) ∈ N)
50	30, 49	syl 17	. . . . . . . . . 10 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (2nd ‘𝐴) ∈ N)
51		mulclpi 10922	. . . . . . . . . 10 ⊢ (((1st ‘𝐵) ∈ N ∧ (2nd ‘𝐴) ∈ N) → ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N)
52	48, 50, 51	syl2anc 582	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N)
53		addclpi 10921	. . . . . . . . 9 ⊢ ((((1st ‘𝐴) ·N (2nd ‘𝐵)) ∈ N ∧ ((1st ‘𝐵) ·N (2nd ‘𝐴)) ∈ N) → (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ∈ N)
54	46, 52, 53	syl2anc 582	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (((1st ‘𝐴) ·N (2nd ‘𝐵)) +N ((1st ‘𝐵) ·N (2nd ‘𝐴))) ∈ N)
55		mulclpi 10922	. . . . . . . . 9 ⊢ (((2nd ‘𝐴) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
56	50, 44, 55	syl2anc 582	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((2nd ‘𝐴) ·N (2nd ‘𝐵)) ∈ N)
57		xp1st 8029	. . . . . . . . 9 ⊢ (𝐶 ∈ (N × N) → (1st ‘𝐶) ∈ N)
58	37, 57	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (1st ‘𝐶) ∈ N)
59		xp2nd 8030	. . . . . . . . 9 ⊢ (𝐶 ∈ (N × N) → (2nd ‘𝐶) ∈ N)
60	37, 59	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (2nd ‘𝐶) ∈ N)
61		addpipq 10966	. . . . . . . 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 837	. . . . . . 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 2767	. . . . . 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 8047	. . . . . . . . 9 ⊢ ((Rel (N × N) ∧ 𝐴 ∈ (N × N)) → 𝐴 = ⟨(1st ‘𝐴), (2nd ‘𝐴)⟩)
65	35, 30, 64	sylancr 585	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐴 = ⟨(1st ‘𝐴), (2nd ‘𝐴)⟩)
66		addpipq2 10965	. . . . . . . . 9 ⊢ ((𝐵 ∈ (N × N) ∧ 𝐶 ∈ (N × N)) → (𝐵 +pQ 𝐶) = ⟨(((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))), ((2nd ‘𝐵) ·N (2nd ‘𝐶))⟩)
67	32, 37, 66	syl2anc 582	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐵 +pQ 𝐶) = ⟨(((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))), ((2nd ‘𝐵) ·N (2nd ‘𝐶))⟩)
68	65, 67	oveq12d 7442	. . . . . . 7 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +pQ (𝐵 +pQ 𝐶)) = (⟨(1st ‘𝐴), (2nd ‘𝐴)⟩ +pQ ⟨(((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))), ((2nd ‘𝐵) ·N (2nd ‘𝐶))⟩))
69		mulclpi 10922	. . . . . . . . . 10 ⊢ (((1st ‘𝐵) ∈ N ∧ (2nd ‘𝐶) ∈ N) → ((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
70	48, 60, 69	syl2anc 582	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
71		mulclpi 10922	. . . . . . . . . 10 ⊢ (((1st ‘𝐶) ∈ N ∧ (2nd ‘𝐵) ∈ N) → ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ N)
72	58, 44, 71	syl2anc 582	. . . . . . . . 9 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ N)
73		addclpi 10921	. . . . . . . . 9 ⊢ ((((1st ‘𝐵) ·N (2nd ‘𝐶)) ∈ N ∧ ((1st ‘𝐶) ·N (2nd ‘𝐵)) ∈ N) → (((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ∈ N)
74	70, 72, 73	syl2anc 582	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (((1st ‘𝐵) ·N (2nd ‘𝐶)) +N ((1st ‘𝐶) ·N (2nd ‘𝐵))) ∈ N)
75		mulclpi 10922	. . . . . . . . 9 ⊢ (((2nd ‘𝐵) ∈ N ∧ (2nd ‘𝐶) ∈ N) → ((2nd ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
76	44, 60, 75	syl2anc 582	. . . . . . . 8 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((2nd ‘𝐵) ·N (2nd ‘𝐶)) ∈ N)
77		addpipq 10966	. . . . . . . 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 837	. . . . . . 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 2767	. . . . . 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 2793	. . . . 5 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +pQ 𝐵) +pQ 𝐶) = (𝐴 +pQ (𝐵 +pQ 𝐶)))
81	80	fveq2d 6904	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ([Q]‘((𝐴 +pQ 𝐵) +pQ 𝐶)) = ([Q]‘(𝐴 +pQ (𝐵 +pQ 𝐶))))
82		adderpq 10985	. . . 4 ⊢ (([Q]‘(𝐴 +pQ 𝐵)) +Q ([Q]‘𝐶)) = ([Q]‘((𝐴 +pQ 𝐵) +pQ 𝐶))
83		adderpq 10985	. . . 4 ⊢ (([Q]‘𝐴) +Q ([Q]‘(𝐵 +pQ 𝐶))) = ([Q]‘(𝐴 +pQ (𝐵 +pQ 𝐶)))
84	81, 82, 83	3eqtr4g 2792	. . 3 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (([Q]‘(𝐴 +pQ 𝐵)) +Q ([Q]‘𝐶)) = (([Q]‘𝐴) +Q ([Q]‘(𝐵 +pQ 𝐶))))
85		addpqnq 10967	. . . . 5 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (𝐴 +Q 𝐵) = ([Q]‘(𝐴 +pQ 𝐵)))
86	85	3adant3 1129	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +Q 𝐵) = ([Q]‘(𝐴 +pQ 𝐵)))
87		nqerid 10962	. . . . . 6 ⊢ (𝐶 ∈ Q → ([Q]‘𝐶) = 𝐶)
88	87	eqcomd 2733	. . . . 5 ⊢ (𝐶 ∈ Q → 𝐶 = ([Q]‘𝐶))
89	88	3ad2ant3 1132	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐶 = ([Q]‘𝐶))
90	86, 89	oveq12d 7442	. . 3 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +Q 𝐵) +Q 𝐶) = (([Q]‘(𝐴 +pQ 𝐵)) +Q ([Q]‘𝐶)))
91		nqerid 10962	. . . . . 6 ⊢ (𝐴 ∈ Q → ([Q]‘𝐴) = 𝐴)
92	91	eqcomd 2733	. . . . 5 ⊢ (𝐴 ∈ Q → 𝐴 = ([Q]‘𝐴))
93	92	3ad2ant1 1130	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → 𝐴 = ([Q]‘𝐴))
94		addpqnq 10967	. . . . 5 ⊢ ((𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐵 +Q 𝐶) = ([Q]‘(𝐵 +pQ 𝐶)))
95	94	3adant1 1127	. . . 4 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐵 +Q 𝐶) = ([Q]‘(𝐵 +pQ 𝐶)))
96	93, 95	oveq12d 7442	. . 3 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → (𝐴 +Q (𝐵 +Q 𝐶)) = (([Q]‘𝐴) +Q ([Q]‘(𝐵 +pQ 𝐶))))
97	84, 90, 96	3eqtr4d 2777	. 2 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶)))
98		addnqf 10977	. . . 4 ⊢ +Q :(Q × Q)⟶Q
99	98	fdmi 6737	. . 3 ⊢ dom +Q = (Q × Q)
100		0nnq 10953	. . 3 ⊢ ¬ ∅ ∈ Q
101	99, 100	ndmovass 7613	. 2 ⊢ (¬ (𝐴 ∈ Q ∧ 𝐵 ∈ Q ∧ 𝐶 ∈ Q) → ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶)))
102	97, 101	pm2.61i 182	1 ⊢ ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶))

Syntax hints:   ∧ w3a 1084   = wceq 1533   ∈ wcel 2098  ⟨cop 4636   × cxp 5678  Rel wrel 5685  ‘cfv 6551  (class class class)co 7424  1^st c1st 7995  2^nd c2nd 7996  Ncnpi 10873   +_N cpli 10874   ·_N cmi 10875   +_pQ cplpq 10877  Qcnq 10881  [Q]cerq 10883   +_Q cplq 10884

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2166  ax-ext 2698  ax-sep 5301  ax-nul 5308  ax-pr 5431  ax-un 7744

This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2529  df-eu 2558  df-clab 2705  df-cleq 2719  df-clel 2805  df-nfc 2880  df-ne 2937  df-ral 3058  df-rex 3067  df-rmo 3372  df-reu 3373  df-rab 3429  df-v 3473  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4325  df-if 4531  df-pw 4606  df-sn 4631  df-pr 4633  df-op 4637  df-uni 4911  df-iun 5000  df-br 5151  df-opab 5213  df-mpt 5234  df-tr 5268  df-id 5578  df-eprel 5584  df-po 5592  df-so 5593  df-fr 5635  df-we 5637  df-xp 5686  df-rel 5687  df-cnv 5688  df-co 5689  df-dm 5690  df-rn 5691  df-res 5692  df-ima 5693  df-pred 6308  df-ord 6375  df-on 6376  df-lim 6377  df-suc 6378  df-iota 6503  df-fun 6553  df-fn 6554  df-f 6555  df-f1 6556  df-fo 6557  df-f1o 6558  df-fv 6559  df-ov 7427  df-oprab 7428  df-mpo 7429  df-om 7875  df-1st 7997  df-2nd 7998  df-frecs 8291  df-wrecs 8322  df-recs 8396  df-rdg 8435  df-1o 8491  df-oadd 8495  df-omul 8496  df-er 8729  df-ni 10901  df-pli 10902  df-mi 10903  df-lti 10904  df-plpq 10937  df-enq 10940  df-nq 10941  df-erq 10942  df-plq 10943  df-1nq 10945

This theorem is referenced by:  ltaddnq  11003  addasspr  11051  prlem934  11062  ltexprlem7  11071