![]() |
Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
|
Mirrors > Home > MPE Home > Th. List > dvdsle | Structured version Visualization version GIF version |
Description: The divisors of a positive integer are bounded by it. The proof does not use /. (Contributed by Paul Chapman, 21-Mar-2011.) |
Ref | Expression |
---|---|
dvdsle | ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝑀 ∥ 𝑁 → 𝑀 ≤ 𝑁)) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | breq2 5150 | . . . . . . . . . . . . 13 ⊢ (𝑀 = if(𝑀 ∈ ℤ, 𝑀, 1) → (𝑁 < 𝑀 ↔ 𝑁 < if(𝑀 ∈ ℤ, 𝑀, 1))) | |
2 | oveq2 7411 | . . . . . . . . . . . . . 14 ⊢ (𝑀 = if(𝑀 ∈ ℤ, 𝑀, 1) → (𝑛 · 𝑀) = (𝑛 · if(𝑀 ∈ ℤ, 𝑀, 1))) | |
3 | 2 | neeq1d 3001 | . . . . . . . . . . . . 13 ⊢ (𝑀 = if(𝑀 ∈ ℤ, 𝑀, 1) → ((𝑛 · 𝑀) ≠ 𝑁 ↔ (𝑛 · if(𝑀 ∈ ℤ, 𝑀, 1)) ≠ 𝑁)) |
4 | 1, 3 | imbi12d 345 | . . . . . . . . . . . 12 ⊢ (𝑀 = if(𝑀 ∈ ℤ, 𝑀, 1) → ((𝑁 < 𝑀 → (𝑛 · 𝑀) ≠ 𝑁) ↔ (𝑁 < if(𝑀 ∈ ℤ, 𝑀, 1) → (𝑛 · if(𝑀 ∈ ℤ, 𝑀, 1)) ≠ 𝑁))) |
5 | breq1 5149 | . . . . . . . . . . . . 13 ⊢ (𝑁 = if(𝑁 ∈ ℕ, 𝑁, 1) → (𝑁 < if(𝑀 ∈ ℤ, 𝑀, 1) ↔ if(𝑁 ∈ ℕ, 𝑁, 1) < if(𝑀 ∈ ℤ, 𝑀, 1))) | |
6 | neeq2 3005 | . . . . . . . . . . . . 13 ⊢ (𝑁 = if(𝑁 ∈ ℕ, 𝑁, 1) → ((𝑛 · if(𝑀 ∈ ℤ, 𝑀, 1)) ≠ 𝑁 ↔ (𝑛 · if(𝑀 ∈ ℤ, 𝑀, 1)) ≠ if(𝑁 ∈ ℕ, 𝑁, 1))) | |
7 | 5, 6 | imbi12d 345 | . . . . . . . . . . . 12 ⊢ (𝑁 = if(𝑁 ∈ ℕ, 𝑁, 1) → ((𝑁 < if(𝑀 ∈ ℤ, 𝑀, 1) → (𝑛 · if(𝑀 ∈ ℤ, 𝑀, 1)) ≠ 𝑁) ↔ (if(𝑁 ∈ ℕ, 𝑁, 1) < if(𝑀 ∈ ℤ, 𝑀, 1) → (𝑛 · if(𝑀 ∈ ℤ, 𝑀, 1)) ≠ if(𝑁 ∈ ℕ, 𝑁, 1)))) |
8 | oveq1 7410 | . . . . . . . . . . . . . 14 ⊢ (𝑛 = if(𝑛 ∈ ℤ, 𝑛, 1) → (𝑛 · if(𝑀 ∈ ℤ, 𝑀, 1)) = (if(𝑛 ∈ ℤ, 𝑛, 1) · if(𝑀 ∈ ℤ, 𝑀, 1))) | |
9 | 8 | neeq1d 3001 | . . . . . . . . . . . . 13 ⊢ (𝑛 = if(𝑛 ∈ ℤ, 𝑛, 1) → ((𝑛 · if(𝑀 ∈ ℤ, 𝑀, 1)) ≠ if(𝑁 ∈ ℕ, 𝑁, 1) ↔ (if(𝑛 ∈ ℤ, 𝑛, 1) · if(𝑀 ∈ ℤ, 𝑀, 1)) ≠ if(𝑁 ∈ ℕ, 𝑁, 1))) |
10 | 9 | imbi2d 341 | . . . . . . . . . . . 12 ⊢ (𝑛 = if(𝑛 ∈ ℤ, 𝑛, 1) → ((if(𝑁 ∈ ℕ, 𝑁, 1) < if(𝑀 ∈ ℤ, 𝑀, 1) → (𝑛 · if(𝑀 ∈ ℤ, 𝑀, 1)) ≠ if(𝑁 ∈ ℕ, 𝑁, 1)) ↔ (if(𝑁 ∈ ℕ, 𝑁, 1) < if(𝑀 ∈ ℤ, 𝑀, 1) → (if(𝑛 ∈ ℤ, 𝑛, 1) · if(𝑀 ∈ ℤ, 𝑀, 1)) ≠ if(𝑁 ∈ ℕ, 𝑁, 1)))) |
11 | 1z 12587 | . . . . . . . . . . . . . 14 ⊢ 1 ∈ ℤ | |
12 | 11 | elimel 4595 | . . . . . . . . . . . . 13 ⊢ if(𝑀 ∈ ℤ, 𝑀, 1) ∈ ℤ |
13 | 1nn 12218 | . . . . . . . . . . . . . 14 ⊢ 1 ∈ ℕ | |
14 | 13 | elimel 4595 | . . . . . . . . . . . . 13 ⊢ if(𝑁 ∈ ℕ, 𝑁, 1) ∈ ℕ |
15 | 11 | elimel 4595 | . . . . . . . . . . . . 13 ⊢ if(𝑛 ∈ ℤ, 𝑛, 1) ∈ ℤ |
16 | 12, 14, 15 | dvdslelem 16247 | . . . . . . . . . . . 12 ⊢ (if(𝑁 ∈ ℕ, 𝑁, 1) < if(𝑀 ∈ ℤ, 𝑀, 1) → (if(𝑛 ∈ ℤ, 𝑛, 1) · if(𝑀 ∈ ℤ, 𝑀, 1)) ≠ if(𝑁 ∈ ℕ, 𝑁, 1)) |
17 | 4, 7, 10, 16 | dedth3h 4586 | . . . . . . . . . . 11 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ ∧ 𝑛 ∈ ℤ) → (𝑁 < 𝑀 → (𝑛 · 𝑀) ≠ 𝑁)) |
18 | 17 | 3expia 1122 | . . . . . . . . . 10 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝑛 ∈ ℤ → (𝑁 < 𝑀 → (𝑛 · 𝑀) ≠ 𝑁))) |
19 | 18 | com23 86 | . . . . . . . . 9 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝑁 < 𝑀 → (𝑛 ∈ ℤ → (𝑛 · 𝑀) ≠ 𝑁))) |
20 | 19 | 3impia 1118 | . . . . . . . 8 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ ∧ 𝑁 < 𝑀) → (𝑛 ∈ ℤ → (𝑛 · 𝑀) ≠ 𝑁)) |
21 | 20 | imp 408 | . . . . . . 7 ⊢ (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ ∧ 𝑁 < 𝑀) ∧ 𝑛 ∈ ℤ) → (𝑛 · 𝑀) ≠ 𝑁) |
22 | 21 | neneqd 2946 | . . . . . 6 ⊢ (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ ∧ 𝑁 < 𝑀) ∧ 𝑛 ∈ ℤ) → ¬ (𝑛 · 𝑀) = 𝑁) |
23 | 22 | nrexdv 3150 | . . . . 5 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ ∧ 𝑁 < 𝑀) → ¬ ∃𝑛 ∈ ℤ (𝑛 · 𝑀) = 𝑁) |
24 | nnz 12574 | . . . . . . 7 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℤ) | |
25 | divides 16194 | . . . . . . 7 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 ∥ 𝑁 ↔ ∃𝑛 ∈ ℤ (𝑛 · 𝑀) = 𝑁)) | |
26 | 24, 25 | sylan2 594 | . . . . . 6 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝑀 ∥ 𝑁 ↔ ∃𝑛 ∈ ℤ (𝑛 · 𝑀) = 𝑁)) |
27 | 26 | 3adant3 1133 | . . . . 5 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ ∧ 𝑁 < 𝑀) → (𝑀 ∥ 𝑁 ↔ ∃𝑛 ∈ ℤ (𝑛 · 𝑀) = 𝑁)) |
28 | 23, 27 | mtbird 325 | . . . 4 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ ∧ 𝑁 < 𝑀) → ¬ 𝑀 ∥ 𝑁) |
29 | 28 | 3expia 1122 | . . 3 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝑁 < 𝑀 → ¬ 𝑀 ∥ 𝑁)) |
30 | 29 | con2d 134 | . 2 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝑀 ∥ 𝑁 → ¬ 𝑁 < 𝑀)) |
31 | zre 12557 | . . 3 ⊢ (𝑀 ∈ ℤ → 𝑀 ∈ ℝ) | |
32 | nnre 12214 | . . 3 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℝ) | |
33 | lenlt 11287 | . . 3 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (𝑀 ≤ 𝑁 ↔ ¬ 𝑁 < 𝑀)) | |
34 | 31, 32, 33 | syl2an 597 | . 2 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝑀 ≤ 𝑁 ↔ ¬ 𝑁 < 𝑀)) |
35 | 30, 34 | sylibrd 259 | 1 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝑀 ∥ 𝑁 → 𝑀 ≤ 𝑁)) |
Colors of variables: wff setvar class |
Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 397 ∧ w3a 1088 = wceq 1542 ∈ wcel 2107 ≠ wne 2941 ∃wrex 3071 ifcif 4526 class class class wbr 5146 (class class class)co 7403 ℝcr 11104 1c1 11106 · cmul 11110 < clt 11243 ≤ cle 11244 ℕcn 12207 ℤcz 12553 ∥ cdvds 16192 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2704 ax-sep 5297 ax-nul 5304 ax-pow 5361 ax-pr 5425 ax-un 7719 ax-resscn 11162 ax-1cn 11163 ax-icn 11164 ax-addcl 11165 ax-addrcl 11166 ax-mulcl 11167 ax-mulrcl 11168 ax-mulcom 11169 ax-addass 11170 ax-mulass 11171 ax-distr 11172 ax-i2m1 11173 ax-1ne0 11174 ax-1rid 11175 ax-rnegex 11176 ax-rrecex 11177 ax-cnre 11178 ax-pre-lttri 11179 ax-pre-lttrn 11180 ax-pre-ltadd 11181 ax-pre-mulgt0 11182 |
This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3or 1089 df-3an 1090 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2535 df-eu 2564 df-clab 2711 df-cleq 2725 df-clel 2811 df-nfc 2886 df-ne 2942 df-nel 3048 df-ral 3063 df-rex 3072 df-reu 3378 df-rab 3434 df-v 3477 df-sbc 3776 df-csb 3892 df-dif 3949 df-un 3951 df-in 3953 df-ss 3963 df-pss 3965 df-nul 4321 df-if 4527 df-pw 4602 df-sn 4627 df-pr 4629 df-op 4633 df-uni 4907 df-iun 4997 df-br 5147 df-opab 5209 df-mpt 5230 df-tr 5264 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 6296 df-ord 6363 df-on 6364 df-lim 6365 df-suc 6366 df-iota 6491 df-fun 6541 df-fn 6542 df-f 6543 df-f1 6544 df-fo 6545 df-f1o 6546 df-fv 6547 df-riota 7359 df-ov 7406 df-oprab 7407 df-mpo 7408 df-om 7850 df-2nd 7970 df-frecs 8260 df-wrecs 8291 df-recs 8365 df-rdg 8404 df-er 8698 df-en 8935 df-dom 8936 df-sdom 8937 df-pnf 11245 df-mnf 11246 df-xr 11247 df-ltxr 11248 df-le 11249 df-sub 11441 df-neg 11442 df-nn 12208 df-n0 12468 df-z 12554 df-dvds 16193 |
This theorem is referenced by: dvdsleabs 16249 dvdsssfz1 16256 fzm1ndvds 16260 fzo0dvdseq 16261 gcd1 16464 bezoutlem4 16479 dfgcd2 16483 gcdzeq 16489 bezoutr1 16501 lcmgcdlem 16538 qredeq 16589 isprm3 16615 prmdvdsfz 16637 isprm5 16639 maxprmfct 16641 isprm6 16646 prmfac1 16653 ncoprmlnprm 16659 pcpre1 16770 pcidlem 16800 pcprod 16823 pcfac 16827 pockthg 16834 prmreclem1 16844 prmreclem3 16846 prmreclem5 16848 1arith 16855 4sqlem11 16883 prmolelcmf 16976 gexcl2 19449 sylow1lem1 19458 sylow1lem5 19462 gexex 19712 ablfac1eu 19934 ablfaclem3 19948 znidomb 21100 dvdsflsumcom 26671 chtublem 26693 vmasum 26698 logfac2 26699 bposlem6 26771 lgsdir 26814 lgsdilem2 26815 lgsne0 26817 lgsqrlem2 26829 lgsquadlem2 26863 2sqlem8 26908 2sqblem 26913 2sqmod 26918 oddpwdc 33290 nn0prpw 35145 lcmineqlem20 40850 lcmineqlem22 40852 aks4d1p3 40880 aks4d1p6 40883 aks4d1p8d2 40887 aks4d1p8 40889 gcdle1d 41163 gcdle2d 41164 nznngen 43007 etransclem41 44925 |
Copyright terms: Public domain | W3C validator |