Step | Hyp | Ref
| Expression |
1 | | sge0ltfirpmpt2.a |
. . 3
⊢ (𝜑 → 𝐴 ∈ 𝑉) |
2 | | sge0ltfirpmpt2.xph |
. . . 4
⊢
Ⅎ𝑥𝜑 |
3 | | sge0ltfirpmpt2.b |
. . . 4
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ (0[,]+∞)) |
4 | | eqid 2738 |
. . . 4
⊢ (𝑥 ∈ 𝐴 ↦ 𝐵) = (𝑥 ∈ 𝐴 ↦ 𝐵) |
5 | 2, 3, 4 | fmptdf 6991 |
. . 3
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐵):𝐴⟶(0[,]+∞)) |
6 | | sge0ltfirpmpt2.rp |
. . 3
⊢ (𝜑 → 𝑌 ∈
ℝ+) |
7 | | sge0ltfirpmpt2.re |
. . 3
⊢ (𝜑 →
(Σ^‘(𝑥 ∈ 𝐴 ↦ 𝐵)) ∈ ℝ) |
8 | 1, 5, 6, 7 | sge0ltfirp 43938 |
. 2
⊢ (𝜑 → ∃𝑦 ∈ (𝒫 𝐴 ∩
Fin)(Σ^‘(𝑥 ∈ 𝐴 ↦ 𝐵)) <
((Σ^‘((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝑦)) + 𝑌)) |
9 | | simpr 485 |
. . . . 5
⊢ (((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧
(Σ^‘(𝑥 ∈ 𝐴 ↦ 𝐵)) <
((Σ^‘((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝑦)) + 𝑌)) →
(Σ^‘(𝑥 ∈ 𝐴 ↦ 𝐵)) <
((Σ^‘((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝑦)) + 𝑌)) |
10 | | elpwinss 42597 |
. . . . . . . . . . 11
⊢ (𝑦 ∈ (𝒫 𝐴 ∩ Fin) → 𝑦 ⊆ 𝐴) |
11 | 10 | resmptd 5948 |
. . . . . . . . . 10
⊢ (𝑦 ∈ (𝒫 𝐴 ∩ Fin) → ((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝑦) = (𝑥 ∈ 𝑦 ↦ 𝐵)) |
12 | 11 | fveq2d 6778 |
. . . . . . . . 9
⊢ (𝑦 ∈ (𝒫 𝐴 ∩ Fin) →
(Σ^‘((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝑦)) =
(Σ^‘(𝑥 ∈ 𝑦 ↦ 𝐵))) |
13 | 12 | adantl 482 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) →
(Σ^‘((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝑦)) =
(Σ^‘(𝑥 ∈ 𝑦 ↦ 𝐵))) |
14 | | elinel2 4130 |
. . . . . . . . . 10
⊢ (𝑦 ∈ (𝒫 𝐴 ∩ Fin) → 𝑦 ∈ Fin) |
15 | 14 | adantl 482 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) → 𝑦 ∈ Fin) |
16 | | nfv 1917 |
. . . . . . . . . . 11
⊢
Ⅎ𝑥 𝑦 ∈ (𝒫 𝐴 ∩ Fin) |
17 | 2, 16 | nfan 1902 |
. . . . . . . . . 10
⊢
Ⅎ𝑥(𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) |
18 | | simpll 764 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑥 ∈ 𝑦) → 𝜑) |
19 | 10 | sselda 3921 |
. . . . . . . . . . . 12
⊢ ((𝑦 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑥 ∈ 𝑦) → 𝑥 ∈ 𝐴) |
20 | 19 | adantll 711 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑥 ∈ 𝑦) → 𝑥 ∈ 𝐴) |
21 | 2, 1, 3, 7 | sge0rernmpt 43960 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ (0[,)+∞)) |
22 | 18, 20, 21 | syl2anc 584 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑥 ∈ 𝑦) → 𝐵 ∈ (0[,)+∞)) |
23 | | eqid 2738 |
. . . . . . . . . 10
⊢ (𝑥 ∈ 𝑦 ↦ 𝐵) = (𝑥 ∈ 𝑦 ↦ 𝐵) |
24 | 17, 22, 23 | fmptdf 6991 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) → (𝑥 ∈ 𝑦 ↦ 𝐵):𝑦⟶(0[,)+∞)) |
25 | 15, 24 | sge0fsum 43925 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) →
(Σ^‘(𝑥 ∈ 𝑦 ↦ 𝐵)) = Σ𝑘 ∈ 𝑦 ((𝑥 ∈ 𝑦 ↦ 𝐵)‘𝑘)) |
26 | | simpr 485 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑦) → 𝑘 ∈ 𝑦) |
27 | | simpll 764 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑦) → 𝜑) |
28 | 10 | sselda 3921 |
. . . . . . . . . . . . 13
⊢ ((𝑦 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑘 ∈ 𝑦) → 𝑘 ∈ 𝐴) |
29 | 28 | adantll 711 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑦) → 𝑘 ∈ 𝐴) |
30 | | nfv 1917 |
. . . . . . . . . . . . . . 15
⊢
Ⅎ𝑥 𝑘 ∈ 𝐴 |
31 | 2, 30 | nfan 1902 |
. . . . . . . . . . . . . 14
⊢
Ⅎ𝑥(𝜑 ∧ 𝑘 ∈ 𝐴) |
32 | | nfcsb1v 3857 |
. . . . . . . . . . . . . . 15
⊢
Ⅎ𝑥⦋𝑘 / 𝑥⦌𝐵 |
33 | 32 | nfel1 2923 |
. . . . . . . . . . . . . 14
⊢
Ⅎ𝑥⦋𝑘 / 𝑥⦌𝐵 ∈ (0[,)+∞) |
34 | 31, 33 | nfim 1899 |
. . . . . . . . . . . . 13
⊢
Ⅎ𝑥((𝜑 ∧ 𝑘 ∈ 𝐴) → ⦋𝑘 / 𝑥⦌𝐵 ∈ (0[,)+∞)) |
35 | | eleq1w 2821 |
. . . . . . . . . . . . . . 15
⊢ (𝑥 = 𝑘 → (𝑥 ∈ 𝐴 ↔ 𝑘 ∈ 𝐴)) |
36 | 35 | anbi2d 629 |
. . . . . . . . . . . . . 14
⊢ (𝑥 = 𝑘 → ((𝜑 ∧ 𝑥 ∈ 𝐴) ↔ (𝜑 ∧ 𝑘 ∈ 𝐴))) |
37 | | csbeq1a 3846 |
. . . . . . . . . . . . . . 15
⊢ (𝑥 = 𝑘 → 𝐵 = ⦋𝑘 / 𝑥⦌𝐵) |
38 | 37 | eleq1d 2823 |
. . . . . . . . . . . . . 14
⊢ (𝑥 = 𝑘 → (𝐵 ∈ (0[,)+∞) ↔
⦋𝑘 / 𝑥⦌𝐵 ∈ (0[,)+∞))) |
39 | 36, 38 | imbi12d 345 |
. . . . . . . . . . . . 13
⊢ (𝑥 = 𝑘 → (((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ (0[,)+∞)) ↔ ((𝜑 ∧ 𝑘 ∈ 𝐴) → ⦋𝑘 / 𝑥⦌𝐵 ∈ (0[,)+∞)))) |
40 | 34, 39, 21 | chvarfv 2233 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → ⦋𝑘 / 𝑥⦌𝐵 ∈ (0[,)+∞)) |
41 | 27, 29, 40 | syl2anc 584 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑦) → ⦋𝑘 / 𝑥⦌𝐵 ∈ (0[,)+∞)) |
42 | | nfcv 2907 |
. . . . . . . . . . . . 13
⊢
Ⅎ𝑘𝐵 |
43 | 42, 32, 37 | cbvmpt 5185 |
. . . . . . . . . . . 12
⊢ (𝑥 ∈ 𝑦 ↦ 𝐵) = (𝑘 ∈ 𝑦 ↦ ⦋𝑘 / 𝑥⦌𝐵) |
44 | 43 | fvmpt2 6886 |
. . . . . . . . . . 11
⊢ ((𝑘 ∈ 𝑦 ∧ ⦋𝑘 / 𝑥⦌𝐵 ∈ (0[,)+∞)) → ((𝑥 ∈ 𝑦 ↦ 𝐵)‘𝑘) = ⦋𝑘 / 𝑥⦌𝐵) |
45 | 26, 41, 44 | syl2anc 584 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑘 ∈ 𝑦) → ((𝑥 ∈ 𝑦 ↦ 𝐵)‘𝑘) = ⦋𝑘 / 𝑥⦌𝐵) |
46 | 45 | sumeq2dv 15415 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑦 ((𝑥 ∈ 𝑦 ↦ 𝐵)‘𝑘) = Σ𝑘 ∈ 𝑦 ⦋𝑘 / 𝑥⦌𝐵) |
47 | | eqcom 2745 |
. . . . . . . . . . . . . 14
⊢ (𝑥 = 𝑘 ↔ 𝑘 = 𝑥) |
48 | 47 | imbi1i 350 |
. . . . . . . . . . . . 13
⊢ ((𝑥 = 𝑘 → 𝐵 = ⦋𝑘 / 𝑥⦌𝐵) ↔ (𝑘 = 𝑥 → 𝐵 = ⦋𝑘 / 𝑥⦌𝐵)) |
49 | | eqcom 2745 |
. . . . . . . . . . . . . 14
⊢ (𝐵 = ⦋𝑘 / 𝑥⦌𝐵 ↔ ⦋𝑘 / 𝑥⦌𝐵 = 𝐵) |
50 | 49 | imbi2i 336 |
. . . . . . . . . . . . 13
⊢ ((𝑘 = 𝑥 → 𝐵 = ⦋𝑘 / 𝑥⦌𝐵) ↔ (𝑘 = 𝑥 → ⦋𝑘 / 𝑥⦌𝐵 = 𝐵)) |
51 | 48, 50 | bitri 274 |
. . . . . . . . . . . 12
⊢ ((𝑥 = 𝑘 → 𝐵 = ⦋𝑘 / 𝑥⦌𝐵) ↔ (𝑘 = 𝑥 → ⦋𝑘 / 𝑥⦌𝐵 = 𝐵)) |
52 | 37, 51 | mpbi 229 |
. . . . . . . . . . 11
⊢ (𝑘 = 𝑥 → ⦋𝑘 / 𝑥⦌𝐵 = 𝐵) |
53 | | nfcv 2907 |
. . . . . . . . . . 11
⊢
Ⅎ𝑥𝑦 |
54 | | nfcv 2907 |
. . . . . . . . . . 11
⊢
Ⅎ𝑘𝑦 |
55 | 52, 53, 54, 32, 42 | cbvsum 15407 |
. . . . . . . . . 10
⊢
Σ𝑘 ∈
𝑦 ⦋𝑘 / 𝑥⦌𝐵 = Σ𝑥 ∈ 𝑦 𝐵 |
56 | 55 | a1i 11 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑦 ⦋𝑘 / 𝑥⦌𝐵 = Σ𝑥 ∈ 𝑦 𝐵) |
57 | 46, 56 | eqtrd 2778 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) → Σ𝑘 ∈ 𝑦 ((𝑥 ∈ 𝑦 ↦ 𝐵)‘𝑘) = Σ𝑥 ∈ 𝑦 𝐵) |
58 | 13, 25, 57 | 3eqtrd 2782 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) →
(Σ^‘((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝑦)) = Σ𝑥 ∈ 𝑦 𝐵) |
59 | 58 | oveq1d 7290 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) →
((Σ^‘((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝑦)) + 𝑌) = (Σ𝑥 ∈ 𝑦 𝐵 + 𝑌)) |
60 | 59 | adantr 481 |
. . . . 5
⊢ (((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧
(Σ^‘(𝑥 ∈ 𝐴 ↦ 𝐵)) <
((Σ^‘((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝑦)) + 𝑌)) →
((Σ^‘((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝑦)) + 𝑌) = (Σ𝑥 ∈ 𝑦 𝐵 + 𝑌)) |
61 | 9, 60 | breqtrd 5100 |
. . . 4
⊢ (((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧
(Σ^‘(𝑥 ∈ 𝐴 ↦ 𝐵)) <
((Σ^‘((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝑦)) + 𝑌)) →
(Σ^‘(𝑥 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑥 ∈ 𝑦 𝐵 + 𝑌)) |
62 | 61 | ex 413 |
. . 3
⊢ ((𝜑 ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) →
((Σ^‘(𝑥 ∈ 𝐴 ↦ 𝐵)) <
((Σ^‘((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝑦)) + 𝑌) →
(Σ^‘(𝑥 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑥 ∈ 𝑦 𝐵 + 𝑌))) |
63 | 62 | reximdva 3203 |
. 2
⊢ (𝜑 → (∃𝑦 ∈ (𝒫 𝐴 ∩
Fin)(Σ^‘(𝑥 ∈ 𝐴 ↦ 𝐵)) <
((Σ^‘((𝑥 ∈ 𝐴 ↦ 𝐵) ↾ 𝑦)) + 𝑌) → ∃𝑦 ∈ (𝒫 𝐴 ∩
Fin)(Σ^‘(𝑥 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑥 ∈ 𝑦 𝐵 + 𝑌))) |
64 | 8, 63 | mpd 15 |
1
⊢ (𝜑 → ∃𝑦 ∈ (𝒫 𝐴 ∩
Fin)(Σ^‘(𝑥 ∈ 𝐴 ↦ 𝐵)) < (Σ𝑥 ∈ 𝑦 𝐵 + 𝑌)) |