Theorem elfzonlteqm1 13662

Description: If an element of a half-open integer range is not less than the upper bound of the range decreased by 1, it must be equal to the upper bound of the range decreased by 1. (Contributed by AV, 3-Nov-2018.)

Assertion

Ref	Expression
elfzonlteqm1	⊢ ((𝐴 ∈ (0..^𝐵) ∧ ¬ 𝐴 < (𝐵 − 1)) → 𝐴 = (𝐵 − 1))

Proof of Theorem elfzonlteqm1

Step	Hyp	Ref	Expression
1		0z 12504	. . . 4 ⊢ 0 ∈ ℤ
2		elfzo0 13621	. . . . 5 ⊢ (𝐴 ∈ (0..^𝐵) ↔ (𝐴 ∈ ℕ0 ∧ 𝐵 ∈ ℕ ∧ 𝐴 < 𝐵))
3		elnnuz 12796	. . . . . . . 8 ⊢ (𝐵 ∈ ℕ ↔ 𝐵 ∈ (ℤ≥‘1))
4	3	biimpi 216	. . . . . . 7 ⊢ (𝐵 ∈ ℕ → 𝐵 ∈ (ℤ≥‘1))
5		0p1e1 12267	. . . . . . . . 9 ⊢ (0 + 1) = 1
6	5	a1i 11	. . . . . . . 8 ⊢ (𝐵 ∈ ℕ → (0 + 1) = 1)
7	6	fveq2d 6839	. . . . . . 7 ⊢ (𝐵 ∈ ℕ → (ℤ≥‘(0 + 1)) = (ℤ≥‘1))
8	4, 7	eleqtrrd 2840	. . . . . 6 ⊢ (𝐵 ∈ ℕ → 𝐵 ∈ (ℤ≥‘(0 + 1)))
9	8	3ad2ant2 1135	. . . . 5 ⊢ ((𝐴 ∈ ℕ0 ∧ 𝐵 ∈ ℕ ∧ 𝐴 < 𝐵) → 𝐵 ∈ (ℤ≥‘(0 + 1)))
10	2, 9	sylbi 217	. . . 4 ⊢ (𝐴 ∈ (0..^𝐵) → 𝐵 ∈ (ℤ≥‘(0 + 1)))
11		fzosplitsnm1 13661	. . . 4 ⊢ ((0 ∈ ℤ ∧ 𝐵 ∈ (ℤ≥‘(0 + 1))) → (0..^𝐵) = ((0..^(𝐵 − 1)) ∪ {(𝐵 − 1)}))
12	1, 10, 11	sylancr 588	. . 3 ⊢ (𝐴 ∈ (0..^𝐵) → (0..^𝐵) = ((0..^(𝐵 − 1)) ∪ {(𝐵 − 1)}))
13		eleq2 2826	. . . 4 ⊢ ((0..^𝐵) = ((0..^(𝐵 − 1)) ∪ {(𝐵 − 1)}) → (𝐴 ∈ (0..^𝐵) ↔ 𝐴 ∈ ((0..^(𝐵 − 1)) ∪ {(𝐵 − 1)})))
14		elun 4106	. . . . 5 ⊢ (𝐴 ∈ ((0..^(𝐵 − 1)) ∪ {(𝐵 − 1)}) ↔ (𝐴 ∈ (0..^(𝐵 − 1)) ∨ 𝐴 ∈ {(𝐵 − 1)}))
15		elfzo0 13621	. . . . . . 7 ⊢ (𝐴 ∈ (0..^(𝐵 − 1)) ↔ (𝐴 ∈ ℕ0 ∧ (𝐵 − 1) ∈ ℕ ∧ 𝐴 < (𝐵 − 1)))
16		pm2.24 124	. . . . . . . 8 ⊢ (𝐴 < (𝐵 − 1) → (¬ 𝐴 < (𝐵 − 1) → 𝐴 = (𝐵 − 1)))
17	16	3ad2ant3 1136	. . . . . . 7 ⊢ ((𝐴 ∈ ℕ0 ∧ (𝐵 − 1) ∈ ℕ ∧ 𝐴 < (𝐵 − 1)) → (¬ 𝐴 < (𝐵 − 1) → 𝐴 = (𝐵 − 1)))
18	15, 17	sylbi 217	. . . . . 6 ⊢ (𝐴 ∈ (0..^(𝐵 − 1)) → (¬ 𝐴 < (𝐵 − 1) → 𝐴 = (𝐵 − 1)))
19		elsni 4598	. . . . . . 7 ⊢ (𝐴 ∈ {(𝐵 − 1)} → 𝐴 = (𝐵 − 1))
20	19	a1d 25	. . . . . 6 ⊢ (𝐴 ∈ {(𝐵 − 1)} → (¬ 𝐴 < (𝐵 − 1) → 𝐴 = (𝐵 − 1)))
21	18, 20	jaoi 858	. . . . 5 ⊢ ((𝐴 ∈ (0..^(𝐵 − 1)) ∨ 𝐴 ∈ {(𝐵 − 1)}) → (¬ 𝐴 < (𝐵 − 1) → 𝐴 = (𝐵 − 1)))
22	14, 21	sylbi 217	. . . 4 ⊢ (𝐴 ∈ ((0..^(𝐵 − 1)) ∪ {(𝐵 − 1)}) → (¬ 𝐴 < (𝐵 − 1) → 𝐴 = (𝐵 − 1)))
23	13, 22	biimtrdi 253	. . 3 ⊢ ((0..^𝐵) = ((0..^(𝐵 − 1)) ∪ {(𝐵 − 1)}) → (𝐴 ∈ (0..^𝐵) → (¬ 𝐴 < (𝐵 − 1) → 𝐴 = (𝐵 − 1))))
24	12, 23	mpcom 38	. 2 ⊢ (𝐴 ∈ (0..^𝐵) → (¬ 𝐴 < (𝐵 − 1) → 𝐴 = (𝐵 − 1)))
25	24	imp 406	1 ⊢ ((𝐴 ∈ (0..^𝐵) ∧ ¬ 𝐴 < (𝐵 − 1)) → 𝐴 = (𝐵 − 1))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   ∨ wo 848   ∧ w3a 1087   = wceq 1542   ∈ wcel 2114   ∪ cun 3900  {csn 4581   class class class wbr 5099  ‘cfv 6493  (class class class)co 7361  0cc0 11031  1c1 11032   + caddc 11034   < clt 11171   − cmin 11369  ℕcn 12150  ℕ₀cn0 12406  ℤcz 12493  ℤ_≥cuz 12756  ..^cfzo 13575

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-sep 5242  ax-nul 5252  ax-pow 5311  ax-pr 5378  ax-un 7683  ax-cnex 11087  ax-resscn 11088  ax-1cn 11089  ax-icn 11090  ax-addcl 11091  ax-addrcl 11092  ax-mulcl 11093  ax-mulrcl 11094  ax-mulcom 11095  ax-addass 11096  ax-mulass 11097  ax-distr 11098  ax-i2m1 11099  ax-1ne0 11100  ax-1rid 11101  ax-rnegex 11102  ax-rrecex 11103  ax-cnre 11104  ax-pre-lttri 11105  ax-pre-lttrn 11106  ax-pre-ltadd 11107  ax-pre-mulgt0 11108

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 3062  df-reu 3352  df-rab 3401  df-v 3443  df-sbc 3742  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4287  df-if 4481  df-pw 4557  df-sn 4582  df-pr 4584  df-op 4588  df-uni 4865  df-iun 4949  df-br 5100  df-opab 5162  df-mpt 5181  df-tr 5207  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6260  df-ord 6321  df-on 6322  df-lim 6323  df-suc 6324  df-iota 6449  df-fun 6495  df-fn 6496  df-f 6497  df-f1 6498  df-fo 6499  df-f1o 6500  df-fv 6501  df-riota 7318  df-ov 7364  df-oprab 7365  df-mpo 7366  df-om 7812  df-1st 7936  df-2nd 7937  df-frecs 8226  df-wrecs 8257  df-recs 8306  df-rdg 8344  df-er 8638  df-en 8889  df-dom 8890  df-sdom 8891  df-pnf 11173  df-mnf 11174  df-xr 11175  df-ltxr 11176  df-le 11177  df-sub 11371  df-neg 11372  df-nn 12151  df-n0 12407  df-z 12494  df-uz 12757  df-fz 13429  df-fzo 13576

This theorem is referenced by:  clwwisshclwwslemlem  30093