Theorem limsup10exlem 46890

Description: The range of the given function. (Contributed by Glauco Siliprandi, 2-Jan-2022.)

Hypotheses

Ref	Expression
limsup10exlem.1	⊢ 𝐹 = (𝑛 ∈ ℕ ↦ if(2 ∥ 𝑛, 0, 1))
limsup10exlem.2	⊢ (𝜑 → 𝐾 ∈ ℝ)

Assertion

Ref	Expression
limsup10exlem	⊢ (𝜑 → (𝐹 “ (𝐾[,)+∞)) = {0, 1})

Distinct variable groups:   𝑛,𝐾   𝜑,𝑛

Allowed substitution hint:   𝐹(𝑛)

Proof of Theorem limsup10exlem

Step	Hyp	Ref	Expression
1		0elpr01 11308	. . . . . 6 ⊢ 0 ∈ {0, 1}
2		1elpr01 11311	. . . . . 6 ⊢ 1 ∈ {0, 1}
3	1, 2	ifcli 4529	. . . . 5 ⊢ if(2 ∥ 𝑛, 0, 1) ∈ {0, 1}
4	3	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ ∩ (𝐾[,)+∞))) → if(2 ∥ 𝑛, 0, 1) ∈ {0, 1})
5	4	ralrimiva 3154	. . 3 ⊢ (𝜑 → ∀𝑛 ∈ (ℕ ∩ (𝐾[,)+∞))if(2 ∥ 𝑛, 0, 1) ∈ {0, 1})
6		nfv 1946	. . . 4 ⊢ Ⅎ𝑛𝜑
7		c0ex 11307	. . . . . 6 ⊢ 0 ∈ V
8		1re 11315	. . . . . . 7 ⊢ 1 ∈ ℝ
9	8	elexi 3472	. . . . . 6 ⊢ 1 ∈ V
10	7, 9	ifex 4532	. . . . 5 ⊢ if(2 ∥ 𝑛, 0, 1) ∈ V
11	10	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ ∩ (𝐾[,)+∞))) → if(2 ∥ 𝑛, 0, 1) ∈ V)
12		limsup10exlem.1	. . . 4 ⊢ 𝐹 = (𝑛 ∈ ℕ ↦ if(2 ∥ 𝑛, 0, 1))
13	6, 11, 12	imassmpt 46382	. . 3 ⊢ (𝜑 → ((𝐹 “ (𝐾[,)+∞)) ⊆ {0, 1} ↔ ∀𝑛 ∈ (ℕ ∩ (𝐾[,)+∞))if(2 ∥ 𝑛, 0, 1) ∈ {0, 1}))
14	5, 13	mpbird 260	. 2 ⊢ (𝜑 → (𝐹 “ (𝐾[,)+∞)) ⊆ {0, 1})
15		limsup10exlem.2	. . . . . . . . . 10 ⊢ (𝜑 → 𝐾 ∈ ℝ)
16	15	ceilcld 13990	. . . . . . . . 9 ⊢ (𝜑 → (⌈‘𝐾) ∈ ℤ)
17		1zzd 12734	. . . . . . . . 9 ⊢ (𝜑 → 1 ∈ ℤ)
18	16, 17	ifcld 4528	. . . . . . . 8 ⊢ (𝜑 → if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈ ℤ)
19	18	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 = (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) → if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈ ℤ)
20		simpr 490	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 = (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) → 𝑛 = (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)))
21		2teven 16534	. . . . . . 7 ⊢ ((if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈ ℤ ∧ 𝑛 = (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) → 2 ∥ 𝑛)
22	19, 20, 21	syl2anc 596	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 = (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) → 2 ∥ 𝑛)
23	22	iftrued 4489	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 = (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) → if(2 ∥ 𝑛, 0, 1) = 0)
24		2nn 12423	. . . . . . 7 ⊢ 2 ∈ ℕ
25	24	a1i 11	. . . . . 6 ⊢ (𝜑 → 2 ∈ ℕ)
26		eqid 2760	. . . . . . . 8 ⊢ (ℤ≥‘1) = (ℤ≥‘1)
27	8	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 1 ≤ 𝐾) → 1 ∈ ℝ)
28	15	adantr 486	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 1 ≤ 𝐾) → 𝐾 ∈ ℝ)
29	16	zred 12810	. . . . . . . . . . . 12 ⊢ (𝜑 → (⌈‘𝐾) ∈ ℝ)
30	29	adantr 486	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 1 ≤ 𝐾) → (⌈‘𝐾) ∈ ℝ)
31		simpr 490	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 1 ≤ 𝐾) → 1 ≤ 𝐾)
32	15	ceilged 13993	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐾 ≤ (⌈‘𝐾))
33	32	adantr 486	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 1 ≤ 𝐾) → 𝐾 ≤ (⌈‘𝐾))
34	27, 28, 30, 31, 33	letrd 11474	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 1 ≤ 𝐾) → 1 ≤ (⌈‘𝐾))
35		iftrue 4487	. . . . . . . . . . 11 ⊢ (1 ≤ 𝐾 → if(1 ≤ 𝐾, (⌈‘𝐾), 1) = (⌈‘𝐾))
36	35	adantl 487	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 1 ≤ 𝐾) → if(1 ≤ 𝐾, (⌈‘𝐾), 1) = (⌈‘𝐾))
37	34, 36	breqtrrd 5132	. . . . . . . . 9 ⊢ ((𝜑 ∧ 1 ≤ 𝐾) → 1 ≤ if(1 ≤ 𝐾, (⌈‘𝐾), 1))
38	8	leidi 11857	. . . . . . . . . . 11 ⊢ 1 ≤ 1
39	38	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 1 ≤ 1)
40		iffalse 4490	. . . . . . . . . . 11 ⊢ (¬ 1 ≤ 𝐾 → if(1 ≤ 𝐾, (⌈‘𝐾), 1) = 1)
41	40	adantl 487	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → if(1 ≤ 𝐾, (⌈‘𝐾), 1) = 1)
42	39, 41	breqtrrd 5132	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 1 ≤ if(1 ≤ 𝐾, (⌈‘𝐾), 1))
43	37, 42	pm2.61dan 825	. . . . . . . 8 ⊢ (𝜑 → 1 ≤ if(1 ≤ 𝐾, (⌈‘𝐾), 1))
44	26, 17, 18, 43	eluzd 46527	. . . . . . 7 ⊢ (𝜑 → if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈ (ℤ≥‘1))
45		nnuz 13011	. . . . . . 7 ⊢ ℕ = (ℤ≥‘1)
46	44, 45	eleqtrrdi 2871	. . . . . 6 ⊢ (𝜑 → if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈ ℕ)
47	25, 46	nnmulcld 12398	. . . . 5 ⊢ (𝜑 → (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) ∈ ℕ)
48	7	a1i 11	. . . . 5 ⊢ (𝜑 → 0 ∈ V)
49	12, 23, 47, 48	fvmptd2 7007	. . . 4 ⊢ (𝜑 → (𝐹‘(2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) = 0)
50	10, 12	fnmpti 6687	. . . . . 6 ⊢ 𝐹 Fn ℕ
51	50	a1i 11	. . . . 5 ⊢ (𝜑 → 𝐹 Fn ℕ)
52	15	rexrd 11366	. . . . . 6 ⊢ (𝜑 → 𝐾 ∈ ℝ*)
53		pnfxr 11370	. . . . . . 7 ⊢ +∞ ∈ ℝ*
54	53	a1i 11	. . . . . 6 ⊢ (𝜑 → +∞ ∈ ℝ*)
55	47	nnxrd 46398	. . . . . 6 ⊢ (𝜑 → (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) ∈ ℝ*)
56	47	nnred 12357	. . . . . . 7 ⊢ (𝜑 → (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) ∈ ℝ)
57	46	nnred 12357	. . . . . . . 8 ⊢ (𝜑 → if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈ ℝ)
58	33, 36	breqtrrd 5132	. . . . . . . . 9 ⊢ ((𝜑 ∧ 1 ≤ 𝐾) → 𝐾 ≤ if(1 ≤ 𝐾, (⌈‘𝐾), 1))
59	15	adantr 486	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 𝐾 ∈ ℝ)
60	8	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 1 ∈ ℝ)
61		simpr 490	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → ¬ 1 ≤ 𝐾)
62	59, 60, 61	nleltd 46570	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 𝐾 < 1)
63	59, 60, 62	ltled 11465	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 𝐾 ≤ 1)
64	41	eqcomd 2766	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 1 = if(1 ≤ 𝐾, (⌈‘𝐾), 1))
65	63, 64	breqtrd 5130	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 𝐾 ≤ if(1 ≤ 𝐾, (⌈‘𝐾), 1))
66	58, 65	pm2.61dan 825	. . . . . . . 8 ⊢ (𝜑 → 𝐾 ≤ if(1 ≤ 𝐾, (⌈‘𝐾), 1))
67	46	nnrpd 13169	. . . . . . . . 9 ⊢ (𝜑 → if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈ ℝ+)
68		2timesgt 46412	. . . . . . . . 9 ⊢ (if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈ ℝ+ → if(1 ≤ 𝐾, (⌈‘𝐾), 1) < (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)))
69	67, 68	syl 18	. . . . . . . 8 ⊢ (𝜑 → if(1 ≤ 𝐾, (⌈‘𝐾), 1) < (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)))
70	15, 57, 56, 66, 69	lelttrd 11475	. . . . . . 7 ⊢ (𝜑 → 𝐾 < (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)))
71	15, 56, 70	ltled 11465	. . . . . 6 ⊢ (𝜑 → 𝐾 ≤ (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)))
72	56	ltpnfd 13257	. . . . . 6 ⊢ (𝜑 → (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) < +∞)
73	52, 54, 55, 71, 72	elicod 13533	. . . . 5 ⊢ (𝜑 → (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) ∈ (𝐾[,)+∞))
74	51, 47, 73	fnfvimad 7244	. . . 4 ⊢ (𝜑 → (𝐹‘(2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) ∈ (𝐹 “ (𝐾[,)+∞)))
75	49, 74	eqeltrrd 2861	. . 3 ⊢ (𝜑 → 0 ∈ (𝐹 “ (𝐾[,)+∞)))
76	18	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 = ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) → if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈ ℤ)
77		simpr 490	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 = ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) → 𝑛 = ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1))
78		2tp1odd 16531	. . . . . . 7 ⊢ ((if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈ ℤ ∧ 𝑛 = ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) → ¬ 2 ∥ 𝑛)
79	76, 77, 78	syl2anc 596	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 = ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) → ¬ 2 ∥ 𝑛)
80	79	iffalsed 4492	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 = ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) → if(2 ∥ 𝑛, 0, 1) = 1)
81	47	peano2nnd 12359	. . . . 5 ⊢ (𝜑 → ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1) ∈ ℕ)
82		1xr 11375	. . . . . 6 ⊢ 1 ∈ ℝ*
83	82	a1i 11	. . . . 5 ⊢ (𝜑 → 1 ∈ ℝ*)
84	12, 80, 81, 83	fvmptd2 7007	. . . 4 ⊢ (𝜑 → (𝐹‘((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) = 1)
85	81	nnxrd 46398	. . . . . 6 ⊢ (𝜑 → ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1) ∈ ℝ*)
86	81	nnred 12357	. . . . . . 7 ⊢ (𝜑 → ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1) ∈ ℝ)
87	56	ltp1d 12254	. . . . . . . 8 ⊢ (𝜑 → (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) < ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1))
88	15, 56, 86, 70, 87	lttrd 11478	. . . . . . 7 ⊢ (𝜑 → 𝐾 < ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1))
89	15, 86, 88	ltled 11465	. . . . . 6 ⊢ (𝜑 → 𝐾 ≤ ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1))
90	86	ltpnfd 13257	. . . . . 6 ⊢ (𝜑 → ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1) < +∞)
91	52, 54, 85, 89, 90	elicod 13533	. . . . 5 ⊢ (𝜑 → ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1) ∈ (𝐾[,)+∞))
92	51, 81, 91	fnfvimad 7244	. . . 4 ⊢ (𝜑 → (𝐹‘((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) ∈ (𝐹 “ (𝐾[,)+∞)))
93	84, 92	eqeltrrd 2861	. . 3 ⊢ (𝜑 → 1 ∈ (𝐹 “ (𝐾[,)+∞)))
94	75, 93	prssd 4777	. 2 ⊢ (𝜑 → {0, 1} ⊆ (𝐹 “ (𝐾[,)+∞)))
95	14, 94	eqssd 3926	1 ⊢ (𝜑 → (𝐹 “ (𝐾[,)+∞)) = {0, 1})

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ∧ wa 401   = wceq 1569   ∈ wcel 2144  ∀wral 3076  Vcvv 3450   ⊆ wss 3896   ∩ cin 4088  ifcif 4481  {cpr 4586   class class class wbr 5102   ↦ cmpt 5185   “ cima 5654   Fn wfn 6538  ‘cfv 6543  (class class class)co 7424  ℝcr 11206  0cc0 11207  1c1 11208   + caddc 11210   · cmul 11212  +∞cpnf 11347  ℝ^*cxr 11349   < clt 11350   ≤ cle 11351  ℕcn 12342  2c2 12404  ℤcz 12700  ℤ_≥cuz 12972  ℝ⁺crp 13127  [,)cico 13485  ⌈cceil 13938   ∥ cdvds 16431

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-sep 5248  ax-nul 5259  ax-pow 5327  ax-pr 5391  ax-un 7755  ax-cnex 11263  ax-resscn 11264  ax-1cn 11265  ax-icn 11266  ax-addcl 11267  ax-addrcl 11268  ax-mulcl 11269  ax-mulrcl 11270  ax-mulcom 11271  ax-addass 11272  ax-mulass 11273  ax-distr 11274  ax-i2m1 11275  ax-1ne0 11276  ax-1rid 11277  ax-rnegex 11278  ax-rrecex 11279  ax-cnre 11280  ax-pre-lttri 11281  ax-pre-lttrn 11282  ax-pre-ltadd 11283  ax-pre-mulgt0 11284  ax-pre-sup 11285

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3848  df-ss 3897  df-pss 4013  df-dif 4046  df-in 4090  df-un 4150  df-nul 4278  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6307  df-ord 6368  df-on 6369  df-lim 6370  df-suc 6371  df-iota 6497  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-riota 7381  df-ov 7427  df-oprab 7428  df-mpo 7429  df-om 7882  df-2nd 8006  df-frecs 8306  df-wrecs 8337  df-recs 8386  df-rdg 8425  df-er 8724  df-en 8981  df-dom 8982  df-sdom 8983  df-sup 9441  df-inf 9442  df-pnf 11352  df-mnf 11353  df-xr 11354  df-ltxr 11355  df-le 11356  df-sub 11550  df-neg 11551  df-div 11981  df-nn 12343  df-2 12412  df-n0 12614  df-z 12701  df-uz 12973  df-rp 13128  df-ico 13489  df-fl 13939  df-ceil 13940  df-dvds 16432

This theorem is used by:  limsup10ex  46891  liminf10ex  46892