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

Theorem gcdcllem1 16494
Description: Lemma for gcdn0cl 16497, gcddvds 16498 and dvdslegcd 16499. (Contributed by Paul Chapman, 21-Mar-2011.)
Hypothesis
Ref Expression
gcdcllem1.1 𝑆 = {𝑧 ∈ ℤ ∣ ∀𝑛𝐴 𝑧𝑛}
Assertion
Ref Expression
gcdcllem1 ((𝐴 ⊆ ℤ ∧ ∃𝑛𝐴 𝑛 ≠ 0) → (𝑆 ≠ ∅ ∧ ∃𝑥 ∈ ℤ ∀𝑦𝑆 𝑦𝑥))
Distinct variable groups:   𝐴,𝑛,𝑥,𝑦,𝑧   𝑥,𝑆
Allowed substitution hints:   𝑆(𝑦,𝑧,𝑛)

Proof of Theorem gcdcllem1
Dummy variable 𝑤 is distinct from all other variables.
StepHypRef Expression
1 1z 12638 . . . . 5 1 ∈ ℤ
2 ssel 3972 . . . . . . 7 (𝐴 ⊆ ℤ → (𝑛𝐴𝑛 ∈ ℤ))
3 1dvds 16268 . . . . . . 7 (𝑛 ∈ ℤ → 1 ∥ 𝑛)
42, 3syl6 35 . . . . . 6 (𝐴 ⊆ ℤ → (𝑛𝐴 → 1 ∥ 𝑛))
54ralrimiv 3135 . . . . 5 (𝐴 ⊆ ℤ → ∀𝑛𝐴 1 ∥ 𝑛)
6 breq1 5148 . . . . . . . 8 (𝑧 = 1 → (𝑧𝑛 ↔ 1 ∥ 𝑛))
76ralbidv 3168 . . . . . . 7 (𝑧 = 1 → (∀𝑛𝐴 𝑧𝑛 ↔ ∀𝑛𝐴 1 ∥ 𝑛))
8 gcdcllem1.1 . . . . . . 7 𝑆 = {𝑧 ∈ ℤ ∣ ∀𝑛𝐴 𝑧𝑛}
97, 8elrab2 3683 . . . . . 6 (1 ∈ 𝑆 ↔ (1 ∈ ℤ ∧ ∀𝑛𝐴 1 ∥ 𝑛))
109biimpri 227 . . . . 5 ((1 ∈ ℤ ∧ ∀𝑛𝐴 1 ∥ 𝑛) → 1 ∈ 𝑆)
111, 5, 10sylancr 585 . . . 4 (𝐴 ⊆ ℤ → 1 ∈ 𝑆)
1211ne0d 4335 . . 3 (𝐴 ⊆ ℤ → 𝑆 ≠ ∅)
1312adantr 479 . 2 ((𝐴 ⊆ ℤ ∧ ∃𝑛𝐴 𝑛 ≠ 0) → 𝑆 ≠ ∅)
14 neeq1 2993 . . . 4 (𝑛 = 𝑤 → (𝑛 ≠ 0 ↔ 𝑤 ≠ 0))
1514cbvrexvw 3226 . . 3 (∃𝑛𝐴 𝑛 ≠ 0 ↔ ∃𝑤𝐴 𝑤 ≠ 0)
16 breq1 5148 . . . . . . . . . . . 12 (𝑧 = 𝑦 → (𝑧𝑛𝑦𝑛))
1716ralbidv 3168 . . . . . . . . . . 11 (𝑧 = 𝑦 → (∀𝑛𝐴 𝑧𝑛 ↔ ∀𝑛𝐴 𝑦𝑛))
1817, 8elrab2 3683 . . . . . . . . . 10 (𝑦𝑆 ↔ (𝑦 ∈ ℤ ∧ ∀𝑛𝐴 𝑦𝑛))
1918simprbi 495 . . . . . . . . 9 (𝑦𝑆 → ∀𝑛𝐴 𝑦𝑛)
2018simplbi 496 . . . . . . . . . 10 (𝑦𝑆𝑦 ∈ ℤ)
21 ssel2 3973 . . . . . . . . . . . . . . 15 ((𝐴 ⊆ ℤ ∧ 𝑛𝐴) → 𝑛 ∈ ℤ)
22 dvdsleabs 16308 . . . . . . . . . . . . . . . 16 ((𝑦 ∈ ℤ ∧ 𝑛 ∈ ℤ ∧ 𝑛 ≠ 0) → (𝑦𝑛𝑦 ≤ (abs‘𝑛)))
23223expia 1118 . . . . . . . . . . . . . . 15 ((𝑦 ∈ ℤ ∧ 𝑛 ∈ ℤ) → (𝑛 ≠ 0 → (𝑦𝑛𝑦 ≤ (abs‘𝑛))))
2421, 23sylan2 591 . . . . . . . . . . . . . 14 ((𝑦 ∈ ℤ ∧ (𝐴 ⊆ ℤ ∧ 𝑛𝐴)) → (𝑛 ≠ 0 → (𝑦𝑛𝑦 ≤ (abs‘𝑛))))
2524anassrs 466 . . . . . . . . . . . . 13 (((𝑦 ∈ ℤ ∧ 𝐴 ⊆ ℤ) ∧ 𝑛𝐴) → (𝑛 ≠ 0 → (𝑦𝑛𝑦 ≤ (abs‘𝑛))))
2625com23 86 . . . . . . . . . . . 12 (((𝑦 ∈ ℤ ∧ 𝐴 ⊆ ℤ) ∧ 𝑛𝐴) → (𝑦𝑛 → (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛))))
2726ralrimiva 3136 . . . . . . . . . . 11 ((𝑦 ∈ ℤ ∧ 𝐴 ⊆ ℤ) → ∀𝑛𝐴 (𝑦𝑛 → (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛))))
2827ancoms 457 . . . . . . . . . 10 ((𝐴 ⊆ ℤ ∧ 𝑦 ∈ ℤ) → ∀𝑛𝐴 (𝑦𝑛 → (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛))))
2920, 28sylan2 591 . . . . . . . . 9 ((𝐴 ⊆ ℤ ∧ 𝑦𝑆) → ∀𝑛𝐴 (𝑦𝑛 → (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛))))
30 r19.26 3101 . . . . . . . . . 10 (∀𝑛𝐴 (𝑦𝑛 ∧ (𝑦𝑛 → (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛)))) ↔ (∀𝑛𝐴 𝑦𝑛 ∧ ∀𝑛𝐴 (𝑦𝑛 → (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛)))))
31 pm3.35 801 . . . . . . . . . . 11 ((𝑦𝑛 ∧ (𝑦𝑛 → (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛)))) → (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛)))
3231ralimi 3073 . . . . . . . . . 10 (∀𝑛𝐴 (𝑦𝑛 ∧ (𝑦𝑛 → (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛)))) → ∀𝑛𝐴 (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛)))
3330, 32sylbir 234 . . . . . . . . 9 ((∀𝑛𝐴 𝑦𝑛 ∧ ∀𝑛𝐴 (𝑦𝑛 → (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛)))) → ∀𝑛𝐴 (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛)))
3419, 29, 33syl2an2 684 . . . . . . . 8 ((𝐴 ⊆ ℤ ∧ 𝑦𝑆) → ∀𝑛𝐴 (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛)))
3534ralrimiva 3136 . . . . . . 7 (𝐴 ⊆ ℤ → ∀𝑦𝑆𝑛𝐴 (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛)))
36 fveq2 6893 . . . . . . . . . . . 12 (𝑛 = 𝑤 → (abs‘𝑛) = (abs‘𝑤))
3736breq2d 5157 . . . . . . . . . . 11 (𝑛 = 𝑤 → (𝑦 ≤ (abs‘𝑛) ↔ 𝑦 ≤ (abs‘𝑤)))
3814, 37imbi12d 343 . . . . . . . . . 10 (𝑛 = 𝑤 → ((𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛)) ↔ (𝑤 ≠ 0 → 𝑦 ≤ (abs‘𝑤))))
3938cbvralvw 3225 . . . . . . . . 9 (∀𝑛𝐴 (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛)) ↔ ∀𝑤𝐴 (𝑤 ≠ 0 → 𝑦 ≤ (abs‘𝑤)))
4039ralbii 3083 . . . . . . . 8 (∀𝑦𝑆𝑛𝐴 (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛)) ↔ ∀𝑦𝑆𝑤𝐴 (𝑤 ≠ 0 → 𝑦 ≤ (abs‘𝑤)))
41 ralcom 3277 . . . . . . . 8 (∀𝑦𝑆𝑤𝐴 (𝑤 ≠ 0 → 𝑦 ≤ (abs‘𝑤)) ↔ ∀𝑤𝐴𝑦𝑆 (𝑤 ≠ 0 → 𝑦 ≤ (abs‘𝑤)))
42 r19.21v 3170 . . . . . . . . 9 (∀𝑦𝑆 (𝑤 ≠ 0 → 𝑦 ≤ (abs‘𝑤)) ↔ (𝑤 ≠ 0 → ∀𝑦𝑆 𝑦 ≤ (abs‘𝑤)))
4342ralbii 3083 . . . . . . . 8 (∀𝑤𝐴𝑦𝑆 (𝑤 ≠ 0 → 𝑦 ≤ (abs‘𝑤)) ↔ ∀𝑤𝐴 (𝑤 ≠ 0 → ∀𝑦𝑆 𝑦 ≤ (abs‘𝑤)))
4440, 41, 433bitri 296 . . . . . . 7 (∀𝑦𝑆𝑛𝐴 (𝑛 ≠ 0 → 𝑦 ≤ (abs‘𝑛)) ↔ ∀𝑤𝐴 (𝑤 ≠ 0 → ∀𝑦𝑆 𝑦 ≤ (abs‘𝑤)))
4535, 44sylib 217 . . . . . 6 (𝐴 ⊆ ℤ → ∀𝑤𝐴 (𝑤 ≠ 0 → ∀𝑦𝑆 𝑦 ≤ (abs‘𝑤)))
46 ssel2 3973 . . . . . . . . . . 11 ((𝐴 ⊆ ℤ ∧ 𝑤𝐴) → 𝑤 ∈ ℤ)
47 nn0abscl 15312 . . . . . . . . . . 11 (𝑤 ∈ ℤ → (abs‘𝑤) ∈ ℕ0)
4846, 47syl 17 . . . . . . . . . 10 ((𝐴 ⊆ ℤ ∧ 𝑤𝐴) → (abs‘𝑤) ∈ ℕ0)
4948nn0zd 12630 . . . . . . . . 9 ((𝐴 ⊆ ℤ ∧ 𝑤𝐴) → (abs‘𝑤) ∈ ℤ)
50 breq2 5149 . . . . . . . . . . 11 (𝑥 = (abs‘𝑤) → (𝑦𝑥𝑦 ≤ (abs‘𝑤)))
5150ralbidv 3168 . . . . . . . . . 10 (𝑥 = (abs‘𝑤) → (∀𝑦𝑆 𝑦𝑥 ↔ ∀𝑦𝑆 𝑦 ≤ (abs‘𝑤)))
5251adantl 480 . . . . . . . . 9 (((𝐴 ⊆ ℤ ∧ 𝑤𝐴) ∧ 𝑥 = (abs‘𝑤)) → (∀𝑦𝑆 𝑦𝑥 ↔ ∀𝑦𝑆 𝑦 ≤ (abs‘𝑤)))
5349, 52rspcedv 3600 . . . . . . . 8 ((𝐴 ⊆ ℤ ∧ 𝑤𝐴) → (∀𝑦𝑆 𝑦 ≤ (abs‘𝑤) → ∃𝑥 ∈ ℤ ∀𝑦𝑆 𝑦𝑥))
5453imim2d 57 . . . . . . 7 ((𝐴 ⊆ ℤ ∧ 𝑤𝐴) → ((𝑤 ≠ 0 → ∀𝑦𝑆 𝑦 ≤ (abs‘𝑤)) → (𝑤 ≠ 0 → ∃𝑥 ∈ ℤ ∀𝑦𝑆 𝑦𝑥)))
5554ralimdva 3157 . . . . . 6 (𝐴 ⊆ ℤ → (∀𝑤𝐴 (𝑤 ≠ 0 → ∀𝑦𝑆 𝑦 ≤ (abs‘𝑤)) → ∀𝑤𝐴 (𝑤 ≠ 0 → ∃𝑥 ∈ ℤ ∀𝑦𝑆 𝑦𝑥)))
5645, 55mpd 15 . . . . 5 (𝐴 ⊆ ℤ → ∀𝑤𝐴 (𝑤 ≠ 0 → ∃𝑥 ∈ ℤ ∀𝑦𝑆 𝑦𝑥))
57 r19.23v 3173 . . . . 5 (∀𝑤𝐴 (𝑤 ≠ 0 → ∃𝑥 ∈ ℤ ∀𝑦𝑆 𝑦𝑥) ↔ (∃𝑤𝐴 𝑤 ≠ 0 → ∃𝑥 ∈ ℤ ∀𝑦𝑆 𝑦𝑥))
5856, 57sylib 217 . . . 4 (𝐴 ⊆ ℤ → (∃𝑤𝐴 𝑤 ≠ 0 → ∃𝑥 ∈ ℤ ∀𝑦𝑆 𝑦𝑥))
5958imp 405 . . 3 ((𝐴 ⊆ ℤ ∧ ∃𝑤𝐴 𝑤 ≠ 0) → ∃𝑥 ∈ ℤ ∀𝑦𝑆 𝑦𝑥)
6015, 59sylan2b 592 . 2 ((𝐴 ⊆ ℤ ∧ ∃𝑛𝐴 𝑛 ≠ 0) → ∃𝑥 ∈ ℤ ∀𝑦𝑆 𝑦𝑥)
6113, 60jca 510 1 ((𝐴 ⊆ ℤ ∧ ∃𝑛𝐴 𝑛 ≠ 0) → (𝑆 ≠ ∅ ∧ ∃𝑥 ∈ ℤ ∀𝑦𝑆 𝑦𝑥))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 394   = wceq 1534  wcel 2099  wne 2930  wral 3051  wrex 3060  {crab 3419  wss 3946  c0 4322   class class class wbr 5145  cfv 6546  0cc0 11149  1c1 11150  cle 11290  0cn0 12518  cz 12604  abscabs 15234  cdvds 16251
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-10 2130  ax-11 2147  ax-12 2167  ax-ext 2697  ax-sep 5296  ax-nul 5303  ax-pow 5361  ax-pr 5425  ax-un 7738  ax-cnex 11205  ax-resscn 11206  ax-1cn 11207  ax-icn 11208  ax-addcl 11209  ax-addrcl 11210  ax-mulcl 11211  ax-mulrcl 11212  ax-mulcom 11213  ax-addass 11214  ax-mulass 11215  ax-distr 11216  ax-i2m1 11217  ax-1ne0 11218  ax-1rid 11219  ax-rnegex 11220  ax-rrecex 11221  ax-cnre 11222  ax-pre-lttri 11223  ax-pre-lttrn 11224  ax-pre-ltadd 11225  ax-pre-mulgt0 11226  ax-pre-sup 11227
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3or 1085  df-3an 1086  df-tru 1537  df-fal 1547  df-ex 1775  df-nf 1779  df-sb 2061  df-mo 2529  df-eu 2558  df-clab 2704  df-cleq 2718  df-clel 2803  df-nfc 2878  df-ne 2931  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3364  df-reu 3365  df-rab 3420  df-v 3464  df-sbc 3776  df-csb 3892  df-dif 3949  df-un 3951  df-in 3953  df-ss 3963  df-pss 3966  df-nul 4323  df-if 4524  df-pw 4599  df-sn 4624  df-pr 4626  df-op 4630  df-uni 4906  df-iun 4995  df-br 5146  df-opab 5208  df-mpt 5229  df-tr 5263  df-id 5572  df-eprel 5578  df-po 5586  df-so 5587  df-fr 5629  df-we 5631  df-xp 5680  df-rel 5681  df-cnv 5682  df-co 5683  df-dm 5684  df-rn 5685  df-res 5686  df-ima 5687  df-pred 6304  df-ord 6371  df-on 6372  df-lim 6373  df-suc 6374  df-iota 6498  df-fun 6548  df-fn 6549  df-f 6550  df-f1 6551  df-fo 6552  df-f1o 6553  df-fv 6554  df-riota 7372  df-ov 7419  df-oprab 7420  df-mpo 7421  df-om 7869  df-2nd 7996  df-frecs 8288  df-wrecs 8319  df-recs 8393  df-rdg 8432  df-er 8726  df-en 8967  df-dom 8968  df-sdom 8969  df-sup 9478  df-pnf 11291  df-mnf 11292  df-xr 11293  df-ltxr 11294  df-le 11295  df-sub 11487  df-neg 11488  df-div 11913  df-nn 12259  df-2 12321  df-3 12322  df-n0 12519  df-z 12605  df-uz 12869  df-rp 13023  df-seq 14016  df-exp 14076  df-cj 15099  df-re 15100  df-im 15101  df-sqrt 15235  df-abs 15236  df-dvds 16252
This theorem is referenced by:  gcdcllem3  16496
  Copyright terms: Public domain W3C validator