Metamath Proof Explorer


Theorem incsmflem

Description: A nondecreasing function is Borel measurable. Proposition 121D (c) of Fremlin1 p. 36 . (Contributed by Glauco Siliprandi, 26-Jun-2021)

Ref Expression
Hypotheses incsmflem.x x φ
incsmflem.y y φ
incsmflem.a φ A
incsmflem.f φ F : A *
incsmflem.i φ x A y A x y F x F y
incsmflem.j J = topGen ran .
incsmflem.b B = SalGen J
incsmflem.r φ R *
incsmflem.l Y = x A | F x < R
incsmflem.c C = sup Y * <
incsmflem.d D = −∞ C
incsmflem.e E = −∞ C
Assertion incsmflem φ b B Y = b A

Proof

Step Hyp Ref Expression
1 incsmflem.x x φ
2 incsmflem.y y φ
3 incsmflem.a φ A
4 incsmflem.f φ F : A *
5 incsmflem.i φ x A y A x y F x F y
6 incsmflem.j J = topGen ran .
7 incsmflem.b B = SalGen J
8 incsmflem.r φ R *
9 incsmflem.l Y = x A | F x < R
10 incsmflem.c C = sup Y * <
11 incsmflem.d D = −∞ C
12 incsmflem.e E = −∞ C
13 mnfxr −∞ *
14 13 a1i φ C Y −∞ *
15 ssrab2 x A | F x < R A
16 9 15 eqsstri Y A
17 16 a1i φ Y A
18 17 3 sstrd φ Y
19 18 sselda φ C Y C
20 14 19 6 7 iocborel φ C Y −∞ C B
21 12 20 eqeltrid φ C Y E B
22 nfcv _ x C
23 nfrab1 _ x x A | F x < R
24 9 23 nfcxfr _ x Y
25 22 24 nfel x C Y
26 1 25 nfan x φ C Y
27 nfv y C Y
28 2 27 nfan y φ C Y
29 3 adantr φ C Y A
30 4 adantr φ C Y F : A *
31 5 adantr φ C Y x A y A x y F x F y
32 8 adantr φ C Y R *
33 simpr φ C Y C Y
34 26 28 29 30 31 32 9 10 33 12 pimincfltioc φ C Y Y = E A
35 ineq1 b = E b A = E A
36 35 rspceeqv E B Y = E A b B Y = b A
37 21 34 36 syl2anc φ C Y b B Y = b A
38 6 7 iooborel −∞ C B
39 11 38 eqeltri D B
40 39 a1i φ D B
41 40 adantr φ ¬ C Y D B
42 25 nfn x ¬ C Y
43 1 42 nfan x φ ¬ C Y
44 nfv y ¬ C Y
45 2 44 nfan y φ ¬ C Y
46 3 adantr φ ¬ C Y A
47 4 adantr φ ¬ C Y F : A *
48 5 adantr φ ¬ C Y x A y A x y F x F y
49 8 adantr φ ¬ C Y R *
50 simpr φ ¬ C Y ¬ C Y
51 43 45 46 47 48 49 9 10 50 11 pimincfltioo φ ¬ C Y Y = D A
52 ineq1 b = D b A = D A
53 52 rspceeqv D B Y = D A b B Y = b A
54 41 51 53 syl2anc φ ¬ C Y b B Y = b A
55 37 54 pm2.61dan φ b B Y = b A