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

Theorem itg2gt0 25727
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 13383 . . . . . . . 8 (0[,]+∞) ⊆ ℝ*
4 volf 25496 . . . . . . . . 9 vol:dom vol⟶(0[,]+∞)
54ffvelcdmi 7036 . . . . . . . 8 (𝐴 ∈ dom vol → (vol‘𝐴) ∈ (0[,]+∞))
63, 5sselid 3920 . . . . . . 7 (𝐴 ∈ dom vol → (vol‘𝐴) ∈ ℝ*)
72, 6syl 17 . . . . . 6 (𝜑 → (vol‘𝐴) ∈ ℝ*)
87adantr 480 . . . . 5 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (vol‘𝐴) ∈ ℝ*)
9 itg2gt0.4 . . . . . . . . . . . . . . . 16 (𝜑𝐹 ∈ MblFn)
109elexd 3454 . . . . . . . . . . . . . . 15 (𝜑𝐹 ∈ V)
11 cnvexg 7875 . . . . . . . . . . . . . . 15 (𝐹 ∈ V → 𝐹 ∈ V)
1210, 11syl 17 . . . . . . . . . . . . . 14 (𝜑𝐹 ∈ V)
13 imaexg 7864 . . . . . . . . . . . . . 14 (𝐹 ∈ V → (𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ V)
1412, 13syl 17 . . . . . . . . . . . . 13 (𝜑 → (𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ V)
1514adantr 480 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → (𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ V)
1615fmpttd 7068 . . . . . . . . . . 11 (𝜑 → (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))):ℕ⟶V)
1716ffnd 6670 . . . . . . . . . 10 (𝜑 → (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) Fn ℕ)
18 fniunfv 7202 . . . . . . . . . 10 ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) Fn ℕ → 𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))
1917, 18syl 17 . . . . . . . . 9 (𝜑 𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))
20 itg2gt0.3 . . . . . . . . . . . . . . . 16 (𝜑𝐹:ℝ⟶(0[,)+∞))
21 rge0ssre 13409 . . . . . . . . . . . . . . . 16 (0[,)+∞) ⊆ ℝ
22 fss 6685 . . . . . . . . . . . . . . . 16 ((𝐹:ℝ⟶(0[,)+∞) ∧ (0[,)+∞) ⊆ ℝ) → 𝐹:ℝ⟶ℝ)
2320, 21, 22sylancl 587 . . . . . . . . . . . . . . 15 (𝜑𝐹:ℝ⟶ℝ)
24 mbfima 25597 . . . . . . . . . . . . . . 15 ((𝐹 ∈ MblFn ∧ 𝐹:ℝ⟶ℝ) → (𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ dom vol)
259, 23, 24syl2anc 585 . . . . . . . . . . . . . 14 (𝜑 → (𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ dom vol)
2625adantr 480 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → (𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ dom vol)
2726fmpttd 7068 . . . . . . . . . . . 12 (𝜑 → (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))):ℕ⟶dom vol)
2827ffvelcdmda 7037 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ∈ dom vol)
2928ralrimiva 3130 . . . . . . . . . 10 (𝜑 → ∀𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ∈ dom vol)
30 iunmbl 25520 . . . . . . . . . 10 (∀𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ∈ dom vol → 𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ∈ dom vol)
3129, 30syl 17 . . . . . . . . 9 (𝜑 𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ∈ dom vol)
3219, 31eqeltrrd 2838 . . . . . . . 8 (𝜑 ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ∈ dom vol)
33 mblss 25498 . . . . . . . 8 ( ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ∈ dom vol → ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ ℝ)
3432, 33syl 17 . . . . . . 7 (𝜑 ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ ℝ)
35 ovolcl 25445 . . . . . . 7 ( ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ ℝ → (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) ∈ ℝ*)
3634, 35syl 17 . . . . . 6 (𝜑 → (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) ∈ ℝ*)
3736adantr 480 . . . . 5 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) ∈ ℝ*)
38 0xr 11192 . . . . . 6 0 ∈ ℝ*
3938a1i 11 . . . . 5 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → 0 ∈ ℝ*)
40 mblvol 25497 . . . . . . . 8 (𝐴 ∈ dom vol → (vol‘𝐴) = (vol*‘𝐴))
412, 40syl 17 . . . . . . 7 (𝜑 → (vol‘𝐴) = (vol*‘𝐴))
42 mblss 25498 . . . . . . . . . . . . . . . 16 (𝐴 ∈ dom vol → 𝐴 ⊆ ℝ)
432, 42syl 17 . . . . . . . . . . . . . . 15 (𝜑𝐴 ⊆ ℝ)
4443sselda 3922 . . . . . . . . . . . . . 14 ((𝜑𝑥𝐴) → 𝑥 ∈ ℝ)
4520ffvelcdmda 7037 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ ℝ) → (𝐹𝑥) ∈ (0[,)+∞))
46 elrege0 13407 . . . . . . . . . . . . . . . 16 ((𝐹𝑥) ∈ (0[,)+∞) ↔ ((𝐹𝑥) ∈ ℝ ∧ 0 ≤ (𝐹𝑥)))
4745, 46sylib 218 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ℝ) → ((𝐹𝑥) ∈ ℝ ∧ 0 ≤ (𝐹𝑥)))
4847simpld 494 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ) → (𝐹𝑥) ∈ ℝ)
4944, 48syldan 592 . . . . . . . . . . . . 13 ((𝜑𝑥𝐴) → (𝐹𝑥) ∈ ℝ)
50 itg2gt0.5 . . . . . . . . . . . . 13 ((𝜑𝑥𝐴) → 0 < (𝐹𝑥))
51 nnrecl 12435 . . . . . . . . . . . . 13 (((𝐹𝑥) ∈ ℝ ∧ 0 < (𝐹𝑥)) → ∃𝑘 ∈ ℕ (1 / 𝑘) < (𝐹𝑥))
5249, 50, 51syl2anc 585 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → ∃𝑘 ∈ ℕ (1 / 𝑘) < (𝐹𝑥))
5320ffnd 6670 . . . . . . . . . . . . . . . . 17 (𝜑𝐹 Fn ℝ)
5453ad2antrr 727 . . . . . . . . . . . . . . . 16 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → 𝐹 Fn ℝ)
55 elpreima 7011 . . . . . . . . . . . . . . . 16 (𝐹 Fn ℝ → (𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)) ↔ (𝑥 ∈ ℝ ∧ (𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞))))
5654, 55syl 17 . . . . . . . . . . . . . . 15 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)) ↔ (𝑥 ∈ ℝ ∧ (𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞))))
5744adantr 480 . . . . . . . . . . . . . . . 16 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → 𝑥 ∈ ℝ)
5857biantrurd 532 . . . . . . . . . . . . . . 15 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → ((𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞) ↔ (𝑥 ∈ ℝ ∧ (𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞))))
59 nnrecre 12219 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ ℕ → (1 / 𝑘) ∈ ℝ)
6059adantl 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 ∈ ℕ) → (1 / 𝑘) ∈ ℝ)
6160rexrd 11195 . . . . . . . . . . . . . . . . 17 ((𝜑𝑘 ∈ ℕ) → (1 / 𝑘) ∈ ℝ*)
6261adantlr 716 . . . . . . . . . . . . . . . 16 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → (1 / 𝑘) ∈ ℝ*)
63 elioopnf 13396 . . . . . . . . . . . . . . . 16 ((1 / 𝑘) ∈ ℝ* → ((𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞) ↔ ((𝐹𝑥) ∈ ℝ ∧ (1 / 𝑘) < (𝐹𝑥))))
6462, 63syl 17 . . . . . . . . . . . . . . 15 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → ((𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞) ↔ ((𝐹𝑥) ∈ ℝ ∧ (1 / 𝑘) < (𝐹𝑥))))
6556, 58, 643bitr2d 307 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)) ↔ ((𝐹𝑥) ∈ ℝ ∧ (1 / 𝑘) < (𝐹𝑥))))
66 id 22 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ)
67 imaexg 7864 . . . . . . . . . . . . . . . . . 18 (𝐹 ∈ V → (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ V)
6812, 67syl 17 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ V)
6968adantr 480 . . . . . . . . . . . . . . . 16 ((𝜑𝑥𝐴) → (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ V)
70 oveq2 7375 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑘 → (1 / 𝑛) = (1 / 𝑘))
7170oveq1d 7382 . . . . . . . . . . . . . . . . . 18 (𝑛 = 𝑘 → ((1 / 𝑛)(,)+∞) = ((1 / 𝑘)(,)+∞))
7271imaeq2d 6026 . . . . . . . . . . . . . . . . 17 (𝑛 = 𝑘 → (𝐹 “ ((1 / 𝑛)(,)+∞)) = (𝐹 “ ((1 / 𝑘)(,)+∞)))
73 eqid 2737 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) = (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))
7472, 73fvmptg 6946 . . . . . . . . . . . . . . . 16 ((𝑘 ∈ ℕ ∧ (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ V) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = (𝐹 “ ((1 / 𝑘)(,)+∞)))
7566, 69, 74syl2anr 598 . . . . . . . . . . . . . . 15 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = (𝐹 “ ((1 / 𝑘)(,)+∞)))
7675eleq2d 2823 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ↔ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))))
7749adantr 480 . . . . . . . . . . . . . . 15 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → (𝐹𝑥) ∈ ℝ)
7877biantrurd 532 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → ((1 / 𝑘) < (𝐹𝑥) ↔ ((𝐹𝑥) ∈ ℝ ∧ (1 / 𝑘) < (𝐹𝑥))))
7965, 76, 783bitr4rd 312 . . . . . . . . . . . . 13 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → ((1 / 𝑘) < (𝐹𝑥) ↔ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
8079rexbidva 3160 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → (∃𝑘 ∈ ℕ (1 / 𝑘) < (𝐹𝑥) ↔ ∃𝑘 ∈ ℕ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
8152, 80mpbid 232 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → ∃𝑘 ∈ ℕ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘))
8281ex 412 . . . . . . . . . 10 (𝜑 → (𝑥𝐴 → ∃𝑘 ∈ ℕ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
83 eluni2 4855 . . . . . . . . . . 11 (𝑥 ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ↔ ∃𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))𝑥𝑧)
84 eleq2 2826 . . . . . . . . . . . . 13 (𝑧 = ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) → (𝑥𝑧𝑥 ∈ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
8584rexrn 7040 . . . . . . . . . . . 12 ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) Fn ℕ → (∃𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))𝑥𝑧 ↔ ∃𝑘 ∈ ℕ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
8617, 85syl 17 . . . . . . . . . . 11 (𝜑 → (∃𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))𝑥𝑧 ↔ ∃𝑘 ∈ ℕ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
8783, 86bitrid 283 . . . . . . . . . 10 (𝜑 → (𝑥 ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ↔ ∃𝑘 ∈ ℕ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
8882, 87sylibrd 259 . . . . . . . . 9 (𝜑 → (𝑥𝐴𝑥 ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))))
8988ssrdv 3928 . . . . . . . 8 (𝜑𝐴 ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))
90 ovolss 25452 . . . . . . . 8 ((𝐴 ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ∧ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ ℝ) → (vol*‘𝐴) ≤ (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))))
9189, 34, 90syl2anc 585 . . . . . . 7 (𝜑 → (vol*‘𝐴) ≤ (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))))
9241, 91eqbrtrd 5108 . . . . . 6 (𝜑 → (vol‘𝐴) ≤ (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))))
9392adantr 480 . . . . 5 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (vol‘𝐴) ≤ (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))))
94 mblvol 25497 . . . . . . . . 9 ( ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ∈ dom vol → (vol‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) = (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))))
9532, 94syl 17 . . . . . . . 8 (𝜑 → (vol‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) = (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))))
96 peano2nn 12186 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → (𝑘 + 1) ∈ ℕ)
9796adantl 481 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (𝑘 + 1) ∈ ℕ)
98 nnrecre 12219 . . . . . . . . . . . . . . 15 ((𝑘 + 1) ∈ ℕ → (1 / (𝑘 + 1)) ∈ ℝ)
9997, 98syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (1 / (𝑘 + 1)) ∈ ℝ)
10099rexrd 11195 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (1 / (𝑘 + 1)) ∈ ℝ*)
101 nnre 12181 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → 𝑘 ∈ ℝ)
102101adantl 481 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℝ)
103102lep1d 12087 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → 𝑘 ≤ (𝑘 + 1))
104 nngt0 12208 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → 0 < 𝑘)
105104adantl 481 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → 0 < 𝑘)
10697nnred 12189 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (𝑘 + 1) ∈ ℝ)
10797nngt0d 12226 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → 0 < (𝑘 + 1))
108 lerec 12039 . . . . . . . . . . . . . . 15 (((𝑘 ∈ ℝ ∧ 0 < 𝑘) ∧ ((𝑘 + 1) ∈ ℝ ∧ 0 < (𝑘 + 1))) → (𝑘 ≤ (𝑘 + 1) ↔ (1 / (𝑘 + 1)) ≤ (1 / 𝑘)))
109102, 105, 106, 107, 108syl22anc 839 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (𝑘 ≤ (𝑘 + 1) ↔ (1 / (𝑘 + 1)) ≤ (1 / 𝑘)))
110103, 109mpbid 232 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (1 / (𝑘 + 1)) ≤ (1 / 𝑘))
111 iooss1 13333 . . . . . . . . . . . . 13 (((1 / (𝑘 + 1)) ∈ ℝ* ∧ (1 / (𝑘 + 1)) ≤ (1 / 𝑘)) → ((1 / 𝑘)(,)+∞) ⊆ ((1 / (𝑘 + 1))(,)+∞))
112100, 110, 111syl2anc 585 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → ((1 / 𝑘)(,)+∞) ⊆ ((1 / (𝑘 + 1))(,)+∞))
113 imass2 6068 . . . . . . . . . . . 12 (((1 / 𝑘)(,)+∞) ⊆ ((1 / (𝑘 + 1))(,)+∞) → (𝐹 “ ((1 / 𝑘)(,)+∞)) ⊆ (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)))
114112, 113syl 17 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → (𝐹 “ ((1 / 𝑘)(,)+∞)) ⊆ (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)))
11566, 68, 74syl2anr 598 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = (𝐹 “ ((1 / 𝑘)(,)+∞)))
116 imaexg 7864 . . . . . . . . . . . . 13 (𝐹 ∈ V → (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)) ∈ V)
11712, 116syl 17 . . . . . . . . . . . 12 (𝜑 → (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)) ∈ V)
118 oveq2 7375 . . . . . . . . . . . . . . 15 (𝑛 = (𝑘 + 1) → (1 / 𝑛) = (1 / (𝑘 + 1)))
119118oveq1d 7382 . . . . . . . . . . . . . 14 (𝑛 = (𝑘 + 1) → ((1 / 𝑛)(,)+∞) = ((1 / (𝑘 + 1))(,)+∞))
120119imaeq2d 6026 . . . . . . . . . . . . 13 (𝑛 = (𝑘 + 1) → (𝐹 “ ((1 / 𝑛)(,)+∞)) = (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)))
121120, 73fvmptg 6946 . . . . . . . . . . . 12 (((𝑘 + 1) ∈ ℕ ∧ (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)) ∈ V) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘(𝑘 + 1)) = (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)))
12296, 117, 121syl2anr 598 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘(𝑘 + 1)) = (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)))
123114, 115, 1223sstr4d 3978 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ⊆ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘(𝑘 + 1)))
124123ralrimiva 3130 . . . . . . . . 9 (𝜑 → ∀𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ⊆ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘(𝑘 + 1)))
125 volsup 25523 . . . . . . . . 9 (((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))):ℕ⟶dom vol ∧ ∀𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ⊆ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘(𝑘 + 1))) → (vol‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) = sup((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ))
12627, 124, 125syl2anc 585 . . . . . . . 8 (𝜑 → (vol‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) = sup((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ))
12795, 126eqtr3d 2774 . . . . . . 7 (𝜑 → (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) = sup((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ))
128127adantr 480 . . . . . 6 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) = sup((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ))
12968adantr 480 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ V)
13066, 129, 74syl2anr 598 . . . . . . . . . . . 12 (((𝜑 ∧ ¬ 0 < (∫2𝐹)) ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = (𝐹 “ ((1 / 𝑘)(,)+∞)))
131130fveq2d 6845 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 0 < (∫2𝐹)) ∧ 𝑘 ∈ ℕ) → (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) = (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))
13238a1i 11 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → 0 ∈ ℝ*)
133 nnrecgt0 12220 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑘 ∈ ℕ → 0 < (1 / 𝑘))
134133adantl 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑘 ∈ ℕ) → 0 < (1 / 𝑘))
135 0re 11146 . . . . . . . . . . . . . . . . . . . . . . . . 25 0 ∈ ℝ
136 ltle 11234 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((0 ∈ ℝ ∧ (1 / 𝑘) ∈ ℝ) → (0 < (1 / 𝑘) → 0 ≤ (1 / 𝑘)))
137135, 60, 136sylancr 588 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑘 ∈ ℕ) → (0 < (1 / 𝑘) → 0 ≤ (1 / 𝑘)))
138134, 137mpd 15 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑘 ∈ ℕ) → 0 ≤ (1 / 𝑘))
139 elxrge0 13410 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 / 𝑘) ∈ (0[,]+∞) ↔ ((1 / 𝑘) ∈ ℝ* ∧ 0 ≤ (1 / 𝑘)))
14061, 138, 139sylanbrc 584 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘 ∈ ℕ) → (1 / 𝑘) ∈ (0[,]+∞))
141 0e0iccpnf 13412 . . . . . . . . . . . . . . . . . . . . . 22 0 ∈ (0[,]+∞)
142 ifcl 4513 . . . . . . . . . . . . . . . . . . . . . 22 (((1 / 𝑘) ∈ (0[,]+∞) ∧ 0 ∈ (0[,]+∞)) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ∈ (0[,]+∞))
143140, 141, 142sylancl 587 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑘 ∈ ℕ) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ∈ (0[,]+∞))
144143adantr 480 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ∈ (0[,]+∞))
145144fmpttd 7068 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑘 ∈ ℕ) → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)):ℝ⟶(0[,]+∞))
146145adantrr 718 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)):ℝ⟶(0[,]+∞))
147 itg2cl 25699 . . . . . . . . . . . . . . . . . 18 ((𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)):ℝ⟶(0[,]+∞) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∈ ℝ*)
148146, 147syl 17 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∈ ℝ*)
149 icossicc 13389 . . . . . . . . . . . . . . . . . . . 20 (0[,)+∞) ⊆ (0[,]+∞)
150 fss 6685 . . . . . . . . . . . . . . . . . . . 20 ((𝐹:ℝ⟶(0[,)+∞) ∧ (0[,)+∞) ⊆ (0[,]+∞)) → 𝐹:ℝ⟶(0[,]+∞))
15120, 149, 150sylancl 587 . . . . . . . . . . . . . . . . . . 19 (𝜑𝐹:ℝ⟶(0[,]+∞))
152 itg2cl 25699 . . . . . . . . . . . . . . . . . . 19 (𝐹:ℝ⟶(0[,]+∞) → (∫2𝐹) ∈ ℝ*)
153151, 152syl 17 . . . . . . . . . . . . . . . . . 18 (𝜑 → (∫2𝐹) ∈ ℝ*)
154153adantr 480 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (∫2𝐹) ∈ ℝ*)
155 0nrp 12979 . . . . . . . . . . . . . . . . . . 19 ¬ 0 ∈ ℝ+
156 simpr 484 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))))
157115, 28eqeltrrd 2838 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑘 ∈ ℕ) → (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol)
158157adantrr 718 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol)
159158adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol)
160156, 135eqeltrrdi 2846 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∈ ℝ)
16160, 134elrpd 12983 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑘 ∈ ℕ) → (1 / 𝑘) ∈ ℝ+)
162161adantrr 718 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (1 / 𝑘) ∈ ℝ+)
163162adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (1 / 𝑘) ∈ ℝ+)
164 itg2const2 25708 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol ∧ (1 / 𝑘) ∈ ℝ+) → ((vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ ↔ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∈ ℝ))
165159, 163, 164syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → ((vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ ↔ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∈ ℝ))
166160, 165mpbird 257 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ)
167 elrege0 13407 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((1 / 𝑘) ∈ (0[,)+∞) ↔ ((1 / 𝑘) ∈ ℝ ∧ 0 ≤ (1 / 𝑘)))
16860, 138, 167sylanbrc 584 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑘 ∈ ℕ) → (1 / 𝑘) ∈ (0[,)+∞))
169168adantrr 718 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (1 / 𝑘) ∈ (0[,)+∞))
170169adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (1 / 𝑘) ∈ (0[,)+∞))
171 itg2const 25707 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol ∧ (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ ∧ (1 / 𝑘) ∈ (0[,)+∞)) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) = ((1 / 𝑘) · (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞)))))
172159, 166, 170, 171syl3anc 1374 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) = ((1 / 𝑘) · (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞)))))
173156, 172eqtrd 2772 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → 0 = ((1 / 𝑘) · (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞)))))
174 simplrr 778 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))
175166, 174elrpd 12983 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ+)
176163, 175rpmulcld 13002 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → ((1 / 𝑘) · (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞)))) ∈ ℝ+)
177173, 176eqeltrd 2837 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → 0 ∈ ℝ+)
178177ex 412 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) → 0 ∈ ℝ+))
179155, 178mtoi 199 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → ¬ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))))
180 itg2ge0 25702 . . . . . . . . . . . . . . . . . . . . 21 ((𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)):ℝ⟶(0[,]+∞) → 0 ≤ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))))
181146, 180syl 17 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → 0 ≤ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))))
182 xrleloe 13095 . . . . . . . . . . . . . . . . . . . . 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 588 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (0 ≤ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ↔ (0 < (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∨ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))))))
184181, 183mpbid 232 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (0 < (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∨ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))))
185184ord 865 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (¬ 0 < (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) → 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))))
186179, 185mt3d 148 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → 0 < (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))))
187151adantr 480 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → 𝐹:ℝ⟶(0[,]+∞))
18860adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → (1 / 𝑘) ∈ ℝ)
18953adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑘 ∈ ℕ) → 𝐹 Fn ℝ)
190189, 55syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑘 ∈ ℕ) → (𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)) ↔ (𝑥 ∈ ℝ ∧ (𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞))))
191190biimpa 476 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → (𝑥 ∈ ℝ ∧ (𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞)))
192191simpld 494 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → 𝑥 ∈ ℝ)
19348adantlr 716 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹𝑥) ∈ ℝ)
194192, 193syldan 592 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → (𝐹𝑥) ∈ ℝ)
19561adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → (1 / 𝑘) ∈ ℝ*)
196191simprd 495 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → (𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞))
197 simpr 484 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝐹𝑥) ∈ ℝ ∧ (1 / 𝑘) < (𝐹𝑥)) → (1 / 𝑘) < (𝐹𝑥))
19863, 197biimtrdi 253 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((1 / 𝑘) ∈ ℝ* → ((𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞) → (1 / 𝑘) < (𝐹𝑥)))
199195, 196, 198sylc 65 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → (1 / 𝑘) < (𝐹𝑥))
200188, 194, 199ltled 11294 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → (1 / 𝑘) ≤ (𝐹𝑥))
20147simprd 495 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑥 ∈ ℝ) → 0 ≤ (𝐹𝑥))
202201adantlr 716 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 0 ≤ (𝐹𝑥))
203192, 202syldan 592 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → 0 ≤ (𝐹𝑥))
204 breq1 5089 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((1 / 𝑘) = if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) → ((1 / 𝑘) ≤ (𝐹𝑥) ↔ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥)))
205 breq1 5089 . . . . . . . . . . . . . . . . . . . . . . . . 25 (0 = if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) → (0 ≤ (𝐹𝑥) ↔ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥)))
206204, 205ifboth 4507 . . . . . . . . . . . . . . . . . . . . . . . 24 (((1 / 𝑘) ≤ (𝐹𝑥) ∧ 0 ≤ (𝐹𝑥)) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥))
207200, 203, 206syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥))
208207adantlr 716 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥))
209 iffalse 4476 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) = 0)
210209adantl 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ ¬ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) = 0)
211202adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ ¬ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → 0 ≤ (𝐹𝑥))
212210, 211eqbrtrd 5108 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ ¬ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥))
213208, 212pm2.61dan 813 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥))
214213ralrimiva 3130 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑘 ∈ ℕ) → ∀𝑥 ∈ ℝ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥))
215214adantrr 718 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → ∀𝑥 ∈ ℝ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥))
216 reex 11129 . . . . . . . . . . . . . . . . . . . . . 22 ℝ ∈ V
217216a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ℝ ∈ V)
218 ovex 7400 . . . . . . . . . . . . . . . . . . . . . . 23 (1 / 𝑘) ∈ V
219 c0ex 11138 . . . . . . . . . . . . . . . . . . . . . . 23 0 ∈ V
220218, 219ifex 4518 . . . . . . . . . . . . . . . . . . . . . 22 if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ∈ V
221220a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑥 ∈ ℝ) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ∈ V)
222 fvexd 6856 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑥 ∈ ℝ) → (𝐹𝑥) ∈ V)
223 eqidd 2738 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)) = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))
22420feqmptd 6909 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝐹 = (𝑥 ∈ ℝ ↦ (𝐹𝑥)))
225217, 221, 222, 223, 224ofrfval2 7652 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)) ∘r𝐹 ↔ ∀𝑥 ∈ ℝ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥)))
226225biimpar 477 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ ∀𝑥 ∈ ℝ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥)) → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)) ∘r𝐹)
227215, 226syldan 592 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)) ∘r𝐹)
228 itg2le 25706 . . . . . . . . . . . . . . . . . 18 (((𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)):ℝ⟶(0[,]+∞) ∧ 𝐹:ℝ⟶(0[,]+∞) ∧ (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)) ∘r𝐹) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ≤ (∫2𝐹))
229146, 187, 227, 228syl3anc 1374 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ≤ (∫2𝐹))
230132, 148, 154, 186, 229xrltletrd 13112 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → 0 < (∫2𝐹))
231230expr 456 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) → 0 < (∫2𝐹)))
232231con3d 152 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (¬ 0 < (∫2𝐹) → ¬ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞)))))
2334ffvelcdmi 7036 . . . . . . . . . . . . . . . . 17 ((𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol → (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ (0[,]+∞))
2343, 233sselid 3920 . . . . . . . . . . . . . . . 16 ((𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol → (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ*)
235157, 234syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ*)
236 xrlenlt 11210 . . . . . . . . . . . . . . 15 (((vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ* ∧ 0 ∈ ℝ*) → ((vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ≤ 0 ↔ ¬ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞)))))
237235, 38, 236sylancl 587 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → ((vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ≤ 0 ↔ ¬ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞)))))
238232, 237sylibrd 259 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (¬ 0 < (∫2𝐹) → (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ≤ 0))
239238imp 406 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ) ∧ ¬ 0 < (∫2𝐹)) → (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ≤ 0)
240239an32s 653 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 0 < (∫2𝐹)) ∧ 𝑘 ∈ ℕ) → (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ≤ 0)
241131, 240eqbrtrd 5108 . . . . . . . . . 10 (((𝜑 ∧ ¬ 0 < (∫2𝐹)) ∧ 𝑘 ∈ ℕ) → (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0)
242241ralrimiva 3130 . . . . . . . . 9 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → ∀𝑘 ∈ ℕ (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0)
243 ffn 6669 . . . . . . . . . . 11 ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))):ℕ⟶V → (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) Fn ℕ)
244 fveq2 6841 . . . . . . . . . . . . 13 (𝑧 = ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) → (vol‘𝑧) = (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
245244breq1d 5096 . . . . . . . . . . . 12 (𝑧 = ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) → ((vol‘𝑧) ≤ 0 ↔ (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0))
246245ralrn 7041 . . . . . . . . . . 11 ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) Fn ℕ → (∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0 ↔ ∀𝑘 ∈ ℕ (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0))
24716, 243, 2463syl 18 . . . . . . . . . 10 (𝜑 → (∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0 ↔ ∀𝑘 ∈ ℕ (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0))
248247adantr 480 . . . . . . . . 9 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0 ↔ ∀𝑘 ∈ ℕ (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0))
249242, 248mpbird 257 . . . . . . . 8 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → ∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0)
250 ffn 6669 . . . . . . . . . 10 (vol:dom vol⟶(0[,]+∞) → vol Fn dom vol)
2514, 250ax-mp 5 . . . . . . . . 9 vol Fn dom vol
25227frnd 6677 . . . . . . . . . 10 (𝜑 → ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ dom vol)
253252adantr 480 . . . . . . . . 9 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ dom vol)
254 breq1 5089 . . . . . . . . . 10 (𝑥 = (vol‘𝑧) → (𝑥 ≤ 0 ↔ (vol‘𝑧) ≤ 0))
255254ralima 7192 . . . . . . . . 9 ((vol Fn dom vol ∧ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ dom vol) → (∀𝑥 ∈ (vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))𝑥 ≤ 0 ↔ ∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0))
256251, 253, 255sylancr 588 . . . . . . . 8 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (∀𝑥 ∈ (vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))𝑥 ≤ 0 ↔ ∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0))
257249, 256mpbird 257 . . . . . . 7 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → ∀𝑥 ∈ (vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))𝑥 ≤ 0)
258 imassrn 6037 . . . . . . . . 9 (vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) ⊆ ran vol
259 frn 6676 . . . . . . . . . . 11 (vol:dom vol⟶(0[,]+∞) → ran vol ⊆ (0[,]+∞))
2604, 259ax-mp 5 . . . . . . . . . 10 ran vol ⊆ (0[,]+∞)
261260, 3sstri 3932 . . . . . . . . 9 ran vol ⊆ ℝ*
262258, 261sstri 3932 . . . . . . . 8 (vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) ⊆ ℝ*
263 supxrleub 13278 . . . . . . . 8 (((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) ⊆ ℝ* ∧ 0 ∈ ℝ*) → (sup((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ) ≤ 0 ↔ ∀𝑥 ∈ (vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))𝑥 ≤ 0))
264262, 38, 263mp2an 693 . . . . . . 7 (sup((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ) ≤ 0 ↔ ∀𝑥 ∈ (vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))𝑥 ≤ 0)
265257, 264sylibr 234 . . . . . 6 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → sup((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ) ≤ 0)
266128, 265eqbrtrd 5108 . . . . 5 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) ≤ 0)
2678, 37, 39, 93, 266xrletrd 13113 . . . 4 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (vol‘𝐴) ≤ 0)
268267ex 412 . . 3 (𝜑 → (¬ 0 < (∫2𝐹) → (vol‘𝐴) ≤ 0))
269 xrlenlt 11210 . . . 4 (((vol‘𝐴) ∈ ℝ* ∧ 0 ∈ ℝ*) → ((vol‘𝐴) ≤ 0 ↔ ¬ 0 < (vol‘𝐴)))
2707, 38, 269sylancl 587 . . 3 (𝜑 → ((vol‘𝐴) ≤ 0 ↔ ¬ 0 < (vol‘𝐴)))
271268, 270sylibd 239 . 2 (𝜑 → (¬ 0 < (∫2𝐹) → ¬ 0 < (vol‘𝐴)))
2721, 271mt4d 117 1 (𝜑 → 0 < (∫2𝐹))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  wo 848   = wceq 1542  wcel 2114  wral 3052  wrex 3062  Vcvv 3430  wss 3890  ifcif 4467   cuni 4851   ciun 4934   class class class wbr 5086  cmpt 5167  ccnv 5630  dom cdm 5631  ran crn 5632  cima 5634   Fn wfn 6494  wf 6495  cfv 6499  (class class class)co 7367  r cofr 7630  supcsup 9353  cr 11037  0cc0 11038  1c1 11039   + caddc 11041   · cmul 11043  +∞cpnf 11176  *cxr 11178   < clt 11179  cle 11180   / cdiv 11807  cn 12174  +crp 12942  (,)cioo 13298  [,)cico 13300  [,]cicc 13301  vol*covol 25429  volcvol 25430  MblFncmbf 25581  2citg2 25583
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5213  ax-sep 5232  ax-nul 5242  ax-pow 5308  ax-pr 5376  ax-un 7689  ax-inf2 9562  ax-cc 10357  ax-cnex 11094  ax-resscn 11095  ax-1cn 11096  ax-icn 11097  ax-addcl 11098  ax-addrcl 11099  ax-mulcl 11100  ax-mulrcl 11101  ax-mulcom 11102  ax-addass 11103  ax-mulass 11104  ax-distr 11105  ax-i2m1 11106  ax-1ne0 11107  ax-1rid 11108  ax-rnegex 11109  ax-rrecex 11110  ax-cnre 11111  ax-pre-lttri 11112  ax-pre-lttrn 11113  ax-pre-ltadd 11114  ax-pre-mulgt0 11115  ax-pre-sup 11116  ax-addf 11117
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-disj 5054  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5526  df-eprel 5531  df-po 5539  df-so 5540  df-fr 5584  df-se 5585  df-we 5586  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-pred 6266  df-ord 6327  df-on 6328  df-lim 6329  df-suc 6330  df-iota 6455  df-fun 6501  df-fn 6502  df-f 6503  df-f1 6504  df-fo 6505  df-f1o 6506  df-fv 6507  df-isom 6508  df-riota 7324  df-ov 7370  df-oprab 7371  df-mpo 7372  df-of 7631  df-ofr 7632  df-om 7818  df-1st 7942  df-2nd 7943  df-frecs 8231  df-wrecs 8262  df-recs 8311  df-rdg 8349  df-1o 8405  df-2o 8406  df-er 8643  df-map 8775  df-pm 8776  df-en 8894  df-dom 8895  df-sdom 8896  df-fin 8897  df-fi 9324  df-sup 9355  df-inf 9356  df-oi 9425  df-dju 9825  df-card 9863  df-pnf 11181  df-mnf 11182  df-xr 11183  df-ltxr 11184  df-le 11185  df-sub 11379  df-neg 11380  df-div 11808  df-nn 12175  df-2 12244  df-3 12245  df-n0 12438  df-z 12525  df-uz 12789  df-q 12899  df-rp 12943  df-xneg 13063  df-xadd 13064  df-xmul 13065  df-ioo 13302  df-ico 13304  df-icc 13305  df-fz 13462  df-fzo 13609  df-fl 13751  df-seq 13964  df-exp 14024  df-hash 14293  df-cj 15061  df-re 15062  df-im 15063  df-sqrt 15197  df-abs 15198  df-clim 15450  df-rlim 15451  df-sum 15649  df-rest 17385  df-topgen 17406  df-psmet 21344  df-xmet 21345  df-met 21346  df-bl 21347  df-mopn 21348  df-top 22859  df-topon 22876  df-bases 22911  df-cmp 23352  df-cncf 24845  df-ovol 25431  df-vol 25432  df-mbf 25586  df-itg1 25587  df-itg2 25588  df-0p 25637
This theorem is referenced by:  itggt0  25811
  Copyright terms: Public domain W3C validator