MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  lcmass Structured version   Visualization version   GIF version

Theorem lcmass 15659
Description: Associative law for lcm operator. (Contributed by Steve Rodriguez, 20-Jan-2020.) (Proof shortened by AV, 16-Sep-2020.)
Assertion
Ref Expression
lcmass ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → ((𝑁 lcm 𝑀) lcm 𝑃) = (𝑁 lcm (𝑀 lcm 𝑃)))

Proof of Theorem lcmass
Dummy variable 𝑥 is distinct from all other variables.
StepHypRef Expression
1 orass 946 . . 3 (((𝑁 = 0 ∨ 𝑀 = 0) ∨ 𝑃 = 0) ↔ (𝑁 = 0 ∨ (𝑀 = 0 ∨ 𝑃 = 0)))
2 anass 461 . . . . 5 (((𝑁𝑥𝑀𝑥) ∧ 𝑃𝑥) ↔ (𝑁𝑥 ∧ (𝑀𝑥𝑃𝑥)))
32rabbii 3367 . . . 4 {𝑥 ∈ ℕ ∣ ((𝑁𝑥𝑀𝑥) ∧ 𝑃𝑥)} = {𝑥 ∈ ℕ ∣ (𝑁𝑥 ∧ (𝑀𝑥𝑃𝑥))}
43infeq1i 8624 . . 3 inf({𝑥 ∈ ℕ ∣ ((𝑁𝑥𝑀𝑥) ∧ 𝑃𝑥)}, ℝ, < ) = inf({𝑥 ∈ ℕ ∣ (𝑁𝑥 ∧ (𝑀𝑥𝑃𝑥))}, ℝ, < )
51, 4ifbieq2i 4299 . 2 if(((𝑁 = 0 ∨ 𝑀 = 0) ∨ 𝑃 = 0), 0, inf({𝑥 ∈ ℕ ∣ ((𝑁𝑥𝑀𝑥) ∧ 𝑃𝑥)}, ℝ, < )) = if((𝑁 = 0 ∨ (𝑀 = 0 ∨ 𝑃 = 0)), 0, inf({𝑥 ∈ ℕ ∣ (𝑁𝑥 ∧ (𝑀𝑥𝑃𝑥))}, ℝ, < ))
6 lcmcl 15646 . . . . . 6 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ) → (𝑁 lcm 𝑀) ∈ ℕ0)
763adant3 1163 . . . . 5 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → (𝑁 lcm 𝑀) ∈ ℕ0)
87nn0zd 11766 . . . 4 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → (𝑁 lcm 𝑀) ∈ ℤ)
9 simp3 1169 . . . 4 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → 𝑃 ∈ ℤ)
10 lcmval 15637 . . . 4 (((𝑁 lcm 𝑀) ∈ ℤ ∧ 𝑃 ∈ ℤ) → ((𝑁 lcm 𝑀) lcm 𝑃) = if(((𝑁 lcm 𝑀) = 0 ∨ 𝑃 = 0), 0, inf({𝑥 ∈ ℕ ∣ ((𝑁 lcm 𝑀) ∥ 𝑥𝑃𝑥)}, ℝ, < )))
118, 9, 10syl2anc 580 . . 3 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → ((𝑁 lcm 𝑀) lcm 𝑃) = if(((𝑁 lcm 𝑀) = 0 ∨ 𝑃 = 0), 0, inf({𝑥 ∈ ℕ ∣ ((𝑁 lcm 𝑀) ∥ 𝑥𝑃𝑥)}, ℝ, < )))
12 lcmeq0 15645 . . . . . . 7 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ) → ((𝑁 lcm 𝑀) = 0 ↔ (𝑁 = 0 ∨ 𝑀 = 0)))
13123adant3 1163 . . . . . 6 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → ((𝑁 lcm 𝑀) = 0 ↔ (𝑁 = 0 ∨ 𝑀 = 0)))
1413orbi1d 941 . . . . 5 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → (((𝑁 lcm 𝑀) = 0 ∨ 𝑃 = 0) ↔ ((𝑁 = 0 ∨ 𝑀 = 0) ∨ 𝑃 = 0)))
1514bicomd 215 . . . 4 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → (((𝑁 = 0 ∨ 𝑀 = 0) ∨ 𝑃 = 0) ↔ ((𝑁 lcm 𝑀) = 0 ∨ 𝑃 = 0)))
16 nnz 11685 . . . . . . . . 9 (𝑥 ∈ ℕ → 𝑥 ∈ ℤ)
1716adantl 474 . . . . . . . 8 (((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) ∧ 𝑥 ∈ ℕ) → 𝑥 ∈ ℤ)
18 simp1 1167 . . . . . . . . 9 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → 𝑁 ∈ ℤ)
1918adantr 473 . . . . . . . 8 (((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) ∧ 𝑥 ∈ ℕ) → 𝑁 ∈ ℤ)
20 simpl2 1245 . . . . . . . 8 (((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) ∧ 𝑥 ∈ ℕ) → 𝑀 ∈ ℤ)
21 lcmdvdsb 15658 . . . . . . . 8 ((𝑥 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ) → ((𝑁𝑥𝑀𝑥) ↔ (𝑁 lcm 𝑀) ∥ 𝑥))
2217, 19, 20, 21syl3anc 1491 . . . . . . 7 (((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) ∧ 𝑥 ∈ ℕ) → ((𝑁𝑥𝑀𝑥) ↔ (𝑁 lcm 𝑀) ∥ 𝑥))
2322anbi1d 624 . . . . . 6 (((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) ∧ 𝑥 ∈ ℕ) → (((𝑁𝑥𝑀𝑥) ∧ 𝑃𝑥) ↔ ((𝑁 lcm 𝑀) ∥ 𝑥𝑃𝑥)))
2423rabbidva 3370 . . . . 5 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → {𝑥 ∈ ℕ ∣ ((𝑁𝑥𝑀𝑥) ∧ 𝑃𝑥)} = {𝑥 ∈ ℕ ∣ ((𝑁 lcm 𝑀) ∥ 𝑥𝑃𝑥)})
2524infeq1d 8623 . . . 4 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → inf({𝑥 ∈ ℕ ∣ ((𝑁𝑥𝑀𝑥) ∧ 𝑃𝑥)}, ℝ, < ) = inf({𝑥 ∈ ℕ ∣ ((𝑁 lcm 𝑀) ∥ 𝑥𝑃𝑥)}, ℝ, < ))
2615, 25ifbieq2d 4300 . . 3 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → if(((𝑁 = 0 ∨ 𝑀 = 0) ∨ 𝑃 = 0), 0, inf({𝑥 ∈ ℕ ∣ ((𝑁𝑥𝑀𝑥) ∧ 𝑃𝑥)}, ℝ, < )) = if(((𝑁 lcm 𝑀) = 0 ∨ 𝑃 = 0), 0, inf({𝑥 ∈ ℕ ∣ ((𝑁 lcm 𝑀) ∥ 𝑥𝑃𝑥)}, ℝ, < )))
2711, 26eqtr4d 2834 . 2 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → ((𝑁 lcm 𝑀) lcm 𝑃) = if(((𝑁 = 0 ∨ 𝑀 = 0) ∨ 𝑃 = 0), 0, inf({𝑥 ∈ ℕ ∣ ((𝑁𝑥𝑀𝑥) ∧ 𝑃𝑥)}, ℝ, < )))
28 lcmcl 15646 . . . . . 6 ((𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → (𝑀 lcm 𝑃) ∈ ℕ0)
29283adant1 1161 . . . . 5 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → (𝑀 lcm 𝑃) ∈ ℕ0)
3029nn0zd 11766 . . . 4 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → (𝑀 lcm 𝑃) ∈ ℤ)
31 lcmval 15637 . . . 4 ((𝑁 ∈ ℤ ∧ (𝑀 lcm 𝑃) ∈ ℤ) → (𝑁 lcm (𝑀 lcm 𝑃)) = if((𝑁 = 0 ∨ (𝑀 lcm 𝑃) = 0), 0, inf({𝑥 ∈ ℕ ∣ (𝑁𝑥 ∧ (𝑀 lcm 𝑃) ∥ 𝑥)}, ℝ, < )))
3218, 30, 31syl2anc 580 . . 3 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → (𝑁 lcm (𝑀 lcm 𝑃)) = if((𝑁 = 0 ∨ (𝑀 lcm 𝑃) = 0), 0, inf({𝑥 ∈ ℕ ∣ (𝑁𝑥 ∧ (𝑀 lcm 𝑃) ∥ 𝑥)}, ℝ, < )))
33 lcmeq0 15645 . . . . . . 7 ((𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → ((𝑀 lcm 𝑃) = 0 ↔ (𝑀 = 0 ∨ 𝑃 = 0)))
34333adant1 1161 . . . . . 6 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → ((𝑀 lcm 𝑃) = 0 ↔ (𝑀 = 0 ∨ 𝑃 = 0)))
3534orbi2d 940 . . . . 5 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → ((𝑁 = 0 ∨ (𝑀 lcm 𝑃) = 0) ↔ (𝑁 = 0 ∨ (𝑀 = 0 ∨ 𝑃 = 0))))
3635bicomd 215 . . . 4 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → ((𝑁 = 0 ∨ (𝑀 = 0 ∨ 𝑃 = 0)) ↔ (𝑁 = 0 ∨ (𝑀 lcm 𝑃) = 0)))
379adantr 473 . . . . . . . 8 (((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) ∧ 𝑥 ∈ ℕ) → 𝑃 ∈ ℤ)
38 lcmdvdsb 15658 . . . . . . . 8 ((𝑥 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → ((𝑀𝑥𝑃𝑥) ↔ (𝑀 lcm 𝑃) ∥ 𝑥))
3917, 20, 37, 38syl3anc 1491 . . . . . . 7 (((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) ∧ 𝑥 ∈ ℕ) → ((𝑀𝑥𝑃𝑥) ↔ (𝑀 lcm 𝑃) ∥ 𝑥))
4039anbi2d 623 . . . . . 6 (((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) ∧ 𝑥 ∈ ℕ) → ((𝑁𝑥 ∧ (𝑀𝑥𝑃𝑥)) ↔ (𝑁𝑥 ∧ (𝑀 lcm 𝑃) ∥ 𝑥)))
4140rabbidva 3370 . . . . 5 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → {𝑥 ∈ ℕ ∣ (𝑁𝑥 ∧ (𝑀𝑥𝑃𝑥))} = {𝑥 ∈ ℕ ∣ (𝑁𝑥 ∧ (𝑀 lcm 𝑃) ∥ 𝑥)})
4241infeq1d 8623 . . . 4 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → inf({𝑥 ∈ ℕ ∣ (𝑁𝑥 ∧ (𝑀𝑥𝑃𝑥))}, ℝ, < ) = inf({𝑥 ∈ ℕ ∣ (𝑁𝑥 ∧ (𝑀 lcm 𝑃) ∥ 𝑥)}, ℝ, < ))
4336, 42ifbieq2d 4300 . . 3 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → if((𝑁 = 0 ∨ (𝑀 = 0 ∨ 𝑃 = 0)), 0, inf({𝑥 ∈ ℕ ∣ (𝑁𝑥 ∧ (𝑀𝑥𝑃𝑥))}, ℝ, < )) = if((𝑁 = 0 ∨ (𝑀 lcm 𝑃) = 0), 0, inf({𝑥 ∈ ℕ ∣ (𝑁𝑥 ∧ (𝑀 lcm 𝑃) ∥ 𝑥)}, ℝ, < )))
4432, 43eqtr4d 2834 . 2 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → (𝑁 lcm (𝑀 lcm 𝑃)) = if((𝑁 = 0 ∨ (𝑀 = 0 ∨ 𝑃 = 0)), 0, inf({𝑥 ∈ ℕ ∣ (𝑁𝑥 ∧ (𝑀𝑥𝑃𝑥))}, ℝ, < )))
455, 27, 443eqtr4a 2857 1 ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑃 ∈ ℤ) → ((𝑁 lcm 𝑀) lcm 𝑃) = (𝑁 lcm (𝑀 lcm 𝑃)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 198  wa 385  wo 874  w3a 1108   = wceq 1653  wcel 2157  {crab 3091  ifcif 4275   class class class wbr 4841  (class class class)co 6876  infcinf 8587  cr 10221  0cc0 10222   < clt 10361  cn 11310  0cn0 11576  cz 11662  cdvds 15316   lcm clcm 15633
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1891  ax-4 1905  ax-5 2006  ax-6 2072  ax-7 2107  ax-8 2159  ax-9 2166  ax-10 2185  ax-11 2200  ax-12 2213  ax-13 2354  ax-ext 2775  ax-sep 4973  ax-nul 4981  ax-pow 5033  ax-pr 5095  ax-un 7181  ax-cnex 10278  ax-resscn 10279  ax-1cn 10280  ax-icn 10281  ax-addcl 10282  ax-addrcl 10283  ax-mulcl 10284  ax-mulrcl 10285  ax-mulcom 10286  ax-addass 10287  ax-mulass 10288  ax-distr 10289  ax-i2m1 10290  ax-1ne0 10291  ax-1rid 10292  ax-rnegex 10293  ax-rrecex 10294  ax-cnre 10295  ax-pre-lttri 10296  ax-pre-lttrn 10297  ax-pre-ltadd 10298  ax-pre-mulgt0 10299  ax-pre-sup 10300
This theorem depends on definitions:  df-bi 199  df-an 386  df-or 875  df-3or 1109  df-3an 1110  df-tru 1657  df-ex 1876  df-nf 1880  df-sb 2065  df-mo 2590  df-eu 2607  df-clab 2784  df-cleq 2790  df-clel 2793  df-nfc 2928  df-ne 2970  df-nel 3073  df-ral 3092  df-rex 3093  df-reu 3094  df-rmo 3095  df-rab 3096  df-v 3385  df-sbc 3632  df-csb 3727  df-dif 3770  df-un 3772  df-in 3774  df-ss 3781  df-pss 3783  df-nul 4114  df-if 4276  df-pw 4349  df-sn 4367  df-pr 4369  df-tp 4371  df-op 4373  df-uni 4627  df-iun 4710  df-br 4842  df-opab 4904  df-mpt 4921  df-tr 4944  df-id 5218  df-eprel 5223  df-po 5231  df-so 5232  df-fr 5269  df-we 5271  df-xp 5316  df-rel 5317  df-cnv 5318  df-co 5319  df-dm 5320  df-rn 5321  df-res 5322  df-ima 5323  df-pred 5896  df-ord 5942  df-on 5943  df-lim 5944  df-suc 5945  df-iota 6062  df-fun 6101  df-fn 6102  df-f 6103  df-f1 6104  df-fo 6105  df-f1o 6106  df-fv 6107  df-riota 6837  df-ov 6879  df-oprab 6880  df-mpt2 6881  df-om 7298  df-2nd 7400  df-wrecs 7643  df-recs 7705  df-rdg 7743  df-er 7980  df-en 8194  df-dom 8195  df-sdom 8196  df-sup 8588  df-inf 8589  df-pnf 10363  df-mnf 10364  df-xr 10365  df-ltxr 10366  df-le 10367  df-sub 10556  df-neg 10557  df-div 10975  df-nn 11311  df-2 11372  df-3 11373  df-n0 11577  df-z 11663  df-uz 11927  df-rp 12071  df-fl 12844  df-mod 12920  df-seq 13052  df-exp 13111  df-cj 14177  df-re 14178  df-im 14179  df-sqrt 14313  df-abs 14314  df-dvds 15317  df-gcd 15549  df-lcm 15635
This theorem is referenced by:  lcmfunsnlem2lem2  15684  lcmfun  15690
  Copyright terms: Public domain W3C validator