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

Theorem lcmfunsnlem2lem1 15976
Description: Lemma 1 for lcmfunsnlem2 15978. (Contributed by AV, 26-Aug-2020.)
Assertion
Ref Expression
lcmfunsnlem2lem1 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) → ∀𝑘 ∈ ℕ (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → ((lcm‘(𝑦 ∪ {𝑧})) lcm 𝑛) ≤ 𝑘))
Distinct variable groups:   𝑦,𝑚,𝑧   𝑘,𝑛,𝑦,𝑧,𝑚,𝑖

Proof of Theorem lcmfunsnlem2lem1
Dummy variable 𝑙 is distinct from all other variables.
StepHypRef Expression
1 nfv 1911 . . 3 𝑘(0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)
2 nfv 1911 . . . 4 𝑘 𝑛 ∈ ℤ
3 nfv 1911 . . . . 5 𝑘(𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)
4 nfra1 3219 . . . . . 6 𝑘𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)
5 nfv 1911 . . . . . 6 𝑘𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)
64, 5nfan 1896 . . . . 5 𝑘(∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))
73, 6nfan 1896 . . . 4 𝑘((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)))
82, 7nfan 1896 . . 3 𝑘(𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))
91, 8nfan 1896 . 2 𝑘((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)))))
10 simprr 771 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑘 ∈ ℕ)
11 simp2 1133 . . . . . . . . . . . . . . . . . 18 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → 𝑦 ⊆ ℤ)
12 snssi 4734 . . . . . . . . . . . . . . . . . . 19 (𝑧 ∈ ℤ → {𝑧} ⊆ ℤ)
13123ad2ant1 1129 . . . . . . . . . . . . . . . . . 18 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → {𝑧} ⊆ ℤ)
1411, 13unssd 4161 . . . . . . . . . . . . . . . . 17 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (𝑦 ∪ {𝑧}) ⊆ ℤ)
15 simp3 1134 . . . . . . . . . . . . . . . . . 18 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → 𝑦 ∈ Fin)
16 snfi 8588 . . . . . . . . . . . . . . . . . 18 {𝑧} ∈ Fin
17 unfi 8779 . . . . . . . . . . . . . . . . . 18 ((𝑦 ∈ Fin ∧ {𝑧} ∈ Fin) → (𝑦 ∪ {𝑧}) ∈ Fin)
1815, 16, 17sylancl 588 . . . . . . . . . . . . . . . . 17 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (𝑦 ∪ {𝑧}) ∈ Fin)
1914, 18jca 514 . . . . . . . . . . . . . . . 16 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → ((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin))
20 lcmfcl 15966 . . . . . . . . . . . . . . . 16 (((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ0)
2119, 20syl 17 . . . . . . . . . . . . . . 15 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ0)
2221nn0zd 12079 . . . . . . . . . . . . . 14 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ)
2322adantl 484 . . . . . . . . . . . . 13 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ)
2423adantr 483 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ)
25 simprl 769 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑛 ∈ ℤ)
2610, 24, 253jca 1124 . . . . . . . . . . 11 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ))
2714adantl 484 . . . . . . . . . . . . . . . . . 18 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → (𝑦 ∪ {𝑧}) ⊆ ℤ)
2818adantl 484 . . . . . . . . . . . . . . . . . 18 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → (𝑦 ∪ {𝑧}) ∈ Fin)
29 df-nel 3124 . . . . . . . . . . . . . . . . . . . . . . 23 (0 ∉ 𝑦 ↔ ¬ 0 ∈ 𝑦)
3029biimpi 218 . . . . . . . . . . . . . . . . . . . . . 22 (0 ∉ 𝑦 → ¬ 0 ∈ 𝑦)
31 elsni 4577 . . . . . . . . . . . . . . . . . . . . . . . 24 (0 ∈ {𝑧} → 0 = 𝑧)
3231eqcomd 2827 . . . . . . . . . . . . . . . . . . . . . . 23 (0 ∈ {𝑧} → 𝑧 = 0)
3332necon3ai 3041 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧 ≠ 0 → ¬ 0 ∈ {𝑧})
3430, 33anim12i 614 . . . . . . . . . . . . . . . . . . . . 21 ((0 ∉ 𝑦𝑧 ≠ 0) → (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
35343adant3 1128 . . . . . . . . . . . . . . . . . . . 20 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
36 df-nel 3124 . . . . . . . . . . . . . . . . . . . . 21 (0 ∉ (𝑦 ∪ {𝑧}) ↔ ¬ 0 ∈ (𝑦 ∪ {𝑧}))
37 ioran 980 . . . . . . . . . . . . . . . . . . . . . 22 (¬ (0 ∈ 𝑦 ∨ 0 ∈ {𝑧}) ↔ (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
38 elun 4124 . . . . . . . . . . . . . . . . . . . . . 22 (0 ∈ (𝑦 ∪ {𝑧}) ↔ (0 ∈ 𝑦 ∨ 0 ∈ {𝑧}))
3937, 38xchnxbir 335 . . . . . . . . . . . . . . . . . . . . 21 (¬ 0 ∈ (𝑦 ∪ {𝑧}) ↔ (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
4036, 39bitri 277 . . . . . . . . . . . . . . . . . . . 20 (0 ∉ (𝑦 ∪ {𝑧}) ↔ (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
4135, 40sylibr 236 . . . . . . . . . . . . . . . . . . 19 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → 0 ∉ (𝑦 ∪ {𝑧}))
4241adantr 483 . . . . . . . . . . . . . . . . . 18 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → 0 ∉ (𝑦 ∪ {𝑧}))
4327, 28, 423jca 1124 . . . . . . . . . . . . . . . . 17 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → ((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin ∧ 0 ∉ (𝑦 ∪ {𝑧})))
4443adantr 483 . . . . . . . . . . . . . . . 16 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin ∧ 0 ∉ (𝑦 ∪ {𝑧})))
45 lcmfn0cl 15964 . . . . . . . . . . . . . . . 16 (((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin ∧ 0 ∉ (𝑦 ∪ {𝑧})) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ)
4644, 45syl 17 . . . . . . . . . . . . . . 15 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ)
4746nnne0d 11681 . . . . . . . . . . . . . 14 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm‘(𝑦 ∪ {𝑧})) ≠ 0)
4847neneqd 3021 . . . . . . . . . . . . 13 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ¬ (lcm‘(𝑦 ∪ {𝑧})) = 0)
49 neneq 3022 . . . . . . . . . . . . . . 15 (𝑛 ≠ 0 → ¬ 𝑛 = 0)
50493ad2ant3 1131 . . . . . . . . . . . . . 14 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → ¬ 𝑛 = 0)
5150ad2antrr 724 . . . . . . . . . . . . 13 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ¬ 𝑛 = 0)
5248, 51jca 514 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (¬ (lcm‘(𝑦 ∪ {𝑧})) = 0 ∧ ¬ 𝑛 = 0))
53 ioran 980 . . . . . . . . . . . 12 (¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0) ↔ (¬ (lcm‘(𝑦 ∪ {𝑧})) = 0 ∧ ¬ 𝑛 = 0))
5452, 53sylibr 236 . . . . . . . . . . 11 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0))
5526, 54jca 514 . . . . . . . . . 10 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0)))
5655exp43 439 . . . . . . . . 9 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (𝑛 ∈ ℤ → (𝑘 ∈ ℕ → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0))))))
5756adantrd 494 . . . . . . . 8 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))) → (𝑛 ∈ ℤ → (𝑘 ∈ ℕ → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0))))))
5857com23 86 . . . . . . 7 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (𝑛 ∈ ℤ → (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))) → (𝑘 ∈ ℕ → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0))))))
5958imp32 421 . . . . . 6 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) → (𝑘 ∈ ℕ → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0))))
6059imp 409 . . . . 5 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0)))
6160adantr 483 . . . 4 (((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0)))
62 sneq 4570 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 𝑧 → {𝑛} = {𝑧})
6362uneq2d 4138 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 𝑧 → (𝑦 ∪ {𝑛}) = (𝑦 ∪ {𝑧}))
6463fveq2d 6668 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑧 → (lcm‘(𝑦 ∪ {𝑛})) = (lcm‘(𝑦 ∪ {𝑧})))
65 oveq2 7158 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑧 → ((lcm𝑦) lcm 𝑛) = ((lcm𝑦) lcm 𝑧))
6664, 65eqeq12d 2837 . . . . . . . . . . . . . . . . . 18 (𝑛 = 𝑧 → ((lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛) ↔ (lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧)))
6766rspcv 3617 . . . . . . . . . . . . . . . . 17 (𝑧 ∈ ℤ → (∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛) → (lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧)))
68673ad2ant1 1129 . . . . . . . . . . . . . . . 16 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛) → (lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧)))
69 nnz 11998 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑘 ∈ ℕ → 𝑘 ∈ ℤ)
7069adantl 484 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℤ)
7170adantl 484 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑘 ∈ ℤ)
72 lcmfcl 15966 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm𝑦) ∈ ℕ0)
7372nn0zd 12079 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm𝑦) ∈ ℤ)
74733adant1 1126 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm𝑦) ∈ ℤ)
7574ad2antrr 724 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm𝑦) ∈ ℤ)
76 simpll1 1208 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑧 ∈ ℤ)
7771, 75, 763jca 1124 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (𝑘 ∈ ℤ ∧ (lcm𝑦) ∈ ℤ ∧ 𝑧 ∈ ℤ))
7877ad2antrr 724 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (𝑘 ∈ ℤ ∧ (lcm𝑦) ∈ ℤ ∧ 𝑧 ∈ ℤ))
79 elun1 4151 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (𝑚𝑦𝑚 ∈ (𝑦 ∪ {𝑧}))
8079orcd 869 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑚𝑦 → (𝑚 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑚 ∈ {𝑛}))
81 elun 4124 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑚 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) ↔ (𝑚 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑚 ∈ {𝑛}))
8280, 81sylibr 236 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑚𝑦𝑚 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}))
83 breq1 5061 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑖 = 𝑚 → (𝑖𝑘𝑚𝑘))
8483rspcv 3617 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑚 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑚𝑘))
8582, 84syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑚𝑦 → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑚𝑘))
8685com12 32 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (𝑚𝑦𝑚𝑘))
8786adantl 484 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (𝑚𝑦𝑚𝑘))
8887ralrimiv 3181 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ∀𝑚𝑦 𝑚𝑘)
8988adantr 483 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → ∀𝑚𝑦 𝑚𝑘)
90 breq2 5062 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑘 = 𝑙 → (𝑚𝑘𝑚𝑙))
9190ralbidv 3197 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑘 = 𝑙 → (∀𝑚𝑦 𝑚𝑘 ↔ ∀𝑚𝑦 𝑚𝑙))
92 breq2 5062 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑘 = 𝑙 → ((lcm𝑦) ∥ 𝑘 ↔ (lcm𝑦) ∥ 𝑙))
9391, 92imbi12d 347 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑘 = 𝑙 → ((∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ↔ (∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙)))
9493cbvralvw 3449 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ↔ ∀𝑙 ∈ ℤ (∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙))
9570adantr 483 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → 𝑘 ∈ ℤ)
9695adantl 484 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → 𝑘 ∈ ℤ)
97 breq2 5062 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑙 = 𝑘 → (𝑚𝑙𝑚𝑘))
9897ralbidv 3197 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑙 = 𝑘 → (∀𝑚𝑦 𝑚𝑙 ↔ ∀𝑚𝑦 𝑚𝑘))
99 breq2 5062 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑙 = 𝑘 → ((lcm𝑦) ∥ 𝑙 ↔ (lcm𝑦) ∥ 𝑘))
10098, 99imbi12d 347 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑙 = 𝑘 → ((∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙) ↔ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)))
101100rspcv 3617 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑘 ∈ ℤ → (∀𝑙 ∈ ℤ (∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙) → (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)))
10296, 101syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → (∀𝑙 ∈ ℤ (∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙) → (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)))
10394, 102syl5bi 244 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)))
10489, 103mpid 44 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → (lcm𝑦) ∥ 𝑘))
105104exp31 422 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → (lcm𝑦) ∥ 𝑘))))
106105com24 95 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → (((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm𝑦) ∥ 𝑘))))
107106imp 409 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) → (((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm𝑦) ∥ 𝑘)))
108107impl 458 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm𝑦) ∥ 𝑘))
109108imp 409 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (lcm𝑦) ∥ 𝑘)
110 vsnid 4595 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑧 ∈ {𝑧}
111110olci 862 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑧𝑦𝑧 ∈ {𝑧})
112 elun 4124 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑧 ∈ (𝑦 ∪ {𝑧}) ↔ (𝑧𝑦𝑧 ∈ {𝑧}))
113111, 112mpbir 233 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑧 ∈ (𝑦 ∪ {𝑧})
114113orci 861 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑧 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑧 ∈ {𝑛})
115 elun 4124 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑧 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) ↔ (𝑧 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑧 ∈ {𝑛}))
116114, 115mpbir 233 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑧 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})
117 breq1 5061 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 = 𝑧 → (𝑖𝑘𝑧𝑘))
118117rspcv 3617 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑧 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑧𝑘))
119116, 118mp1i 13 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑧𝑘))
120119imp 409 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → 𝑧𝑘)
121109, 120jca 514 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((lcm𝑦) ∥ 𝑘𝑧𝑘))
122 lcmdvds 15946 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℤ ∧ (lcm𝑦) ∈ ℤ ∧ 𝑧 ∈ ℤ) → (((lcm𝑦) ∥ 𝑘𝑧𝑘) → ((lcm𝑦) lcm 𝑧) ∥ 𝑘))
12378, 121, 122sylc 65 . . . . . . . . . . . . . . . . . . . 20 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((lcm𝑦) lcm 𝑧) ∥ 𝑘)
124 breq1 5061 . . . . . . . . . . . . . . . . . . . 20 ((lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧) → ((lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘 ↔ ((lcm𝑦) lcm 𝑧) ∥ 𝑘))
125123, 124syl5ibr 248 . . . . . . . . . . . . . . . . . . 19 ((lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧) → ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))
126125expd 418 . . . . . . . . . . . . . . . . . 18 ((lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧) → (((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘)))
127126exp5j 448 . . . . . . . . . . . . . . . . 17 ((lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧) → ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) → ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))))))
128127com12 32 . . . . . . . . . . . . . . . 16 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → ((lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) → ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))))))
12968, 128syld 47 . . . . . . . . . . . . . . 15 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) → ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))))))
130129com23 86 . . . . . . . . . . . . . 14 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → (∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛) → ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) → ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))))))
131130imp32 421 . . . . . . . . . . . . 13 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))) → ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) → ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))))
132131expd 418 . . . . . . . . . . . 12 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))) → (𝑛 ∈ ℤ → (𝑘 ∈ ℕ → ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘)))))
133132com34 91 . . . . . . . . . . 11 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))) → (𝑛 ∈ ℤ → ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (𝑘 ∈ ℕ → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘)))))
134133com12 32 . . . . . . . . . 10 (𝑛 ∈ ℤ → (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))) → ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (𝑘 ∈ ℕ → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘)))))
135134imp 409 . . . . . . . . 9 ((𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)))) → ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (𝑘 ∈ ℕ → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))))
136135com12 32 . . . . . . . 8 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → ((𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)))) → (𝑘 ∈ ℕ → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))))
137136imp 409 . . . . . . 7 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) → (𝑘 ∈ ℕ → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘)))
138137imp 409 . . . . . 6 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))
139138imp 409 . . . . 5 (((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘)
140 vsnid 4595 . . . . . . . . 9 𝑛 ∈ {𝑛}
141140olci 862 . . . . . . . 8 (𝑛 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑛 ∈ {𝑛})
142 elun 4124 . . . . . . . 8 (𝑛 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) ↔ (𝑛 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑛 ∈ {𝑛}))
143141, 142mpbir 233 . . . . . . 7 𝑛 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})
144 breq1 5061 . . . . . . . 8 (𝑖 = 𝑛 → (𝑖𝑘𝑛𝑘))
145144rspcv 3617 . . . . . . 7 (𝑛 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑛𝑘))
146143, 145mp1i 13 . . . . . 6 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑛𝑘))
147146imp 409 . . . . 5 (((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → 𝑛𝑘)
148139, 147jca 514 . . . 4 (((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘𝑛𝑘))
149 lcmledvds 15937 . . . 4 (((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0)) → (((lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘𝑛𝑘) → ((lcm‘(𝑦 ∪ {𝑧})) lcm 𝑛) ≤ 𝑘))
15061, 148, 149sylc 65 . . 3 (((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((lcm‘(𝑦 ∪ {𝑧})) lcm 𝑛) ≤ 𝑘)
151150exp31 422 . 2 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) → (𝑘 ∈ ℕ → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → ((lcm‘(𝑦 ∪ {𝑧})) lcm 𝑛) ≤ 𝑘)))
1529, 151ralrimi 3216 1 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) → ∀𝑘 ∈ ℕ (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → ((lcm‘(𝑦 ∪ {𝑧})) lcm 𝑛) ≤ 𝑘))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 398  wo 843  w3a 1083   = wceq 1533  wcel 2110  wne 3016  wnel 3123  wral 3138  cun 3933  wss 3935  {csn 4560   class class class wbr 5058  cfv 6349  (class class class)co 7150  Fincfn 8503  0cc0 10531  cle 10670  cn 11632  0cn0 11891  cz 11975  cdvds 15601   lcm clcm 15926  lcmclcmf 15927
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-rep 5182  ax-sep 5195  ax-nul 5202  ax-pow 5258  ax-pr 5321  ax-un 7455  ax-inf2 9098  ax-cnex 10587  ax-resscn 10588  ax-1cn 10589  ax-icn 10590  ax-addcl 10591  ax-addrcl 10592  ax-mulcl 10593  ax-mulrcl 10594  ax-mulcom 10595  ax-addass 10596  ax-mulass 10597  ax-distr 10598  ax-i2m1 10599  ax-1ne0 10600  ax-1rid 10601  ax-rnegex 10602  ax-rrecex 10603  ax-cnre 10604  ax-pre-lttri 10605  ax-pre-lttrn 10606  ax-pre-ltadd 10607  ax-pre-mulgt0 10608  ax-pre-sup 10609
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1536  df-fal 1546  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3772  df-csb 3883  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-pss 3953  df-nul 4291  df-if 4467  df-pw 4540  df-sn 4561  df-pr 4563  df-tp 4565  df-op 4567  df-uni 4832  df-int 4869  df-iun 4913  df-br 5059  df-opab 5121  df-mpt 5139  df-tr 5165  df-id 5454  df-eprel 5459  df-po 5468  df-so 5469  df-fr 5508  df-se 5509  df-we 5510  df-xp 5555  df-rel 5556  df-cnv 5557  df-co 5558  df-dm 5559  df-rn 5560  df-res 5561  df-ima 5562  df-pred 6142  df-ord 6188  df-on 6189  df-lim 6190  df-suc 6191  df-iota 6308  df-fun 6351  df-fn 6352  df-f 6353  df-f1 6354  df-fo 6355  df-f1o 6356  df-fv 6357  df-isom 6358  df-riota 7108  df-ov 7153  df-oprab 7154  df-mpo 7155  df-om 7575  df-1st 7683  df-2nd 7684  df-wrecs 7941  df-recs 8002  df-rdg 8040  df-1o 8096  df-oadd 8100  df-er 8283  df-en 8504  df-dom 8505  df-sdom 8506  df-fin 8507  df-sup 8900  df-inf 8901  df-oi 8968  df-card 9362  df-pnf 10671  df-mnf 10672  df-xr 10673  df-ltxr 10674  df-le 10675  df-sub 10866  df-neg 10867  df-div 11292  df-nn 11633  df-2 11694  df-3 11695  df-n0 11892  df-z 11976  df-uz 12238  df-rp 12384  df-fz 12887  df-fzo 13028  df-fl 13156  df-mod 13232  df-seq 13364  df-exp 13424  df-hash 13685  df-cj 14452  df-re 14453  df-im 14454  df-sqrt 14588  df-abs 14589  df-clim 14839  df-prod 15254  df-dvds 15602  df-gcd 15838  df-lcm 15928  df-lcmf 15929
This theorem is referenced by:  lcmfunsnlem2lem2  15977
  Copyright terms: Public domain W3C validator