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

Theorem addassnqg 7214
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 7180 . 2 Q = ((N × N) / ~Q )
2 addpipqqs 7202 . 2 (((𝑥N𝑦N) ∧ (𝑧N𝑤N)) → ([⟨𝑥, 𝑦⟩] ~Q +Q [⟨𝑧, 𝑤⟩] ~Q ) = [⟨((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)), (𝑦 ·N 𝑤)⟩] ~Q )
3 addpipqqs 7202 . 2 (((𝑧N𝑤N) ∧ (𝑣N𝑢N)) → ([⟨𝑧, 𝑤⟩] ~Q +Q [⟨𝑣, 𝑢⟩] ~Q ) = [⟨((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣)), (𝑤 ·N 𝑢)⟩] ~Q )
4 addpipqqs 7202 . 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 7202 . 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 7160 . . . . 5 ((𝑥N𝑤N) → (𝑥 ·N 𝑤) ∈ N)
76ad2ant2rl 503 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N)) → (𝑥 ·N 𝑤) ∈ N)
8 mulclpi 7160 . . . . 5 ((𝑦N𝑧N) → (𝑦 ·N 𝑧) ∈ N)
98ad2ant2lr 502 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N)) → (𝑦 ·N 𝑧) ∈ N)
10 addclpi 7159 . . . 4 (((𝑥 ·N 𝑤) ∈ N ∧ (𝑦 ·N 𝑧) ∈ N) → ((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)) ∈ N)
117, 9, 10syl2anc 409 . . 3 (((𝑥N𝑦N) ∧ (𝑧N𝑤N)) → ((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)) ∈ N)
12 mulclpi 7160 . . . 4 ((𝑦N𝑤N) → (𝑦 ·N 𝑤) ∈ N)
1312ad2ant2l 500 . . 3 (((𝑥N𝑦N) ∧ (𝑧N𝑤N)) → (𝑦 ·N 𝑤) ∈ N)
1411, 13jca 304 . 2 (((𝑥N𝑦N) ∧ (𝑧N𝑤N)) → (((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)) ∈ N ∧ (𝑦 ·N 𝑤) ∈ N))
15 mulclpi 7160 . . . . 5 ((𝑧N𝑢N) → (𝑧 ·N 𝑢) ∈ N)
1615ad2ant2rl 503 . . . 4 (((𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑧 ·N 𝑢) ∈ N)
17 mulclpi 7160 . . . . 5 ((𝑤N𝑣N) → (𝑤 ·N 𝑣) ∈ N)
1817ad2ant2lr 502 . . . 4 (((𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑤 ·N 𝑣) ∈ N)
19 addclpi 7159 . . . 4 (((𝑧 ·N 𝑢) ∈ N ∧ (𝑤 ·N 𝑣) ∈ N) → ((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣)) ∈ N)
2016, 18, 19syl2anc 409 . . 3 (((𝑧N𝑤N) ∧ (𝑣N𝑢N)) → ((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣)) ∈ N)
21 mulclpi 7160 . . . 4 ((𝑤N𝑢N) → (𝑤 ·N 𝑢) ∈ N)
2221ad2ant2l 500 . . 3 (((𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑤 ·N 𝑢) ∈ N)
2320, 22jca 304 . 2 (((𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣)) ∈ N ∧ (𝑤 ·N 𝑢) ∈ N))
24 simp1l 1006 . . . . 5 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → 𝑥N)
25 simp2r 1009 . . . . . 6 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → 𝑤N)
26 simp3r 1011 . . . . . 6 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → 𝑢N)
2725, 26, 21syl2anc 409 . . . . 5 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑤 ·N 𝑢) ∈ N)
28 mulclpi 7160 . . . . 5 ((𝑥N ∧ (𝑤 ·N 𝑢) ∈ N) → (𝑥 ·N (𝑤 ·N 𝑢)) ∈ N)
2924, 27, 28syl2anc 409 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑥 ·N (𝑤 ·N 𝑢)) ∈ N)
30 simp1r 1007 . . . . 5 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → 𝑦N)
31 simp2l 1008 . . . . . 6 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → 𝑧N)
3231, 26, 15syl2anc 409 . . . . 5 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑧 ·N 𝑢) ∈ N)
33 mulclpi 7160 . . . . 5 ((𝑦N ∧ (𝑧 ·N 𝑢) ∈ N) → (𝑦 ·N (𝑧 ·N 𝑢)) ∈ N)
3430, 32, 33syl2anc 409 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑦 ·N (𝑧 ·N 𝑢)) ∈ N)
35 simp3l 1010 . . . . . 6 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → 𝑣N)
3625, 35, 17syl2anc 409 . . . . 5 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑤 ·N 𝑣) ∈ N)
37 mulclpi 7160 . . . . 5 ((𝑦N ∧ (𝑤 ·N 𝑣) ∈ N) → (𝑦 ·N (𝑤 ·N 𝑣)) ∈ N)
3830, 36, 37syl2anc 409 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑦 ·N (𝑤 ·N 𝑣)) ∈ N)
39 addasspig 7162 . . . 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 1217 . . 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 7163 . . . . . 6 ((𝑓N𝑔N) → (𝑓 ·N 𝑔) = (𝑔 ·N 𝑓))
4241adantl 275 . . . . 5 ((((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) ∧ (𝑓N𝑔N)) → (𝑓 ·N 𝑔) = (𝑔 ·N 𝑓))
43 distrpig 7165 . . . . . . . 8 ((N𝑓N𝑔N) → ( ·N (𝑓 +N 𝑔)) = (( ·N 𝑓) +N ( ·N 𝑔)))
44433coml 1189 . . . . . . 7 ((𝑓N𝑔NN) → ( ·N (𝑓 +N 𝑔)) = (( ·N 𝑓) +N ( ·N 𝑔)))
45 addclpi 7159 . . . . . . . . . 10 ((𝑓N𝑔N) → (𝑓 +N 𝑔) ∈ N)
46 mulcompig 7163 . . . . . . . . . 10 ((N ∧ (𝑓 +N 𝑔) ∈ N) → ( ·N (𝑓 +N 𝑔)) = ((𝑓 +N 𝑔) ·N ))
4745, 46sylan2 284 . . . . . . . . 9 ((N ∧ (𝑓N𝑔N)) → ( ·N (𝑓 +N 𝑔)) = ((𝑓 +N 𝑔) ·N ))
4847ancoms 266 . . . . . . . 8 (((𝑓N𝑔N) ∧ N) → ( ·N (𝑓 +N 𝑔)) = ((𝑓 +N 𝑔) ·N ))
49483impa 1177 . . . . . . 7 ((𝑓N𝑔NN) → ( ·N (𝑓 +N 𝑔)) = ((𝑓 +N 𝑔) ·N ))
50 mulcompig 7163 . . . . . . . . . 10 ((N𝑓N) → ( ·N 𝑓) = (𝑓 ·N ))
5150ancoms 266 . . . . . . . . 9 ((𝑓NN) → ( ·N 𝑓) = (𝑓 ·N ))
52513adant2 1001 . . . . . . . 8 ((𝑓N𝑔NN) → ( ·N 𝑓) = (𝑓 ·N ))
53 mulcompig 7163 . . . . . . . . . 10 ((N𝑔N) → ( ·N 𝑔) = (𝑔 ·N ))
5453ancoms 266 . . . . . . . . 9 ((𝑔NN) → ( ·N 𝑔) = (𝑔 ·N ))
55543adant1 1000 . . . . . . . 8 ((𝑓N𝑔NN) → ( ·N 𝑔) = (𝑔 ·N ))
5652, 55oveq12d 5800 . . . . . . 7 ((𝑓N𝑔NN) → (( ·N 𝑓) +N ( ·N 𝑔)) = ((𝑓 ·N ) +N (𝑔 ·N )))
5744, 49, 563eqtr3d 2181 . . . . . 6 ((𝑓N𝑔NN) → ((𝑓 +N 𝑔) ·N ) = ((𝑓 ·N ) +N (𝑔 ·N )))
5857adantl 275 . . . . 5 ((((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) ∧ (𝑓N𝑔NN)) → ((𝑓 +N 𝑔) ·N ) = ((𝑓 ·N ) +N (𝑔 ·N )))
59 mulasspig 7164 . . . . . 6 ((𝑓N𝑔NN) → ((𝑓 ·N 𝑔) ·N ) = (𝑓 ·N (𝑔 ·N )))
6059adantl 275 . . . . 5 ((((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) ∧ (𝑓N𝑔NN)) → ((𝑓 ·N 𝑔) ·N ) = (𝑓 ·N (𝑔 ·N )))
61 mulclpi 7160 . . . . . 6 ((𝑓N𝑔N) → (𝑓 ·N 𝑔) ∈ N)
6261adantl 275 . . . . 5 ((((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) ∧ (𝑓N𝑔N)) → (𝑓 ·N 𝑔) ∈ N)
6342, 58, 60, 62, 24, 30, 25, 31, 26caovdilemd 5970 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)) ·N 𝑢) = ((𝑥 ·N (𝑤 ·N 𝑢)) +N (𝑦 ·N (𝑧 ·N 𝑢))))
64 mulasspig 7164 . . . . . . 7 ((𝑦N𝑤N𝑣N) → ((𝑦 ·N 𝑤) ·N 𝑣) = (𝑦 ·N (𝑤 ·N 𝑣)))
65643adant1l 1209 . . . . . 6 (((𝑥N𝑦N) ∧ 𝑤N𝑣N) → ((𝑦 ·N 𝑤) ·N 𝑣) = (𝑦 ·N (𝑤 ·N 𝑣)))
66653adant2l 1211 . . . . 5 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ 𝑣N) → ((𝑦 ·N 𝑤) ·N 𝑣) = (𝑦 ·N (𝑤 ·N 𝑣)))
67663adant3r 1214 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → ((𝑦 ·N 𝑤) ·N 𝑣) = (𝑦 ·N (𝑤 ·N 𝑣)))
6863, 67oveq12d 5800 . . 3 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → ((((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)) ·N 𝑢) +N ((𝑦 ·N 𝑤) ·N 𝑣)) = (((𝑥 ·N (𝑤 ·N 𝑢)) +N (𝑦 ·N (𝑧 ·N 𝑢))) +N (𝑦 ·N (𝑤 ·N 𝑣))))
69 distrpig 7165 . . . . 5 ((𝑦N ∧ (𝑧 ·N 𝑢) ∈ N ∧ (𝑤 ·N 𝑣) ∈ N) → (𝑦 ·N ((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣))) = ((𝑦 ·N (𝑧 ·N 𝑢)) +N (𝑦 ·N (𝑤 ·N 𝑣))))
7030, 32, 36, 69syl3anc 1217 . . . 4 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → (𝑦 ·N ((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣))) = ((𝑦 ·N (𝑧 ·N 𝑢)) +N (𝑦 ·N (𝑤 ·N 𝑣))))
7170oveq2d 5798 . . 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 2183 . 2 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → ((((𝑥 ·N 𝑤) +N (𝑦 ·N 𝑧)) ·N 𝑢) +N ((𝑦 ·N 𝑤) ·N 𝑣)) = ((𝑥 ·N (𝑤 ·N 𝑢)) +N (𝑦 ·N ((𝑧 ·N 𝑢) +N (𝑤 ·N 𝑣)))))
73 mulasspig 7164 . . . . 5 ((𝑦N𝑤N𝑢N) → ((𝑦 ·N 𝑤) ·N 𝑢) = (𝑦 ·N (𝑤 ·N 𝑢)))
74733adant1l 1209 . . . 4 (((𝑥N𝑦N) ∧ 𝑤N𝑢N) → ((𝑦 ·N 𝑤) ·N 𝑢) = (𝑦 ·N (𝑤 ·N 𝑢)))
75743adant2l 1211 . . 3 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ 𝑢N) → ((𝑦 ·N 𝑤) ·N 𝑢) = (𝑦 ·N (𝑤 ·N 𝑢)))
76753adant3l 1213 . 2 (((𝑥N𝑦N) ∧ (𝑧N𝑤N) ∧ (𝑣N𝑢N)) → ((𝑦 ·N 𝑤) ·N 𝑢) = (𝑦 ·N (𝑤 ·N 𝑢)))
771, 2, 3, 4, 5, 14, 23, 72, 76ecoviass 6547 1 ((𝐴Q𝐵Q𝐶Q) → ((𝐴 +Q 𝐵) +Q 𝐶) = (𝐴 +Q (𝐵 +Q 𝐶)))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 103  w3a 963   = wceq 1332  wcel 1481  (class class class)co 5782  Ncnpi 7104   +N cpli 7105   ·N cmi 7106   ~Q ceq 7111  Qcnq 7112   +Q cplq 7114
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-in1 604  ax-in2 605  ax-io 699  ax-5 1424  ax-7 1425  ax-gen 1426  ax-ie1 1470  ax-ie2 1471  ax-8 1483  ax-10 1484  ax-11 1485  ax-i12 1486  ax-bndl 1487  ax-4 1488  ax-13 1492  ax-14 1493  ax-17 1507  ax-i9 1511  ax-ial 1515  ax-i5r 1516  ax-ext 2122  ax-coll 4051  ax-sep 4054  ax-nul 4062  ax-pow 4106  ax-pr 4139  ax-un 4363  ax-setind 4460  ax-iinf 4510
This theorem depends on definitions:  df-bi 116  df-dc 821  df-3or 964  df-3an 965  df-tru 1335  df-fal 1338  df-nf 1438  df-sb 1737  df-eu 2003  df-mo 2004  df-clab 2127  df-cleq 2133  df-clel 2136  df-nfc 2271  df-ne 2310  df-ral 2422  df-rex 2423  df-reu 2424  df-rab 2426  df-v 2691  df-sbc 2914  df-csb 3008  df-dif 3078  df-un 3080  df-in 3082  df-ss 3089  df-nul 3369  df-pw 3517  df-sn 3538  df-pr 3539  df-op 3541  df-uni 3745  df-int 3780  df-iun 3823  df-br 3938  df-opab 3998  df-mpt 3999  df-tr 4035  df-id 4223  df-iord 4296  df-on 4298  df-suc 4301  df-iom 4513  df-xp 4553  df-rel 4554  df-cnv 4555  df-co 4556  df-dm 4557  df-rn 4558  df-res 4559  df-ima 4560  df-iota 5096  df-fun 5133  df-fn 5134  df-f 5135  df-f1 5136  df-fo 5137  df-f1o 5138  df-fv 5139  df-ov 5785  df-oprab 5786  df-mpo 5787  df-1st 6046  df-2nd 6047  df-recs 6210  df-irdg 6275  df-oadd 6325  df-omul 6326  df-er 6437  df-ec 6439  df-qs 6443  df-ni 7136  df-pli 7137  df-mi 7138  df-plpq 7176  df-enq 7179  df-nqqs 7180  df-plqqs 7181
This theorem is referenced by:  ltaddnq  7239  addlocprlemeqgt  7364  addassprg  7411  ltexprlemloc  7439  ltexprlemrl  7442  ltexprlemru  7444  addcanprleml  7446  addcanprlemu  7447  cauappcvgprlemdisj  7483  cauappcvgprlemloc  7484  cauappcvgprlemladdfl  7487  cauappcvgprlemladdru  7488  cauappcvgprlemladdrl  7489  cauappcvgprlem1  7491  caucvgprlemloc  7507  caucvgprlemladdrl  7510  caucvgprprlemloccalc  7516
  Copyright terms: Public domain W3C validator