Step | Hyp | Ref
| Expression |
1 | | fdvposlt.d |
. . . 4
⊢ 𝐸 = (𝐶(,)𝐷) |
2 | | fdvposlt.a |
. . . 4
⊢ (𝜑 → 𝐴 ∈ 𝐸) |
3 | | fdvposlt.b |
. . . 4
⊢ (𝜑 → 𝐵 ∈ 𝐸) |
4 | | fdvposlt.f |
. . . . . . 7
⊢ (𝜑 → 𝐹:𝐸⟶ℝ) |
5 | 4 | ffvelrnda 6904 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐸) → (𝐹‘𝑦) ∈ ℝ) |
6 | 5 | renegcld 11259 |
. . . . 5
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐸) → -(𝐹‘𝑦) ∈ ℝ) |
7 | 6 | fmpttd 6932 |
. . . 4
⊢ (𝜑 → (𝑦 ∈ 𝐸 ↦ -(𝐹‘𝑦)):𝐸⟶ℝ) |
8 | | reelprrecn 10821 |
. . . . . . 7
⊢ ℝ
∈ {ℝ, ℂ} |
9 | 8 | a1i 11 |
. . . . . 6
⊢ (𝜑 → ℝ ∈ {ℝ,
ℂ}) |
10 | | ax-resscn 10786 |
. . . . . . 7
⊢ ℝ
⊆ ℂ |
11 | 10, 5 | sseldi 3899 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐸) → (𝐹‘𝑦) ∈ ℂ) |
12 | | fvexd 6732 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐸) → ((ℝ D 𝐹)‘𝑦) ∈ V) |
13 | 4 | feqmptd 6780 |
. . . . . . . 8
⊢ (𝜑 → 𝐹 = (𝑦 ∈ 𝐸 ↦ (𝐹‘𝑦))) |
14 | 13 | oveq2d 7229 |
. . . . . . 7
⊢ (𝜑 → (ℝ D 𝐹) = (ℝ D (𝑦 ∈ 𝐸 ↦ (𝐹‘𝑦)))) |
15 | | fdvposlt.c |
. . . . . . . . 9
⊢ (𝜑 → (ℝ D 𝐹) ∈ (𝐸–cn→ℝ)) |
16 | | cncff 23790 |
. . . . . . . . 9
⊢ ((ℝ
D 𝐹) ∈ (𝐸–cn→ℝ) → (ℝ D 𝐹):𝐸⟶ℝ) |
17 | 15, 16 | syl 17 |
. . . . . . . 8
⊢ (𝜑 → (ℝ D 𝐹):𝐸⟶ℝ) |
18 | 17 | feqmptd 6780 |
. . . . . . 7
⊢ (𝜑 → (ℝ D 𝐹) = (𝑦 ∈ 𝐸 ↦ ((ℝ D 𝐹)‘𝑦))) |
19 | 14, 18 | eqtr3d 2779 |
. . . . . 6
⊢ (𝜑 → (ℝ D (𝑦 ∈ 𝐸 ↦ (𝐹‘𝑦))) = (𝑦 ∈ 𝐸 ↦ ((ℝ D 𝐹)‘𝑦))) |
20 | 9, 11, 12, 19 | dvmptneg 24863 |
. . . . 5
⊢ (𝜑 → (ℝ D (𝑦 ∈ 𝐸 ↦ -(𝐹‘𝑦))) = (𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦))) |
21 | 17 | ffvelrnda 6904 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐸) → ((ℝ D 𝐹)‘𝑦) ∈ ℝ) |
22 | 21 | renegcld 11259 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐸) → -((ℝ D 𝐹)‘𝑦) ∈ ℝ) |
23 | 22 | fmpttd 6932 |
. . . . . 6
⊢ (𝜑 → (𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦)):𝐸⟶ℝ) |
24 | | ssid 3923 |
. . . . . . . . . 10
⊢ ℂ
⊆ ℂ |
25 | | cncfss 23796 |
. . . . . . . . . 10
⊢ ((ℝ
⊆ ℂ ∧ ℂ ⊆ ℂ) → (𝐸–cn→ℝ) ⊆ (𝐸–cn→ℂ)) |
26 | 10, 24, 25 | mp2an 692 |
. . . . . . . . 9
⊢ (𝐸–cn→ℝ) ⊆ (𝐸–cn→ℂ) |
27 | 26, 15 | sseldi 3899 |
. . . . . . . 8
⊢ (𝜑 → (ℝ D 𝐹) ∈ (𝐸–cn→ℂ)) |
28 | | eqid 2737 |
. . . . . . . . 9
⊢ (𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦)) = (𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦)) |
29 | 28 | negfcncf 23820 |
. . . . . . . 8
⊢ ((ℝ
D 𝐹) ∈ (𝐸–cn→ℂ) → (𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦)) ∈ (𝐸–cn→ℂ)) |
30 | 27, 29 | syl 17 |
. . . . . . 7
⊢ (𝜑 → (𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦)) ∈ (𝐸–cn→ℂ)) |
31 | | cncffvrn 23795 |
. . . . . . 7
⊢ ((ℝ
⊆ ℂ ∧ (𝑦
∈ 𝐸 ↦ -((ℝ
D 𝐹)‘𝑦)) ∈ (𝐸–cn→ℂ)) → ((𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦)) ∈ (𝐸–cn→ℝ) ↔ (𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦)):𝐸⟶ℝ)) |
32 | 10, 30, 31 | sylancr 590 |
. . . . . 6
⊢ (𝜑 → ((𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦)) ∈ (𝐸–cn→ℝ) ↔ (𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦)):𝐸⟶ℝ)) |
33 | 23, 32 | mpbird 260 |
. . . . 5
⊢ (𝜑 → (𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦)) ∈ (𝐸–cn→ℝ)) |
34 | 20, 33 | eqeltrd 2838 |
. . . 4
⊢ (𝜑 → (ℝ D (𝑦 ∈ 𝐸 ↦ -(𝐹‘𝑦))) ∈ (𝐸–cn→ℝ)) |
35 | | fdvnegge.le |
. . . 4
⊢ (𝜑 → 𝐴 ≤ 𝐵) |
36 | | fdvnegge.1 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((ℝ D 𝐹)‘𝑥) ≤ 0) |
37 | 17 | adantr 484 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (ℝ D 𝐹):𝐸⟶ℝ) |
38 | | ioossicc 13021 |
. . . . . . . . . . 11
⊢ (𝐴(,)𝐵) ⊆ (𝐴[,]𝐵) |
39 | 38 | a1i 11 |
. . . . . . . . . 10
⊢ (𝜑 → (𝐴(,)𝐵) ⊆ (𝐴[,]𝐵)) |
40 | 1, 2, 3 | fct2relem 32289 |
. . . . . . . . . 10
⊢ (𝜑 → (𝐴[,]𝐵) ⊆ 𝐸) |
41 | 39, 40 | sstrd 3911 |
. . . . . . . . 9
⊢ (𝜑 → (𝐴(,)𝐵) ⊆ 𝐸) |
42 | 41 | sselda 3901 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑥 ∈ 𝐸) |
43 | 37, 42 | ffvelrnd 6905 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((ℝ D 𝐹)‘𝑥) ∈ ℝ) |
44 | 43 | le0neg1d 11403 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (((ℝ D 𝐹)‘𝑥) ≤ 0 ↔ 0 ≤ -((ℝ D 𝐹)‘𝑥))) |
45 | 36, 44 | mpbid 235 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 0 ≤ -((ℝ D 𝐹)‘𝑥)) |
46 | 20 | adantr 484 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (ℝ D (𝑦 ∈ 𝐸 ↦ -(𝐹‘𝑦))) = (𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦))) |
47 | 46 | fveq1d 6719 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((ℝ D (𝑦 ∈ 𝐸 ↦ -(𝐹‘𝑦)))‘𝑥) = ((𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦))‘𝑥)) |
48 | 28 | a1i 11 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦)) = (𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦))) |
49 | | simpr 488 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) ∧ 𝑦 = 𝑥) → 𝑦 = 𝑥) |
50 | 49 | fveq2d 6721 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) ∧ 𝑦 = 𝑥) → ((ℝ D 𝐹)‘𝑦) = ((ℝ D 𝐹)‘𝑥)) |
51 | 50 | negeqd 11072 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) ∧ 𝑦 = 𝑥) → -((ℝ D 𝐹)‘𝑦) = -((ℝ D 𝐹)‘𝑥)) |
52 | 43 | renegcld 11259 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -((ℝ D 𝐹)‘𝑥) ∈ ℝ) |
53 | 48, 51, 42, 52 | fvmptd 6825 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((𝑦 ∈ 𝐸 ↦ -((ℝ D 𝐹)‘𝑦))‘𝑥) = -((ℝ D 𝐹)‘𝑥)) |
54 | 47, 53 | eqtrd 2777 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((ℝ D (𝑦 ∈ 𝐸 ↦ -(𝐹‘𝑦)))‘𝑥) = -((ℝ D 𝐹)‘𝑥)) |
55 | 45, 54 | breqtrrd 5081 |
. . . 4
⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 0 ≤ ((ℝ D (𝑦 ∈ 𝐸 ↦ -(𝐹‘𝑦)))‘𝑥)) |
56 | 1, 2, 3, 7, 34, 35, 55 | fdvposle 32293 |
. . 3
⊢ (𝜑 → ((𝑦 ∈ 𝐸 ↦ -(𝐹‘𝑦))‘𝐴) ≤ ((𝑦 ∈ 𝐸 ↦ -(𝐹‘𝑦))‘𝐵)) |
57 | | eqidd 2738 |
. . . 4
⊢ (𝜑 → (𝑦 ∈ 𝐸 ↦ -(𝐹‘𝑦)) = (𝑦 ∈ 𝐸 ↦ -(𝐹‘𝑦))) |
58 | | simpr 488 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑦 = 𝐴) → 𝑦 = 𝐴) |
59 | 58 | fveq2d 6721 |
. . . . 5
⊢ ((𝜑 ∧ 𝑦 = 𝐴) → (𝐹‘𝑦) = (𝐹‘𝐴)) |
60 | 59 | negeqd 11072 |
. . . 4
⊢ ((𝜑 ∧ 𝑦 = 𝐴) → -(𝐹‘𝑦) = -(𝐹‘𝐴)) |
61 | 4, 2 | ffvelrnd 6905 |
. . . . 5
⊢ (𝜑 → (𝐹‘𝐴) ∈ ℝ) |
62 | 61 | renegcld 11259 |
. . . 4
⊢ (𝜑 → -(𝐹‘𝐴) ∈ ℝ) |
63 | 57, 60, 2, 62 | fvmptd 6825 |
. . 3
⊢ (𝜑 → ((𝑦 ∈ 𝐸 ↦ -(𝐹‘𝑦))‘𝐴) = -(𝐹‘𝐴)) |
64 | | simpr 488 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑦 = 𝐵) → 𝑦 = 𝐵) |
65 | 64 | fveq2d 6721 |
. . . . 5
⊢ ((𝜑 ∧ 𝑦 = 𝐵) → (𝐹‘𝑦) = (𝐹‘𝐵)) |
66 | 65 | negeqd 11072 |
. . . 4
⊢ ((𝜑 ∧ 𝑦 = 𝐵) → -(𝐹‘𝑦) = -(𝐹‘𝐵)) |
67 | 4, 3 | ffvelrnd 6905 |
. . . . 5
⊢ (𝜑 → (𝐹‘𝐵) ∈ ℝ) |
68 | 67 | renegcld 11259 |
. . . 4
⊢ (𝜑 → -(𝐹‘𝐵) ∈ ℝ) |
69 | 57, 66, 3, 68 | fvmptd 6825 |
. . 3
⊢ (𝜑 → ((𝑦 ∈ 𝐸 ↦ -(𝐹‘𝑦))‘𝐵) = -(𝐹‘𝐵)) |
70 | 56, 63, 69 | 3brtr3d 5084 |
. 2
⊢ (𝜑 → -(𝐹‘𝐴) ≤ -(𝐹‘𝐵)) |
71 | 67, 61 | lenegd 11411 |
. 2
⊢ (𝜑 → ((𝐹‘𝐵) ≤ (𝐹‘𝐴) ↔ -(𝐹‘𝐴) ≤ -(𝐹‘𝐵))) |
72 | 70, 71 | mpbird 260 |
1
⊢ (𝜑 → (𝐹‘𝐵) ≤ (𝐹‘𝐴)) |