MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  itg2gt0 Structured version   Visualization version   GIF version

Theorem itg2gt0 26082
Description: If the function 𝐹 is strictly positive on a set of positive measure, then the integral of the function is positive. (Contributed by Mario Carneiro, 30-Aug-2014.)
Hypotheses
Ref Expression
itg2gt0.1 (𝜑 → 𝐴 ∈ dom vol)
itg2gt0.2 (𝜑 → 0 < (vol‘𝐴))
itg2gt0.3 (𝜑 → 𝐹:ℝ⟶(0[,)+∞))
itg2gt0.4 (𝜑 → 𝐹 ∈ MblFn)
itg2gt0.5 ((𝜑 ∧ 𝑥 ∈ 𝐴) → 0 < (𝐹‘𝑥))
Assertion
Ref Expression
itg2gt0 (𝜑 → 0 < (∫2‘𝐹))
Distinct variable groups:   𝑥,𝐴   𝑥,𝐹   𝜑,𝑥

Proof of Theorem itg2gt0
Dummy variables 𝑘 𝑛 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 itg2gt0.2 . 2 (𝜑 → 0 < (vol‘𝐴))
2 itg2gt0.1 . . . . . . 7 (𝜑 → 𝐴 ∈ dom vol)
3 iccssxr 13562 . . . . . . . 8 (0[,]+∞) ⊆ ℝ*
4 volf 25851 . . . . . . . . 9 vol:dom vol⟶(0[,]+∞)
54ffvelcdmi 7083 . . . . . . . 8 (𝐴 ∈ dom vol → (vol‘𝐴) ∈ (0[,]+∞))
63, 5sselid 3906 . . . . . . 7 (𝐴 ∈ dom vol → (vol‘𝐴) ∈ ℝ*)
72, 6syl 18 . . . . . 6 (𝜑 → (vol‘𝐴) ∈ ℝ*)
87adantr 486 . . . . 5 ((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) → (vol‘𝐴) ∈ ℝ*)
9 itg2gt0.4 . . . . . . . . . . . . . . . 16 (𝜑 → 𝐹 ∈ MblFn)
109elexd 3473 . . . . . . . . . . . . . . 15 (𝜑 → 𝐹 ∈ V)
11 cnvexg 7936 . . . . . . . . . . . . . . 15 (𝐹 ∈ V → ◡𝐹 ∈ V)
1210, 11syl 18 . . . . . . . . . . . . . 14 (𝜑 → ◡𝐹 ∈ V)
13 imaexg 7925 . . . . . . . . . . . . . 14 (◡𝐹 ∈ V → (◡𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ V)
1412, 13syl 18 . . . . . . . . . . . . 13 (𝜑 → (◡𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ V)
1514adantr 486 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑛 ∈ ℕ) → (◡𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ V)
1615fmpttd 7115 . . . . . . . . . . 11 (𝜑 → (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))):ℕ⟶V)
1716ffnd 6710 . . . . . . . . . 10 (𝜑 → (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) Fn ℕ)
18 fniunfv 7251 . . . . . . . . . 10 ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) Fn ℕ → ∪ 𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = ∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))))
1917, 18syl 18 . . . . . . . . 9 (𝜑 → ∪ 𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = ∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))))
20 itg2gt0.3 . . . . . . . . . . . . . . . 16 (𝜑 → 𝐹:ℝ⟶(0[,)+∞))
21 rge0ssre 13588 . . . . . . . . . . . . . . . 16 (0[,)+∞) ⊆ ℝ
22 fss 6726 . . . . . . . . . . . . . . . 16 ((𝐹:ℝ⟶(0[,)+∞) ∧ (0[,)+∞) ⊆ ℝ) → 𝐹:ℝ⟶ℝ)
2320, 21, 22sylancl 598 . . . . . . . . . . . . . . 15 (𝜑 → 𝐹:ℝ⟶ℝ)
24 mbfima 25952 . . . . . . . . . . . . . . 15 ((𝐹 ∈ MblFn ∧ 𝐹:ℝ⟶ℝ) → (◡𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ dom vol)
259, 23, 24syl2anc 596 . . . . . . . . . . . . . 14 (𝜑 → (◡𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ dom vol)
2625adantr 486 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑛 ∈ ℕ) → (◡𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ dom vol)
2726fmpttd 7115 . . . . . . . . . . . 12 (𝜑 → (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))):ℕ⟶dom vol)
2827ffvelcdmda 7084 . . . . . . . . . . 11 ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ∈ dom vol)
2928ralrimiva 3154 . . . . . . . . . 10 (𝜑 → ∀𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ∈ dom vol)
30 iunmbl 25875 . . . . . . . . . 10 (∀𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ∈ dom vol → ∪ 𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ∈ dom vol)
3129, 30syl 18 . . . . . . . . 9 (𝜑 → ∪ 𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ∈ dom vol)
3219, 31eqeltrrd 2861 . . . . . . . 8 (𝜑 → ∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) ∈ dom vol)
33 mblss 25853 . . . . . . . 8 (∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) ∈ dom vol → ∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ ℝ)
3432, 33syl 18 . . . . . . 7 (𝜑 → ∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ ℝ)
35 ovolcl 25800 . . . . . . 7 (∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ ℝ → (vol*‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))) ∈ ℝ*)
3634, 35syl 18 . . . . . 6 (𝜑 → (vol*‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))) ∈ ℝ*)
3736adantr 486 . . . . 5 ((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) → (vol*‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))) ∈ ℝ*)
38 0xr 11357 . . . . . 6 0 ∈ ℝ*
3938a1i 11 . . . . 5 ((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) → 0 ∈ ℝ*)
40 mblvol 25852 . . . . . . . 8 (𝐴 ∈ dom vol → (vol‘𝐴) = (vol*‘𝐴))
412, 40syl 18 . . . . . . 7 (𝜑 → (vol‘𝐴) = (vol*‘𝐴))
42 mblss 25853 . . . . . . . . . . . . . . . 16 (𝐴 ∈ dom vol → 𝐴 ⊆ ℝ)
432, 42syl 18 . . . . . . . . . . . . . . 15 (𝜑 → 𝐴 ⊆ ℝ)
4443sselda 3908 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ ℝ)
4520ffvelcdmda 7084 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘𝑥) ∈ (0[,)+∞))
46 elrege0 13586 . . . . . . . . . . . . . . . 16 ((𝐹‘𝑥) ∈ (0[,)+∞) ↔ ((𝐹‘𝑥) ∈ ℝ ∧ 0 ≤ (𝐹‘𝑥)))
4745, 46sylib 221 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑥 ∈ ℝ) → ((𝐹‘𝑥) ∈ ℝ ∧ 0 ≤ (𝐹‘𝑥)))
4847simpld 500 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘𝑥) ∈ ℝ)
4944, 48syldan 603 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝐹‘𝑥) ∈ ℝ)
50 itg2gt0.5 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑥 ∈ 𝐴) → 0 < (𝐹‘𝑥))
51 nnrecl 12605 . . . . . . . . . . . . 13 (((𝐹‘𝑥) ∈ ℝ ∧ 0 < (𝐹‘𝑥)) → ∃𝑘 ∈ ℕ (1 / 𝑘) < (𝐹‘𝑥))
5249, 50, 51syl2anc 596 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑥 ∈ 𝐴) → ∃𝑘 ∈ ℕ (1 / 𝑘) < (𝐹‘𝑥))
5320ffnd 6710 . . . . . . . . . . . . . . . . 17 (𝜑 → 𝐹 Fn ℝ)
5453ad2antrr 739 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑘 ∈ ℕ) → 𝐹 Fn ℝ)
55 elpreima 7057 . . . . . . . . . . . . . . . 16 (𝐹 Fn ℝ → (𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)) ↔ (𝑥 ∈ ℝ ∧ (𝐹‘𝑥) ∈ ((1 / 𝑘)(,)+∞))))
5654, 55syl 18 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)) ↔ (𝑥 ∈ ℝ ∧ (𝐹‘𝑥) ∈ ((1 / 𝑘)(,)+∞))))
5744adantr 486 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑘 ∈ ℕ) → 𝑥 ∈ ℝ)
5857biantrurd 542 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑘 ∈ ℕ) → ((𝐹‘𝑥) ∈ ((1 / 𝑘)(,)+∞) ↔ (𝑥 ∈ ℝ ∧ (𝐹‘𝑥) ∈ ((1 / 𝑘)(,)+∞))))
59 nnrecre 12381 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ ℕ → (1 / 𝑘) ∈ ℝ)
6059adantl 487 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑘 ∈ ℕ) → (1 / 𝑘) ∈ ℝ)
6160rexrd 11360 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑘 ∈ ℕ) → (1 / 𝑘) ∈ ℝ*)
6261adantlr 728 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑘 ∈ ℕ) → (1 / 𝑘) ∈ ℝ*)
63 elioopnf 13575 . . . . . . . . . . . . . . . 16 ((1 / 𝑘) ∈ ℝ* → ((𝐹‘𝑥) ∈ ((1 / 𝑘)(,)+∞) ↔ ((𝐹‘𝑥) ∈ ℝ ∧ (1 / 𝑘) < (𝐹‘𝑥))))
6462, 63syl 18 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑘 ∈ ℕ) → ((𝐹‘𝑥) ∈ ((1 / 𝑘)(,)+∞) ↔ ((𝐹‘𝑥) ∈ ℝ ∧ (1 / 𝑘) < (𝐹‘𝑥))))
6556, 58, 643bitr2d 310 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)) ↔ ((𝐹‘𝑥) ∈ ℝ ∧ (1 / 𝑘) < (𝐹‘𝑥))))
66 id 23 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ)
67 imaexg 7925 . . . . . . . . . . . . . . . . . 18 (◡𝐹 ∈ V → (◡𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ V)
6812, 67syl 18 . . . . . . . . . . . . . . . . 17 (𝜑 → (◡𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ V)
6968adantr 486 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑥 ∈ 𝐴) → (◡𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ V)
70 oveq2 7428 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑘 → (1 / 𝑛) = (1 / 𝑘))
7170oveq1d 7435 . . . . . . . . . . . . . . . . . 18 (𝑛 = 𝑘 → ((1 / 𝑛)(,)+∞) = ((1 / 𝑘)(,)+∞))
7271imaeq2d 6051 . . . . . . . . . . . . . . . . 17 (𝑛 = 𝑘 → (◡𝐹 “ ((1 / 𝑛)(,)+∞)) = (◡𝐹 “ ((1 / 𝑘)(,)+∞)))
73 eqid 2760 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) = (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))
7472, 73fvmptg 6991 . . . . . . . . . . . . . . . 16 ((𝑘 ∈ ℕ ∧ (◡𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ V) → ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = (◡𝐹 “ ((1 / 𝑘)(,)+∞)))
7566, 69, 74syl2anr 609 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = (◡𝐹 “ ((1 / 𝑘)(,)+∞)))
7675eleq2d 2846 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ↔ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞))))
7749adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑘 ∈ ℕ) → (𝐹‘𝑥) ∈ ℝ)
7877biantrurd 542 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑘 ∈ ℕ) → ((1 / 𝑘) < (𝐹‘𝑥) ↔ ((𝐹‘𝑥) ∈ ℝ ∧ (1 / 𝑘) < (𝐹‘𝑥))))
7965, 76, 783bitr4rd 315 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑘 ∈ ℕ) → ((1 / 𝑘) < (𝐹‘𝑥) ↔ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
8079rexbidva 3184 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑥 ∈ 𝐴) → (∃𝑘 ∈ ℕ (1 / 𝑘) < (𝐹‘𝑥) ↔ ∃𝑘 ∈ ℕ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
8152, 80mpbid 235 . . . . . . . . . . 11 ((𝜑 ∧ 𝑥 ∈ 𝐴) → ∃𝑘 ∈ ℕ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘))
8281ex 418 . . . . . . . . . 10 (𝜑 → (𝑥 ∈ 𝐴 → ∃𝑘 ∈ ℕ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
83 eluni2 4870 . . . . . . . . . . 11 (𝑥 ∈ ∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) ↔ ∃𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))𝑥 ∈ 𝑧)
84 eleq2 2849 . . . . . . . . . . . . 13 (𝑧 = ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) → (𝑥 ∈ 𝑧 ↔ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
8584rexrn 7087 . . . . . . . . . . . 12 ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) Fn ℕ → (∃𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))𝑥 ∈ 𝑧 ↔ ∃𝑘 ∈ ℕ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
8617, 85syl 18 . . . . . . . . . . 11 (𝜑 → (∃𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))𝑥 ∈ 𝑧 ↔ ∃𝑘 ∈ ℕ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
8783, 86bitrid 286 . . . . . . . . . 10 (𝜑 → (𝑥 ∈ ∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) ↔ ∃𝑘 ∈ ℕ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
8882, 87sylibrd 262 . . . . . . . . 9 (𝜑 → (𝑥 ∈ 𝐴 → 𝑥 ∈ ∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))))
8988ssrdv 3914 . . . . . . . 8 (𝜑 → 𝐴 ⊆ ∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))))
90 ovolss 25807 . . . . . . . 8 ((𝐴 ⊆ ∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) ∧ ∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ ℝ) → (vol*‘𝐴) ≤ (vol*‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))))
9189, 34, 90syl2anc 596 . . . . . . 7 (𝜑 → (vol*‘𝐴) ≤ (vol*‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))))
9241, 91eqbrtrd 5126 . . . . . 6 (𝜑 → (vol‘𝐴) ≤ (vol*‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))))
9392adantr 486 . . . . 5 ((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) → (vol‘𝐴) ≤ (vol*‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))))
94 mblvol 25852 . . . . . . . . 9 (∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) ∈ dom vol → (vol‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))) = (vol*‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))))
9532, 94syl 18 . . . . . . . 8 (𝜑 → (vol‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))) = (vol*‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))))
96 peano2nn 12348 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → (𝑘 + 1) ∈ ℕ)
9796adantl 487 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝑘 + 1) ∈ ℕ)
98 nnrecre 12381 . . . . . . . . . . . . . . 15 ((𝑘 + 1) ∈ ℕ → (1 / (𝑘 + 1)) ∈ ℝ)
9997, 98syl 18 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑘 ∈ ℕ) → (1 / (𝑘 + 1)) ∈ ℝ)
10099rexrd 11360 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑘 ∈ ℕ) → (1 / (𝑘 + 1)) ∈ ℝ*)
101 nnre 12343 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → 𝑘 ∈ ℝ)
102101adantl 487 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℝ)
103102lep1d 12249 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝑘 ≤ (𝑘 + 1))
104 nngt0 12370 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → 0 < 𝑘)
105104adantl 487 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑘 ∈ ℕ) → 0 < 𝑘)
10697nnred 12351 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝑘 + 1) ∈ ℝ)
10797nngt0d 12388 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑘 ∈ ℕ) → 0 < (𝑘 + 1))
108 lerec 12201 . . . . . . . . . . . . . . 15 (((𝑘 ∈ ℝ ∧ 0 < 𝑘) ∧ ((𝑘 + 1) ∈ ℝ ∧ 0 < (𝑘 + 1))) → (𝑘 ≤ (𝑘 + 1) ↔ (1 / (𝑘 + 1)) ≤ (1 / 𝑘)))
109102, 105, 106, 107, 108syl22anc 852 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝑘 ≤ (𝑘 + 1) ↔ (1 / (𝑘 + 1)) ≤ (1 / 𝑘)))
110103, 109mpbid 235 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑘 ∈ ℕ) → (1 / (𝑘 + 1)) ≤ (1 / 𝑘))
111 iooss1 13512 . . . . . . . . . . . . 13 (((1 / (𝑘 + 1)) ∈ ℝ* ∧ (1 / (𝑘 + 1)) ≤ (1 / 𝑘)) → ((1 / 𝑘)(,)+∞) ⊆ ((1 / (𝑘 + 1))(,)+∞))
112100, 110, 111syl2anc 596 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑘 ∈ ℕ) → ((1 / 𝑘)(,)+∞) ⊆ ((1 / (𝑘 + 1))(,)+∞))
113 imass2 6054 . . . . . . . . . . . 12 (((1 / 𝑘)(,)+∞) ⊆ ((1 / (𝑘 + 1))(,)+∞) → (◡𝐹 “ ((1 / 𝑘)(,)+∞)) ⊆ (◡𝐹 “ ((1 / (𝑘 + 1))(,)+∞)))
114112, 113syl 18 . . . . . . . . . . 11 ((𝜑 ∧ 𝑘 ∈ ℕ) → (◡𝐹 “ ((1 / 𝑘)(,)+∞)) ⊆ (◡𝐹 “ ((1 / (𝑘 + 1))(,)+∞)))
11566, 68, 74syl2anr 609 . . . . . . . . . . 11 ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = (◡𝐹 “ ((1 / 𝑘)(,)+∞)))
116 imaexg 7925 . . . . . . . . . . . . 13 (◡𝐹 ∈ V → (◡𝐹 “ ((1 / (𝑘 + 1))(,)+∞)) ∈ V)
11712, 116syl 18 . . . . . . . . . . . 12 (𝜑 → (◡𝐹 “ ((1 / (𝑘 + 1))(,)+∞)) ∈ V)
118 oveq2 7428 . . . . . . . . . . . . . . 15 (𝑛 = (𝑘 + 1) → (1 / 𝑛) = (1 / (𝑘 + 1)))
119118oveq1d 7435 . . . . . . . . . . . . . 14 (𝑛 = (𝑘 + 1) → ((1 / 𝑛)(,)+∞) = ((1 / (𝑘 + 1))(,)+∞))
120119imaeq2d 6051 . . . . . . . . . . . . 13 (𝑛 = (𝑘 + 1) → (◡𝐹 “ ((1 / 𝑛)(,)+∞)) = (◡𝐹 “ ((1 / (𝑘 + 1))(,)+∞)))
121120, 73fvmptg 6991 . . . . . . . . . . . 12 (((𝑘 + 1) ∈ ℕ ∧ (◡𝐹 “ ((1 / (𝑘 + 1))(,)+∞)) ∈ V) → ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘(𝑘 + 1)) = (◡𝐹 “ ((1 / (𝑘 + 1))(,)+∞)))
12296, 117, 121syl2anr 609 . . . . . . . . . . 11 ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘(𝑘 + 1)) = (◡𝐹 “ ((1 / (𝑘 + 1))(,)+∞)))
123114, 115, 1223sstr4d 3963 . . . . . . . . . 10 ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ⊆ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘(𝑘 + 1)))
124123ralrimiva 3154 . . . . . . . . 9 (𝜑 → ∀𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ⊆ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘(𝑘 + 1)))
125 volsup 25878 . . . . . . . . 9 (((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))):ℕ⟶dom vol ∧ ∀𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ⊆ ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘(𝑘 + 1))) → (vol‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))) = sup((vol “ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ))
12627, 124, 125syl2anc 596 . . . . . . . 8 (𝜑 → (vol‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))) = sup((vol “ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ))
12795, 126eqtr3d 2797 . . . . . . 7 (𝜑 → (vol*‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))) = sup((vol “ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ))
128127adantr 486 . . . . . 6 ((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) → (vol*‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))) = sup((vol “ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ))
12968adantr 486 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) → (◡𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ V)
13066, 129, 74syl2anr 609 . . . . . . . . . . . 12 (((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = (◡𝐹 “ ((1 / 𝑘)(,)+∞)))
131130fveq2d 6889 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) ∧ 𝑘 ∈ ℕ) → (vol‘((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) = (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))
13238a1i 11 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → 0 ∈ ℝ*)
133 nnrecgt0 12382 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑘 ∈ ℕ → 0 < (1 / 𝑘))
134133adantl 487 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑘 ∈ ℕ) → 0 < (1 / 𝑘))
135 0re 11311 . . . . . . . . . . . . . . . . . . . . . . . . 25 0 ∈ ℝ
136 ltle 11399 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((0 ∈ ℝ ∧ (1 / 𝑘) ∈ ℝ) → (0 < (1 / 𝑘) → 0 ≤ (1 / 𝑘)))
137135, 60, 136sylancr 599 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑘 ∈ ℕ) → (0 < (1 / 𝑘) → 0 ≤ (1 / 𝑘)))
138134, 137mpd 16 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑘 ∈ ℕ) → 0 ≤ (1 / 𝑘))
139 elxrge0 13589 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 / 𝑘) ∈ (0[,]+∞) ↔ ((1 / 𝑘) ∈ ℝ* ∧ 0 ≤ (1 / 𝑘)))
14061, 138, 139sylanbrc 595 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑘 ∈ ℕ) → (1 / 𝑘) ∈ (0[,]+∞))
141 0e0iccpnf 13591 . . . . . . . . . . . . . . . . . . . . . 22 0 ∈ (0[,]+∞)
142 ifcl 4527 . . . . . . . . . . . . . . . . . . . . . 22 (((1 / 𝑘) ∈ (0[,]+∞) ∧ 0 ∈ (0[,]+∞)) → if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ∈ (0[,]+∞))
143140, 141, 142sylancl 598 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑘 ∈ ℕ) → if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ∈ (0[,]+∞))
144143adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ∈ (0[,]+∞))
145144fmpttd 7115 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)):ℝ⟶(0[,]+∞))
146145adantrr 730 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)):ℝ⟶(0[,]+∞))
147 itg2cl 26054 . . . . . . . . . . . . . . . . . 18 ((𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)):ℝ⟶(0[,]+∞) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∈ ℝ*)
148146, 147syl 18 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∈ ℝ*)
149 icossicc 13568 . . . . . . . . . . . . . . . . . . . 20 (0[,)+∞) ⊆ (0[,]+∞)
150 fss 6726 . . . . . . . . . . . . . . . . . . . 20 ((𝐹:ℝ⟶(0[,)+∞) ∧ (0[,)+∞) ⊆ (0[,]+∞)) → 𝐹:ℝ⟶(0[,]+∞))
15120, 149, 150sylancl 598 . . . . . . . . . . . . . . . . . . 19 (𝜑 → 𝐹:ℝ⟶(0[,]+∞))
152 itg2cl 26054 . . . . . . . . . . . . . . . . . . 19 (𝐹:ℝ⟶(0[,]+∞) → (∫2‘𝐹) ∈ ℝ*)
153151, 152syl 18 . . . . . . . . . . . . . . . . . 18 (𝜑 → (∫2‘𝐹) ∈ ℝ*)
154153adantr 486 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → (∫2‘𝐹) ∈ ℝ*)
155 0nrp 13158 . . . . . . . . . . . . . . . . . . 19 ¬ 0 ∈ ℝ+
156 simpr 490 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))))
157115, 28eqeltrrd 2861 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ 𝑘 ∈ ℕ) → (◡𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol)
158157adantrr 730 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → (◡𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol)
159158adantr 486 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (◡𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol)
160156, 135eqeltrrdi 2869 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∈ ℝ)
16160, 134elrpd 13162 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑 ∧ 𝑘 ∈ ℕ) → (1 / 𝑘) ∈ ℝ+)
162161adantrr 730 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → (1 / 𝑘) ∈ ℝ+)
163162adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (1 / 𝑘) ∈ ℝ+)
164 itg2const2 26063 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((◡𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol ∧ (1 / 𝑘) ∈ ℝ+) → ((vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ ↔ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∈ ℝ))
165159, 163, 164syl2anc 596 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → ((vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ ↔ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∈ ℝ))
166160, 165mpbird 260 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ)
167 elrege0 13586 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((1 / 𝑘) ∈ (0[,)+∞) ↔ ((1 / 𝑘) ∈ ℝ ∧ 0 ≤ (1 / 𝑘)))
16860, 138, 167sylanbrc 595 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ 𝑘 ∈ ℕ) → (1 / 𝑘) ∈ (0[,)+∞))
169168adantrr 730 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → (1 / 𝑘) ∈ (0[,)+∞))
170169adantr 486 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (1 / 𝑘) ∈ (0[,)+∞))
171 itg2const 26062 . . . . . . . . . . . . . . . . . . . . . . 23 (((◡𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol ∧ (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ ∧ (1 / 𝑘) ∈ (0[,)+∞)) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) = ((1 / 𝑘) · (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞)))))
172159, 166, 170, 171syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) = ((1 / 𝑘) · (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞)))))
173156, 172eqtrd 2795 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → 0 = ((1 / 𝑘) · (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞)))))
174 simplrr 790 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))
175166, 174elrpd 13162 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ+)
176163, 175rpmulcld 13181 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → ((1 / 𝑘) · (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞)))) ∈ ℝ+)
177173, 176eqeltrd 2860 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → 0 ∈ ℝ+)
178177ex 418 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → (0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) → 0 ∈ ℝ+))
179155, 178mtoi 202 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → ¬ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))))
180 itg2ge0 26057 . . . . . . . . . . . . . . . . . . . . 21 ((𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)):ℝ⟶(0[,]+∞) → 0 ≤ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))))
181146, 180syl 18 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → 0 ≤ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))))
182 xrleloe 13274 . . . . . . . . . . . . . . . . . . . . 21 ((0 ∈ ℝ* ∧ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∈ ℝ*) → (0 ≤ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ↔ (0 < (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∨ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))))))
18338, 148, 182sylancr 599 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → (0 ≤ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ↔ (0 < (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∨ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))))))
184181, 183mpbid 235 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → (0 < (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∨ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))))
185184ord 878 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → (¬ 0 < (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) → 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))))
186179, 185mt3d 149 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → 0 < (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))))
187151adantr 486 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → 𝐹:ℝ⟶(0[,]+∞))
18860adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞))) → (1 / 𝑘) ∈ ℝ)
18953adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝐹 Fn ℝ)
190189, 55syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)) ↔ (𝑥 ∈ ℝ ∧ (𝐹‘𝑥) ∈ ((1 / 𝑘)(,)+∞))))
191190biimpa 482 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞))) → (𝑥 ∈ ℝ ∧ (𝐹‘𝑥) ∈ ((1 / 𝑘)(,)+∞)))
192191simpld 500 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞))) → 𝑥 ∈ ℝ)
19348adantlr 728 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹‘𝑥) ∈ ℝ)
194192, 193syldan 603 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞))) → (𝐹‘𝑥) ∈ ℝ)
19561adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞))) → (1 / 𝑘) ∈ ℝ*)
196191simprd 501 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞))) → (𝐹‘𝑥) ∈ ((1 / 𝑘)(,)+∞))
197 simpr 490 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝐹‘𝑥) ∈ ℝ ∧ (1 / 𝑘) < (𝐹‘𝑥)) → (1 / 𝑘) < (𝐹‘𝑥))
19863, 197biimtrdi 256 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((1 / 𝑘) ∈ ℝ* → ((𝐹‘𝑥) ∈ ((1 / 𝑘)(,)+∞) → (1 / 𝑘) < (𝐹‘𝑥)))
199195, 196, 198sylc 66 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞))) → (1 / 𝑘) < (𝐹‘𝑥))
200188, 194, 199ltled 11459 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞))) → (1 / 𝑘) ≤ (𝐹‘𝑥))
20147simprd 501 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ 𝑥 ∈ ℝ) → 0 ≤ (𝐹‘𝑥))
202201adantlr 728 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 0 ≤ (𝐹‘𝑥))
203192, 202syldan 603 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞))) → 0 ≤ (𝐹‘𝑥))
204 breq1 5105 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((1 / 𝑘) = if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) → ((1 / 𝑘) ≤ (𝐹‘𝑥) ↔ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹‘𝑥)))
205 breq1 5105 . . . . . . . . . . . . . . . . . . . . . . . . 25 (0 = if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) → (0 ≤ (𝐹‘𝑥) ↔ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹‘𝑥)))
206204, 205ifboth 4521 . . . . . . . . . . . . . . . . . . . . . . . 24 (((1 / 𝑘) ≤ (𝐹‘𝑥) ∧ 0 ≤ (𝐹‘𝑥)) → if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹‘𝑥))
207200, 203, 206syl2anc 596 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞))) → if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹‘𝑥))
208207adantlr 728 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞))) → if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹‘𝑥))
209 iffalse 4490 . . . . . . . . . . . . . . . . . . . . . . . 24 (¬ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)) → if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) = 0)
210209adantl 487 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ ¬ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞))) → if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) = 0)
211202adantr 486 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ ¬ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞))) → 0 ≤ (𝐹‘𝑥))
212210, 211eqbrtrd 5126 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ ¬ 𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞))) → if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹‘𝑥))
213208, 212pm2.61dan 825 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹‘𝑥))
214213ralrimiva 3154 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑘 ∈ ℕ) → ∀𝑥 ∈ ℝ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹‘𝑥))
215214adantrr 730 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → ∀𝑥 ∈ ℝ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹‘𝑥))
216 reex 11292 . . . . . . . . . . . . . . . . . . . . . 22 ℝ ∈ V
217216a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ℝ ∈ V)
218 ovex 7453 . . . . . . . . . . . . . . . . . . . . . . 23 (1 / 𝑘) ∈ V
219 c0ex 11301 . . . . . . . . . . . . . . . . . . . . . . 23 0 ∈ V
220218, 219ifex 4532 . . . . . . . . . . . . . . . . . . . . . 22 if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ∈ V
221220a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑥 ∈ ℝ) → if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ∈ V)
222 fvexd 6900 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘𝑥) ∈ V)
223 eqidd 2761 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)) = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))
22420feqmptd 6953 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 𝐹 = (𝑥 ∈ ℝ ↦ (𝐹‘𝑥)))
225217, 221, 222, 223, 224ofrfval2 7714 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)) ∘r ≤ 𝐹 ↔ ∀𝑥 ∈ ℝ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹‘𝑥)))
226225biimpar 483 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ ∀𝑥 ∈ ℝ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹‘𝑥)) → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)) ∘r ≤ 𝐹)
227215, 226syldan 603 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)) ∘r ≤ 𝐹)
228 itg2le 26061 . . . . . . . . . . . . . . . . . 18 (((𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)):ℝ⟶(0[,]+∞) ∧ 𝐹:ℝ⟶(0[,]+∞) ∧ (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)) ∘r ≤ 𝐹) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ≤ (∫2‘𝐹))
229146, 187, 227, 228syl3anc 1398 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (◡𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ≤ (∫2‘𝐹))
230132, 148, 154, 186, 229xrltletrd 13291 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))))) → 0 < (∫2‘𝐹))
231230expr 462 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑘 ∈ ℕ) → (0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))) → 0 < (∫2‘𝐹)))
232231con3d 153 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑘 ∈ ℕ) → (¬ 0 < (∫2‘𝐹) → ¬ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞)))))
2334ffvelcdmi 7083 . . . . . . . . . . . . . . . . 17 ((◡𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol → (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ (0[,]+∞))
2343, 233sselid 3906 . . . . . . . . . . . . . . . 16 ((◡𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol → (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ*)
235157, 234syl 18 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑘 ∈ ℕ) → (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ*)
236 xrlenlt 11375 . . . . . . . . . . . . . . 15 (((vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ* ∧ 0 ∈ ℝ*) → ((vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))) ≤ 0 ↔ ¬ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞)))))
237235, 38, 236sylancl 598 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑘 ∈ ℕ) → ((vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))) ≤ 0 ↔ ¬ 0 < (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞)))))
238232, 237sylibrd 262 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑘 ∈ ℕ) → (¬ 0 < (∫2‘𝐹) → (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))) ≤ 0))
239238imp 412 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑘 ∈ ℕ) ∧ ¬ 0 < (∫2‘𝐹)) → (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))) ≤ 0)
240239an32s 665 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) ∧ 𝑘 ∈ ℕ) → (vol‘(◡𝐹 “ ((1 / 𝑘)(,)+∞))) ≤ 0)
241131, 240eqbrtrd 5126 . . . . . . . . . 10 (((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) ∧ 𝑘 ∈ ℕ) → (vol‘((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0)
242241ralrimiva 3154 . . . . . . . . 9 ((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) → ∀𝑘 ∈ ℕ (vol‘((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0)
243 ffn 6709 . . . . . . . . . . 11 ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))):ℕ⟶V → (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) Fn ℕ)
244 fveq2 6885 . . . . . . . . . . . . 13 (𝑧 = ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) → (vol‘𝑧) = (vol‘((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
245244breq1d 5112 . . . . . . . . . . . 12 (𝑧 = ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) → ((vol‘𝑧) ≤ 0 ↔ (vol‘((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0))
246245ralrn 7088 . . . . . . . . . . 11 ((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) Fn ℕ → (∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0 ↔ ∀𝑘 ∈ ℕ (vol‘((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0))
24716, 243, 2463syl 19 . . . . . . . . . 10 (𝜑 → (∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0 ↔ ∀𝑘 ∈ ℕ (vol‘((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0))
248247adantr 486 . . . . . . . . 9 ((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) → (∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0 ↔ ∀𝑘 ∈ ℕ (vol‘((𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0))
249242, 248mpbird 260 . . . . . . . 8 ((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) → ∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0)
250 ffn 6709 . . . . . . . . . 10 (vol:dom vol⟶(0[,]+∞) → vol Fn dom vol)
2514, 250ax-mp 5 . . . . . . . . 9 vol Fn dom vol
25227frnd 6718 . . . . . . . . . 10 (𝜑 → ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ dom vol)
253252adantr 486 . . . . . . . . 9 ((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) → ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ dom vol)
254 breq1 5105 . . . . . . . . . 10 (𝑥 = (vol‘𝑧) → (𝑥 ≤ 0 ↔ (vol‘𝑧) ≤ 0))
255254ralima 7243 . . . . . . . . 9 ((vol Fn dom vol ∧ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ dom vol) → (∀𝑥 ∈ (vol “ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))))𝑥 ≤ 0 ↔ ∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0))
256251, 253, 255sylancr 599 . . . . . . . 8 ((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) → (∀𝑥 ∈ (vol “ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))))𝑥 ≤ 0 ↔ ∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0))
257249, 256mpbird 260 . . . . . . 7 ((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) → ∀𝑥 ∈ (vol “ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))))𝑥 ≤ 0)
258 imassrn 6197 . . . . . . . . 9 (vol “ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))) ⊆ ran vol
259 frn 6717 . . . . . . . . . . 11 (vol:dom vol⟶(0[,]+∞) → ran vol ⊆ (0[,]+∞))
2604, 259ax-mp 5 . . . . . . . . . 10 ran vol ⊆ (0[,]+∞)
261260, 3sstri 3917 . . . . . . . . 9 ran vol ⊆ ℝ*
262258, 261sstri 3917 . . . . . . . 8 (vol “ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))) ⊆ ℝ*
263 supxrleub 13457 . . . . . . . 8 (((vol “ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))) ⊆ ℝ* ∧ 0 ∈ ℝ*) → (sup((vol “ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ) ≤ 0 ↔ ∀𝑥 ∈ (vol “ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))))𝑥 ≤ 0))
264262, 38, 263mp2an 705 . . . . . . 7 (sup((vol “ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ) ≤ 0 ↔ ∀𝑥 ∈ (vol “ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞))))𝑥 ≤ 0)
265257, 264sylibr 237 . . . . . 6 ((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) → sup((vol “ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ) ≤ 0)
266128, 265eqbrtrd 5126 . . . . 5 ((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) → (vol*‘∪ ran (𝑛 ∈ ℕ ↦ (◡𝐹 “ ((1 / 𝑛)(,)+∞)))) ≤ 0)
2678, 37, 39, 93, 266xrletrd 13292 . . . 4 ((𝜑 ∧ ¬ 0 < (∫2‘𝐹)) → (vol‘𝐴) ≤ 0)
268267ex 418 . . 3 (𝜑 → (¬ 0 < (∫2‘𝐹) → (vol‘𝐴) ≤ 0))
269 xrlenlt 11375 . . . 4 (((vol‘𝐴) ∈ ℝ* ∧ 0 ∈ ℝ*) → ((vol‘𝐴) ≤ 0 ↔ ¬ 0 < (vol‘𝐴)))
2707, 38, 269sylancl 598 . . 3 (𝜑 → ((vol‘𝐴) ≤ 0 ↔ ¬ 0 < (vol‘𝐴)))
271268, 270sylibd 242 . 2 (𝜑 → (¬ 0 < (∫2‘𝐹) → ¬ 0 < (vol‘𝐴)))
2721, 271mt4d 118 1 (𝜑 → 0 < (∫2‘𝐹))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861   = wceq 1569   ∈ wcel 2144  ∀wral 3076  ∃wrex 3086  Vcvv 3450   ⊆ wss 3895  ifcif 4481  ∪ cuni 4866  ∪ ciun 4950   class class class wbr 5102   ↦ cmpt 5185  ◡ccnv 5649  dom cdm 5650  ran crn 5651   “ cima 5653   Fn wfn 6533  ⟶wf 6534  ‘cfv 6538  (class class class)co 7420   ∘r cofr 7692  supcsup 9433  ℝcr 11200  0cc0 11201  1c1 11202   + caddc 11204   · cmul 11206  +∞cpnf 11341  ℝ*cxr 11343   < clt 11344   ≤ cle 11345   / cdiv 11974  ℕcn 12336  ℝ+crp 13121  (,)cioo 13477  [,)cico 13479  [,]cicc 13480  vol*covol 25784  volcvol 25785  MblFncmbf 25936  ∫2citg2 25938
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-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7751  ax-inf2 9643  ax-cc 10514  ax-cnex 11257  ax-resscn 11258  ax-1cn 11259  ax-icn 11260  ax-addcl 11261  ax-addrcl 11262  ax-mulcl 11263  ax-mulrcl 11264  ax-mulcom 11265  ax-addass 11266  ax-mulass 11267  ax-distr 11268  ax-i2m1 11269  ax-1ne0 11270  ax-1rid 11271  ax-rnegex 11272  ax-rrecex 11273  ax-cnre 11274  ax-pre-lttri 11275  ax-pre-lttrn 11276  ax-pre-ltadd 11277  ax-pre-mulgt0 11278  ax-pre-sup 11279  ax-addf 11280
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 3847  df-ss 3896  df-pss 4014  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-op 4590  df-uni 4867  df-int 4907  df-iun 4952  df-disj 5070  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5545  df-eprel 5550  df-po 5558  df-so 5559  df-fr 5603  df-se 5604  df-we 5605  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7377  df-ov 7423  df-oprab 7424  df-mpo 7425  df-of 7693  df-ofr 7694  df-om 7878  df-1st 8001  df-2nd 8002  df-frecs 8300  df-wrecs 8331  df-recs 8380  df-rdg 8419  df-1o 8477  df-2o 8478  df-er 8718  df-map 8850  df-pm 8851  df-en 8975  df-dom 8976  df-sdom 8977  df-fin 8978  df-fi 9404  df-sup 9435  df-inf 9436  df-oi 9505  df-dju 9983  df-card 10021  df-pnf 11346  df-mnf 11347  df-xr 11348  df-ltxr 11349  df-le 11350  df-sub 11544  df-neg 11545  df-div 11975  df-nn 12337  df-2 12406  df-3 12407  df-n0 12608  df-z 12695  df-uz 12967  df-q 13077  df-rp 13122  df-xneg 13242  df-xadd 13243  df-xmul 13244  df-ioo 13481  df-ico 13483  df-icc 13484  df-fz 13641  df-fzo 13790  df-fl 13933  df-seq 14146  df-exp 14206  df-hash 14476  df-cj 15267  df-re 15268  df-im 15269  df-sqrt 15403  df-abs 15404  df-clim 15656  df-rlim 15657  df-sum 15855  df-rest 17594  df-topgen 17615  df-psmet 21671  df-xmet 21672  df-met 21673  df-bl 21674  df-mopn 21675  df-top 23213  df-topon 23230  df-bases 23265  df-cmp 23706  df-cncf 25200  df-ovol 25786  df-vol 25787  df-mbf 25941  df-itg1 25942  df-itg2 25943  df-0p 25992
This theorem is used by:  itggt0  26165
  Copyright terms: Public domain W3C validator