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

Theorem lcmfunsnlem2lem1 16605
Description: Lemma 1 for lcmfunsnlem2 16607. (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 1921 . . 3 𝑘(0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)
2 nfv 1921 . . . 4 𝑘 𝑛 ∈ ℤ
3 nfv 1921 . . . . 5 𝑘(𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)
4 nfra1 3264 . . . . . 6 𝑘𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)
5 nfv 1921 . . . . . 6 𝑘𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)
64, 5nfan 1906 . . . . 5 𝑘(∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))
73, 6nfan 1906 . . . 4 𝑘((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)))
82, 7nfan 1906 . . 3 𝑘(𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))
91, 8nfan 1906 . 2 𝑘((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)))))
10 simprr 778 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑘 ∈ ℕ)
11 simp2 1143 . . . . . . . . . . . . . . . . . 18 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → 𝑦 ⊆ ℤ)
12 snssi 4724 . . . . . . . . . . . . . . . . . . 19 (𝑧 ∈ ℤ → {𝑧} ⊆ ℤ)
13123ad2ant1 1139 . . . . . . . . . . . . . . . . . 18 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → {𝑧} ⊆ ℤ)
1411, 13unssd 4128 . . . . . . . . . . . . . . . . 17 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (𝑦 ∪ {𝑧}) ⊆ ℤ)
15 simp3 1144 . . . . . . . . . . . . . . . . . 18 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → 𝑦 ∈ Fin)
16 snfi 8987 . . . . . . . . . . . . . . . . . 18 {𝑧} ∈ Fin
17 unfi 9102 . . . . . . . . . . . . . . . . . 18 ((𝑦 ∈ Fin ∧ {𝑧} ∈ Fin) → (𝑦 ∪ {𝑧}) ∈ Fin)
1815, 16, 17sylancl 592 . . . . . . . . . . . . . . . . 17 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (𝑦 ∪ {𝑧}) ∈ Fin)
1914, 18jca 516 . . . . . . . . . . . . . . . 16 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → ((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin))
20 lcmfcl 16595 . . . . . . . . . . . . . . . 16 (((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ0)
2119, 20syl 17 . . . . . . . . . . . . . . 15 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ0)
2221nn0zd 12547 . . . . . . . . . . . . . 14 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ)
2322adantl 482 . . . . . . . . . . . . 13 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ)
2423adantr 481 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ)
25 simprl 776 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑛 ∈ ℤ)
2610, 24, 253jca 1134 . . . . . . . . . . 11 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ))
2714adantl 482 . . . . . . . . . . . . . . . . . 18 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → (𝑦 ∪ {𝑧}) ⊆ ℤ)
2818adantl 482 . . . . . . . . . . . . . . . . . 18 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → (𝑦 ∪ {𝑧}) ∈ Fin)
29 df-nel 3040 . . . . . . . . . . . . . . . . . . . . . . 23 (0 ∉ 𝑦 ↔ ¬ 0 ∈ 𝑦)
3029biimpi 217 . . . . . . . . . . . . . . . . . . . . . 22 (0 ∉ 𝑦 → ¬ 0 ∈ 𝑦)
31 elsni 4579 . . . . . . . . . . . . . . . . . . . . . . . 24 (0 ∈ {𝑧} → 0 = 𝑧)
3231eqcomd 2746 . . . . . . . . . . . . . . . . . . . . . . 23 (0 ∈ {𝑧} → 𝑧 = 0)
3332necon3ai 2960 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧 ≠ 0 → ¬ 0 ∈ {𝑧})
3430, 33anim12i 619 . . . . . . . . . . . . . . . . . . . . 21 ((0 ∉ 𝑦𝑧 ≠ 0) → (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
35343adant3 1138 . . . . . . . . . . . . . . . . . . . 20 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
36 df-nel 3040 . . . . . . . . . . . . . . . . . . . . 21 (0 ∉ (𝑦 ∪ {𝑧}) ↔ ¬ 0 ∈ (𝑦 ∪ {𝑧}))
37 ioran 991 . . . . . . . . . . . . . . . . . . . . . 22 (¬ (0 ∈ 𝑦 ∨ 0 ∈ {𝑧}) ↔ (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
38 elun 4090 . . . . . . . . . . . . . . . . . . . . . 22 (0 ∈ (𝑦 ∪ {𝑧}) ↔ (0 ∈ 𝑦 ∨ 0 ∈ {𝑧}))
3937, 38xchnxbir 334 . . . . . . . . . . . . . . . . . . . . 21 (¬ 0 ∈ (𝑦 ∪ {𝑧}) ↔ (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
4036, 39bitri 276 . . . . . . . . . . . . . . . . . . . 20 (0 ∉ (𝑦 ∪ {𝑧}) ↔ (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
4135, 40sylibr 235 . . . . . . . . . . . . . . . . . . 19 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → 0 ∉ (𝑦 ∪ {𝑧}))
4241adantr 481 . . . . . . . . . . . . . . . . . 18 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → 0 ∉ (𝑦 ∪ {𝑧}))
4327, 28, 423jca 1134 . . . . . . . . . . . . . . . . 17 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → ((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin ∧ 0 ∉ (𝑦 ∪ {𝑧})))
4443adantr 481 . . . . . . . . . . . . . . . 16 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin ∧ 0 ∉ (𝑦 ∪ {𝑧})))
45 lcmfn0cl 16593 . . . . . . . . . . . . . . . 16 (((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin ∧ 0 ∉ (𝑦 ∪ {𝑧})) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ)
4644, 45syl 17 . . . . . . . . . . . . . . 15 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ)
4746nnne0d 12225 . . . . . . . . . . . . . 14 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm‘(𝑦 ∪ {𝑧})) ≠ 0)
4847neneqd 2940 . . . . . . . . . . . . 13 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ¬ (lcm‘(𝑦 ∪ {𝑧})) = 0)
49 neneq 2941 . . . . . . . . . . . . . . 15 (𝑛 ≠ 0 → ¬ 𝑛 = 0)
50493ad2ant3 1141 . . . . . . . . . . . . . 14 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → ¬ 𝑛 = 0)
5150ad2antrr 732 . . . . . . . . . . . . 13 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ¬ 𝑛 = 0)
5248, 51jca 516 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (¬ (lcm‘(𝑦 ∪ {𝑧})) = 0 ∧ ¬ 𝑛 = 0))
53 ioran 991 . . . . . . . . . . . 12 (¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0) ↔ (¬ (lcm‘(𝑦 ∪ {𝑧})) = 0 ∧ ¬ 𝑛 = 0))
5452, 53sylibr 235 . . . . . . . . . . 11 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0))
5526, 54jca 516 . . . . . . . . . 10 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0)))
5655exp43 437 . . . . . . . . 9 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (𝑛 ∈ ℤ → (𝑘 ∈ ℕ → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0))))))
5756adantrd 492 . . . . . . . 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 419 . . . . . 6 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) → (𝑘 ∈ ℕ → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0))))
6059imp 407 . . . . 5 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0)))
6160adantr 481 . . . 4 (((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0)))
62 sneq 4572 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 𝑧 → {𝑛} = {𝑧})
6362uneq2d 4105 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 𝑧 → (𝑦 ∪ {𝑛}) = (𝑦 ∪ {𝑧}))
6463fveq2d 6838 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑧 → (lcm‘(𝑦 ∪ {𝑛})) = (lcm‘(𝑦 ∪ {𝑧})))
65 oveq2 7371 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑧 → ((lcm𝑦) lcm 𝑛) = ((lcm𝑦) lcm 𝑧))
6664, 65eqeq12d 2756 . . . . . . . . . . . . . . . . . 18 (𝑛 = 𝑧 → ((lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛) ↔ (lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧)))
6766rspcv 3563 . . . . . . . . . . . . . . . . 17 (𝑧 ∈ ℤ → (∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛) → (lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧)))
68673ad2ant1 1139 . . . . . . . . . . . . . . . 16 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛) → (lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧)))
69 nnz 12543 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑘 ∈ ℕ → 𝑘 ∈ ℤ)
7069adantl 482 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℤ)
7170adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑘 ∈ ℤ)
72 lcmfcl 16595 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm𝑦) ∈ ℕ0)
7372nn0zd 12547 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm𝑦) ∈ ℤ)
74733adant1 1136 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm𝑦) ∈ ℤ)
7574ad2antrr 732 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm𝑦) ∈ ℤ)
76 simpll1 1219 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑧 ∈ ℤ)
7771, 75, 763jca 1134 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (𝑘 ∈ ℤ ∧ (lcm𝑦) ∈ ℤ ∧ 𝑧 ∈ ℤ))
7877ad2antrr 732 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (𝑘 ∈ ℤ ∧ (lcm𝑦) ∈ ℤ ∧ 𝑧 ∈ ℤ))
79 elun1 4118 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (𝑚𝑦𝑚 ∈ (𝑦 ∪ {𝑧}))
8079orcd 879 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑚𝑦 → (𝑚 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑚 ∈ {𝑛}))
81 elun 4090 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑚 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) ↔ (𝑚 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑚 ∈ {𝑛}))
8280, 81sylibr 235 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑚𝑦𝑚 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}))
83 breq1 5082 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑖 = 𝑚 → (𝑖𝑘𝑚𝑘))
8483rspcv 3563 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑚 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑚𝑘))
8582, 84syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑚𝑦 → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑚𝑘))
8685com12 32 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (𝑚𝑦𝑚𝑘))
8786adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (𝑚𝑦𝑚𝑘))
8887ralrimiv 3131 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ∀𝑚𝑦 𝑚𝑘)
8988adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → ∀𝑚𝑦 𝑚𝑘)
90 breq2 5083 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑘 = 𝑙 → (𝑚𝑘𝑚𝑙))
9190ralbidv 3163 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑘 = 𝑙 → (∀𝑚𝑦 𝑚𝑘 ↔ ∀𝑚𝑦 𝑚𝑙))
92 breq2 5083 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑘 = 𝑙 → ((lcm𝑦) ∥ 𝑘 ↔ (lcm𝑦) ∥ 𝑙))
9391, 92imbi12d 345 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑘 = 𝑙 → ((∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ↔ (∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙)))
9493cbvralvw 3218 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ↔ ∀𝑙 ∈ ℤ (∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙))
9570adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → 𝑘 ∈ ℤ)
9695adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → 𝑘 ∈ ℤ)
97 breq2 5083 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑙 = 𝑘 → (𝑚𝑙𝑚𝑘))
9897ralbidv 3163 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑙 = 𝑘 → (∀𝑚𝑦 𝑚𝑙 ↔ ∀𝑚𝑦 𝑚𝑘))
99 breq2 5083 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑙 = 𝑘 → ((lcm𝑦) ∥ 𝑙 ↔ (lcm𝑦) ∥ 𝑘))
10098, 99imbi12d 345 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑙 = 𝑘 → ((∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙) ↔ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)))
101100rspcv 3563 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑘 ∈ ℤ → (∀𝑙 ∈ ℤ (∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙) → (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)))
10296, 101syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → (∀𝑙 ∈ ℤ (∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙) → (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)))
10394, 102biimtrid 243 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)))
10489, 103mpid 44 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → (lcm𝑦) ∥ 𝑘))
105104exp31 420 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → (lcm𝑦) ∥ 𝑘))))
106105com24 95 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → (((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm𝑦) ∥ 𝑘))))
107106imp 407 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) → (((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm𝑦) ∥ 𝑘)))
108107impl 456 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm𝑦) ∥ 𝑘))
109108imp 407 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (lcm𝑦) ∥ 𝑘)
110 vsnid 4602 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑧 ∈ {𝑧}
111110olci 872 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑧𝑦𝑧 ∈ {𝑧})
112 elun 4090 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑧 ∈ (𝑦 ∪ {𝑧}) ↔ (𝑧𝑦𝑧 ∈ {𝑧}))
113111, 112mpbir 232 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑧 ∈ (𝑦 ∪ {𝑧})
114113orci 871 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑧 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑧 ∈ {𝑛})
115 elun 4090 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑧 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) ↔ (𝑧 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑧 ∈ {𝑛}))
116114, 115mpbir 232 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑧 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})
117 breq1 5082 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 = 𝑧 → (𝑖𝑘𝑧𝑘))
118117rspcv 3563 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑧 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑧𝑘))
119116, 118mp1i 13 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑧𝑘))
120119imp 407 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → 𝑧𝑘)
121109, 120jca 516 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((lcm𝑦) ∥ 𝑘𝑧𝑘))
122 lcmdvds 16575 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℤ ∧ (lcm𝑦) ∈ ℤ ∧ 𝑧 ∈ ℤ) → (((lcm𝑦) ∥ 𝑘𝑧𝑘) → ((lcm𝑦) lcm 𝑧) ∥ 𝑘))
12378, 121, 122sylc 65 . . . . . . . . . . . . . . . . . . . 20 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((lcm𝑦) lcm 𝑧) ∥ 𝑘)
124 breq1 5082 . . . . . . . . . . . . . . . . . . . 20 ((lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧) → ((lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘 ↔ ((lcm𝑦) lcm 𝑧) ∥ 𝑘))
125123, 124imbitrrid 247 . . . . . . . . . . . . . . . . . . 19 ((lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧) → ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))
126125expd 416 . . . . . . . . . . . . . . . . . 18 ((lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧) → (((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘)))
127126exp5j 446 . . . . . . . . . . . . . . . . 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 419 . . . . . . . . . . . . 13 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))) → ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) → ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))))
132131expd 416 . . . . . . . . . . . 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 407 . . . . . . . . 9 ((𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)))) → ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (𝑘 ∈ ℕ → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))))
136135com12 32 . . . . . . . 8 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → ((𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)))) → (𝑘 ∈ ℕ → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))))
137136imp 407 . . . . . . 7 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) → (𝑘 ∈ ℕ → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘)))
138137imp 407 . . . . . 6 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))
139138imp 407 . . . . 5 (((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘)
140 vsnid 4602 . . . . . . . . 9 𝑛 ∈ {𝑛}
141140olci 872 . . . . . . . 8 (𝑛 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑛 ∈ {𝑛})
142 elun 4090 . . . . . . . 8 (𝑛 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) ↔ (𝑛 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑛 ∈ {𝑛}))
143141, 142mpbir 232 . . . . . . 7 𝑛 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})
144 breq1 5082 . . . . . . . 8 (𝑖 = 𝑛 → (𝑖𝑘𝑛𝑘))
145144rspcv 3563 . . . . . . 7 (𝑛 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑛𝑘))
146143, 145mp1i 13 . . . . . 6 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑛𝑘))
147146imp 407 . . . . 5 (((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → 𝑛𝑘)
148139, 147jca 516 . . . 4 (((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘𝑛𝑘))
149 lcmledvds 16566 . . . 4 (((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0)) → (((lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘𝑛𝑘) → ((lcm‘(𝑦 ∪ {𝑧})) lcm 𝑛) ≤ 𝑘))
15061, 148, 149sylc 65 . . 3 (((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((lcm‘(𝑦 ∪ {𝑧})) lcm 𝑛) ≤ 𝑘)
151150exp31 420 . 2 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) → (𝑘 ∈ ℕ → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → ((lcm‘(𝑦 ∪ {𝑧})) lcm 𝑛) ≤ 𝑘)))
1529, 151ralrimi 3238 1 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) → ∀𝑘 ∈ ℕ (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → ((lcm‘(𝑦 ∪ {𝑧})) lcm 𝑛) ≤ 𝑘))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 396  wo 853  w3a 1092   = wceq 1547  wcel 2119  wne 2935  wnel 3039  wral 3054  cun 3888  wss 3890  {csn 4562   class class class wbr 5079  cfv 6492  (class class class)co 7363  Fincfn 8890  0cc0 11036  cle 11178  cn 12172  0cn0 12435  cz 12522  cdvds 16219   lcm clcm 16555  lcmclcmf 16556
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2712  ax-rep 5206  ax-sep 5225  ax-nul 5235  ax-pow 5301  ax-pr 5369  ax-un 7685  ax-inf2 9560  ax-cnex 11092  ax-resscn 11093  ax-1cn 11094  ax-icn 11095  ax-addcl 11096  ax-addrcl 11097  ax-mulcl 11098  ax-mulrcl 11099  ax-mulcom 11100  ax-addass 11101  ax-mulass 11102  ax-distr 11103  ax-i2m1 11104  ax-1ne0 11105  ax-1rid 11106  ax-rnegex 11107  ax-rrecex 11108  ax-cnre 11109  ax-pre-lttri 11110  ax-pre-lttrn 11111  ax-pre-ltadd 11112  ax-pre-mulgt0 11113  ax-pre-sup 11114
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2719  df-cleq 2732  df-clel 2815  df-nfc 2889  df-ne 2936  df-nel 3040  df-ral 3055  df-rex 3065  df-rmo 3345  df-reu 3346  df-rab 3393  df-v 3434  df-sbc 3731  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4269  df-if 4462  df-pw 4538  df-sn 4563  df-pr 4565  df-op 4569  df-uni 4846  df-int 4885  df-iun 4930  df-br 5080  df-opab 5142  df-mpt 5161  df-tr 5187  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-se 5579  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-isom 6501  df-riota 7320  df-ov 7366  df-oprab 7367  df-mpo 7368  df-om 7814  df-1st 7938  df-2nd 7939  df-frecs 8228  df-wrecs 8259  df-recs 8308  df-rdg 8346  df-1o 8402  df-er 8640  df-en 8891  df-dom 8892  df-sdom 8893  df-fin 8894  df-sup 9352  df-inf 9353  df-oi 9422  df-card 9861  df-pnf 11179  df-mnf 11180  df-xr 11181  df-ltxr 11182  df-le 11183  df-sub 11377  df-neg 11378  df-div 11806  df-nn 12173  df-2 12242  df-3 12243  df-n0 12436  df-z 12523  df-uz 12787  df-rp 12941  df-fz 13460  df-fzo 13607  df-fl 13749  df-mod 13827  df-seq 13962  df-exp 14022  df-hash 14291  df-cj 15059  df-re 15060  df-im 15061  df-sqrt 15195  df-abs 15196  df-clim 15448  df-prod 15867  df-dvds 16220  df-gcd 16462  df-lcm 16557  df-lcmf 16558
This theorem is referenced by:  lcmfunsnlem2lem2  16606
  Copyright terms: Public domain W3C validator