Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  smfsuplem2 Structured version   Visualization version   GIF version

Theorem smfsuplem2 47383
Description: The supremum of a countable set of sigma-measurable functions is sigma-measurable. Proposition 121F (b) of [Fremlin1] p. 38 . (Contributed by Glauco Siliprandi, 23-Oct-2021.)
Hypotheses
Ref Expression
smfsuplem2.m (𝜑𝑀 ∈ ℤ)
smfsuplem2.z 𝑍 = (ℤ𝑀)
smfsuplem2.s (𝜑𝑆 ∈ SAlg)
smfsuplem2.f (𝜑𝐹:𝑍⟶(SMblFn‘𝑆))
smfsuplem2.d 𝐷 = {𝑥 𝑛𝑍 dom (𝐹𝑛) ∣ ∃𝑦 ∈ ℝ ∀𝑛𝑍 ((𝐹𝑛)‘𝑥) ≤ 𝑦}
smfsuplem2.g 𝐺 = (𝑥𝐷 ↦ sup(ran (𝑛𝑍 ↦ ((𝐹𝑛)‘𝑥)), ℝ, < ))
smfsuplem2.8 (𝜑𝐴 ∈ ℝ)
Assertion
Ref Expression
smfsuplem2 (𝜑 → (𝐺 “ (-∞(,]𝐴)) ∈ (𝑆t 𝐷))
Distinct variable groups:   𝐴,𝑛,𝑦   𝑦,𝐷,𝑥   𝑛,𝐹,𝑦,𝑥   𝑦,𝑆   𝑛,𝑍,𝑦,𝑥   𝜑,𝑦
Allowed substitution hints:   𝜑(𝑥,𝑛)   𝐴(𝑥)   𝐷(𝑛)   𝑆(𝑥,𝑛)   𝐺(𝑥,𝑦,𝑛)   𝑀(𝑥,𝑦,𝑛)

