Theorem zbtwnre 12675

Description: There is a unique integer between a real number and the number plus one. Exercise 5 of [Apostol] p. 28. (Contributed by NM, 13-Nov-2004.)

Assertion

Ref	Expression
zbtwnre	⊢ (𝐴 ∈ ℝ → ∃!𝑥 ∈ ℤ (𝐴 ≤ 𝑥 ∧ 𝑥 < (𝐴 + 1)))

Distinct variable group:   𝑥,𝐴

Proof of Theorem zbtwnre

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		zmin 12673	. 2 ⊢ (𝐴 ∈ ℝ → ∃!𝑥 ∈ ℤ (𝐴 ≤ 𝑥 ∧ ∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦)))
2		zre 12312	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ℤ → 𝑦 ∈ ℝ)
3		zre 12312	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ ℤ → 𝑥 ∈ ℝ)
4		peano2rem 11277	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ ℝ → (𝑥 − 1) ∈ ℝ)
5	3, 4	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ ℤ → (𝑥 − 1) ∈ ℝ)
6		ltletr 11056	. . . . . . . . . . . . . 14 ⊢ (((𝑥 − 1) ∈ ℝ ∧ 𝐴 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (((𝑥 − 1) < 𝐴 ∧ 𝐴 ≤ 𝑦) → (𝑥 − 1) < 𝑦))
7	5, 6	syl3an1 1162	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (((𝑥 − 1) < 𝐴 ∧ 𝐴 ≤ 𝑦) → (𝑥 − 1) < 𝑦))
8	7	3expa 1117	. . . . . . . . . . . 12 ⊢ (((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) ∧ 𝑦 ∈ ℝ) → (((𝑥 − 1) < 𝐴 ∧ 𝐴 ≤ 𝑦) → (𝑥 − 1) < 𝑦))
9	2, 8	sylan2 593	. . . . . . . . . . 11 ⊢ (((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) ∧ 𝑦 ∈ ℤ) → (((𝑥 − 1) < 𝐴 ∧ 𝐴 ≤ 𝑦) → (𝑥 − 1) < 𝑦))
10		zlem1lt 12361	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ) → (𝑥 ≤ 𝑦 ↔ (𝑥 − 1) < 𝑦))
11	10	adantlr 712	. . . . . . . . . . 11 ⊢ (((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) ∧ 𝑦 ∈ ℤ) → (𝑥 ≤ 𝑦 ↔ (𝑥 − 1) < 𝑦))
12	9, 11	sylibrd 258	. . . . . . . . . 10 ⊢ (((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) ∧ 𝑦 ∈ ℤ) → (((𝑥 − 1) < 𝐴 ∧ 𝐴 ≤ 𝑦) → 𝑥 ≤ 𝑦))
13	12	exp4b 431	. . . . . . . . 9 ⊢ ((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) → (𝑦 ∈ ℤ → ((𝑥 − 1) < 𝐴 → (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦))))
14	13	com23 86	. . . . . . . 8 ⊢ ((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) → ((𝑥 − 1) < 𝐴 → (𝑦 ∈ ℤ → (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦))))
15	14	ralrimdv 3105	. . . . . . 7 ⊢ ((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) → ((𝑥 − 1) < 𝐴 → ∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦)))
16	5	ltnrd 11098	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ℤ → ¬ (𝑥 − 1) < (𝑥 − 1))
17		peano2zm 12352	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ ℤ → (𝑥 − 1) ∈ ℤ)
18		zlem1lt 12361	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ ℤ ∧ (𝑥 − 1) ∈ ℤ) → (𝑥 ≤ (𝑥 − 1) ↔ (𝑥 − 1) < (𝑥 − 1)))
19	17, 18	mpdan 684	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ℤ → (𝑥 ≤ (𝑥 − 1) ↔ (𝑥 − 1) < (𝑥 − 1)))
20	16, 19	mtbird 325	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℤ → ¬ 𝑥 ≤ (𝑥 − 1))
21	20	ad2antrr 723	. . . . . . . . 9 ⊢ (((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) ∧ ∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦)) → ¬ 𝑥 ≤ (𝑥 − 1))
22		lenlt 11042	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℝ ∧ (𝑥 − 1) ∈ ℝ) → (𝐴 ≤ (𝑥 − 1) ↔ ¬ (𝑥 − 1) < 𝐴))
23	5, 22	sylan2 593	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℝ ∧ 𝑥 ∈ ℤ) → (𝐴 ≤ (𝑥 − 1) ↔ ¬ (𝑥 − 1) < 𝐴))
24	23	ancoms 459	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) → (𝐴 ≤ (𝑥 − 1) ↔ ¬ (𝑥 − 1) < 𝐴))
25	24	adantr 481	. . . . . . . . . 10 ⊢ (((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) ∧ ∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦)) → (𝐴 ≤ (𝑥 − 1) ↔ ¬ (𝑥 − 1) < 𝐴))
26		breq2 5079	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (𝑥 − 1) → (𝐴 ≤ 𝑦 ↔ 𝐴 ≤ (𝑥 − 1)))
27		breq2 5079	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (𝑥 − 1) → (𝑥 ≤ 𝑦 ↔ 𝑥 ≤ (𝑥 − 1)))
28	26, 27	imbi12d 345	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (𝑥 − 1) → ((𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦) ↔ (𝐴 ≤ (𝑥 − 1) → 𝑥 ≤ (𝑥 − 1))))
29	28	rspcv 3556	. . . . . . . . . . . . 13 ⊢ ((𝑥 − 1) ∈ ℤ → (∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦) → (𝐴 ≤ (𝑥 − 1) → 𝑥 ≤ (𝑥 − 1))))
30	17, 29	syl 17	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ ℤ → (∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦) → (𝐴 ≤ (𝑥 − 1) → 𝑥 ≤ (𝑥 − 1))))
31	30	imp 407	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ ℤ ∧ ∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦)) → (𝐴 ≤ (𝑥 − 1) → 𝑥 ≤ (𝑥 − 1)))
32	31	adantlr 712	. . . . . . . . . 10 ⊢ (((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) ∧ ∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦)) → (𝐴 ≤ (𝑥 − 1) → 𝑥 ≤ (𝑥 − 1)))
33	25, 32	sylbird 259	. . . . . . . . 9 ⊢ (((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) ∧ ∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦)) → (¬ (𝑥 − 1) < 𝐴 → 𝑥 ≤ (𝑥 − 1)))
34	21, 33	mt3d 148	. . . . . . . 8 ⊢ (((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) ∧ ∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦)) → (𝑥 − 1) < 𝐴)
35	34	ex 413	. . . . . . 7 ⊢ ((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) → (∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦) → (𝑥 − 1) < 𝐴))
36	15, 35	impbid 211	. . . . . 6 ⊢ ((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) → ((𝑥 − 1) < 𝐴 ↔ ∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦)))
37		1re 10964	. . . . . . . 8 ⊢ 1 ∈ ℝ
38		ltsubadd 11434	. . . . . . . 8 ⊢ ((𝑥 ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝐴 ∈ ℝ) → ((𝑥 − 1) < 𝐴 ↔ 𝑥 < (𝐴 + 1)))
39	37, 38	mp3an2 1448	. . . . . . 7 ⊢ ((𝑥 ∈ ℝ ∧ 𝐴 ∈ ℝ) → ((𝑥 − 1) < 𝐴 ↔ 𝑥 < (𝐴 + 1)))
40	3, 39	sylan 580	. . . . . 6 ⊢ ((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) → ((𝑥 − 1) < 𝐴 ↔ 𝑥 < (𝐴 + 1)))
41	36, 40	bitr3d 280	. . . . 5 ⊢ ((𝑥 ∈ ℤ ∧ 𝐴 ∈ ℝ) → (∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦) ↔ 𝑥 < (𝐴 + 1)))
42	41	ancoms 459	. . . 4 ⊢ ((𝐴 ∈ ℝ ∧ 𝑥 ∈ ℤ) → (∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦) ↔ 𝑥 < (𝐴 + 1)))
43	42	anbi2d 629	. . 3 ⊢ ((𝐴 ∈ ℝ ∧ 𝑥 ∈ ℤ) → ((𝐴 ≤ 𝑥 ∧ ∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦)) ↔ (𝐴 ≤ 𝑥 ∧ 𝑥 < (𝐴 + 1))))
44	43	reubidva 3321	. 2 ⊢ (𝐴 ∈ ℝ → (∃!𝑥 ∈ ℤ (𝐴 ≤ 𝑥 ∧ ∀𝑦 ∈ ℤ (𝐴 ≤ 𝑦 → 𝑥 ≤ 𝑦)) ↔ ∃!𝑥 ∈ ℤ (𝐴 ≤ 𝑥 ∧ 𝑥 < (𝐴 + 1))))
45	1, 44	mpbid 231	1 ⊢ (𝐴 ∈ ℝ → ∃!𝑥 ∈ ℤ (𝐴 ≤ 𝑥 ∧ 𝑥 < (𝐴 + 1)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 396   = wceq 1539   ∈ wcel 2106  ∀wral 3064  ∃!wreu 3066   class class class wbr 5075  (class class class)co 7269  ℝcr 10859  1c1 10861   + caddc 10863   < clt 10998   ≤ cle 10999   − cmin 11194  ℤcz 12308

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 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2709  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7580  ax-cnex 10916  ax-resscn 10917  ax-1cn 10918  ax-icn 10919  ax-addcl 10920  ax-addrcl 10921  ax-mulcl 10922  ax-mulrcl 10923  ax-mulcom 10924  ax-addass 10925  ax-mulass 10926  ax-distr 10927  ax-i2m1 10928  ax-1ne0 10929  ax-1rid 10930  ax-rnegex 10931  ax-rrecex 10932  ax-cnre 10933  ax-pre-lttri 10934  ax-pre-lttrn 10935  ax-pre-ltadd 10936  ax-pre-mulgt0 10937  ax-pre-sup 10938

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-nel 3050  df-ral 3069  df-rex 3070  df-rmo 3071  df-reu 3072  df-rab 3073  df-v 3433  df-sbc 3718  df-csb 3834  df-dif 3891  df-un 3893  df-in 3895  df-ss 3905  df-pss 3907  df-nul 4259  df-if 4462  df-pw 4537  df-sn 4564  df-pr 4566  df-op 4570  df-uni 4842  df-iun 4928  df-br 5076  df-opab 5138  df-mpt 5159  df-tr 5193  df-id 5486  df-eprel 5492  df-po 5500  df-so 5501  df-fr 5541  df-we 5543  df-xp 5592  df-rel 5593  df-cnv 5594  df-co 5595  df-dm 5596  df-rn 5597  df-res 5598  df-ima 5599  df-pred 6197  df-ord 6264  df-on 6265  df-lim 6266  df-suc 6267  df-iota 6386  df-fun 6430  df-fn 6431  df-f 6432  df-f1 6433  df-fo 6434  df-f1o 6435  df-fv 6436  df-riota 7226  df-ov 7272  df-oprab 7273  df-mpo 7274  df-om 7705  df-2nd 7823  df-frecs 8086  df-wrecs 8117  df-recs 8191  df-rdg 8230  df-er 8487  df-en 8723  df-dom 8724  df-sdom 8725  df-sup 9190  df-inf 9191  df-pnf 11000  df-mnf 11001  df-xr 11002  df-ltxr 11003  df-le 11004  df-sub 11196  df-neg 11197  df-nn 11963  df-n0 12223  df-z 12309  df-uz 12572

This theorem is referenced by:  rebtwnz  12676  qbtwnre  12922  dfceil2  13548