ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  addassnqg GIF version

Theorem addassnqg 7696
Description: Addition of positive fractions is associative. (Contributed by Jim Kingdon, 16-Sep-2019.)
Assertion
Ref Expression
addassnqg ((𝐴Q𝐵Q𝐶Q) → ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶)))

Proof of Theorem addassnqg
Dummy variables 𝑥 𝑦 𝑧 𝑤 𝑣 𝑢 𝑓 𝑔 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 df-nqqs 7662 . 2 Q = ((N × N) / ~Q )
2 addpipqqs 7684 . 2 (((𝑥N𝑦N) ∧ (𝑧N𝑤N)) → ([⟨𝑥, 𝑦⟩] ~Q +Q [⟨𝑧, 𝑤⟩] ~Q ) = [⟨((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)), (𝑦 ·N 𝑤)⟩] ~Q )
3 addpipqqs 7684 . 2 (((𝑧N𝑤N) ∧ (𝑣N𝑢N)) → ([⟨𝑧, 𝑤⟩] ~Q +Q [⟨𝑣, 𝑢⟩] ~Q ) = [⟨((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣)), (𝑤 ·N 𝑢)⟩] ~Q )
4 addpipqqs 7684 . 2 (((((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)) ∈ N ∧ (𝑦 ·N 𝑤) ∈ N) ∧ (𝑣N𝑢N)) → ([⟨((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)), (𝑦 ·N 𝑤)⟩] ~Q +Q [⟨𝑣, 𝑢⟩] ~Q ) = [⟨((((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)) ·N 𝑢) +N ((𝑦 ·N 𝑤) ·N 𝑣)), ((𝑦 ·N 𝑤) ·N 𝑢)⟩] ~Q )
5 addpipqqs 7684 . 2 (((𝑥N𝑦N) ∧ (((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣)) ∈ N ∧ (𝑤 ·N 𝑢) ∈ N)) → ([⟨𝑥, 𝑦⟩] ~Q +Q [⟨((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣)), (𝑤 ·N 𝑢)⟩] ~Q ) = [⟨((𝑥 ·N (𝑤 ·N 𝑢)) +N (𝑦 ·N ((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣)))), (𝑦 ·N (𝑤 ·N 𝑢))⟩] ~Q )
6 mulclpi 7642 . . . . 5 ((𝑥N𝑤N) → (𝑥 ·N 𝑤) ∈ N)
76ad2ant2rl 511 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N)) → (𝑥 ·N 𝑤) ∈ N)
8 mulclpi 7642 . . . . 5 ((𝑦N𝑧N) → (𝑦 ·N 𝑧) ∈ N)
98ad2ant2lr 510 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N)) → (𝑦 ·N 𝑧) ∈ N)
10 addclpi 7641 . . . 4 (((𝑥 ·N 𝑤) ∈ N ∧ (𝑦 ·N 𝑧) ∈ N) → ((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)) ∈ N)
117, 9, 10syl2anc 411 . . 3 (((𝑥N𝑦N) ∧ (𝑧N𝑤N)) → ((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)) ∈ N)
12 mulclpi 7642 . . . 4 ((𝑦N𝑤N) → (𝑦 ·N 𝑤) ∈ N)
1312ad2ant2l 508 . . 3 (((𝑥N𝑦N) ∧ (𝑧N𝑤N)) → (𝑦 ·N 𝑤) ∈ N)
1411, 13jca 306 . 2 (((𝑥N𝑦N) ∧ (𝑧N𝑤N)) → (((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)) ∈ N ∧ (𝑦 ·N 𝑤) ∈ N))
15 mulclpi 7642 . . . . 5 ((𝑧N𝑢N) → (𝑧 ·N 𝑢) ∈ N)
1615ad2ant2rl 511 . . . 4 (((𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑧 ·N 𝑢) ∈ N)
17 mulclpi 7642 . . . . 5 ((𝑤N𝑣N) → (𝑤 ·N 𝑣) ∈ N)
1817ad2ant2lr 510 . . . 4 (((𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑤 ·N 𝑣) ∈ N)
19 addclpi 7641 . . . 4 (((𝑧 ·N 𝑢) ∈ N ∧ (𝑤 ·N 𝑣) ∈ N) → ((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣)) ∈ N)
2016, 18, 19syl2anc 411 . . 3 (((𝑧N𝑤N) ∧ (𝑣N𝑢N)) → ((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣)) ∈ N)
21 mulclpi 7642 . . . 4 ((𝑤N𝑢N) → (𝑤 ·N 𝑢) ∈ N)
2221ad2ant2l 508 . . 3 (((𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑤 ·N 𝑢) ∈ N)
2320, 22jca 306 . 2 (((𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣)) ∈ N ∧ (𝑤 ·N 𝑢) ∈ N))
24 simp1l 1048 . . . . 5 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → 𝑥N)
25 simp2r 1051 . . . . . 6 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → 𝑤N)
26 simp3r 1053 . . . . . 6 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → 𝑢N)
2725, 26, 21syl2anc 411 . . . . 5 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑤 ·N 𝑢) ∈ N)
28 mulclpi 7642 . . . . 5 ((𝑥N ∧ (𝑤 ·N 𝑢) ∈ N) → (𝑥 ·N (𝑤 ·N 𝑢)) ∈ N)
2924, 27, 28syl2anc 411 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑥 ·N (𝑤 ·N 𝑢)) ∈ N)
30 simp1r 1049 . . . . 5 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → 𝑦N)
31 simp2l 1050 . . . . . 6 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → 𝑧N)
3231, 26, 15syl2anc 411 . . . . 5 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑧 ·N 𝑢) ∈ N)
33 mulclpi 7642 . . . . 5 ((𝑦N ∧ (𝑧 ·N 𝑢) ∈ N) → (𝑦 ·N (𝑧 ·N 𝑢)) ∈ N)
3430, 32, 33syl2anc 411 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑦 ·N (𝑧 ·N 𝑢)) ∈ N)
35 simp3l 1052 . . . . . 6 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → 𝑣N)
3625, 35, 17syl2anc 411 . . . . 5 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑤 ·N 𝑣) ∈ N)
37 mulclpi 7642 . . . . 5 ((𝑦N ∧ (𝑤 ·N 𝑣) ∈ N) → (𝑦 ·N (𝑤 ·N 𝑣)) ∈ N)
3830, 36, 37syl2anc 411 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑦 ·N (𝑤 ·N 𝑣)) ∈ N)
39 addasspig 7644 . . . 4 (((𝑥 ·N (𝑤 ·N 𝑢)) ∈ N ∧ (𝑦 ·N (𝑧 ·N 𝑢)) ∈ N ∧ (𝑦 ·N (𝑤 ·N 𝑣)) ∈ N) → (((𝑥 ·N (𝑤 ·N 𝑢)) +N (𝑦 ·N (𝑧 ·N 𝑢))) +N (𝑦 ·N (𝑤 ·N 𝑣))) = ((𝑥 ·N (𝑤 ·N 𝑢)) +N ((𝑦 ·N (𝑧 ·N 𝑢)) +N (𝑦 ·N (𝑤 ·N 𝑣)))))
4029, 34, 38, 39syl3anc 1274 . . 3 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (((𝑥 ·N (𝑤 ·N 𝑢)) +N (𝑦 ·N (𝑧 ·N 𝑢))) +N (𝑦 ·N (𝑤 ·N 𝑣))) = ((𝑥 ·N (𝑤 ·N 𝑢)) +N ((𝑦 ·N (𝑧 ·N 𝑢)) +N (𝑦 ·N (𝑤 ·N 𝑣)))))
41 mulcompig 7645 . . . . . 6 ((𝑓N𝑔N) → (𝑓 ·N 𝑔) = (𝑔 ·N 𝑓))
4241adantl 277 . . . . 5 ((((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) ∧ (𝑓N𝑔N)) → (𝑓 ·N 𝑔) = (𝑔 ·N 𝑓))
43 distrpig 7647 . . . . . . . 8 ((N𝑓N𝑔N) → ( ·N (𝑓 +N 𝑔)) = (( ·N 𝑓) +N ( ·N 𝑔)))
44433coml 1237 . . . . . . 7 ((𝑓N𝑔NN) → ( ·N (𝑓 +N 𝑔)) = (( ·N 𝑓) +N ( ·N 𝑔)))
45 addclpi 7641 . . . . . . . . . 10 ((𝑓N𝑔N) → (𝑓 +N 𝑔) ∈ N)
46 mulcompig 7645 . . . . . . . . . 10 ((N ∧ (𝑓 +N 𝑔) ∈ N) → ( ·N (𝑓 +N 𝑔)) = ((𝑓 +N 𝑔) ·N ))
4745, 46sylan2 286 . . . . . . . . 9 ((N ∧ (𝑓N𝑔N)) → ( ·N (𝑓 +N 𝑔)) = ((𝑓 +N 𝑔) ·N ))
4847ancoms 268 . . . . . . . 8 (((𝑓N𝑔N) ∧ N) → ( ·N (𝑓 +N 𝑔)) = ((𝑓 +N 𝑔) ·N ))
49483impa 1221 . . . . . . 7 ((𝑓N𝑔NN) → ( ·N (𝑓 +N 𝑔)) = ((𝑓 +N 𝑔) ·N ))
50 mulcompig 7645 . . . . . . . . . 10 ((N𝑓N) → ( ·N 𝑓) = (𝑓 ·N ))
5150ancoms 268 . . . . . . . . 9 ((𝑓NN) → ( ·N 𝑓) = (𝑓 ·N ))
52513adant2 1043 . . . . . . . 8 ((𝑓N𝑔NN) → ( ·N 𝑓) = (𝑓 ·N ))
53 mulcompig 7645 . . . . . . . . . 10 ((N𝑔N) → ( ·N 𝑔) = (𝑔 ·N ))
5453ancoms 268 . . . . . . . . 9 ((𝑔NN) → ( ·N 𝑔) = (𝑔 ·N ))
55543adant1 1042 . . . . . . . 8 ((𝑓N𝑔NN) → ( ·N 𝑔) = (𝑔 ·N ))
5652, 55oveq12d 6067 . . . . . . 7 ((𝑓N𝑔NN) → (( ·N 𝑓) +N ( ·N 𝑔)) = ((𝑓 ·N ) +N (𝑔 ·N )))
5744, 49, 563eqtr3d 2273 . . . . . 6 ((𝑓N𝑔NN) → ((𝑓 +N 𝑔) ·N ) = ((𝑓 ·N ) +N (𝑔 ·N )))
5857adantl 277 . . . . 5 ((((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) ∧ (𝑓N𝑔NN)) → ((𝑓 +N 𝑔) ·N ) = ((𝑓 ·N ) +N (𝑔 ·N )))
59 mulasspig 7646 . . . . . 6 ((𝑓N𝑔NN) → ((𝑓 ·N 𝑔) ·N ) = (𝑓 ·N (𝑔 ·N )))
6059adantl 277 . . . . 5 ((((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) ∧ (𝑓N𝑔NN)) → ((𝑓 ·N 𝑔) ·N ) = (𝑓 ·N (𝑔 ·N )))
61 mulclpi 7642 . . . . . 6 ((𝑓N𝑔N) → (𝑓 ·N 𝑔) ∈ N)
6261adantl 277 . . . . 5 ((((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) ∧ (𝑓N𝑔N)) → (𝑓 ·N 𝑔) ∈ N)
6342, 58, 60, 62, 24, 30, 25, 31, 26caovdilemd 6245 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)) ·N 𝑢) = ((𝑥 ·N (𝑤 ·N 𝑢)) +N (𝑦 ·N (𝑧 ·N 𝑢))))
64 mulasspig 7646 . . . . . . 7 ((𝑦N𝑤N𝑣N) → ((𝑦 ·N 𝑤) ·N 𝑣) = (𝑦 ·N (𝑤 ·N 𝑣)))
65643adant1l 1257 . . . . . 6 (((𝑥N𝑦N) ∧ 𝑤N𝑣N) → ((𝑦 ·N 𝑤) ·N 𝑣) = (𝑦 ·N (𝑤 ·N 𝑣)))
66653adant2l 1259 . . . . 5 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ 𝑣N) → ((𝑦 ·N 𝑤) ·N 𝑣) = (𝑦 ·N (𝑤 ·N 𝑣)))
67663adant3r 1262 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → ((𝑦 ·N 𝑤) ·N 𝑣) = (𝑦 ·N (𝑤 ·N 𝑣)))
6863, 67oveq12d 6067 . . 3 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → ((((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)) ·N 𝑢) +N ((𝑦 ·N 𝑤) ·N 𝑣)) = (((𝑥 ·N (𝑤 ·N 𝑢)) +N (𝑦 ·N (𝑧 ·N 𝑢))) +N (𝑦 ·N (𝑤 ·N 𝑣))))
69 distrpig 7647 . . . . 5 ((𝑦N ∧ (𝑧 ·N 𝑢) ∈ N ∧ (𝑤 ·N 𝑣) ∈ N) → (𝑦 ·N ((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣))) = ((𝑦 ·N (𝑧 ·N 𝑢)) +N (𝑦 ·N (𝑤 ·N 𝑣))))
7030, 32, 36, 69syl3anc 1274 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑦 ·N ((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣))) = ((𝑦 ·N (𝑧 ·N 𝑢)) +N (𝑦 ·N (𝑤 ·N 𝑣))))
7170oveq2d 6065 . . 3 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → ((𝑥 ·N (𝑤 ·N 𝑢)) +N (𝑦 ·N ((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣)))) = ((𝑥 ·N (𝑤 ·N 𝑢)) +N ((𝑦 ·N (𝑧 ·N 𝑢)) +N (𝑦 ·N (𝑤 ·N 𝑣)))))
7240, 68, 713eqtr4d 2275 . 2 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → ((((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)) ·N 𝑢) +N ((𝑦 ·N 𝑤) ·N 𝑣)) = ((𝑥 ·N (𝑤 ·N 𝑢)) +N (𝑦 ·N ((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣)))))
73 mulasspig 7646 . . . . 5 ((𝑦N𝑤N𝑢N) → ((𝑦 ·N 𝑤) ·N 𝑢) = (𝑦 ·N (𝑤 ·N 𝑢)))
74733adant1l 1257 . . . 4 (((𝑥N𝑦N) ∧ 𝑤N𝑢N) → ((𝑦 ·N 𝑤) ·N 𝑢) = (𝑦 ·N (𝑤 ·N 𝑢)))
75743adant2l 1259 . . 3 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ 𝑢N) → ((𝑦 ·N 𝑤) ·N 𝑢) = (𝑦 ·N (𝑤 ·N 𝑢)))
76753adant3l 1261 . 2 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → ((𝑦 ·N 𝑤) ·N 𝑢) = (𝑦 ·N (𝑤 ·N 𝑢)))
771, 2, 3, 4, 5, 14, 23, 72, 76ecoviass 6878 1 ((𝐴Q𝐵Q𝐶Q) → ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶)))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 104  w3a 1005   = wceq 1398  wcel 2203  (class class class)co 6049  Ncnpi 7586   +N cpli 7587   ·N cmi 7588   ~Q ceq 7593  Qcnq 7594   +Q cplq 7596
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 619  ax-in2 620  ax-io 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-13 2205  ax-14 2206  ax-ext 2214  ax-coll 4224  ax-sep 4227  ax-nul 4235  ax-pow 4286  ax-pr 4321  ax-un 4553  ax-setind 4658  ax-iinf 4709
This theorem depends on definitions:  df-bi 117  df-dc 843  df-3or 1006  df-3an 1007  df-tru 1401  df-fal 1404  df-nf 1510  df-sb 1812  df-eu 2083  df-mo 2084  df-clab 2219  df-cleq 2225  df-clel 2228  df-nfc 2373  df-ne 2413  df-ral 2525  df-rex 2526  df-reu 2527  df-rab 2529  df-v 2814  df-sbc 3042  df-csb 3138  df-dif 3212  df-un 3214  df-in 3216  df-ss 3223  df-nul 3508  df-pw 3670  df-sn 3694  df-pr 3695  df-op 3697  df-uni 3914  df-int 3949  df-iun 3992  df-br 4109  df-opab 4171  df-mpt 4172  df-tr 4208  df-id 4413  df-iord 4486  df-on 4488  df-suc 4491  df-iom 4712  df-xp 4754  df-rel 4755  df-cnv 4756  df-co 4757  df-dm 4758  df-rn 4759  df-res 4760  df-ima 4761  df-iota 5311  df-fun 5353  df-fn 5354  df-f 5355  df-f1 5356  df-fo 5357  df-f1o 5358  df-fv 5359  df-ov 6052  df-oprab 6053  df-mpo 6054  df-1st 6333  df-2nd 6334  df-recs 6535  df-irdg 6600  df-oadd 6650  df-omul 6651  df-er 6766  df-ec 6768  df-qs 6772  df-ni 7618  df-pli 7619  df-mi 7620  df-plpq 7658  df-enq 7661  df-nqqs 7662  df-plqqs 7663
This theorem is referenced by:  ltaddnq  7721  addlocprlemeqgt  7846  addassprg  7893  ltexprlemloc  7921  ltexprlemrl  7924  ltexprlemru  7926  addcanprleml  7928  addcanprlemu  7929  cauappcvgprlemdisj  7965  cauappcvgprlemloc  7966  cauappcvgprlemladdfl  7969  cauappcvgprlemladdru  7970  cauappcvgprlemladdrl  7971  cauappcvgprlem1  7973  caucvgprlemloc  7989  caucvgprlemladdrl  7992  caucvgprprlemloccalc  7998
  Copyright terms: Public domain W3C validator