Proof of Theorem smfsuplem2
Dummy variables 𝑚 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 nfcv 2924 . . 3 𝑛𝐹
2 smfsuplem2.z . . 3 𝑍 = (ℤ𝑀)
3 smfsuplem2.s . . 3 (𝜑𝑆 ∈ SAlg)
4 smfsuplem2.f . . 3 (𝜑𝐹:𝑍⟶(SMblFn‘𝑆))
5 eqid 2762 . . 3 (topGen‘ran (,)) = (topGen‘ran (,))
6 eqid 2762 . . 3 (SalGen‘(topGen‘ran (,))) = (SalGen‘(topGen‘ran (,)))
7 mnfxr 11239 . . . . 5 -∞ ∈ ℝ*
87a1i 11 . . . 4 (𝜑 → -∞ ∈ ℝ*)
9 smfsuplem2.8 . . . 4 (𝜑𝐴 ∈ ℝ)
108, 9, 5, 6iocborel 46927 . . 3 (𝜑 → (-∞(,]𝐴) ∈ (SalGen‘(topGen‘ran (,))))
111, 2, 3, 4, 5, 6, 10smfpimcc 47379 . 2 (𝜑 → ∃(:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ (-∞(,]𝐴)) = ((𝑛) ∩ dom (𝐹𝑛))))
12 smfsuplem2.m . . . . . 6 (𝜑𝑀 ∈ ℤ)
1312adantr 484 . . . . 5 ((𝜑 ∧ (:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ (-∞(,]𝐴)) = ((𝑛) ∩ dom (𝐹𝑛)))) → 𝑀 ∈ ℤ)
143adantr 484 . . . . 5 ((𝜑 ∧ (:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ (-∞(,]𝐴)) = ((𝑛) ∩ dom (𝐹𝑛)))) → 𝑆 ∈ SAlg)
154adantr 484 . . . . 5 ((𝜑 ∧ (:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ (-∞(,]𝐴)) = ((𝑛) ∩ dom (𝐹𝑛)))) → 𝐹:𝑍⟶(SMblFn‘𝑆))
16 smfsuplem2.d . . . . . 6 𝐷 = {𝑥 𝑛𝑍 dom (𝐹𝑛) ∣ ∃𝑦 ∈ ℝ ∀𝑛𝑍 ((𝐹𝑛)‘𝑥) ≤ 𝑦}
17 fveq2 6867 . . . . . . . . . 10 (𝑛 = 𝑚 → (𝐹𝑛) = (𝐹𝑚))
1817dmeqd 5881 . . . . . . . . 9 (𝑛 = 𝑚 → dom (𝐹𝑛) = dom (𝐹𝑚))
1918cbviinv 4997 . . . . . . . 8 𝑛𝑍 dom (𝐹𝑛) = 𝑚𝑍 dom (𝐹𝑚)
2019a1i 11 . . . . . . 7 (𝑥 = 𝑤 𝑛𝑍 dom (𝐹𝑛) = 𝑚𝑍 dom (𝐹𝑚))
21 fveq2 6867 . . . . . . . . . . 11 (𝑥 = 𝑤 → ((𝐹𝑛)‘𝑥) = ((𝐹𝑛)‘𝑤))
2221breq1d 5110 . . . . . . . . . 10 (𝑥 = 𝑤 → (((𝐹𝑛)‘𝑥) ≤ 𝑦 ↔ ((𝐹𝑛)‘𝑤) ≤ 𝑦))
2322ralbidv 3185 . . . . . . . . 9 (𝑥 = 𝑤 → (∀𝑛𝑍 ((𝐹𝑛)‘𝑥) ≤ 𝑦 ↔ ∀𝑛𝑍 ((𝐹𝑛)‘𝑤) ≤ 𝑦))
2417fveq1d 6869 . . . . . . . . . . . 12 (𝑛 = 𝑚 → ((𝐹𝑛)‘𝑤) = ((𝐹𝑚)‘𝑤))
2524breq1d 5110 . . . . . . . . . . 11 (𝑛 = 𝑚 → (((𝐹𝑛)‘𝑤) ≤ 𝑦 ↔ ((𝐹𝑚)‘𝑤) ≤ 𝑦))
2625cbvralvw 3240 . . . . . . . . . 10 (∀𝑛𝑍 ((𝐹𝑛)‘𝑤) ≤ 𝑦 ↔ ∀𝑚𝑍 ((𝐹𝑚)‘𝑤) ≤ 𝑦)
2726a1i 11 . . . . . . . . 9 (𝑥 = 𝑤 → (∀𝑛𝑍 ((𝐹𝑛)‘𝑤) ≤ 𝑦 ↔ ∀𝑚𝑍 ((𝐹𝑚)‘𝑤) ≤ 𝑦))
2823, 27bitrd 281 . . . . . . . 8 (𝑥 = 𝑤 → (∀𝑛𝑍 ((𝐹𝑛)‘𝑥) ≤ 𝑦 ↔ ∀𝑚𝑍 ((𝐹𝑚)‘𝑤) ≤ 𝑦))
2928rexbidv 3186 . . . . . . 7 (𝑥 = 𝑤 → (∃𝑦 ∈ ℝ ∀𝑛𝑍 ((𝐹𝑛)‘𝑥) ≤ 𝑦 ↔ ∃𝑦 ∈ ℝ ∀𝑚𝑍 ((𝐹𝑚)‘𝑤) ≤ 𝑦))
3020, 29cbvrabv2w 45703 . . . . . 6 {𝑥 𝑛𝑍 dom (𝐹𝑛) ∣ ∃𝑦 ∈ ℝ ∀𝑛𝑍 ((𝐹𝑛)‘𝑥) ≤ 𝑦} = {𝑤 𝑚𝑍 dom (𝐹𝑚) ∣ ∃𝑦 ∈ ℝ ∀𝑚𝑍 ((𝐹𝑚)‘𝑤) ≤ 𝑦}
3116, 30eqtri 2785 . . . . 5 𝐷 = {𝑤 𝑚𝑍 dom (𝐹𝑚) ∣ ∃𝑦 ∈ ℝ ∀𝑚𝑍 ((𝐹𝑚)‘𝑤) ≤ 𝑦}
32 smfsuplem2.g . . . . . 6 𝐺 = (𝑥𝐷 ↦ sup(ran (𝑛𝑍 ↦ ((𝐹𝑛)‘𝑥)), ℝ, < ))
3321mpteq2dv 5194 . . . . . . . . . 10 (𝑥 = 𝑤 → (𝑛𝑍 ↦ ((𝐹𝑛)‘𝑥)) = (𝑛𝑍 ↦ ((𝐹𝑛)‘𝑤)))
3424cbvmptv 5204 . . . . . . . . . . 11 (𝑛𝑍 ↦ ((𝐹𝑛)‘𝑤)) = (𝑚𝑍 ↦ ((𝐹𝑚)‘𝑤))
3534a1i 11 . . . . . . . . . 10 (𝑥 = 𝑤 → (𝑛𝑍 ↦ ((𝐹𝑛)‘𝑤)) = (𝑚𝑍 ↦ ((𝐹𝑚)‘𝑤)))
3633, 35eqtrd 2797 . . . . . . . . 9 (𝑥 = 𝑤 → (𝑛𝑍 ↦ ((𝐹𝑛)‘𝑥)) = (𝑚𝑍 ↦ ((𝐹𝑚)‘𝑤)))
3736rneqd 5914 . . . . . . . 8 (𝑥 = 𝑤 → ran (𝑛𝑍 ↦ ((𝐹𝑛)‘𝑥)) = ran (𝑚𝑍 ↦ ((𝐹𝑚)‘𝑤)))
3837supeq1d 9392 . . . . . . 7 (𝑥 = 𝑤 → sup(ran (𝑛𝑍 ↦ ((𝐹𝑛)‘𝑥)), ℝ, < ) = sup(ran (𝑚𝑍 ↦ ((𝐹𝑚)‘𝑤)), ℝ, < ))
3938cbvmptv 5204 . . . . . 6 (𝑥𝐷 ↦ sup(ran (𝑛𝑍 ↦ ((𝐹𝑛)‘𝑥)), ℝ, < )) = (𝑤𝐷 ↦ sup(ran (𝑚𝑍 ↦ ((𝐹𝑚)‘𝑤)), ℝ, < ))
4032, 39eqtri 2785 . . . . 5 𝐺 = (𝑤𝐷 ↦ sup(ran (𝑚𝑍 ↦ ((𝐹𝑚)‘𝑤)), ℝ, < ))
419adantr 484 . . . . 5 ((𝜑 ∧ (:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ (-∞(,]𝐴)) = ((𝑛) ∩ dom (𝐹𝑛)))) → 𝐴 ∈ ℝ)
42 simprl 780 . . . . 5 ((𝜑 ∧ (:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ (-∞(,]𝐴)) = ((𝑛) ∩ dom (𝐹𝑛)))) → :𝑍𝑆)
43 simplrr 787 . . . . . 6 (((𝜑 ∧ (:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ (-∞(,]𝐴)) = ((𝑛) ∩ dom (𝐹𝑛)))) ∧ 𝑚𝑍) → ∀𝑛𝑍 ((𝐹𝑛) “ (-∞(,]𝐴)) = ((𝑛) ∩ dom (𝐹𝑛)))
4417cnveqd 5847 . . . . . . . . 9 (𝑛 = 𝑚(𝐹𝑛) = (𝐹𝑚))
4544imaeq1d 6048 . . . . . . . 8 (𝑛 = 𝑚 → ((𝐹𝑛) “ (-∞(,]𝐴)) = ((𝐹𝑚) “ (-∞(,]𝐴)))
46 fveq2 6867 . . . . . . . . 9 (𝑛 = 𝑚 → (𝑛) = (𝑚))
4746, 18ineq12d 4173 . . . . . . . 8 (𝑛 = 𝑚 → ((𝑛) ∩ dom (𝐹𝑛)) = ((𝑚) ∩ dom (𝐹𝑚)))
4845, 47eqeq12d 2778 . . . . . . 7 (𝑛 = 𝑚 → (((𝐹𝑛) “ (-∞(,]𝐴)) = ((𝑛) ∩ dom (𝐹𝑛)) ↔ ((𝐹𝑚) “ (-∞(,]𝐴)) = ((𝑚) ∩ dom (𝐹𝑚))))
4948rspccva 3580 . . . . . 6 ((∀𝑛𝑍 ((𝐹𝑛) “ (-∞(,]𝐴)) = ((𝑛) ∩ dom (𝐹𝑛)) ∧ 𝑚𝑍) → ((𝐹𝑚) “ (-∞(,]𝐴)) = ((𝑚) ∩ dom (𝐹𝑚)))
5043, 49sylancom 597 . . . . 5 (((𝜑 ∧ (:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ (-∞(,]𝐴)) = ((𝑛) ∩ dom (𝐹𝑛)))) ∧ 𝑚𝑍) → ((𝐹𝑚) “ (-∞(,]𝐴)) = ((𝑚) ∩ dom (𝐹𝑚)))
5113, 2, 14, 15, 31, 40, 41, 42, 50smfsuplem1 47382 . . . 4 ((𝜑 ∧ (:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ (-∞(,]𝐴)) = ((𝑛) ∩ dom (𝐹𝑛)))) → (𝐺 “ (-∞(,]𝐴)) ∈ (𝑆t 𝐷))
5251ex 416 . . 3 (𝜑 → ((:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ (-∞(,]𝐴)) = ((𝑛) ∩ dom (𝐹𝑛))) → (𝐺 “ (-∞(,]𝐴)) ∈ (𝑆t 𝐷)))
5352exlimdv 1953 . 2 (𝜑 → (∃(:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ (-∞(,]𝐴)) = ((𝑛) ∩ dom (𝐹𝑛))) → (𝐺 “ (-∞(,]𝐴)) ∈ (𝑆t 𝐷)))
5411, 53mpd 15 1 (𝜑 → (𝐺 “ (-∞(,]𝐴)) ∈ (𝑆t 𝐷))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 399   = wceq 1560  wex 1799  wcel 2142  wral 3076  wrex 3086  {crab 3414  cin 3903   ciin 4950   class class class wbr 5100  cmpt 5181  ccnv 5646  dom cdm 5647  ran crn 5648  cima 5650  wf 6517  cfv 6521  (class class class)co 7396  supcsup 9386  cr 11072  -∞cmnf 11214  *cxr 11215   < clt 11216  cle 11217  cz 12568  cuz 12839  (,)cioo 13349  (,]cioc 13350  t crest 17449  topGenctg 17466  SAlgcsalg 46879  SalGencsalgen 46883  SMblFncsmblfn 47266
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5227  ax-sep 5246  ax-nul 5256  ax-pow 5322  ax-pr 5390  ax-un 7718  ax-inf2 9596  ax-cc 10392  ax-ac2 10420  ax-cnex 11129  ax-resscn 11130  ax-1cn 11131  ax-icn 11132  ax-addcl 11133  ax-addrcl 11134  ax-mulcl 11135  ax-mulrcl 11136  ax-mulcom 11137  ax-addass 11138  ax-mulass 11139  ax-distr 11140  ax-i2m1 11141  ax-1ne0 11142  ax-1rid 11143  ax-rnegex 11144  ax-rrecex 11145  ax-cnre 11146  ax-pre-lttri 11147  ax-pre-lttrn 11148  ax-pre-ltadd 11149  ax-pre-mulgt0 11150  ax-pre-sup 11151
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1099  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3456  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4481  df-pw 4557  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-int 4906  df-iun 4951  df-iin 4952  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5542  df-eprel 5547  df-po 5555  df-so 5556  df-fr 5600  df-se 5601  df-we 5602  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-pred 6288  df-ord 6349  df-on 6350  df-lim 6351  df-suc 6352  df-iota 6477  df-fun 6523  df-fn 6524  df-f 6525  df-f1 6526  df-fo 6527  df-f1o 6528  df-fv 6529  df-isom 6530  df-riota 7353  df-ov 7399  df-oprab 7400  df-mpo 7401  df-om 7847  df-1st 7970  df-2nd 7971  df-frecs 8262  df-wrecs 8293  df-recs 8342  df-rdg 8381  df-1o 8437  df-2o 8438  df-oadd 8441  df-omul 8442  df-er 8678  df-map 8810  df-pm 8811  df-en 8928  df-dom 8929  df-sdom 8930  df-fin 8931  df-sup 9388  df-inf 9389  df-oi 9458  df-card 9897  df-acn 9900  df-ac 10072  df-pnf 11218  df-mnf 11219  df-xr 11220  df-ltxr 11221  df-le 11222  df-sub 11416  df-neg 11417  df-div 11845  df-nn 12211  df-n0 12482  df-z 12569  df-uz 12840  df-q 12950  df-rp 12994  df-ioo 13353  df-ioc 13354  df-ico 13355  df-fl 13802  df-rest 17451  df-topgen 17472  df-top 22951  df-bases 23003  df-salg 46880  df-salgen 46884  df-smblfn 47267
This theorem is referenced by:  smfsuplem3  47384
  Copyright terms: Public domain W3C validator