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

Theorem lcmfunsnlem2lem1 16577
Description: Lemma 1 for lcmfunsnlem2 16579. (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 1916 . . 3 𝑘(0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)
2 nfv 1916 . . . 4 𝑘 𝑛 ∈ ℤ
3 nfv 1916 . . . . 5 𝑘(𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)
4 nfra1 3262 . . . . . 6 𝑘𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)
5 nfv 1916 . . . . . 6 𝑘𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)
64, 5nfan 1901 . . . . 5 𝑘(∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))
73, 6nfan 1901 . . . 4 𝑘((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)))
82, 7nfan 1901 . . 3 𝑘(𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))
91, 8nfan 1901 . 2 𝑘((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)))))
10 simprr 773 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑘 ∈ ℕ)
11 simp2 1138 . . . . . . . . . . . . . . . . . 18 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → 𝑦 ⊆ ℤ)
12 snssi 4766 . . . . . . . . . . . . . . . . . . 19 (𝑧 ∈ ℤ → {𝑧} ⊆ ℤ)
13123ad2ant1 1134 . . . . . . . . . . . . . . . . . 18 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → {𝑧} ⊆ ℤ)
1411, 13unssd 4146 . . . . . . . . . . . . . . . . 17 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (𝑦 ∪ {𝑧}) ⊆ ℤ)
15 simp3 1139 . . . . . . . . . . . . . . . . . 18 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → 𝑦 ∈ Fin)
16 snfi 8992 . . . . . . . . . . . . . . . . . 18 {𝑧} ∈ Fin
17 unfi 9107 . . . . . . . . . . . . . . . . . 18 ((𝑦 ∈ Fin ∧ {𝑧} ∈ Fin) → (𝑦 ∪ {𝑧}) ∈ Fin)
1815, 16, 17sylancl 587 . . . . . . . . . . . . . . . . 17 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (𝑦 ∪ {𝑧}) ∈ Fin)
1914, 18jca 511 . . . . . . . . . . . . . . . 16 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → ((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin))
20 lcmfcl 16567 . . . . . . . . . . . . . . . 16 (((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ0)
2119, 20syl 17 . . . . . . . . . . . . . . 15 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ0)
2221nn0zd 12525 . . . . . . . . . . . . . 14 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ)
2322adantl 481 . . . . . . . . . . . . 13 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ)
2423adantr 480 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ)
25 simprl 771 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑛 ∈ ℤ)
2610, 24, 253jca 1129 . . . . . . . . . . 11 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ))
2714adantl 481 . . . . . . . . . . . . . . . . . 18 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → (𝑦 ∪ {𝑧}) ⊆ ℤ)
2818adantl 481 . . . . . . . . . . . . . . . . . 18 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → (𝑦 ∪ {𝑧}) ∈ Fin)
29 df-nel 3038 . . . . . . . . . . . . . . . . . . . . . . 23 (0 ∉ 𝑦 ↔ ¬ 0 ∈ 𝑦)
3029biimpi 216 . . . . . . . . . . . . . . . . . . . . . 22 (0 ∉ 𝑦 → ¬ 0 ∈ 𝑦)
31 elsni 4599 . . . . . . . . . . . . . . . . . . . . . . . 24 (0 ∈ {𝑧} → 0 = 𝑧)
3231eqcomd 2743 . . . . . . . . . . . . . . . . . . . . . . 23 (0 ∈ {𝑧} → 𝑧 = 0)
3332necon3ai 2958 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧 ≠ 0 → ¬ 0 ∈ {𝑧})
3430, 33anim12i 614 . . . . . . . . . . . . . . . . . . . . 21 ((0 ∉ 𝑦𝑧 ≠ 0) → (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
35343adant3 1133 . . . . . . . . . . . . . . . . . . . 20 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
36 df-nel 3038 . . . . . . . . . . . . . . . . . . . . 21 (0 ∉ (𝑦 ∪ {𝑧}) ↔ ¬ 0 ∈ (𝑦 ∪ {𝑧}))
37 ioran 986 . . . . . . . . . . . . . . . . . . . . . 22 (¬ (0 ∈ 𝑦 ∨ 0 ∈ {𝑧}) ↔ (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
38 elun 4107 . . . . . . . . . . . . . . . . . . . . . 22 (0 ∈ (𝑦 ∪ {𝑧}) ↔ (0 ∈ 𝑦 ∨ 0 ∈ {𝑧}))
3937, 38xchnxbir 333 . . . . . . . . . . . . . . . . . . . . 21 (¬ 0 ∈ (𝑦 ∪ {𝑧}) ↔ (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
4036, 39bitri 275 . . . . . . . . . . . . . . . . . . . 20 (0 ∉ (𝑦 ∪ {𝑧}) ↔ (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
4135, 40sylibr 234 . . . . . . . . . . . . . . . . . . 19 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → 0 ∉ (𝑦 ∪ {𝑧}))
4241adantr 480 . . . . . . . . . . . . . . . . . 18 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → 0 ∉ (𝑦 ∪ {𝑧}))
4327, 28, 423jca 1129 . . . . . . . . . . . . . . . . 17 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → ((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin ∧ 0 ∉ (𝑦 ∪ {𝑧})))
4443adantr 480 . . . . . . . . . . . . . . . 16 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin ∧ 0 ∉ (𝑦 ∪ {𝑧})))
45 lcmfn0cl 16565 . . . . . . . . . . . . . . . 16 (((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin ∧ 0 ∉ (𝑦 ∪ {𝑧})) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ)
4644, 45syl 17 . . . . . . . . . . . . . . 15 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ)
4746nnne0d 12207 . . . . . . . . . . . . . 14 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm‘(𝑦 ∪ {𝑧})) ≠ 0)
4847neneqd 2938 . . . . . . . . . . . . 13 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ¬ (lcm‘(𝑦 ∪ {𝑧})) = 0)
49 neneq 2939 . . . . . . . . . . . . . . 15 (𝑛 ≠ 0 → ¬ 𝑛 = 0)
50493ad2ant3 1136 . . . . . . . . . . . . . 14 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → ¬ 𝑛 = 0)
5150ad2antrr 727 . . . . . . . . . . . . 13 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ¬ 𝑛 = 0)
5248, 51jca 511 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (¬ (lcm‘(𝑦 ∪ {𝑧})) = 0 ∧ ¬ 𝑛 = 0))
53 ioran 986 . . . . . . . . . . . 12 (¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0) ↔ (¬ (lcm‘(𝑦 ∪ {𝑧})) = 0 ∧ ¬ 𝑛 = 0))
5452, 53sylibr 234 . . . . . . . . . . 11 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0))
5526, 54jca 511 . . . . . . . . . 10 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0)))
5655exp43 436 . . . . . . . . 9 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (𝑛 ∈ ℤ → (𝑘 ∈ ℕ → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0))))))
5756adantrd 491 . . . . . . . 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 418 . . . . . 6 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) → (𝑘 ∈ ℕ → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0))))
6059imp 406 . . . . 5 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0)))
6160adantr 480 . . . 4 (((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0)))
62 sneq 4592 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 𝑧 → {𝑛} = {𝑧})
6362uneq2d 4122 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 𝑧 → (𝑦 ∪ {𝑛}) = (𝑦 ∪ {𝑧}))
6463fveq2d 6846 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑧 → (lcm‘(𝑦 ∪ {𝑛})) = (lcm‘(𝑦 ∪ {𝑧})))
65 oveq2 7376 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑧 → ((lcm𝑦) lcm 𝑛) = ((lcm𝑦) lcm 𝑧))
6664, 65eqeq12d 2753 . . . . . . . . . . . . . . . . . 18 (𝑛 = 𝑧 → ((lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛) ↔ (lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧)))
6766rspcv 3574 . . . . . . . . . . . . . . . . 17 (𝑧 ∈ ℤ → (∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛) → (lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧)))
68673ad2ant1 1134 . . . . . . . . . . . . . . . 16 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛) → (lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧)))
69 nnz 12521 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑘 ∈ ℕ → 𝑘 ∈ ℤ)
7069adantl 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℤ)
7170adantl 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑘 ∈ ℤ)
72 lcmfcl 16567 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm𝑦) ∈ ℕ0)
7372nn0zd 12525 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm𝑦) ∈ ℤ)
74733adant1 1131 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm𝑦) ∈ ℤ)
7574ad2antrr 727 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm𝑦) ∈ ℤ)
76 simpll1 1214 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑧 ∈ ℤ)
7771, 75, 763jca 1129 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (𝑘 ∈ ℤ ∧ (lcm𝑦) ∈ ℤ ∧ 𝑧 ∈ ℤ))
7877ad2antrr 727 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (𝑘 ∈ ℤ ∧ (lcm𝑦) ∈ ℤ ∧ 𝑧 ∈ ℤ))
79 elun1 4136 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (𝑚𝑦𝑚 ∈ (𝑦 ∪ {𝑧}))
8079orcd 874 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑚𝑦 → (𝑚 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑚 ∈ {𝑛}))
81 elun 4107 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑚 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) ↔ (𝑚 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑚 ∈ {𝑛}))
8280, 81sylibr 234 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑚𝑦𝑚 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}))
83 breq1 5103 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑖 = 𝑚 → (𝑖𝑘𝑚𝑘))
8483rspcv 3574 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑚 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑚𝑘))
8582, 84syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑚𝑦 → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑚𝑘))
8685com12 32 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (𝑚𝑦𝑚𝑘))
8786adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (𝑚𝑦𝑚𝑘))
8887ralrimiv 3129 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ∀𝑚𝑦 𝑚𝑘)
8988adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → ∀𝑚𝑦 𝑚𝑘)
90 breq2 5104 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑘 = 𝑙 → (𝑚𝑘𝑚𝑙))
9190ralbidv 3161 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑘 = 𝑙 → (∀𝑚𝑦 𝑚𝑘 ↔ ∀𝑚𝑦 𝑚𝑙))
92 breq2 5104 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑘 = 𝑙 → ((lcm𝑦) ∥ 𝑘 ↔ (lcm𝑦) ∥ 𝑙))
9391, 92imbi12d 344 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑘 = 𝑙 → ((∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ↔ (∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙)))
9493cbvralvw 3216 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ↔ ∀𝑙 ∈ ℤ (∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙))
9570adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → 𝑘 ∈ ℤ)
9695adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → 𝑘 ∈ ℤ)
97 breq2 5104 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑙 = 𝑘 → (𝑚𝑙𝑚𝑘))
9897ralbidv 3161 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑙 = 𝑘 → (∀𝑚𝑦 𝑚𝑙 ↔ ∀𝑚𝑦 𝑚𝑘))
99 breq2 5104 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑙 = 𝑘 → ((lcm𝑦) ∥ 𝑙 ↔ (lcm𝑦) ∥ 𝑘))
10098, 99imbi12d 344 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑙 = 𝑘 → ((∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙) ↔ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)))
101100rspcv 3574 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑘 ∈ ℤ → (∀𝑙 ∈ ℤ (∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙) → (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)))
10296, 101syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → (∀𝑙 ∈ ℤ (∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙) → (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)))
10394, 102biimtrid 242 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)))
10489, 103mpid 44 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → (lcm𝑦) ∥ 𝑘))
105104exp31 419 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → (lcm𝑦) ∥ 𝑘))))
106105com24 95 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) → (((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm𝑦) ∥ 𝑘))))
107106imp 406 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) → (((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm𝑦) ∥ 𝑘)))
108107impl 455 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm𝑦) ∥ 𝑘))
109108imp 406 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (lcm𝑦) ∥ 𝑘)
110 vsnid 4622 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑧 ∈ {𝑧}
111110olci 867 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑧𝑦𝑧 ∈ {𝑧})
112 elun 4107 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑧 ∈ (𝑦 ∪ {𝑧}) ↔ (𝑧𝑦𝑧 ∈ {𝑧}))
113111, 112mpbir 231 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑧 ∈ (𝑦 ∪ {𝑧})
114113orci 866 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑧 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑧 ∈ {𝑛})
115 elun 4107 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑧 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) ↔ (𝑧 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑧 ∈ {𝑛}))
116114, 115mpbir 231 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑧 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})
117 breq1 5103 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 = 𝑧 → (𝑖𝑘𝑧𝑘))
118117rspcv 3574 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑧 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑧𝑘))
119116, 118mp1i 13 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑧𝑘))
120119imp 406 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → 𝑧𝑘)
121109, 120jca 511 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((lcm𝑦) ∥ 𝑘𝑧𝑘))
122 lcmdvds 16547 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℤ ∧ (lcm𝑦) ∈ ℤ ∧ 𝑧 ∈ ℤ) → (((lcm𝑦) ∥ 𝑘𝑧𝑘) → ((lcm𝑦) lcm 𝑧) ∥ 𝑘))
12378, 121, 122sylc 65 . . . . . . . . . . . . . . . . . . . 20 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((lcm𝑦) lcm 𝑧) ∥ 𝑘)
124 breq1 5103 . . . . . . . . . . . . . . . . . . . 20 ((lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧) → ((lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘 ↔ ((lcm𝑦) lcm 𝑧) ∥ 𝑘))
125123, 124imbitrrid 246 . . . . . . . . . . . . . . . . . . 19 ((lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧) → ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))
126125expd 415 . . . . . . . . . . . . . . . . . 18 ((lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧) → (((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘)))
127126exp5j 445 . . . . . . . . . . . . . . . . 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 418 . . . . . . . . . . . . 13 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))) → ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) → ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))))
132131expd 415 . . . . . . . . . . . 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 406 . . . . . . . . 9 ((𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)))) → ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (𝑘 ∈ ℕ → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))))
136135com12 32 . . . . . . . 8 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → ((𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)))) → (𝑘 ∈ ℕ → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))))
137136imp 406 . . . . . . 7 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) → (𝑘 ∈ ℕ → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘)))
138137imp 406 . . . . . 6 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘))
139138imp 406 . . . . 5 (((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘)
140 vsnid 4622 . . . . . . . . 9 𝑛 ∈ {𝑛}
141140olci 867 . . . . . . . 8 (𝑛 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑛 ∈ {𝑛})
142 elun 4107 . . . . . . . 8 (𝑛 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) ↔ (𝑛 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑛 ∈ {𝑛}))
143141, 142mpbir 231 . . . . . . 7 𝑛 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})
144 breq1 5103 . . . . . . . 8 (𝑖 = 𝑛 → (𝑖𝑘𝑛𝑘))
145144rspcv 3574 . . . . . . 7 (𝑛 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑛𝑘))
146143, 145mp1i 13 . . . . . 6 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑛𝑘))
147146imp 406 . . . . 5 (((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → 𝑛𝑘)
148139, 147jca 511 . . . 4 (((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘𝑛𝑘))
149 lcmledvds 16538 . . . 4 (((𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ) ∧ ¬ ((lcm‘(𝑦 ∪ {𝑧})) = 0 ∨ 𝑛 = 0)) → (((lcm‘(𝑦 ∪ {𝑧})) ∥ 𝑘𝑛𝑘) → ((lcm‘(𝑦 ∪ {𝑧})) lcm 𝑛) ≤ 𝑘))
15061, 148, 149sylc 65 . . 3 (((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) ∧ 𝑘 ∈ ℕ) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((lcm‘(𝑦 ∪ {𝑧})) lcm 𝑛) ≤ 𝑘)
151150exp31 419 . 2 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) → (𝑘 ∈ ℕ → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → ((lcm‘(𝑦 ∪ {𝑧})) lcm 𝑛) ≤ 𝑘)))
1529, 151ralrimi 3236 1 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))) → ∀𝑘 ∈ ℕ (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → ((lcm‘(𝑦 ∪ {𝑧})) lcm 𝑛) ≤ 𝑘))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  wo 848  w3a 1087   = wceq 1542  wcel 2114  wne 2933  wnel 3037  wral 3052  cun 3901  wss 3903  {csn 4582   class class class wbr 5100  cfv 6500  (class class class)co 7368  Fincfn 8895  0cc0 11038  cle 11179  cn 12157  0cn0 12413  cz 12500  cdvds 16191   lcm clcm 16527  lcmclcmf 16528
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5226  ax-sep 5243  ax-nul 5253  ax-pow 5312  ax-pr 5379  ax-un 7690  ax-inf2 9562  ax-cnex 11094  ax-resscn 11095  ax-1cn 11096  ax-icn 11097  ax-addcl 11098  ax-addrcl 11099  ax-mulcl 11100  ax-mulrcl 11101  ax-mulcom 11102  ax-addass 11103  ax-mulass 11104  ax-distr 11105  ax-i2m1 11106  ax-1ne0 11107  ax-1rid 11108  ax-rnegex 11109  ax-rrecex 11110  ax-cnre 11111  ax-pre-lttri 11112  ax-pre-lttrn 11113  ax-pre-ltadd 11114  ax-pre-mulgt0 11115  ax-pre-sup 11116
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3352  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-int 4905  df-iun 4950  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5527  df-eprel 5532  df-po 5540  df-so 5541  df-fr 5585  df-se 5586  df-we 5587  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-pred 6267  df-ord 6328  df-on 6329  df-lim 6330  df-suc 6331  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-isom 6509  df-riota 7325  df-ov 7371  df-oprab 7372  df-mpo 7373  df-om 7819  df-1st 7943  df-2nd 7944  df-frecs 8233  df-wrecs 8264  df-recs 8313  df-rdg 8351  df-1o 8407  df-er 8645  df-en 8896  df-dom 8897  df-sdom 8898  df-fin 8899  df-sup 9357  df-inf 9358  df-oi 9427  df-card 9863  df-pnf 11180  df-mnf 11181  df-xr 11182  df-ltxr 11183  df-le 11184  df-sub 11378  df-neg 11379  df-div 11807  df-nn 12158  df-2 12220  df-3 12221  df-n0 12414  df-z 12501  df-uz 12764  df-rp 12918  df-fz 13436  df-fzo 13583  df-fl 13724  df-mod 13802  df-seq 13937  df-exp 13997  df-hash 14266  df-cj 15034  df-re 15035  df-im 15036  df-sqrt 15170  df-abs 15171  df-clim 15423  df-prod 15839  df-dvds 16192  df-gcd 16434  df-lcm 16529  df-lcmf 16530
This theorem is referenced by:  lcmfunsnlem2lem2  16578
  Copyright terms: Public domain W3C validator