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

Theorem itg2gt0 25930
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 13463 . . . . . . . 8 (0[,]+∞) ⊆ ℝ*
4 volf 25699 . . . . . . . . 9 vol:dom vol⟶(0[,]+∞)
54ffvelcdmi 7078 . . . . . . . 8 (𝐴 ∈ dom vol → (vol‘𝐴) ∈ (0[,]+∞))
63, 5sselid 3934 . . . . . . 7 (𝐴 ∈ dom vol → (vol‘𝐴) ∈ ℝ*)
72, 6syl 18 . . . . . 6 (𝜑 → (vol‘𝐴) ∈ ℝ*)
87adantr 485 . . . . 5 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (vol‘𝐴) ∈ ℝ*)
9 itg2gt0.4 . . . . . . . . . . . . . . . 16 (𝜑𝐹 ∈ MblFn)
109elexd 3477 . . . . . . . . . . . . . . 15 (𝜑𝐹 ∈ V)
11 cnvexg 7919 . . . . . . . . . . . . . . 15 (𝐹 ∈ V → 𝐹 ∈ V)
1210, 11syl 18 . . . . . . . . . . . . . 14 (𝜑𝐹 ∈ V)
13 imaexg 7908 . . . . . . . . . . . . . 14 (𝐹 ∈ V → (𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ V)
1412, 13syl 18 . . . . . . . . . . . . 13 (𝜑 → (𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ V)
1514adantr 485 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → (𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ V)
1615fmpttd 7110 . . . . . . . . . . 11 (𝜑 → (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))):ℕ⟶V)
1716ffnd 6706 . . . . . . . . . 10 (𝜑 → (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) Fn ℕ)
18 fniunfv 7245 . . . . . . . . . 10 ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) Fn ℕ → 𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))
1917, 18syl 18 . . . . . . . . 9 (𝜑 𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))
20 itg2gt0.3 . . . . . . . . . . . . . . . 16 (𝜑𝐹:ℝ⟶(0[,)+∞))
21 rge0ssre 13489 . . . . . . . . . . . . . . . 16 (0[,)+∞) ⊆ ℝ
22 fss 6722 . . . . . . . . . . . . . . . 16 ((𝐹:ℝ⟶(0[,)+∞) ∧ (0[,)+∞) ⊆ ℝ) → 𝐹:ℝ⟶ℝ)
2320, 21, 22sylancl 597 . . . . . . . . . . . . . . 15 (𝜑𝐹:ℝ⟶ℝ)
24 mbfima 25800 . . . . . . . . . . . . . . 15 ((𝐹 ∈ MblFn ∧ 𝐹:ℝ⟶ℝ) → (𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ dom vol)
259, 23, 24syl2anc 595 . . . . . . . . . . . . . 14 (𝜑 → (𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ dom vol)
2625adantr 485 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → (𝐹 “ ((1 / 𝑛)(,)+∞)) ∈ dom vol)
2726fmpttd 7110 . . . . . . . . . . . 12 (𝜑 → (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))):ℕ⟶dom vol)
2827ffvelcdmda 7079 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ∈ dom vol)
2928ralrimiva 3156 . . . . . . . . . 10 (𝜑 → ∀𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ∈ dom vol)
30 iunmbl 25723 . . . . . . . . . 10 (∀𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ∈ dom vol → 𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ∈ dom vol)
3129, 30syl 18 . . . . . . . . 9 (𝜑 𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ∈ dom vol)
3219, 31eqeltrrd 2863 . . . . . . . 8 (𝜑 ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ∈ dom vol)
33 mblss 25701 . . . . . . . 8 ( ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ∈ dom vol → ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ ℝ)
3432, 33syl 18 . . . . . . 7 (𝜑 ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ ℝ)
35 ovolcl 25648 . . . . . . 7 ( ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ ℝ → (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) ∈ ℝ*)
3634, 35syl 18 . . . . . 6 (𝜑 → (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) ∈ ℝ*)
3736adantr 485 . . . . 5 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) ∈ ℝ*)
38 0xr 11262 . . . . . 6 0 ∈ ℝ*
3938a1i 11 . . . . 5 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → 0 ∈ ℝ*)
40 mblvol 25700 . . . . . . . 8 (𝐴 ∈ dom vol → (vol‘𝐴) = (vol*‘𝐴))
412, 40syl 18 . . . . . . 7 (𝜑 → (vol‘𝐴) = (vol*‘𝐴))
42 mblss 25701 . . . . . . . . . . . . . . . 16 (𝐴 ∈ dom vol → 𝐴 ⊆ ℝ)
432, 42syl 18 . . . . . . . . . . . . . . 15 (𝜑𝐴 ⊆ ℝ)
4443sselda 3936 . . . . . . . . . . . . . 14 ((𝜑𝑥𝐴) → 𝑥 ∈ ℝ)
4520ffvelcdmda 7079 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ ℝ) → (𝐹𝑥) ∈ (0[,)+∞))
46 elrege0 13487 . . . . . . . . . . . . . . . 16 ((𝐹𝑥) ∈ (0[,)+∞) ↔ ((𝐹𝑥) ∈ ℝ ∧ 0 ≤ (𝐹𝑥)))
4745, 46sylib 221 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ℝ) → ((𝐹𝑥) ∈ ℝ ∧ 0 ≤ (𝐹𝑥)))
4847simpld 499 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ) → (𝐹𝑥) ∈ ℝ)
4944, 48syldan 602 . . . . . . . . . . . . 13 ((𝜑𝑥𝐴) → (𝐹𝑥) ∈ ℝ)
50 itg2gt0.5 . . . . . . . . . . . . 13 ((𝜑𝑥𝐴) → 0 < (𝐹𝑥))
51 nnrecl 12508 . . . . . . . . . . . . 13 (((𝐹𝑥) ∈ ℝ ∧ 0 < (𝐹𝑥)) → ∃𝑘 ∈ ℕ (1 / 𝑘) < (𝐹𝑥))
5249, 50, 51syl2anc 595 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → ∃𝑘 ∈ ℕ (1 / 𝑘) < (𝐹𝑥))
5320ffnd 6706 . . . . . . . . . . . . . . . . 17 (𝜑𝐹 Fn ℝ)
5453ad2antrr 738 . . . . . . . . . . . . . . . 16 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → 𝐹 Fn ℝ)
55 elpreima 7053 . . . . . . . . . . . . . . . 16 (𝐹 Fn ℝ → (𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)) ↔ (𝑥 ∈ ℝ ∧ (𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞))))
5654, 55syl 18 . . . . . . . . . . . . . . 15 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)) ↔ (𝑥 ∈ ℝ ∧ (𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞))))
5744adantr 485 . . . . . . . . . . . . . . . 16 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → 𝑥 ∈ ℝ)
5857biantrurd 541 . . . . . . . . . . . . . . 15 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → ((𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞) ↔ (𝑥 ∈ ℝ ∧ (𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞))))
59 nnrecre 12284 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ ℕ → (1 / 𝑘) ∈ ℝ)
6059adantl 486 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 ∈ ℕ) → (1 / 𝑘) ∈ ℝ)
6160rexrd 11265 . . . . . . . . . . . . . . . . 17 ((𝜑𝑘 ∈ ℕ) → (1 / 𝑘) ∈ ℝ*)
6261adantlr 727 . . . . . . . . . . . . . . . 16 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → (1 / 𝑘) ∈ ℝ*)
63 elioopnf 13476 . . . . . . . . . . . . . . . 16 ((1 / 𝑘) ∈ ℝ* → ((𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞) ↔ ((𝐹𝑥) ∈ ℝ ∧ (1 / 𝑘) < (𝐹𝑥))))
6462, 63syl 18 . . . . . . . . . . . . . . 15 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → ((𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞) ↔ ((𝐹𝑥) ∈ ℝ ∧ (1 / 𝑘) < (𝐹𝑥))))
6556, 58, 643bitr2d 310 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)) ↔ ((𝐹𝑥) ∈ ℝ ∧ (1 / 𝑘) < (𝐹𝑥))))
66 id 23 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ)
67 imaexg 7908 . . . . . . . . . . . . . . . . . 18 (𝐹 ∈ V → (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ V)
6812, 67syl 18 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ V)
6968adantr 485 . . . . . . . . . . . . . . . 16 ((𝜑𝑥𝐴) → (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ V)
70 oveq2 7420 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑘 → (1 / 𝑛) = (1 / 𝑘))
7170oveq1d 7427 . . . . . . . . . . . . . . . . . 18 (𝑛 = 𝑘 → ((1 / 𝑛)(,)+∞) = ((1 / 𝑘)(,)+∞))
7271imaeq2d 6061 . . . . . . . . . . . . . . . . 17 (𝑛 = 𝑘 → (𝐹 “ ((1 / 𝑛)(,)+∞)) = (𝐹 “ ((1 / 𝑘)(,)+∞)))
73 eqid 2762 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) = (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))
7472, 73fvmptg 6987 . . . . . . . . . . . . . . . 16 ((𝑘 ∈ ℕ ∧ (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ V) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = (𝐹 “ ((1 / 𝑘)(,)+∞)))
7566, 69, 74syl2anr 608 . . . . . . . . . . . . . . 15 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = (𝐹 “ ((1 / 𝑘)(,)+∞)))
7675eleq2d 2848 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ↔ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))))
7749adantr 485 . . . . . . . . . . . . . . 15 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → (𝐹𝑥) ∈ ℝ)
7877biantrurd 541 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → ((1 / 𝑘) < (𝐹𝑥) ↔ ((𝐹𝑥) ∈ ℝ ∧ (1 / 𝑘) < (𝐹𝑥))))
7965, 76, 783bitr4rd 315 . . . . . . . . . . . . 13 (((𝜑𝑥𝐴) ∧ 𝑘 ∈ ℕ) → ((1 / 𝑘) < (𝐹𝑥) ↔ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
8079rexbidva 3186 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → (∃𝑘 ∈ ℕ (1 / 𝑘) < (𝐹𝑥) ↔ ∃𝑘 ∈ ℕ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
8152, 80mpbid 235 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → ∃𝑘 ∈ ℕ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘))
8281ex 417 . . . . . . . . . 10 (𝜑 → (𝑥𝐴 → ∃𝑘 ∈ ℕ 𝑥 ∈ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
83 eluni2 4875 . . . . . . . . . . 11 (𝑥 ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ↔ ∃𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))𝑥𝑧)
84 eleq2 2851 . . . . . . . . . . . . 13 (𝑧 = ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) → (𝑥𝑧𝑥 ∈ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
8584rexrn 7082 . . . . . . . . . . . 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 3942 . . . . . . . 8 (𝜑𝐴 ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))
90 ovolss 25655 . . . . . . . 8 ((𝐴 ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ∧ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ ℝ) → (vol*‘𝐴) ≤ (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))))
9189, 34, 90syl2anc 595 . . . . . . 7 (𝜑 → (vol*‘𝐴) ≤ (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))))
9241, 91eqbrtrd 5132 . . . . . 6 (𝜑 → (vol‘𝐴) ≤ (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))))
9392adantr 485 . . . . 5 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (vol‘𝐴) ≤ (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))))
94 mblvol 25700 . . . . . . . . 9 ( ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ∈ dom vol → (vol‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) = (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))))
9532, 94syl 18 . . . . . . . 8 (𝜑 → (vol‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) = (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))))
96 peano2nn 12251 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → (𝑘 + 1) ∈ ℕ)
9796adantl 486 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (𝑘 + 1) ∈ ℕ)
98 nnrecre 12284 . . . . . . . . . . . . . . 15 ((𝑘 + 1) ∈ ℕ → (1 / (𝑘 + 1)) ∈ ℝ)
9997, 98syl 18 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (1 / (𝑘 + 1)) ∈ ℝ)
10099rexrd 11265 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (1 / (𝑘 + 1)) ∈ ℝ*)
101 nnre 12246 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → 𝑘 ∈ ℝ)
102101adantl 486 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℝ)
103102lep1d 12152 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → 𝑘 ≤ (𝑘 + 1))
104 nngt0 12273 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → 0 < 𝑘)
105104adantl 486 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → 0 < 𝑘)
10697nnred 12254 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (𝑘 + 1) ∈ ℝ)
10797nngt0d 12291 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → 0 < (𝑘 + 1))
108 lerec 12104 . . . . . . . . . . . . . . 15 (((𝑘 ∈ ℝ ∧ 0 < 𝑘) ∧ ((𝑘 + 1) ∈ ℝ ∧ 0 < (𝑘 + 1))) → (𝑘 ≤ (𝑘 + 1) ↔ (1 / (𝑘 + 1)) ≤ (1 / 𝑘)))
109102, 105, 106, 107, 108syl22anc 851 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (𝑘 ≤ (𝑘 + 1) ↔ (1 / (𝑘 + 1)) ≤ (1 / 𝑘)))
110103, 109mpbid 235 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (1 / (𝑘 + 1)) ≤ (1 / 𝑘))
111 iooss1 13413 . . . . . . . . . . . . 13 (((1 / (𝑘 + 1)) ∈ ℝ* ∧ (1 / (𝑘 + 1)) ≤ (1 / 𝑘)) → ((1 / 𝑘)(,)+∞) ⊆ ((1 / (𝑘 + 1))(,)+∞))
112100, 110, 111syl2anc 595 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → ((1 / 𝑘)(,)+∞) ⊆ ((1 / (𝑘 + 1))(,)+∞))
113 imass2 6103 . . . . . . . . . . . 12 (((1 / 𝑘)(,)+∞) ⊆ ((1 / (𝑘 + 1))(,)+∞) → (𝐹 “ ((1 / 𝑘)(,)+∞)) ⊆ (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)))
114112, 113syl 18 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → (𝐹 “ ((1 / 𝑘)(,)+∞)) ⊆ (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)))
11566, 68, 74syl2anr 608 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = (𝐹 “ ((1 / 𝑘)(,)+∞)))
116 imaexg 7908 . . . . . . . . . . . . 13 (𝐹 ∈ V → (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)) ∈ V)
11712, 116syl 18 . . . . . . . . . . . 12 (𝜑 → (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)) ∈ V)
118 oveq2 7420 . . . . . . . . . . . . . . 15 (𝑛 = (𝑘 + 1) → (1 / 𝑛) = (1 / (𝑘 + 1)))
119118oveq1d 7427 . . . . . . . . . . . . . 14 (𝑛 = (𝑘 + 1) → ((1 / 𝑛)(,)+∞) = ((1 / (𝑘 + 1))(,)+∞))
120119imaeq2d 6061 . . . . . . . . . . . . 13 (𝑛 = (𝑘 + 1) → (𝐹 “ ((1 / 𝑛)(,)+∞)) = (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)))
121120, 73fvmptg 6987 . . . . . . . . . . . 12 (((𝑘 + 1) ∈ ℕ ∧ (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)) ∈ V) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘(𝑘 + 1)) = (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)))
12296, 117, 121syl2anr 608 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘(𝑘 + 1)) = (𝐹 “ ((1 / (𝑘 + 1))(,)+∞)))
123114, 115, 1223sstr4d 3991 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ⊆ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘(𝑘 + 1)))
124123ralrimiva 3156 . . . . . . . . 9 (𝜑 → ∀𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ⊆ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘(𝑘 + 1)))
125 volsup 25726 . . . . . . . . 9 (((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))):ℕ⟶dom vol ∧ ∀𝑘 ∈ ℕ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) ⊆ ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘(𝑘 + 1))) → (vol‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) = sup((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ))
12627, 124, 125syl2anc 595 . . . . . . . 8 (𝜑 → (vol‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) = sup((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ))
12795, 126eqtr3d 2799 . . . . . . 7 (𝜑 → (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) = sup((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ))
128127adantr 485 . . . . . 6 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) = sup((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ))
12968adantr 485 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ V)
13066, 129, 74syl2anr 608 . . . . . . . . . . . 12 (((𝜑 ∧ ¬ 0 < (∫2𝐹)) ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) = (𝐹 “ ((1 / 𝑘)(,)+∞)))
131130fveq2d 6885 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 0 < (∫2𝐹)) ∧ 𝑘 ∈ ℕ) → (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) = (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))
13238a1i 11 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → 0 ∈ ℝ*)
133 nnrecgt0 12285 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑘 ∈ ℕ → 0 < (1 / 𝑘))
134133adantl 486 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑘 ∈ ℕ) → 0 < (1 / 𝑘))
135 0re 11216 . . . . . . . . . . . . . . . . . . . . . . . . 25 0 ∈ ℝ
136 ltle 11304 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((0 ∈ ℝ ∧ (1 / 𝑘) ∈ ℝ) → (0 < (1 / 𝑘) → 0 ≤ (1 / 𝑘)))
137135, 60, 136sylancr 598 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑘 ∈ ℕ) → (0 < (1 / 𝑘) → 0 ≤ (1 / 𝑘)))
138134, 137mpd 16 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑘 ∈ ℕ) → 0 ≤ (1 / 𝑘))
139 elxrge0 13490 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 / 𝑘) ∈ (0[,]+∞) ↔ ((1 / 𝑘) ∈ ℝ* ∧ 0 ≤ (1 / 𝑘)))
14061, 138, 139sylanbrc 594 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘 ∈ ℕ) → (1 / 𝑘) ∈ (0[,]+∞))
141 0e0iccpnf 13492 . . . . . . . . . . . . . . . . . . . . . 22 0 ∈ (0[,]+∞)
142 ifcl 4532 . . . . . . . . . . . . . . . . . . . . . 22 (((1 / 𝑘) ∈ (0[,]+∞) ∧ 0 ∈ (0[,]+∞)) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ∈ (0[,]+∞))
143140, 141, 142sylancl 597 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑘 ∈ ℕ) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ∈ (0[,]+∞))
144143adantr 485 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ∈ (0[,]+∞))
145144fmpttd 7110 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑘 ∈ ℕ) → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)):ℝ⟶(0[,]+∞))
146145adantrr 729 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)):ℝ⟶(0[,]+∞))
147 itg2cl 25902 . . . . . . . . . . . . . . . . . 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 13469 . . . . . . . . . . . . . . . . . . . 20 (0[,)+∞) ⊆ (0[,]+∞)
150 fss 6722 . . . . . . . . . . . . . . . . . . . 20 ((𝐹:ℝ⟶(0[,)+∞) ∧ (0[,)+∞) ⊆ (0[,]+∞)) → 𝐹:ℝ⟶(0[,]+∞))
15120, 149, 150sylancl 597 . . . . . . . . . . . . . . . . . . 19 (𝜑𝐹:ℝ⟶(0[,]+∞))
152 itg2cl 25902 . . . . . . . . . . . . . . . . . . 19 (𝐹:ℝ⟶(0[,]+∞) → (∫2𝐹) ∈ ℝ*)
153151, 152syl 18 . . . . . . . . . . . . . . . . . 18 (𝜑 → (∫2𝐹) ∈ ℝ*)
154153adantr 485 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (∫2𝐹) ∈ ℝ*)
155 0nrp 13059 . . . . . . . . . . . . . . . . . . 19 ¬ 0 ∈ ℝ+
156 simpr 489 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))))
157115, 28eqeltrrd 2863 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑘 ∈ ℕ) → (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol)
158157adantrr 729 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol)
159158adantr 485 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol)
160156, 135eqeltrrdi 2871 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∈ ℝ)
16160, 134elrpd 13063 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑘 ∈ ℕ) → (1 / 𝑘) ∈ ℝ+)
162161adantrr 729 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (1 / 𝑘) ∈ ℝ+)
163162adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (1 / 𝑘) ∈ ℝ+)
164 itg2const2 25911 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol ∧ (1 / 𝑘) ∈ ℝ+) → ((vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ ↔ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ∈ ℝ))
165159, 163, 164syl2anc 595 . . . . . . . . . . . . . . . . . . . . . . . 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 13487 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((1 / 𝑘) ∈ (0[,)+∞) ↔ ((1 / 𝑘) ∈ ℝ ∧ 0 ≤ (1 / 𝑘)))
16860, 138, 167sylanbrc 594 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑘 ∈ ℕ) → (1 / 𝑘) ∈ (0[,)+∞))
169168adantrr 729 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (1 / 𝑘) ∈ (0[,)+∞))
170169adantr 485 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (1 / 𝑘) ∈ (0[,)+∞))
171 itg2const 25910 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol ∧ (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ ∧ (1 / 𝑘) ∈ (0[,)+∞)) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) = ((1 / 𝑘) · (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞)))))
172159, 166, 170, 171syl3anc 1397 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) = ((1 / 𝑘) · (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞)))))
173156, 172eqtrd 2797 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → 0 = ((1 / 𝑘) · (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞)))))
174 simplrr 789 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))
175166, 174elrpd 13063 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ+)
176163, 175rpmulcld 13082 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → ((1 / 𝑘) · (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞)))) ∈ ℝ+)
177173, 176eqeltrd 2862 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) ∧ 0 = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))) → 0 ∈ ℝ+)
178177ex 417 . . . . . . . . . . . . . . . . . . 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 25905 . . . . . . . . . . . . . . . . . . . . 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 13175 . . . . . . . . . . . . . . . . . . . . 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 598 . . . . . . . . . . . . . . . . . . . 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 877 . . . . . . . . . . . . . . . . . 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 485 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → 𝐹:ℝ⟶(0[,]+∞))
18860adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → (1 / 𝑘) ∈ ℝ)
18953adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑘 ∈ ℕ) → 𝐹 Fn ℝ)
190189, 55syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑘 ∈ ℕ) → (𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)) ↔ (𝑥 ∈ ℝ ∧ (𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞))))
191190biimpa 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → (𝑥 ∈ ℝ ∧ (𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞)))
192191simpld 499 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → 𝑥 ∈ ℝ)
19348adantlr 727 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹𝑥) ∈ ℝ)
194192, 193syldan 602 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → (𝐹𝑥) ∈ ℝ)
19561adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → (1 / 𝑘) ∈ ℝ*)
196191simprd 500 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → (𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞))
197 simpr 489 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝐹𝑥) ∈ ℝ ∧ (1 / 𝑘) < (𝐹𝑥)) → (1 / 𝑘) < (𝐹𝑥))
19863, 197biimtrdi 256 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((1 / 𝑘) ∈ ℝ* → ((𝐹𝑥) ∈ ((1 / 𝑘)(,)+∞) → (1 / 𝑘) < (𝐹𝑥)))
199195, 196, 198sylc 66 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → (1 / 𝑘) < (𝐹𝑥))
200188, 194, 199ltled 11364 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → (1 / 𝑘) ≤ (𝐹𝑥))
20147simprd 500 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑥 ∈ ℝ) → 0 ≤ (𝐹𝑥))
202201adantlr 727 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 0 ≤ (𝐹𝑥))
203192, 202syldan 602 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → 0 ≤ (𝐹𝑥))
204 breq1 5111 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((1 / 𝑘) = if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) → ((1 / 𝑘) ≤ (𝐹𝑥) ↔ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥)))
205 breq1 5111 . . . . . . . . . . . . . . . . . . . . . . . . 25 (0 = if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) → (0 ≤ (𝐹𝑥) ↔ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥)))
206204, 205ifboth 4526 . . . . . . . . . . . . . . . . . . . . . . . 24 (((1 / 𝑘) ≤ (𝐹𝑥) ∧ 0 ≤ (𝐹𝑥)) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥))
207200, 203, 206syl2anc 595 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥))
208207adantlr 727 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥))
209 iffalse 4495 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) = 0)
210209adantl 486 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ ¬ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) = 0)
211202adantr 485 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ ¬ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → 0 ≤ (𝐹𝑥))
212210, 211eqbrtrd 5132 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ ¬ 𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞))) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥))
213208, 212pm2.61dan 824 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑘 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥))
214213ralrimiva 3156 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑘 ∈ ℕ) → ∀𝑥 ∈ ℝ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥))
215214adantrr 729 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → ∀𝑥 ∈ ℝ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥))
216 reex 11197 . . . . . . . . . . . . . . . . . . . . . 22 ℝ ∈ V
217216a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ℝ ∈ V)
218 ovex 7445 . . . . . . . . . . . . . . . . . . . . . . 23 (1 / 𝑘) ∈ V
219 c0ex 11206 . . . . . . . . . . . . . . . . . . . . . . 23 0 ∈ V
220218, 219ifex 4537 . . . . . . . . . . . . . . . . . . . . . 22 if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ∈ V
221220a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑥 ∈ ℝ) → if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ∈ V)
222 fvexd 6896 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑥 ∈ ℝ) → (𝐹𝑥) ∈ V)
223 eqidd 2763 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)) = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)))
22420feqmptd 6949 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝐹 = (𝑥 ∈ ℝ ↦ (𝐹𝑥)))
225217, 221, 222, 223, 224ofrfval2 7697 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)) ∘r𝐹 ↔ ∀𝑥 ∈ ℝ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥)))
226225biimpar 482 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ ∀𝑥 ∈ ℝ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0) ≤ (𝐹𝑥)) → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)) ∘r𝐹)
227215, 226syldan 602 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)) ∘r𝐹)
228 itg2le 25909 . . . . . . . . . . . . . . . . . 18 (((𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)):ℝ⟶(0[,]+∞) ∧ 𝐹:ℝ⟶(0[,]+∞) ∧ (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0)) ∘r𝐹) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ≤ (∫2𝐹))
229146, 187, 227, 228syl3anc 1397 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥 ∈ (𝐹 “ ((1 / 𝑘)(,)+∞)), (1 / 𝑘), 0))) ≤ (∫2𝐹))
230132, 148, 154, 186, 229xrltletrd 13192 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))))) → 0 < (∫2𝐹))
231230expr 461 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) → 0 < (∫2𝐹)))
232231con3d 153 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (¬ 0 < (∫2𝐹) → ¬ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞)))))
2334ffvelcdmi 7078 . . . . . . . . . . . . . . . . 17 ((𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol → (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ (0[,]+∞))
2343, 233sselid 3934 . . . . . . . . . . . . . . . 16 ((𝐹 “ ((1 / 𝑘)(,)+∞)) ∈ dom vol → (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ*)
235157, 234syl 18 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ*)
236 xrlenlt 11280 . . . . . . . . . . . . . . 15 (((vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ∈ ℝ* ∧ 0 ∈ ℝ*) → ((vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ≤ 0 ↔ ¬ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞)))))
237235, 38, 236sylancl 597 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → ((vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ≤ 0 ↔ ¬ 0 < (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞)))))
238232, 237sylibrd 262 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (¬ 0 < (∫2𝐹) → (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ≤ 0))
239238imp 411 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ) ∧ ¬ 0 < (∫2𝐹)) → (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ≤ 0)
240239an32s 664 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 0 < (∫2𝐹)) ∧ 𝑘 ∈ ℕ) → (vol‘(𝐹 “ ((1 / 𝑘)(,)+∞))) ≤ 0)
241131, 240eqbrtrd 5132 . . . . . . . . . 10 (((𝜑 ∧ ¬ 0 < (∫2𝐹)) ∧ 𝑘 ∈ ℕ) → (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0)
242241ralrimiva 3156 . . . . . . . . 9 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → ∀𝑘 ∈ ℕ (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0)
243 ffn 6705 . . . . . . . . . . 11 ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))):ℕ⟶V → (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) Fn ℕ)
244 fveq2 6881 . . . . . . . . . . . . 13 (𝑧 = ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) → (vol‘𝑧) = (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)))
245244breq1d 5118 . . . . . . . . . . . 12 (𝑧 = ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘) → ((vol‘𝑧) ≤ 0 ↔ (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0))
246245ralrn 7083 . . . . . . . . . . 11 ((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) Fn ℕ → (∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0 ↔ ∀𝑘 ∈ ℕ (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0))
24716, 243, 2463syl 19 . . . . . . . . . 10 (𝜑 → (∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0 ↔ ∀𝑘 ∈ ℕ (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0))
248247adantr 485 . . . . . . . . 9 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0 ↔ ∀𝑘 ∈ ℕ (vol‘((𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))‘𝑘)) ≤ 0))
249242, 248mpbird 260 . . . . . . . 8 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → ∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0)
250 ffn 6705 . . . . . . . . . 10 (vol:dom vol⟶(0[,]+∞) → vol Fn dom vol)
2514, 250ax-mp 5 . . . . . . . . 9 vol Fn dom vol
25227frnd 6714 . . . . . . . . . 10 (𝜑 → ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ dom vol)
253252adantr 485 . . . . . . . . 9 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ dom vol)
254 breq1 5111 . . . . . . . . . 10 (𝑥 = (vol‘𝑧) → (𝑥 ≤ 0 ↔ (vol‘𝑧) ≤ 0))
255254ralima 7235 . . . . . . . . 9 ((vol Fn dom vol ∧ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))) ⊆ dom vol) → (∀𝑥 ∈ (vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))𝑥 ≤ 0 ↔ ∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0))
256251, 253, 255sylancr 598 . . . . . . . 8 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (∀𝑥 ∈ (vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))𝑥 ≤ 0 ↔ ∀𝑧 ∈ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))(vol‘𝑧) ≤ 0))
257249, 256mpbird 260 . . . . . . 7 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → ∀𝑥 ∈ (vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))𝑥 ≤ 0)
258 imassrn 6072 . . . . . . . . 9 (vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) ⊆ ran vol
259 frn 6713 . . . . . . . . . . 11 (vol:dom vol⟶(0[,]+∞) → ran vol ⊆ (0[,]+∞))
2604, 259ax-mp 5 . . . . . . . . . 10 ran vol ⊆ (0[,]+∞)
261260, 3sstri 3945 . . . . . . . . 9 ran vol ⊆ ℝ*
262258, 261sstri 3945 . . . . . . . 8 (vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) ⊆ ℝ*
263 supxrleub 13358 . . . . . . . 8 (((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) ⊆ ℝ* ∧ 0 ∈ ℝ*) → (sup((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ) ≤ 0 ↔ ∀𝑥 ∈ (vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))𝑥 ≤ 0))
264262, 38, 263mp2an 704 . . . . . . 7 (sup((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ) ≤ 0 ↔ ∀𝑥 ∈ (vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞))))𝑥 ≤ 0)
265257, 264sylibr 237 . . . . . 6 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → sup((vol “ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))), ℝ*, < ) ≤ 0)
266128, 265eqbrtrd 5132 . . . . 5 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (vol*‘ ran (𝑛 ∈ ℕ ↦ (𝐹 “ ((1 / 𝑛)(,)+∞)))) ≤ 0)
2678, 37, 39, 93, 266xrletrd 13193 . . . 4 ((𝜑 ∧ ¬ 0 < (∫2𝐹)) → (vol‘𝐴) ≤ 0)
268267ex 417 . . 3 (𝜑 → (¬ 0 < (∫2𝐹) → (vol‘𝐴) ≤ 0))
269 xrlenlt 11280 . . . 4 (((vol‘𝐴) ∈ ℝ* ∧ 0 ∈ ℝ*) → ((vol‘𝐴) ≤ 0 ↔ ¬ 0 < (vol‘𝐴)))
2707, 38, 269sylancl 597 . . 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 400  wo 860   = wceq 1569  wcel 2142  wral 3078  wrex 3088  Vcvv 3454  wss 3904  ifcif 4486   cuni 4871   ciun 4955   class class class wbr 5108  cmpt 5191  ccnv 5659  dom cdm 5660  ran crn 5661  cima 5663   Fn wfn 6531  wf 6532  cfv 6536  (class class class)co 7412  r cofr 7675  supcsup 9398  cr 11105  0cc0 11106  1c1 11107   + caddc 11109   · cmul 11111  +∞cpnf 11246  *cxr 11248   < clt 11249  cle 11250   / cdiv 11877  cn 12239  +crp 13022  (,)cioo 13378  [,)cico 13380  [,]cicc 13381  vol*covol 25632  volcvol 25633  MblFncmbf 25784  2citg2 25786
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1824  ax-4 1838  ax-5 1939  ax-6 1996  ax-7 2037  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5237  ax-sep 5256  ax-nul 5268  ax-pow 5335  ax-pr 5403  ax-un 7734  ax-inf2 9608  ax-cc 10425  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184  ax-addf 11185
This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1103  df-3an 1104  df-tru 1572  df-fal 1582  df-ex 1809  df-nf 1813  df-sb 2096  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-nel 3064  df-ral 3079  df-rex 3089  df-rmo 3368  df-reu 3369  df-rab 3416  df-v 3456  df-sbc 3744  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4487  df-pw 4563  df-sn 4589  df-pr 4591  df-op 4595  df-uni 4872  df-int 4912  df-iun 4957  df-disj 5076  df-br 5109  df-opab 5173  df-mpt 5192  df-tr 5218  df-id 5555  df-eprel 5560  df-po 5568  df-so 5569  df-fr 5613  df-se 5614  df-we 5615  df-xp 5666  df-rel 5667  df-cnv 5668  df-co 5669  df-dm 5670  df-rn 5671  df-res 5672  df-ima 5673  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-of 7676  df-ofr 7677  df-om 7861  df-1st 7984  df-2nd 7985  df-frecs 8276  df-wrecs 8307  df-recs 8356  df-rdg 8395  df-1o 8451  df-2o 8452  df-er 8692  df-map 8824  df-pm 8825  df-en 8942  df-dom 8943  df-sdom 8944  df-fin 8945  df-fi 9369  df-sup 9400  df-inf 9401  df-oi 9470  df-dju 9894  df-card 9932  df-pnf 11251  df-mnf 11252  df-xr 11253  df-ltxr 11254  df-le 11255  df-sub 11449  df-neg 11450  df-div 11878  df-nn 12240  df-2 12309  df-3 12310  df-n0 12511  df-z 12598  df-uz 12869  df-q 12979  df-rp 13023  df-xneg 13143  df-xadd 13144  df-xmul 13145  df-ioo 13382  df-ico 13384  df-icc 13385  df-fz 13542  df-fzo 13690  df-fl 13832  df-seq 14045  df-exp 14105  df-hash 14374  df-cj 15157  df-re 15158  df-im 15159  df-sqrt 15293  df-abs 15294  df-clim 15546  df-rlim 15547  df-sum 15745  df-rest 17481  df-topgen 17502  df-psmet 21525  df-xmet 21526  df-met 21527  df-bl 21528  df-mopn 21529  df-top 23062  df-topon 23079  df-bases 23114  df-cmp 23555  df-cncf 25048  df-ovol 25634  df-vol 25635  df-mbf 25789  df-itg1 25790  df-itg2 25791  df-0p 25840
This theorem is used by:  itggt0  26014
  Copyright terms: Public domain W3C validator