Theorem itg2cnlem1 24362

Description: Lemma for itgcn 24443. (Contributed by Mario Carneiro, 30-Aug-2014.)

Hypotheses

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

Assertion

Ref	Expression
itg2cnlem1	⊢ (𝜑 → sup(ran (𝑛 ∈ ℕ ↦ (∫2‘(𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))), ℝ*, < ) = (∫2‘𝐹))

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

Proof of Theorem itg2cnlem1

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

Step	Hyp	Ref	Expression
1		fvex 6683	. . . . . . . . . 10 ⊢ (𝐹‘𝑥) ∈ V
2		c0ex 10635	. . . . . . . . . 10 ⊢ 0 ∈ V
3	1, 2	ifex 4515	. . . . . . . . 9 ⊢ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0) ∈ V
4		eqid 2821	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) = (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))
5	4	fvmpt2 6779	. . . . . . . . 9 ⊢ ((𝑥 ∈ ℝ ∧ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0) ∈ V) → ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑥) = if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))
6	3, 5	mpan2 689	. . . . . . . 8 ⊢ (𝑥 ∈ ℝ → ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑥) = if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))
7	6	mpteq2dv 5162	. . . . . . 7 ⊢ (𝑥 ∈ ℝ → (𝑛 ∈ ℕ ↦ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑥)) = (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))
8	7	rneqd 5808	. . . . . 6 ⊢ (𝑥 ∈ ℝ → ran (𝑛 ∈ ℕ ↦ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑥)) = ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))
9	8	supeq1d 8910	. . . . 5 ⊢ (𝑥 ∈ ℝ → sup(ran (𝑛 ∈ ℕ ↦ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑥)), ℝ, < ) = sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < ))
10	9	mpteq2ia 5157	. . . 4 ⊢ (𝑥 ∈ ℝ ↦ sup(ran (𝑛 ∈ ℕ ↦ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑥)), ℝ, < )) = (𝑥 ∈ ℝ ↦ sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < ))
11		nfcv 2977	. . . . 5 ⊢ Ⅎ𝑦sup(ran (𝑛 ∈ ℕ ↦ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑥)), ℝ, < )
12		nfcv 2977	. . . . . . . 8 ⊢ Ⅎ𝑥ℕ
13		nfmpt1 5164	. . . . . . . . . . 11 ⊢ Ⅎ𝑥(𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))
14	12, 13	nfmpt 5163	. . . . . . . . . 10 ⊢ Ⅎ𝑥(𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))
15		nfcv 2977	. . . . . . . . . 10 ⊢ Ⅎ𝑥𝑚
16	14, 15	nffv 6680	. . . . . . . . 9 ⊢ Ⅎ𝑥((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)
17		nfcv 2977	. . . . . . . . 9 ⊢ Ⅎ𝑥𝑦
18	16, 17	nffv 6680	. . . . . . . 8 ⊢ Ⅎ𝑥(((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦)
19	12, 18	nfmpt 5163	. . . . . . 7 ⊢ Ⅎ𝑥(𝑚 ∈ ℕ ↦ (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦))
20	19	nfrn 5824	. . . . . 6 ⊢ Ⅎ𝑥ran (𝑚 ∈ ℕ ↦ (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦))
21		nfcv 2977	. . . . . 6 ⊢ Ⅎ𝑥ℝ
22		nfcv 2977	. . . . . 6 ⊢ Ⅎ𝑥 <
23	20, 21, 22	nfsup 8915	. . . . 5 ⊢ Ⅎ𝑥sup(ran (𝑚 ∈ ℕ ↦ (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦)), ℝ, < )
24		fveq2 6670	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑥) = ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑦))
25	24	mpteq2dv 5162	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (𝑛 ∈ ℕ ↦ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑥)) = (𝑛 ∈ ℕ ↦ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑦)))
26		breq2 5070	. . . . . . . . . . . . 13 ⊢ (𝑛 = 𝑚 → ((𝐹‘𝑥) ≤ 𝑛 ↔ (𝐹‘𝑥) ≤ 𝑚))
27	26	ifbid 4489	. . . . . . . . . . . 12 ⊢ (𝑛 = 𝑚 → if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0) = if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))
28	27	mpteq2dv 5162	. . . . . . . . . . 11 ⊢ (𝑛 = 𝑚 → (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) = (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0)))
29	28	fveq1d 6672	. . . . . . . . . 10 ⊢ (𝑛 = 𝑚 → ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑦) = ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))‘𝑦))
30	29	cbvmptv 5169	. . . . . . . . 9 ⊢ (𝑛 ∈ ℕ ↦ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑦)) = (𝑚 ∈ ℕ ↦ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))‘𝑦))
31		eqid 2821	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))) = (𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))
32		reex 10628	. . . . . . . . . . . . 13 ⊢ ℝ ∈ V
33	32	mptex 6986	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0)) ∈ V
34	28, 31, 33	fvmpt 6768	. . . . . . . . . . 11 ⊢ (𝑚 ∈ ℕ → ((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚) = (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0)))
35	34	fveq1d 6672	. . . . . . . . . 10 ⊢ (𝑚 ∈ ℕ → (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦) = ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))‘𝑦))
36	35	mpteq2ia 5157	. . . . . . . . 9 ⊢ (𝑚 ∈ ℕ ↦ (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦)) = (𝑚 ∈ ℕ ↦ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))‘𝑦))
37	30, 36	eqtr4i 2847	. . . . . . . 8 ⊢ (𝑛 ∈ ℕ ↦ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑦)) = (𝑚 ∈ ℕ ↦ (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦))
38	25, 37	syl6eq 2872	. . . . . . 7 ⊢ (𝑥 = 𝑦 → (𝑛 ∈ ℕ ↦ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑥)) = (𝑚 ∈ ℕ ↦ (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦)))
39	38	rneqd 5808	. . . . . 6 ⊢ (𝑥 = 𝑦 → ran (𝑛 ∈ ℕ ↦ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑥)) = ran (𝑚 ∈ ℕ ↦ (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦)))
40	39	supeq1d 8910	. . . . 5 ⊢ (𝑥 = 𝑦 → sup(ran (𝑛 ∈ ℕ ↦ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑥)), ℝ, < ) = sup(ran (𝑚 ∈ ℕ ↦ (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦)), ℝ, < ))
41	11, 23, 40	cbvmpt 5167	. . . 4 ⊢ (𝑥 ∈ ℝ ↦ sup(ran (𝑛 ∈ ℕ ↦ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑥)), ℝ, < )) = (𝑦 ∈ ℝ ↦ sup(ran (𝑚 ∈ ℕ ↦ (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦)), ℝ, < ))
42	10, 41	eqtr3i 2846	. . 3 ⊢ (𝑥 ∈ ℝ ↦ sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < )) = (𝑦 ∈ ℝ ↦ sup(ran (𝑚 ∈ ℕ ↦ (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦)), ℝ, < ))
43		fveq2 6670	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (𝐹‘𝑥) = (𝐹‘𝑦))
44	43	breq1d 5076	. . . . . . 7 ⊢ (𝑥 = 𝑦 → ((𝐹‘𝑥) ≤ 𝑚 ↔ (𝐹‘𝑦) ≤ 𝑚))
45	44, 43	ifbieq1d 4490	. . . . . 6 ⊢ (𝑥 = 𝑦 → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) = if((𝐹‘𝑦) ≤ 𝑚, (𝐹‘𝑦), 0))
46	45	cbvmptv 5169	. . . . 5 ⊢ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0)) = (𝑦 ∈ ℝ ↦ if((𝐹‘𝑦) ≤ 𝑚, (𝐹‘𝑦), 0))
47	34	adantl 484	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚) = (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0)))
48		nnre 11645	. . . . . . . . . . . . 13 ⊢ (𝑚 ∈ ℕ → 𝑚 ∈ ℝ)
49	48	ad2antlr 725	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → 𝑚 ∈ ℝ)
50	49	rexrd 10691	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → 𝑚 ∈ ℝ*)
51		elioopnf 12832	. . . . . . . . . . 11 ⊢ (𝑚 ∈ ℝ* → ((𝐹‘𝑦) ∈ (𝑚(,)+∞) ↔ ((𝐹‘𝑦) ∈ ℝ ∧ 𝑚 < (𝐹‘𝑦))))
52	50, 51	syl 17	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → ((𝐹‘𝑦) ∈ (𝑚(,)+∞) ↔ ((𝐹‘𝑦) ∈ ℝ ∧ 𝑚 < (𝐹‘𝑦))))
53		simpr 487	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
54		itg2cn.1	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐹:ℝ⟶(0[,)+∞))
55	54	ffnd 6515	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐹 Fn ℝ)
56	55	ad2antrr 724	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → 𝐹 Fn ℝ)
57		elpreima 6828	. . . . . . . . . . . 12 ⊢ (𝐹 Fn ℝ → (𝑦 ∈ (◡𝐹 “ (𝑚(,)+∞)) ↔ (𝑦 ∈ ℝ ∧ (𝐹‘𝑦) ∈ (𝑚(,)+∞))))
58	56, 57	syl 17	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → (𝑦 ∈ (◡𝐹 “ (𝑚(,)+∞)) ↔ (𝑦 ∈ ℝ ∧ (𝐹‘𝑦) ∈ (𝑚(,)+∞))))
59	53, 58	mpbirand 705	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → (𝑦 ∈ (◡𝐹 “ (𝑚(,)+∞)) ↔ (𝐹‘𝑦) ∈ (𝑚(,)+∞)))
60		rge0ssre 12845	. . . . . . . . . . . . . 14 ⊢ (0[,)+∞) ⊆ ℝ
61		fss 6527	. . . . . . . . . . . . . 14 ⊢ ((𝐹:ℝ⟶(0[,)+∞) ∧ (0[,)+∞) ⊆ ℝ) → 𝐹:ℝ⟶ℝ)
62	54, 60, 61	sylancl 588	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐹:ℝ⟶ℝ)
63	62	adantr 483	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → 𝐹:ℝ⟶ℝ)
64	63	ffvelrnda 6851	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → (𝐹‘𝑦) ∈ ℝ)
65	64	biantrurd 535	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → (𝑚 < (𝐹‘𝑦) ↔ ((𝐹‘𝑦) ∈ ℝ ∧ 𝑚 < (𝐹‘𝑦))))
66	52, 59, 65	3bitr4d 313	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → (𝑦 ∈ (◡𝐹 “ (𝑚(,)+∞)) ↔ 𝑚 < (𝐹‘𝑦)))
67	66	notbid 320	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → (¬ 𝑦 ∈ (◡𝐹 “ (𝑚(,)+∞)) ↔ ¬ 𝑚 < (𝐹‘𝑦)))
68		eldif 3946	. . . . . . . . . 10 ⊢ (𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ↔ (𝑦 ∈ ℝ ∧ ¬ 𝑦 ∈ (◡𝐹 “ (𝑚(,)+∞))))
69	68	baib 538	. . . . . . . . 9 ⊢ (𝑦 ∈ ℝ → (𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ↔ ¬ 𝑦 ∈ (◡𝐹 “ (𝑚(,)+∞))))
70	69	adantl 484	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → (𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ↔ ¬ 𝑦 ∈ (◡𝐹 “ (𝑚(,)+∞))))
71	64, 49	lenltd 10786	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → ((𝐹‘𝑦) ≤ 𝑚 ↔ ¬ 𝑚 < (𝐹‘𝑦)))
72	67, 70, 71	3bitr4d 313	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → (𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ↔ (𝐹‘𝑦) ≤ 𝑚))
73	72	ifbid 4489	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → if(𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))), (𝐹‘𝑦), 0) = if((𝐹‘𝑦) ≤ 𝑚, (𝐹‘𝑦), 0))
74	73	mpteq2dva 5161	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑦 ∈ ℝ ↦ if(𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))), (𝐹‘𝑦), 0)) = (𝑦 ∈ ℝ ↦ if((𝐹‘𝑦) ≤ 𝑚, (𝐹‘𝑦), 0)))
75	46, 47, 74	3eqtr4a 2882	. . . 4 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚) = (𝑦 ∈ ℝ ↦ if(𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))), (𝐹‘𝑦), 0)))
76		difss 4108	. . . . . 6 ⊢ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ⊆ ℝ
77	76	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ⊆ ℝ)
78		rembl 24141	. . . . . 6 ⊢ ℝ ∈ dom vol
79	78	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ℝ ∈ dom vol)
80		fvex 6683	. . . . . . 7 ⊢ (𝐹‘𝑦) ∈ V
81	80, 2	ifex 4515	. . . . . 6 ⊢ if(𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))), (𝐹‘𝑦), 0) ∈ V
82	81	a1i 11	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞)))) → if(𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))), (𝐹‘𝑦), 0) ∈ V)
83		eldifn 4104	. . . . . . 7 ⊢ (𝑦 ∈ (ℝ ∖ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞)))) → ¬ 𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))))
84	83	adantl 484	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ (ℝ ∖ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))))) → ¬ 𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))))
85	84	iffalsed 4478	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ (ℝ ∖ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))))) → if(𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))), (𝐹‘𝑦), 0) = 0)
86		iftrue 4473	. . . . . . . . 9 ⊢ (𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) → if(𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))), (𝐹‘𝑦), 0) = (𝐹‘𝑦))
87	86	mpteq2ia 5157	. . . . . . . 8 ⊢ (𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ↦ if(𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))), (𝐹‘𝑦), 0)) = (𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ↦ (𝐹‘𝑦))
88		resmpt 5905	. . . . . . . . 9 ⊢ ((ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ⊆ ℝ → ((𝑦 ∈ ℝ ↦ (𝐹‘𝑦)) ↾ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞)))) = (𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ↦ (𝐹‘𝑦)))
89	76, 88	ax-mp 5	. . . . . . . 8 ⊢ ((𝑦 ∈ ℝ ↦ (𝐹‘𝑦)) ↾ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞)))) = (𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ↦ (𝐹‘𝑦))
90	87, 89	eqtr4i 2847	. . . . . . 7 ⊢ (𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ↦ if(𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))), (𝐹‘𝑦), 0)) = ((𝑦 ∈ ℝ ↦ (𝐹‘𝑦)) ↾ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))))
91	54	feqmptd 6733	. . . . . . . . 9 ⊢ (𝜑 → 𝐹 = (𝑦 ∈ ℝ ↦ (𝐹‘𝑦)))
92		itg2cn.2	. . . . . . . . 9 ⊢ (𝜑 → 𝐹 ∈ MblFn)
93	91, 92	eqeltrrd 2914	. . . . . . . 8 ⊢ (𝜑 → (𝑦 ∈ ℝ ↦ (𝐹‘𝑦)) ∈ MblFn)
94		mbfima 24231	. . . . . . . . . 10 ⊢ ((𝐹 ∈ MblFn ∧ 𝐹:ℝ⟶ℝ) → (◡𝐹 “ (𝑚(,)+∞)) ∈ dom vol)
95	92, 62, 94	syl2anc 586	. . . . . . . . 9 ⊢ (𝜑 → (◡𝐹 “ (𝑚(,)+∞)) ∈ dom vol)
96		cmmbl 24135	. . . . . . . . 9 ⊢ ((◡𝐹 “ (𝑚(,)+∞)) ∈ dom vol → (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ∈ dom vol)
97	95, 96	syl 17	. . . . . . . 8 ⊢ (𝜑 → (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ∈ dom vol)
98		mbfres 24245	. . . . . . . 8 ⊢ (((𝑦 ∈ ℝ ↦ (𝐹‘𝑦)) ∈ MblFn ∧ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ∈ dom vol) → ((𝑦 ∈ ℝ ↦ (𝐹‘𝑦)) ↾ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞)))) ∈ MblFn)
99	93, 97, 98	syl2anc 586	. . . . . . 7 ⊢ (𝜑 → ((𝑦 ∈ ℝ ↦ (𝐹‘𝑦)) ↾ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞)))) ∈ MblFn)
100	90, 99	eqeltrid 2917	. . . . . 6 ⊢ (𝜑 → (𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ↦ if(𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))), (𝐹‘𝑦), 0)) ∈ MblFn)
101	100	adantr 483	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))) ↦ if(𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))), (𝐹‘𝑦), 0)) ∈ MblFn)
102	77, 79, 82, 85, 101	mbfss 24247	. . . 4 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑦 ∈ ℝ ↦ if(𝑦 ∈ (ℝ ∖ (◡𝐹 “ (𝑚(,)+∞))), (𝐹‘𝑦), 0)) ∈ MblFn)
103	75, 102	eqeltrd 2913	. . 3 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚) ∈ MblFn)
104	54	ffvelrnda 6851	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘𝑥) ∈ (0[,)+∞))
105		0e0icopnf 12847	. . . . . 6 ⊢ 0 ∈ (0[,)+∞)
106		ifcl 4511	. . . . . 6 ⊢ (((𝐹‘𝑥) ∈ (0[,)+∞) ∧ 0 ∈ (0[,)+∞)) → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ∈ (0[,)+∞))
107	104, 105, 106	sylancl 588	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ∈ (0[,)+∞))
108	107	adantlr 713	. . . 4 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ∈ (0[,)+∞))
109	47, 108	fmpt3d 6880	. . 3 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚):ℝ⟶(0[,)+∞))
110		elrege0 12843	. . . . . . . . . . . . 13 ⊢ ((𝐹‘𝑥) ∈ (0[,)+∞) ↔ ((𝐹‘𝑥) ∈ ℝ ∧ 0 ≤ (𝐹‘𝑥)))
111	104, 110	sylib 220	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ((𝐹‘𝑥) ∈ ℝ ∧ 0 ≤ (𝐹‘𝑥)))
112	111	simpld 497	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘𝑥) ∈ ℝ)
113	112	adantlr 713	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹‘𝑥) ∈ ℝ)
114	113	adantr 483	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐹‘𝑥) ≤ 𝑚) → (𝐹‘𝑥) ∈ ℝ)
115	114	leidd 11206	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐹‘𝑥) ≤ 𝑚) → (𝐹‘𝑥) ≤ (𝐹‘𝑥))
116		iftrue 4473	. . . . . . . . 9 ⊢ ((𝐹‘𝑥) ≤ 𝑚 → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) = (𝐹‘𝑥))
117	116	adantl 484	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐹‘𝑥) ≤ 𝑚) → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) = (𝐹‘𝑥))
118	48	ad3antlr 729	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐹‘𝑥) ≤ 𝑚) → 𝑚 ∈ ℝ)
119		peano2re 10813	. . . . . . . . . . 11 ⊢ (𝑚 ∈ ℝ → (𝑚 + 1) ∈ ℝ)
120	118, 119	syl 17	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐹‘𝑥) ≤ 𝑚) → (𝑚 + 1) ∈ ℝ)
121		simpr 487	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐹‘𝑥) ≤ 𝑚) → (𝐹‘𝑥) ≤ 𝑚)
122	118	lep1d 11571	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐹‘𝑥) ≤ 𝑚) → 𝑚 ≤ (𝑚 + 1))
123	114, 118, 120, 121, 122	letrd 10797	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐹‘𝑥) ≤ 𝑚) → (𝐹‘𝑥) ≤ (𝑚 + 1))
124	123	iftrued 4475	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐹‘𝑥) ≤ 𝑚) → if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0) = (𝐹‘𝑥))
125	115, 117, 124	3brtr4d 5098	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐹‘𝑥) ≤ 𝑚) → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ≤ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0))
126		iffalse 4476	. . . . . . . . 9 ⊢ (¬ (𝐹‘𝑥) ≤ 𝑚 → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) = 0)
127	126	adantl 484	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ ¬ (𝐹‘𝑥) ≤ 𝑚) → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) = 0)
128	111	simprd 498	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 0 ≤ (𝐹‘𝑥))
129		0le0 11739	. . . . . . . . . . 11 ⊢ 0 ≤ 0
130		breq2 5070	. . . . . . . . . . . 12 ⊢ ((𝐹‘𝑥) = if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0) → (0 ≤ (𝐹‘𝑥) ↔ 0 ≤ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0)))
131		breq2 5070	. . . . . . . . . . . 12 ⊢ (0 = if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0) → (0 ≤ 0 ↔ 0 ≤ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0)))
132	130, 131	ifboth 4505	. . . . . . . . . . 11 ⊢ ((0 ≤ (𝐹‘𝑥) ∧ 0 ≤ 0) → 0 ≤ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0))
133	128, 129, 132	sylancl 588	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 0 ≤ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0))
134	133	adantlr 713	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 0 ≤ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0))
135	134	adantr 483	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ ¬ (𝐹‘𝑥) ≤ 𝑚) → 0 ≤ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0))
136	127, 135	eqbrtrd 5088	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ ¬ (𝐹‘𝑥) ≤ 𝑚) → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ≤ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0))
137	125, 136	pm2.61dan 811	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ≤ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0))
138	137	ralrimiva 3182	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ∀𝑥 ∈ ℝ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ≤ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0))
139	1, 2	ifex 4515	. . . . . . 7 ⊢ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0) ∈ V
140	139	a1i 11	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0) ∈ V)
141		eqidd 2822	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0)) = (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0)))
142		eqidd 2822	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0)) = (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0)))
143	79, 108, 140, 141, 142	ofrfval2 7427	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0)) ∘r ≤ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0)) ↔ ∀𝑥 ∈ ℝ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ≤ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0)))
144	138, 143	mpbird 259	. . . 4 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0)) ∘r ≤ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0)))
145		peano2nn 11650	. . . . . 6 ⊢ (𝑚 ∈ ℕ → (𝑚 + 1) ∈ ℕ)
146	145	adantl 484	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑚 + 1) ∈ ℕ)
147		breq2 5070	. . . . . . . 8 ⊢ (𝑛 = (𝑚 + 1) → ((𝐹‘𝑥) ≤ 𝑛 ↔ (𝐹‘𝑥) ≤ (𝑚 + 1)))
148	147	ifbid 4489	. . . . . . 7 ⊢ (𝑛 = (𝑚 + 1) → if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0) = if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0))
149	148	mpteq2dv 5162	. . . . . 6 ⊢ (𝑛 = (𝑚 + 1) → (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) = (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0)))
150	32	mptex 6986	. . . . . 6 ⊢ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0)) ∈ V
151	149, 31, 150	fvmpt 6768	. . . . 5 ⊢ ((𝑚 + 1) ∈ ℕ → ((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘(𝑚 + 1)) = (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0)))
152	146, 151	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘(𝑚 + 1)) = (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ (𝑚 + 1), (𝐹‘𝑥), 0)))
153	144, 47, 152	3brtr4d 5098	. . 3 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚) ∘r ≤ ((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘(𝑚 + 1)))
154	62	ffvelrnda 6851	. . . 4 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝐹‘𝑦) ∈ ℝ)
155	34	adantl 484	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚) = (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0)))
156	155	fveq1d 6672	. . . . . 6 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑚 ∈ ℕ) → (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦) = ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))‘𝑦))
157	112	leidd 11206	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘𝑥) ≤ (𝐹‘𝑥))
158		breq1 5069	. . . . . . . . . . . . . 14 ⊢ ((𝐹‘𝑥) = if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) → ((𝐹‘𝑥) ≤ (𝐹‘𝑥) ↔ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ≤ (𝐹‘𝑥)))
159		breq1 5069	. . . . . . . . . . . . . 14 ⊢ (0 = if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) → (0 ≤ (𝐹‘𝑥) ↔ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ≤ (𝐹‘𝑥)))
160	158, 159	ifboth 4505	. . . . . . . . . . . . 13 ⊢ (((𝐹‘𝑥) ≤ (𝐹‘𝑥) ∧ 0 ≤ (𝐹‘𝑥)) → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ≤ (𝐹‘𝑥))
161	157, 128, 160	syl2anc 586	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ≤ (𝐹‘𝑥))
162	161	adantlr 713	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ≤ (𝐹‘𝑥))
163	162	ralrimiva 3182	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ∀𝑥 ∈ ℝ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ≤ (𝐹‘𝑥))
164	32	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ℝ ∈ V)
165	1, 2	ifex 4515	. . . . . . . . . . . 12 ⊢ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ∈ V
166	165	a1i 11	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ∈ V)
167	54	feqmptd 6733	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐹 = (𝑥 ∈ ℝ ↦ (𝐹‘𝑥)))
168	167	adantr 483	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → 𝐹 = (𝑥 ∈ ℝ ↦ (𝐹‘𝑥)))
169	164, 166, 113, 141, 168	ofrfval2 7427	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0)) ∘r ≤ 𝐹 ↔ ∀𝑥 ∈ ℝ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ≤ (𝐹‘𝑥)))
170	163, 169	mpbird 259	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0)) ∘r ≤ 𝐹)
171	166	fmpttd 6879	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0)):ℝ⟶V)
172	171	ffnd 6515	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0)) Fn ℝ)
173	55	adantr 483	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → 𝐹 Fn ℝ)
174		inidm 4195	. . . . . . . . . 10 ⊢ (ℝ ∩ ℝ) = ℝ
175		eqidd 2822	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))‘𝑦) = ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))‘𝑦))
176		eqidd 2822	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → (𝐹‘𝑦) = (𝐹‘𝑦))
177	172, 173, 164, 164, 174, 175, 176	ofrfval 7417	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0)) ∘r ≤ 𝐹 ↔ ∀𝑦 ∈ ℝ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))‘𝑦) ≤ (𝐹‘𝑦)))
178	170, 177	mpbid 234	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ∀𝑦 ∈ ℝ ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))‘𝑦) ≤ (𝐹‘𝑦))
179	178	r19.21bi 3208	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑦 ∈ ℝ) → ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))‘𝑦) ≤ (𝐹‘𝑦))
180	179	an32s 650	. . . . . 6 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑚 ∈ ℕ) → ((𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))‘𝑦) ≤ (𝐹‘𝑦))
181	156, 180	eqbrtrd 5088	. . . . 5 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑚 ∈ ℕ) → (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦) ≤ (𝐹‘𝑦))
182	181	ralrimiva 3182	. . . 4 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → ∀𝑚 ∈ ℕ (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦) ≤ (𝐹‘𝑦))
183		brralrspcev 5126	. . . 4 ⊢ (((𝐹‘𝑦) ∈ ℝ ∧ ∀𝑚 ∈ ℕ (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦) ≤ (𝐹‘𝑦)) → ∃𝑧 ∈ ℝ ∀𝑚 ∈ ℕ (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦) ≤ 𝑧)
184	154, 182, 183	syl2anc 586	. . 3 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → ∃𝑧 ∈ ℝ ∀𝑚 ∈ ℕ (((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)‘𝑦) ≤ 𝑧)
185	28	fveq2d 6674	. . . . . . 7 ⊢ (𝑛 = 𝑚 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))) = (∫2‘(𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))))
186	185	cbvmptv 5169	. . . . . 6 ⊢ (𝑛 ∈ ℕ ↦ (∫2‘(𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))) = (𝑚 ∈ ℕ ↦ (∫2‘(𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))))
187	34	fveq2d 6674	. . . . . . 7 ⊢ (𝑚 ∈ ℕ → (∫2‘((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)) = (∫2‘(𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))))
188	187	mpteq2ia 5157	. . . . . 6 ⊢ (𝑚 ∈ ℕ ↦ (∫2‘((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚))) = (𝑚 ∈ ℕ ↦ (∫2‘(𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))))
189	186, 188	eqtr4i 2847	. . . . 5 ⊢ (𝑛 ∈ ℕ ↦ (∫2‘(𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))) = (𝑚 ∈ ℕ ↦ (∫2‘((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)))
190	189	rneqi 5807	. . . 4 ⊢ ran (𝑛 ∈ ℕ ↦ (∫2‘(𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))) = ran (𝑚 ∈ ℕ ↦ (∫2‘((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚)))
191	190	supeq1i 8911	. . 3 ⊢ sup(ran (𝑛 ∈ ℕ ↦ (∫2‘(𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))), ℝ*, < ) = sup(ran (𝑚 ∈ ℕ ↦ (∫2‘((𝑛 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))‘𝑚))), ℝ*, < )
192	42, 103, 109, 153, 184, 191	itg2mono 24354	. 2 ⊢ (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < ))) = sup(ran (𝑛 ∈ ℕ ↦ (∫2‘(𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))), ℝ*, < ))
193		eqid 2821	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) = (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))
194	27, 193, 165	fvmpt 6768	. . . . . . . . . . 11 ⊢ (𝑚 ∈ ℕ → ((𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑚) = if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))
195	194	adantl 484	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑚) = if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))
196	161	adantr 483	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑚 ∈ ℕ) → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) ≤ (𝐹‘𝑥))
197	195, 196	eqbrtrd 5088	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑚) ≤ (𝐹‘𝑥))
198	197	ralrimiva 3182	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ∀𝑚 ∈ ℕ ((𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑚) ≤ (𝐹‘𝑥))
199	3	a1i 11	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑛 ∈ ℕ) → if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0) ∈ V)
200	199	fmpttd 6879	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)):ℕ⟶V)
201	200	ffnd 6515	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) Fn ℕ)
202		breq1 5069	. . . . . . . . . 10 ⊢ (𝑤 = ((𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑚) → (𝑤 ≤ (𝐹‘𝑥) ↔ ((𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑚) ≤ (𝐹‘𝑥)))
203	202	ralrn 6854	. . . . . . . . 9 ⊢ ((𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) Fn ℕ → (∀𝑤 ∈ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))𝑤 ≤ (𝐹‘𝑥) ↔ ∀𝑚 ∈ ℕ ((𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑚) ≤ (𝐹‘𝑥)))
204	201, 203	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (∀𝑤 ∈ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))𝑤 ≤ (𝐹‘𝑥) ↔ ∀𝑚 ∈ ℕ ((𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑚) ≤ (𝐹‘𝑥)))
205	198, 204	mpbird 259	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ∀𝑤 ∈ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))𝑤 ≤ (𝐹‘𝑥))
206	112	adantr 483	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (𝐹‘𝑥) ∈ ℝ)
207		0re 10643	. . . . . . . . . . 11 ⊢ 0 ∈ ℝ
208		ifcl 4511	. . . . . . . . . . 11 ⊢ (((𝐹‘𝑥) ∈ ℝ ∧ 0 ∈ ℝ) → if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0) ∈ ℝ)
209	206, 207, 208	sylancl 588	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑛 ∈ ℕ) → if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0) ∈ ℝ)
210	209	fmpttd 6879	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)):ℕ⟶ℝ)
211	210	frnd 6521	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) ⊆ ℝ)
212		1nn 11649	. . . . . . . . . 10 ⊢ 1 ∈ ℕ
213	193, 209	dmmptd 6493	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → dom (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) = ℕ)
214	212, 213	eleqtrrid 2920	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 1 ∈ dom (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))
215		n0i 4299	. . . . . . . . . 10 ⊢ (1 ∈ dom (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) → ¬ dom (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) = ∅)
216		dm0rn0 5795	. . . . . . . . . . 11 ⊢ (dom (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) = ∅ ↔ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) = ∅)
217	216	necon3bbii 3063	. . . . . . . . . 10 ⊢ (¬ dom (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) = ∅ ↔ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) ≠ ∅)
218	215, 217	sylib 220	. . . . . . . . 9 ⊢ (1 ∈ dom (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) → ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) ≠ ∅)
219	214, 218	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) ≠ ∅)
220		brralrspcev 5126	. . . . . . . . 9 ⊢ (((𝐹‘𝑥) ∈ ℝ ∧ ∀𝑤 ∈ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))𝑤 ≤ (𝐹‘𝑥)) → ∃𝑧 ∈ ℝ ∀𝑤 ∈ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))𝑤 ≤ 𝑧)
221	112, 205, 220	syl2anc 586	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ∃𝑧 ∈ ℝ ∀𝑤 ∈ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))𝑤 ≤ 𝑧)
222		suprleub 11607	. . . . . . . 8 ⊢ (((ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) ⊆ ℝ ∧ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) ≠ ∅ ∧ ∃𝑧 ∈ ℝ ∀𝑤 ∈ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))𝑤 ≤ 𝑧) ∧ (𝐹‘𝑥) ∈ ℝ) → (sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < ) ≤ (𝐹‘𝑥) ↔ ∀𝑤 ∈ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))𝑤 ≤ (𝐹‘𝑥)))
223	211, 219, 221, 112, 222	syl31anc 1369	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < ) ≤ (𝐹‘𝑥) ↔ ∀𝑤 ∈ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))𝑤 ≤ (𝐹‘𝑥)))
224	205, 223	mpbird 259	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < ) ≤ (𝐹‘𝑥))
225		arch 11895	. . . . . . . . 9 ⊢ ((𝐹‘𝑥) ∈ ℝ → ∃𝑚 ∈ ℕ (𝐹‘𝑥) < 𝑚)
226	112, 225	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ∃𝑚 ∈ ℕ (𝐹‘𝑥) < 𝑚)
227	194	ad2antrl 726	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ (𝑚 ∈ ℕ ∧ (𝐹‘𝑥) < 𝑚)) → ((𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑚) = if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0))
228		ltle 10729	. . . . . . . . . . . . 13 ⊢ (((𝐹‘𝑥) ∈ ℝ ∧ 𝑚 ∈ ℝ) → ((𝐹‘𝑥) < 𝑚 → (𝐹‘𝑥) ≤ 𝑚))
229	112, 48, 228	syl2an 597	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑚 ∈ ℕ) → ((𝐹‘𝑥) < 𝑚 → (𝐹‘𝑥) ≤ 𝑚))
230	229	impr 457	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ (𝑚 ∈ ℕ ∧ (𝐹‘𝑥) < 𝑚)) → (𝐹‘𝑥) ≤ 𝑚)
231	230	iftrued 4475	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ (𝑚 ∈ ℕ ∧ (𝐹‘𝑥) < 𝑚)) → if((𝐹‘𝑥) ≤ 𝑚, (𝐹‘𝑥), 0) = (𝐹‘𝑥))
232	227, 231	eqtrd 2856	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ (𝑚 ∈ ℕ ∧ (𝐹‘𝑥) < 𝑚)) → ((𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑚) = (𝐹‘𝑥))
233	201	adantr 483	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ (𝑚 ∈ ℕ ∧ (𝐹‘𝑥) < 𝑚)) → (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) Fn ℕ)
234		simprl 769	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ (𝑚 ∈ ℕ ∧ (𝐹‘𝑥) < 𝑚)) → 𝑚 ∈ ℕ)
235		fnfvelrn 6848	. . . . . . . . . 10 ⊢ (((𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)) Fn ℕ ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑚) ∈ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))
236	233, 234, 235	syl2anc 586	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ (𝑚 ∈ ℕ ∧ (𝐹‘𝑥) < 𝑚)) → ((𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0))‘𝑚) ∈ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))
237	232, 236	eqeltrrd 2914	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ (𝑚 ∈ ℕ ∧ (𝐹‘𝑥) < 𝑚)) → (𝐹‘𝑥) ∈ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))
238	226, 237	rexlimddv 3291	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘𝑥) ∈ ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))
239	211, 219, 221, 238	suprubd 11603	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘𝑥) ≤ sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < ))
240	211, 219, 221	suprcld 11604	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < ) ∈ ℝ)
241	240, 112	letri3d 10782	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < ) = (𝐹‘𝑥) ↔ (sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < ) ≤ (𝐹‘𝑥) ∧ (𝐹‘𝑥) ≤ sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < ))))
242	224, 239, 241	mpbir2and 711	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < ) = (𝐹‘𝑥))
243	242	mpteq2dva 5161	. . . 4 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < )) = (𝑥 ∈ ℝ ↦ (𝐹‘𝑥)))
244	243, 167	eqtr4d 2859	. . 3 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < )) = 𝐹)
245	244	fveq2d 6674	. 2 ⊢ (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ sup(ran (𝑛 ∈ ℕ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)), ℝ, < ))) = (∫2‘𝐹))
246	192, 245	eqtr3d 2858	1 ⊢ (𝜑 → sup(ran (𝑛 ∈ ℕ ↦ (∫2‘(𝑥 ∈ ℝ ↦ if((𝐹‘𝑥) ≤ 𝑛, (𝐹‘𝑥), 0)))), ℝ*, < ) = (∫2‘𝐹))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 398   = wceq 1537   ∈ wcel 2114   ≠ wne 3016  ∀wral 3138  ∃wrex 3139  Vcvv 3494   ∖ cdif 3933   ⊆ wss 3936  ∅c0 4291  ifcif 4467   class class class wbr 5066   ↦ cmpt 5146  ^◡ccnv 5554  dom cdm 5555  ran crn 5556   ↾ cres 5557   “ cima 5558   Fn wfn 6350  ⟶wf 6351  ‘cfv 6355  (class class class)co 7156   ∘_r cofr 7408  supcsup 8904  ℝcr 10536  0cc0 10537  1c1 10538   + caddc 10540  +∞cpnf 10672  ℝ^*cxr 10674   < clt 10675   ≤ cle 10676  ℕcn 11638  (,)cioo 12739  [,)cico 12741  volcvol 24064  MblFncmbf 24215  ∫₂citg2 24217

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793  ax-rep 5190  ax-sep 5203  ax-nul 5210  ax-pow 5266  ax-pr 5330  ax-un 7461  ax-inf2 9104  ax-cc 9857  ax-cnex 10593  ax-resscn 10594  ax-1cn 10595  ax-icn 10596  ax-addcl 10597  ax-addrcl 10598  ax-mulcl 10599  ax-mulrcl 10600  ax-mulcom 10601  ax-addass 10602  ax-mulass 10603  ax-distr 10604  ax-i2m1 10605  ax-1ne0 10606  ax-1rid 10607  ax-rnegex 10608  ax-rrecex 10609  ax-cnre 10610  ax-pre-lttri 10611  ax-pre-lttrn 10612  ax-pre-ltadd 10613  ax-pre-mulgt0 10614  ax-pre-sup 10615  ax-addf 10616

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-fal 1550  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3773  df-csb 3884  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-pss 3954  df-nul 4292  df-if 4468  df-pw 4541  df-sn 4568  df-pr 4570  df-tp 4572  df-op 4574  df-uni 4839  df-int 4877  df-iun 4921  df-disj 5032  df-br 5067  df-opab 5129  df-mpt 5147  df-tr 5173  df-id 5460  df-eprel 5465  df-po 5474  df-so 5475  df-fr 5514  df-se 5515  df-we 5516  df-xp 5561  df-rel 5562  df-cnv 5563  df-co 5564  df-dm 5565  df-rn 5566  df-res 5567  df-ima 5568  df-pred 6148  df-ord 6194  df-on 6195  df-lim 6196  df-suc 6197  df-iota 6314  df-fun 6357  df-fn 6358  df-f 6359  df-f1 6360  df-fo 6361  df-f1o 6362  df-fv 6363  df-isom 6364  df-riota 7114  df-ov 7159  df-oprab 7160  df-mpo 7161  df-of 7409  df-ofr 7410  df-om 7581  df-1st 7689  df-2nd 7690  df-wrecs 7947  df-recs 8008  df-rdg 8046  df-1o 8102  df-2o 8103  df-oadd 8106  df-omul 8107  df-er 8289  df-map 8408  df-pm 8409  df-en 8510  df-dom 8511  df-sdom 8512  df-fin 8513  df-fi 8875  df-sup 8906  df-inf 8907  df-oi 8974  df-dju 9330  df-card 9368  df-acn 9371  df-pnf 10677  df-mnf 10678  df-xr 10679  df-ltxr 10680  df-le 10681  df-sub 10872  df-neg 10873  df-div 11298  df-nn 11639  df-2 11701  df-3 11702  df-n0 11899  df-z 11983  df-uz 12245  df-q 12350  df-rp 12391  df-xneg 12508  df-xadd 12509  df-xmul 12510  df-ioo 12743  df-ioc 12744  df-ico 12745  df-icc 12746  df-fz 12894  df-fzo 13035  df-fl 13163  df-seq 13371  df-exp 13431  df-hash 13692  df-cj 14458  df-re 14459  df-im 14460  df-sqrt 14594  df-abs 14595  df-clim 14845  df-rlim 14846  df-sum 15043  df-rest 16696  df-topgen 16717  df-psmet 20537  df-xmet 20538  df-met 20539  df-bl 20540  df-mopn 20541  df-top 21502  df-topon 21519  df-bases 21554  df-cmp 21995  df-ovol 24065  df-vol 24066  df-mbf 24220  df-itg1 24221  df-itg2 24222

This theorem is referenced by:  itg2cn  24364