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

Theorem lcmfunsnlem2lem1 16565
Description: Lemma 1 for lcmfunsnlem2 16567. (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 1915 . . 3 𝑘(0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)
2 nfv 1915 . . . 4 𝑘 𝑛 ∈ ℤ
3 nfv 1915 . . . . 5 𝑘(𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)
4 nfra1 3260 . . . . . 6 𝑘𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)
5 nfv 1915 . . . . . 6 𝑘𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)
64, 5nfan 1900 . . . . 5 𝑘(∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))
73, 6nfan 1900 . . . 4 𝑘((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)))
82, 7nfan 1900 . . 3 𝑘(𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛))))
91, 8nfan 1900 . 2 𝑘((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑛 ∈ ℤ ∧ ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ∧ ∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛)))))
10 simprr 772 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑘 ∈ ℕ)
11 simp2 1137 . . . . . . . . . . . . . . . . . 18 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → 𝑦 ⊆ ℤ)
12 snssi 4764 . . . . . . . . . . . . . . . . . . 19 (𝑧 ∈ ℤ → {𝑧} ⊆ ℤ)
13123ad2ant1 1133 . . . . . . . . . . . . . . . . . 18 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → {𝑧} ⊆ ℤ)
1411, 13unssd 4144 . . . . . . . . . . . . . . . . 17 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (𝑦 ∪ {𝑧}) ⊆ ℤ)
15 simp3 1138 . . . . . . . . . . . . . . . . . 18 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → 𝑦 ∈ Fin)
16 snfi 8980 . . . . . . . . . . . . . . . . . 18 {𝑧} ∈ Fin
17 unfi 9095 . . . . . . . . . . . . . . . . . 18 ((𝑦 ∈ Fin ∧ {𝑧} ∈ Fin) → (𝑦 ∪ {𝑧}) ∈ Fin)
1815, 16, 17sylancl 586 . . . . . . . . . . . . . . . . 17 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (𝑦 ∪ {𝑧}) ∈ Fin)
1914, 18jca 511 . . . . . . . . . . . . . . . 16 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → ((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin))
20 lcmfcl 16555 . . . . . . . . . . . . . . . 16 (((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ0)
2119, 20syl 17 . . . . . . . . . . . . . . 15 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ0)
2221nn0zd 12513 . . . . . . . . . . . . . 14 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ)
2322adantl 481 . . . . . . . . . . . . 13 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ)
2423adantr 480 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ)
25 simprl 770 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑛 ∈ ℤ)
2610, 24, 253jca 1128 . . . . . . . . . . 11 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (𝑘 ∈ ℕ ∧ (lcm‘(𝑦 ∪ {𝑧})) ∈ ℤ ∧ 𝑛 ∈ ℤ))
2714adantl 481 . . . . . . . . . . . . . . . . . 18 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → (𝑦 ∪ {𝑧}) ⊆ ℤ)
2818adantl 481 . . . . . . . . . . . . . . . . . 18 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → (𝑦 ∪ {𝑧}) ∈ Fin)
29 df-nel 3037 . . . . . . . . . . . . . . . . . . . . . . 23 (0 ∉ 𝑦 ↔ ¬ 0 ∈ 𝑦)
3029biimpi 216 . . . . . . . . . . . . . . . . . . . . . 22 (0 ∉ 𝑦 → ¬ 0 ∈ 𝑦)
31 elsni 4597 . . . . . . . . . . . . . . . . . . . . . . . 24 (0 ∈ {𝑧} → 0 = 𝑧)
3231eqcomd 2742 . . . . . . . . . . . . . . . . . . . . . . 23 (0 ∈ {𝑧} → 𝑧 = 0)
3332necon3ai 2957 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧 ≠ 0 → ¬ 0 ∈ {𝑧})
3430, 33anim12i 613 . . . . . . . . . . . . . . . . . . . . 21 ((0 ∉ 𝑦𝑧 ≠ 0) → (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
35343adant3 1132 . . . . . . . . . . . . . . . . . . . 20 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
36 df-nel 3037 . . . . . . . . . . . . . . . . . . . . 21 (0 ∉ (𝑦 ∪ {𝑧}) ↔ ¬ 0 ∈ (𝑦 ∪ {𝑧}))
37 ioran 985 . . . . . . . . . . . . . . . . . . . . . 22 (¬ (0 ∈ 𝑦 ∨ 0 ∈ {𝑧}) ↔ (¬ 0 ∈ 𝑦 ∧ ¬ 0 ∈ {𝑧}))
38 elun 4105 . . . . . . . . . . . . . . . . . . . . . 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 1128 . . . . . . . . . . . . . . . . 17 (((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) → ((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin ∧ 0 ∉ (𝑦 ∪ {𝑧})))
4443adantr 480 . . . . . . . . . . . . . . . 16 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin ∧ 0 ∉ (𝑦 ∪ {𝑧})))
45 lcmfn0cl 16553 . . . . . . . . . . . . . . . 16 (((𝑦 ∪ {𝑧}) ⊆ ℤ ∧ (𝑦 ∪ {𝑧}) ∈ Fin ∧ 0 ∉ (𝑦 ∪ {𝑧})) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ)
4644, 45syl 17 . . . . . . . . . . . . . . 15 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm‘(𝑦 ∪ {𝑧})) ∈ ℕ)
4746nnne0d 12195 . . . . . . . . . . . . . 14 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm‘(𝑦 ∪ {𝑧})) ≠ 0)
4847neneqd 2937 . . . . . . . . . . . . 13 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ¬ (lcm‘(𝑦 ∪ {𝑧})) = 0)
49 neneq 2938 . . . . . . . . . . . . . . 15 (𝑛 ≠ 0 → ¬ 𝑛 = 0)
50493ad2ant3 1135 . . . . . . . . . . . . . 14 ((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) → ¬ 𝑛 = 0)
5150ad2antrr 726 . . . . . . . . . . . . 13 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → ¬ 𝑛 = 0)
5248, 51jca 511 . . . . . . . . . . . 12 ((((0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0) ∧ (𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (¬ (lcm‘(𝑦 ∪ {𝑧})) = 0 ∧ ¬ 𝑛 = 0))
53 ioran 985 . . . . . . . . . . . 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 4590 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 𝑧 → {𝑛} = {𝑧})
6362uneq2d 4120 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 𝑧 → (𝑦 ∪ {𝑛}) = (𝑦 ∪ {𝑧}))
6463fveq2d 6838 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑧 → (lcm‘(𝑦 ∪ {𝑛})) = (lcm‘(𝑦 ∪ {𝑧})))
65 oveq2 7366 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑧 → ((lcm𝑦) lcm 𝑛) = ((lcm𝑦) lcm 𝑧))
6664, 65eqeq12d 2752 . . . . . . . . . . . . . . . . . 18 (𝑛 = 𝑧 → ((lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛) ↔ (lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧)))
6766rspcv 3572 . . . . . . . . . . . . . . . . 17 (𝑧 ∈ ℤ → (∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛) → (lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧)))
68673ad2ant1 1133 . . . . . . . . . . . . . . . 16 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (∀𝑛 ∈ ℤ (lcm‘(𝑦 ∪ {𝑛})) = ((lcm𝑦) lcm 𝑛) → (lcm‘(𝑦 ∪ {𝑧})) = ((lcm𝑦) lcm 𝑧)))
69 nnz 12509 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑘 ∈ ℕ → 𝑘 ∈ ℤ)
7069adantl 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℤ)
7170adantl 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑘 ∈ ℤ)
72 lcmfcl 16555 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm𝑦) ∈ ℕ0)
7372nn0zd 12513 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm𝑦) ∈ ℤ)
74733adant1 1130 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) → (lcm𝑦) ∈ ℤ)
7574ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (lcm𝑦) ∈ ℤ)
76 simpll1 1213 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → 𝑧 ∈ ℤ)
7771, 75, 763jca 1128 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) → (𝑘 ∈ ℤ ∧ (lcm𝑦) ∈ ℤ ∧ 𝑧 ∈ ℤ))
7877ad2antrr 726 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (𝑘 ∈ ℤ ∧ (lcm𝑦) ∈ ℤ ∧ 𝑧 ∈ ℤ))
79 elun1 4134 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (𝑚𝑦𝑚 ∈ (𝑦 ∪ {𝑧}))
8079orcd 873 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑚𝑦 → (𝑚 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑚 ∈ {𝑛}))
81 elun 4105 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑚 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) ↔ (𝑚 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑚 ∈ {𝑛}))
8280, 81sylibr 234 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑚𝑦𝑚 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}))
83 breq1 5101 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑖 = 𝑚 → (𝑖𝑘𝑚𝑘))
8483rspcv 3572 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑚 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑚𝑘))
8582, 84syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑚𝑦 → (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘𝑚𝑘))
8685com12 32 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘 → (𝑚𝑦𝑚𝑘))
8786adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → (𝑚𝑦𝑚𝑘))
8887ralrimiv 3127 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ∀𝑚𝑦 𝑚𝑘)
8988adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → ∀𝑚𝑦 𝑚𝑘)
90 breq2 5102 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑘 = 𝑙 → (𝑚𝑘𝑚𝑙))
9190ralbidv 3159 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑘 = 𝑙 → (∀𝑚𝑦 𝑚𝑘 ↔ ∀𝑚𝑦 𝑚𝑙))
92 breq2 5102 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑘 = 𝑙 → ((lcm𝑦) ∥ 𝑘 ↔ (lcm𝑦) ∥ 𝑙))
9391, 92imbi12d 344 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑘 = 𝑙 → ((∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ↔ (∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙)))
9493cbvralvw 3214 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘) ↔ ∀𝑙 ∈ ℤ (∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙))
9570adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) → 𝑘 ∈ ℤ)
9695adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) ∧ ((𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0))) → 𝑘 ∈ ℤ)
97 breq2 5102 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑙 = 𝑘 → (𝑚𝑙𝑚𝑘))
9897ralbidv 3159 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑙 = 𝑘 → (∀𝑚𝑦 𝑚𝑙 ↔ ∀𝑚𝑦 𝑚𝑘))
99 breq2 5102 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑙 = 𝑘 → ((lcm𝑦) ∥ 𝑙 ↔ (lcm𝑦) ∥ 𝑘))
10098, 99imbi12d 344 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑙 = 𝑘 → ((∀𝑚𝑦 𝑚𝑙 → (lcm𝑦) ∥ 𝑙) ↔ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)))
101100rspcv 3572 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 4620 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑧 ∈ {𝑧}
111110olci 866 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑧𝑦𝑧 ∈ {𝑧})
112 elun 4105 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑧 ∈ (𝑦 ∪ {𝑧}) ↔ (𝑧𝑦𝑧 ∈ {𝑧}))
113111, 112mpbir 231 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑧 ∈ (𝑦 ∪ {𝑧})
114113orci 865 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑧 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑧 ∈ {𝑛})
115 elun 4105 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑧 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) ↔ (𝑧 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑧 ∈ {𝑛}))
116114, 115mpbir 231 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑧 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})
117 breq1 5101 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 = 𝑧 → (𝑖𝑘𝑧𝑘))
118117rspcv 3572 . . . . . . . . . . . . . . . . . . . . . . . 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 16535 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℤ ∧ (lcm𝑦) ∈ ℤ ∧ 𝑧 ∈ ℤ) → (((lcm𝑦) ∥ 𝑘𝑧𝑘) → ((lcm𝑦) lcm 𝑧) ∥ 𝑘))
12378, 121, 122sylc 65 . . . . . . . . . . . . . . . . . . . 20 ((((((𝑧 ∈ ℤ ∧ 𝑦 ⊆ ℤ ∧ 𝑦 ∈ Fin) ∧ ∀𝑘 ∈ ℤ (∀𝑚𝑦 𝑚𝑘 → (lcm𝑦) ∥ 𝑘)) ∧ (𝑛 ∈ ℤ ∧ 𝑘 ∈ ℕ)) ∧ (0 ∉ 𝑦𝑧 ≠ 0 ∧ 𝑛 ≠ 0)) ∧ ∀𝑖 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})𝑖𝑘) → ((lcm𝑦) lcm 𝑧) ∥ 𝑘)
124 breq1 5101 . . . . . . . . . . . . . . . . . . . 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 4620 . . . . . . . . 9 𝑛 ∈ {𝑛}
141140olci 866 . . . . . . . 8 (𝑛 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑛 ∈ {𝑛})
142 elun 4105 . . . . . . . 8 (𝑛 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛}) ↔ (𝑛 ∈ (𝑦 ∪ {𝑧}) ∨ 𝑛 ∈ {𝑛}))
143141, 142mpbir 231 . . . . . . 7 𝑛 ∈ ((𝑦 ∪ {𝑧}) ∪ {𝑛})
144 breq1 5101 . . . . . . . 8 (𝑖 = 𝑛 → (𝑖𝑘𝑛𝑘))
145144rspcv 3572 . . . . . . 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 16526 . . . 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 3234 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 847  w3a 1086   = wceq 1541  wcel 2113  wne 2932  wnel 3036  wral 3051  cun 3899  wss 3901  {csn 4580   class class class wbr 5098  cfv 6492  (class class class)co 7358  Fincfn 8883  0cc0 11026  cle 11167  cn 12145  0cn0 12401  cz 12488  cdvds 16179   lcm clcm 16515  lcmclcmf 16516
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2184  ax-ext 2708  ax-rep 5224  ax-sep 5241  ax-nul 5251  ax-pow 5310  ax-pr 5377  ax-un 7680  ax-inf2 9550  ax-cnex 11082  ax-resscn 11083  ax-1cn 11084  ax-icn 11085  ax-addcl 11086  ax-addrcl 11087  ax-mulcl 11088  ax-mulrcl 11089  ax-mulcom 11090  ax-addass 11091  ax-mulass 11092  ax-distr 11093  ax-i2m1 11094  ax-1ne0 11095  ax-1rid 11096  ax-rnegex 11097  ax-rrecex 11098  ax-cnre 11099  ax-pre-lttri 11100  ax-pre-lttrn 11101  ax-pre-ltadd 11102  ax-pre-mulgt0 11103  ax-pre-sup 11104
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3350  df-reu 3351  df-rab 3400  df-v 3442  df-sbc 3741  df-csb 3850  df-dif 3904  df-un 3906  df-in 3908  df-ss 3918  df-pss 3921  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4581  df-pr 4583  df-op 4587  df-uni 4864  df-int 4903  df-iun 4948  df-br 5099  df-opab 5161  df-mpt 5180  df-tr 5206  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-se 5578  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  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 7315  df-ov 7361  df-oprab 7362  df-mpo 7363  df-om 7809  df-1st 7933  df-2nd 7934  df-frecs 8223  df-wrecs 8254  df-recs 8303  df-rdg 8341  df-1o 8397  df-er 8635  df-en 8884  df-dom 8885  df-sdom 8886  df-fin 8887  df-sup 9345  df-inf 9346  df-oi 9415  df-card 9851  df-pnf 11168  df-mnf 11169  df-xr 11170  df-ltxr 11171  df-le 11172  df-sub 11366  df-neg 11367  df-div 11795  df-nn 12146  df-2 12208  df-3 12209  df-n0 12402  df-z 12489  df-uz 12752  df-rp 12906  df-fz 13424  df-fzo 13571  df-fl 13712  df-mod 13790  df-seq 13925  df-exp 13985  df-hash 14254  df-cj 15022  df-re 15023  df-im 15024  df-sqrt 15158  df-abs 15159  df-clim 15411  df-prod 15827  df-dvds 16180  df-gcd 16422  df-lcm 16517  df-lcmf 16518
This theorem is referenced by:  lcmfunsnlem2lem2  16566
  Copyright terms: Public domain W3C validator