Theorem mbfi1fseq 26022

Description: A characterization of measurability in terms of simple functions (this is an if and only if for nonnegative functions, although we don't prove it). Any nonnegative measurable function is the limit of an increasing sequence of nonnegative simple functions. This proof is an example of a poor de Bruijn factor - the formalized proof is much longer than an average hand proof, which usually just describes the function 𝐺 and "leaves the details as an exercise to the reader". (Contributed by Mario Carneiro, 16-Aug-2014.) (Revised by Mario Carneiro, 23-Aug-2014.)

Hypotheses

Ref	Expression
mbfi1fseq.1	⊢ (𝜑 → 𝐹 ∈ MblFn)
mbfi1fseq.2	⊢ (𝜑 → 𝐹:ℝ⟶(0[,)+∞))

Assertion

Ref	Expression
mbfi1fseq	⊢ (𝜑 → ∃𝑔(𝑔:ℕ⟶dom ∫1 ∧ ∀𝑛 ∈ ℕ (0𝑝 ∘r ≤ (𝑔‘𝑛) ∧ (𝑔‘𝑛) ∘r ≤ (𝑔‘(𝑛 + 1))) ∧ ∀𝑥 ∈ ℝ (𝑛 ∈ ℕ ↦ ((𝑔‘𝑛)‘𝑥)) ⇝ (𝐹‘𝑥)))

Distinct variable groups:   𝑔,𝑛,𝑥,𝐹   𝜑,𝑛,𝑥

Allowed substitution hint:   𝜑(𝑔)

Proof of Theorem mbfi1fseq

Dummy variables 𝑗 𝑘 𝑚 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		mbfi1fseq.1	. 2 ⊢ (𝜑 → 𝐹 ∈ MblFn)
2		mbfi1fseq.2	. 2 ⊢ (𝜑 → 𝐹:ℝ⟶(0[,)+∞))
3		oveq2 7420	. . . . . 6 ⊢ (𝑗 = 𝑘 → (2↑𝑗) = (2↑𝑘))
4	3	oveq2d 7428	. . . . 5 ⊢ (𝑗 = 𝑘 → ((𝐹‘𝑧) · (2↑𝑗)) = ((𝐹‘𝑧) · (2↑𝑘)))
5	4	fveq2d 6881	. . . 4 ⊢ (𝑗 = 𝑘 → (⌊‘((𝐹‘𝑧) · (2↑𝑗))) = (⌊‘((𝐹‘𝑧) · (2↑𝑘))))
6	5, 3	oveq12d 7430	. . 3 ⊢ (𝑗 = 𝑘 → ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)) = ((⌊‘((𝐹‘𝑧) · (2↑𝑘))) / (2↑𝑘)))
7		fveq2 6877	. . . . 5 ⊢ (𝑧 = 𝑦 → (𝐹‘𝑧) = (𝐹‘𝑦))
8	7	fvoveq1d 7434	. . . 4 ⊢ (𝑧 = 𝑦 → (⌊‘((𝐹‘𝑧) · (2↑𝑘))) = (⌊‘((𝐹‘𝑦) · (2↑𝑘))))
9	8	oveq1d 7427	. . 3 ⊢ (𝑧 = 𝑦 → ((⌊‘((𝐹‘𝑧) · (2↑𝑘))) / (2↑𝑘)) = ((⌊‘((𝐹‘𝑦) · (2↑𝑘))) / (2↑𝑘)))
10	6, 9	cbvmpov 7507	. 2 ⊢ (𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗))) = (𝑘 ∈ ℕ, 𝑦 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑦) · (2↑𝑘))) / (2↑𝑘)))
11		eleq1w 2844	. . . . . 6 ⊢ (𝑦 = 𝑥 → (𝑦 ∈ (-𝑚[,]𝑚) ↔ 𝑥 ∈ (-𝑚[,]𝑚)))
12		oveq2 7420	. . . . . . . 8 ⊢ (𝑦 = 𝑥 → (𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑦) = (𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥))
13	12	breq1d 5113	. . . . . . 7 ⊢ (𝑦 = 𝑥 → ((𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑦) ≤ 𝑚 ↔ (𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥) ≤ 𝑚))
14	13, 12	ifbieq1d 4507	. . . . . 6 ⊢ (𝑦 = 𝑥 → if((𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑦) ≤ 𝑚, (𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑦), 𝑚) = if((𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥) ≤ 𝑚, (𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥), 𝑚))
15	11, 14	ifbieq1d 4507	. . . . 5 ⊢ (𝑦 = 𝑥 → if(𝑦 ∈ (-𝑚[,]𝑚), if((𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑦) ≤ 𝑚, (𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑦), 𝑚), 0) = if(𝑥 ∈ (-𝑚[,]𝑚), if((𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥) ≤ 𝑚, (𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥), 𝑚), 0))
16	15	cbvmptv 5209	. . . 4 ⊢ (𝑦 ∈ ℝ ↦ if(𝑦 ∈ (-𝑚[,]𝑚), if((𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑦) ≤ 𝑚, (𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑦), 𝑚), 0)) = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (-𝑚[,]𝑚), if((𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥) ≤ 𝑚, (𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥), 𝑚), 0))
17		negeq 11530	. . . . . . . 8 ⊢ (𝑚 = 𝑘 → -𝑚 = -𝑘)
18		id 23	. . . . . . . 8 ⊢ (𝑚 = 𝑘 → 𝑚 = 𝑘)
19	17, 18	oveq12d 7430	. . . . . . 7 ⊢ (𝑚 = 𝑘 → (-𝑚[,]𝑚) = (-𝑘[,]𝑘))
20	19	eleq2d 2847	. . . . . 6 ⊢ (𝑚 = 𝑘 → (𝑥 ∈ (-𝑚[,]𝑚) ↔ 𝑥 ∈ (-𝑘[,]𝑘)))
21		oveq1 7419	. . . . . . . 8 ⊢ (𝑚 = 𝑘 → (𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥) = (𝑘(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥))
22	21, 18	breq12d 5116	. . . . . . 7 ⊢ (𝑚 = 𝑘 → ((𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥) ≤ 𝑚 ↔ (𝑘(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥) ≤ 𝑘))
23	22, 21, 18	ifbieq12d 4511	. . . . . 6 ⊢ (𝑚 = 𝑘 → if((𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥) ≤ 𝑚, (𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥), 𝑚) = if((𝑘(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥) ≤ 𝑘, (𝑘(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥), 𝑘))
24	20, 23	ifbieq1d 4507	. . . . 5 ⊢ (𝑚 = 𝑘 → if(𝑥 ∈ (-𝑚[,]𝑚), if((𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥) ≤ 𝑚, (𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥), 𝑚), 0) = if(𝑥 ∈ (-𝑘[,]𝑘), if((𝑘(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥) ≤ 𝑘, (𝑘(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥), 𝑘), 0))
25	24	mpteq2dv 5199	. . . 4 ⊢ (𝑚 = 𝑘 → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (-𝑚[,]𝑚), if((𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥) ≤ 𝑚, (𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥), 𝑚), 0)) = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (-𝑘[,]𝑘), if((𝑘(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥) ≤ 𝑘, (𝑘(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥), 𝑘), 0)))
26	16, 25	eqtrid 2808	. . 3 ⊢ (𝑚 = 𝑘 → (𝑦 ∈ ℝ ↦ if(𝑦 ∈ (-𝑚[,]𝑚), if((𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑦) ≤ 𝑚, (𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑦), 𝑚), 0)) = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (-𝑘[,]𝑘), if((𝑘(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥) ≤ 𝑘, (𝑘(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥), 𝑘), 0)))
27	26	cbvmptv 5209	. 2 ⊢ (𝑚 ∈ ℕ ↦ (𝑦 ∈ ℝ ↦ if(𝑦 ∈ (-𝑚[,]𝑚), if((𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑦) ≤ 𝑚, (𝑚(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑦), 𝑚), 0))) = (𝑘 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (-𝑘[,]𝑘), if((𝑘(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥) ≤ 𝑘, (𝑘(𝑗 ∈ ℕ, 𝑧 ∈ ℝ ↦ ((⌊‘((𝐹‘𝑧) · (2↑𝑗))) / (2↑𝑗)))𝑥), 𝑘), 0)))
28	1, 2, 10, 27	mbfi1fseqlem6 26021	1 ⊢ (𝜑 → ∃𝑔(𝑔:ℕ⟶dom ∫1 ∧ ∀𝑛 ∈ ℕ (0𝑝 ∘r ≤ (𝑔‘𝑛) ∧ (𝑔‘𝑛) ∘r ≤ (𝑔‘(𝑛 + 1))) ∧ ∀𝑥 ∈ ℝ (𝑛 ∈ ℕ ↦ ((𝑔‘𝑛)‘𝑥)) ⇝ (𝐹‘𝑥)))

This proof depends on syntax axioms:   → wi 4   ∧ wa 401   ∧ w3a 1103  ∃wex 1812   ∈ wcel 2145  ∀wral 3077  ifcif 4482   class class class wbr 5103   ↦ cmpt 5186  dom cdm 5651  ⟶wf 6527  ‘cfv 6531  (class class class)co 7412   ∈ cmpo 7414   ∘_r cofr 7681  ℝcr 11180  0cc0 11181  1c1 11182   + caddc 11184   · cmul 11186  +∞cpnf 11321   ≤ cle 11325  -cneg 11523   / cdiv 11954  ℕcn 12316  2c2 12378  [,)cico 13459  [,]cicc 13460  ⌊cfl 13910  ↑cexp 14184   ⇝ cli 15631  MblFncmbf 25915  ∫₁citg1 25916  0_𝑝c0p 25970

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7740  ax-inf2 9626  ax-cnex 11237  ax-resscn 11238  ax-1cn 11239  ax-icn 11240  ax-addcl 11241  ax-addrcl 11242  ax-mulcl 11243  ax-mulrcl 11244  ax-mulcom 11245  ax-addass 11246  ax-mulass 11247  ax-distr 11248  ax-i2m1 11249  ax-1ne0 11250  ax-1rid 11251  ax-rnegex 11252  ax-rrecex 11253  ax-cnre 11254  ax-pre-lttri 11255  ax-pre-lttrn 11256  ax-pre-ltadd 11257  ax-pre-mulgt0 11258  ax-pre-sup 11259

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  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 6297  df-ord 6358  df-on 6359  df-lim 6360  df-suc 6361  df-iota 6487  df-fun 6533  df-fn 6534  df-f 6535  df-f1 6536  df-fo 6537  df-f1o 6538  df-fv 6539  df-isom 6540  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-of 7682  df-ofr 7683  df-om 7867  df-1st 7990  df-2nd 7991  df-frecs 8283  df-wrecs 8314  df-recs 8363  df-rdg 8402  df-1o 8460  df-2o 8461  df-er 8701  df-map 8833  df-pm 8834  df-en 8958  df-dom 8959  df-sdom 8960  df-fin 8961  df-fi 9387  df-sup 9418  df-inf 9419  df-oi 9488  df-dju 9963  df-card 10001  df-pnf 11326  df-mnf 11327  df-xr 11328  df-ltxr 11329  df-le 11330  df-sub 11524  df-neg 11525  df-div 11955  df-nn 12317  df-2 12386  df-3 12387  df-n0 12588  df-z 12675  df-uz 12947  df-q 13057  df-rp 13102  df-xneg 13222  df-xadd 13223  df-xmul 13224  df-ioo 13461  df-ico 13463  df-icc 13464  df-fz 13621  df-fzo 13769  df-fl 13912  df-seq 14125  df-exp 14185  df-hash 14455  df-cj 15246  df-re 15247  df-im 15248  df-sqrt 15382  df-abs 15383  df-clim 15635  df-rlim 15636  df-sum 15834  df-rest 17573  df-topgen 17594  df-psmet 21650  df-xmet 21651  df-met 21652  df-bl 21653  df-mopn 21654  df-top 23192  df-topon 23209  df-bases 23244  df-cmp 23685  df-ovol 25765  df-vol 25766  df-mbf 25920  df-itg1 25921  df-0p 25971

This theorem is used by:  mbfi1flimlem  26023  itg2add  26060