Step | Hyp | Ref
| Expression |
1 | | expgrowth.s |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → 𝑆 ∈ {ℝ, ℂ}) |
2 | | cnelprrecn 10895 |
. . . . . . . . . . . . . . . . . 18
⊢ ℂ
∈ {ℝ, ℂ} |
3 | 2 | a1i 11 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → ℂ ∈ {ℝ,
ℂ}) |
4 | | expgrowth.k |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝜑 → 𝐾 ∈ ℂ) |
5 | | recnprss 24973 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ (𝑆 ∈ {ℝ, ℂ}
→ 𝑆 ⊆
ℂ) |
6 | 1, 5 | syl 17 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (𝜑 → 𝑆 ⊆ ℂ) |
7 | 6 | sseld 3916 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝜑 → (𝑢 ∈ 𝑆 → 𝑢 ∈ ℂ)) |
8 | | mulcl 10886 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝐾 ∈ ℂ ∧ 𝑢 ∈ ℂ) → (𝐾 · 𝑢) ∈ ℂ) |
9 | 4, 7, 8 | syl6an 680 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝜑 → (𝑢 ∈ 𝑆 → (𝐾 · 𝑢) ∈ ℂ)) |
10 | 9 | imp 406 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝜑 ∧ 𝑢 ∈ 𝑆) → (𝐾 · 𝑢) ∈ ℂ) |
11 | 10 | negcld 11249 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝜑 ∧ 𝑢 ∈ 𝑆) → -(𝐾 · 𝑢) ∈ ℂ) |
12 | 4 | negcld 11249 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝜑 → -𝐾 ∈ ℂ) |
13 | 12 | adantr 480 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝜑 ∧ 𝑢 ∈ 𝑆) → -𝐾 ∈ ℂ) |
14 | | efcl 15720 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑦 ∈ ℂ →
(exp‘𝑦) ∈
ℂ) |
15 | 14 | adantl 481 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝜑 ∧ 𝑦 ∈ ℂ) → (exp‘𝑦) ∈
ℂ) |
16 | 4 | adantr 480 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝜑 ∧ 𝑢 ∈ 𝑆) → 𝐾 ∈ ℂ) |
17 | 7 | imp 406 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝜑 ∧ 𝑢 ∈ 𝑆) → 𝑢 ∈ ℂ) |
18 | | ax-1cn 10860 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ 1 ∈
ℂ |
19 | 18 | a1i 11 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝜑 ∧ 𝑢 ∈ 𝑆) → 1 ∈ ℂ) |
20 | 1 | dvmptid 25026 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝜑 → (𝑆 D (𝑢 ∈ 𝑆 ↦ 𝑢)) = (𝑢 ∈ 𝑆 ↦ 1)) |
21 | 1, 17, 19, 20, 4 | dvmptcmul 25033 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝜑 → (𝑆 D (𝑢 ∈ 𝑆 ↦ (𝐾 · 𝑢))) = (𝑢 ∈ 𝑆 ↦ (𝐾 · 1))) |
22 | 4 | mulid1d 10923 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝜑 → (𝐾 · 1) = 𝐾) |
23 | 22 | mpteq2dv 5172 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝜑 → (𝑢 ∈ 𝑆 ↦ (𝐾 · 1)) = (𝑢 ∈ 𝑆 ↦ 𝐾)) |
24 | 21, 23 | eqtrd 2778 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝜑 → (𝑆 D (𝑢 ∈ 𝑆 ↦ (𝐾 · 𝑢))) = (𝑢 ∈ 𝑆 ↦ 𝐾)) |
25 | 1, 10, 16, 24 | dvmptneg 25035 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → (𝑆 D (𝑢 ∈ 𝑆 ↦ -(𝐾 · 𝑢))) = (𝑢 ∈ 𝑆 ↦ -𝐾)) |
26 | | dvef 25049 |
. . . . . . . . . . . . . . . . . . 19
⊢ (ℂ
D exp) = exp |
27 | | eff 15719 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢
exp:ℂ⟶ℂ |
28 | | ffn 6584 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢
(exp:ℂ⟶ℂ → exp Fn ℂ) |
29 | 27, 28 | ax-mp 5 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ exp Fn
ℂ |
30 | | dffn5 6810 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (exp Fn
ℂ ↔ exp = (𝑦
∈ ℂ ↦ (exp‘𝑦))) |
31 | 29, 30 | mpbi 229 |
. . . . . . . . . . . . . . . . . . . 20
⊢ exp =
(𝑦 ∈ ℂ ↦
(exp‘𝑦)) |
32 | 31 | oveq2i 7266 |
. . . . . . . . . . . . . . . . . . 19
⊢ (ℂ
D exp) = (ℂ D (𝑦
∈ ℂ ↦ (exp‘𝑦))) |
33 | 26, 32, 31 | 3eqtr3i 2774 |
. . . . . . . . . . . . . . . . . 18
⊢ (ℂ
D (𝑦 ∈ ℂ ↦
(exp‘𝑦))) = (𝑦 ∈ ℂ ↦
(exp‘𝑦)) |
34 | 33 | a1i 11 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → (ℂ D (𝑦 ∈ ℂ ↦
(exp‘𝑦))) = (𝑦 ∈ ℂ ↦
(exp‘𝑦))) |
35 | | fveq2 6756 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑦 = -(𝐾 · 𝑢) → (exp‘𝑦) = (exp‘-(𝐾 · 𝑢))) |
36 | 1, 3, 11, 13, 15, 15, 25, 34, 35, 35 | dvmptco 25041 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → (𝑆 D (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (𝑢 ∈ 𝑆 ↦ ((exp‘-(𝐾 · 𝑢)) · -𝐾))) |
37 | 36 | oveq2d 7271 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (𝑌 ∘f · (𝑆 D (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ ((exp‘-(𝐾 · 𝑢)) · -𝐾)))) |
38 | | expgrowth.y |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → 𝑌:𝑆⟶ℂ) |
39 | | efcl 15720 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (-(𝐾 · 𝑢) ∈ ℂ → (exp‘-(𝐾 · 𝑢)) ∈ ℂ) |
40 | 11, 39 | syl 17 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝜑 ∧ 𝑢 ∈ 𝑆) → (exp‘-(𝐾 · 𝑢)) ∈ ℂ) |
41 | 40, 13 | mulcld 10926 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝜑 ∧ 𝑢 ∈ 𝑆) → ((exp‘-(𝐾 · 𝑢)) · -𝐾) ∈ ℂ) |
42 | 41 | fmpttd 6971 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → (𝑢 ∈ 𝑆 ↦ ((exp‘-(𝐾 · 𝑢)) · -𝐾)):𝑆⟶ℂ) |
43 | 36 | feq1d 6569 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → ((𝑆 D (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))):𝑆⟶ℂ ↔ (𝑢 ∈ 𝑆 ↦ ((exp‘-(𝐾 · 𝑢)) · -𝐾)):𝑆⟶ℂ)) |
44 | 42, 43 | mpbird 256 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → (𝑆 D (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))):𝑆⟶ℂ) |
45 | | mulcom 10888 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (𝑥 · 𝑦) = (𝑦 · 𝑥)) |
46 | 45 | adantl 481 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ (𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ)) → (𝑥 · 𝑦) = (𝑦 · 𝑥)) |
47 | 1, 38, 44, 46 | caofcom 7546 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (𝑌 ∘f · (𝑆 D (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((𝑆 D (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f · 𝑌)) |
48 | 37, 47 | eqtr3d 2780 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ ((exp‘-(𝐾 · 𝑢)) · -𝐾))) = ((𝑆 D (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f · 𝑌)) |
49 | 48 | oveq2d 7271 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (((𝑆 D 𝑌) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ ((exp‘-(𝐾 · 𝑢)) · -𝐾)))) = (((𝑆 D 𝑌) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + ((𝑆 D (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f · 𝑌))) |
50 | | fconst6g 6647 |
. . . . . . . . . . . . . . . . . 18
⊢ (-𝐾 ∈ ℂ → (𝑆 × {-𝐾}):𝑆⟶ℂ) |
51 | 12, 50 | syl 17 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → (𝑆 × {-𝐾}):𝑆⟶ℂ) |
52 | 40 | fmpttd 6971 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))):𝑆⟶ℂ) |
53 | 1, 51, 52, 46 | caofcom 7546 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → ((𝑆 × {-𝐾}) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = ((𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))) ∘f · (𝑆 × {-𝐾}))) |
54 | | eqidd 2739 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))) = (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) |
55 | | fconstmpt 5640 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑆 × {-𝐾}) = (𝑢 ∈ 𝑆 ↦ -𝐾) |
56 | 55 | a1i 11 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → (𝑆 × {-𝐾}) = (𝑢 ∈ 𝑆 ↦ -𝐾)) |
57 | 1, 40, 13, 54, 56 | offval2 7531 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → ((𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))) ∘f · (𝑆 × {-𝐾})) = (𝑢 ∈ 𝑆 ↦ ((exp‘-(𝐾 · 𝑢)) · -𝐾))) |
58 | 53, 57 | eqtrd 2778 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → ((𝑆 × {-𝐾}) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (𝑢 ∈ 𝑆 ↦ ((exp‘-(𝐾 · 𝑢)) · -𝐾))) |
59 | 58 | oveq2d 7271 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (𝑌 ∘f · ((𝑆 × {-𝐾}) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ ((exp‘-(𝐾 · 𝑢)) · -𝐾)))) |
60 | 59 | oveq2d 7271 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (((𝑆 D 𝑌) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + (𝑌 ∘f · ((𝑆 × {-𝐾}) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))))) = (((𝑆 D 𝑌) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ ((exp‘-(𝐾 · 𝑢)) · -𝐾))))) |
61 | | expgrowth.dy |
. . . . . . . . . . . . . 14
⊢ (𝜑 → dom (𝑆 D 𝑌) = 𝑆) |
62 | 36 | dmeqd 5803 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → dom (𝑆 D (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = dom (𝑢 ∈ 𝑆 ↦ ((exp‘-(𝐾 · 𝑢)) · -𝐾))) |
63 | | eqid 2738 |
. . . . . . . . . . . . . . . 16
⊢ (𝑢 ∈ 𝑆 ↦ ((exp‘-(𝐾 · 𝑢)) · -𝐾)) = (𝑢 ∈ 𝑆 ↦ ((exp‘-(𝐾 · 𝑢)) · -𝐾)) |
64 | 63, 41 | dmmptd 6562 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → dom (𝑢 ∈ 𝑆 ↦ ((exp‘-(𝐾 · 𝑢)) · -𝐾)) = 𝑆) |
65 | 62, 64 | eqtrd 2778 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → dom (𝑆 D (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = 𝑆) |
66 | 1, 38, 52, 61, 65 | dvmulf 25012 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = (((𝑆 D 𝑌) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + ((𝑆 D (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f · 𝑌))) |
67 | 49, 60, 66 | 3eqtr4rd 2789 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = (((𝑆 D 𝑌) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + (𝑌 ∘f · ((𝑆 × {-𝐾}) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))))) |
68 | | ofmul12 41832 |
. . . . . . . . . . . . . 14
⊢ (((𝑆 ∈ {ℝ, ℂ} ∧
𝑌:𝑆⟶ℂ) ∧ ((𝑆 × {-𝐾}):𝑆⟶ℂ ∧ (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))):𝑆⟶ℂ)) → (𝑌 ∘f · ((𝑆 × {-𝐾}) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((𝑆 × {-𝐾}) ∘f · (𝑌 ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))))) |
69 | 1, 38, 51, 52, 68 | syl22anc 835 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝑌 ∘f · ((𝑆 × {-𝐾}) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((𝑆 × {-𝐾}) ∘f · (𝑌 ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))))) |
70 | 69 | oveq2d 7271 |
. . . . . . . . . . . 12
⊢ (𝜑 → (((𝑆 D 𝑌) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + (𝑌 ∘f · ((𝑆 × {-𝐾}) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))))) = (((𝑆 D 𝑌) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + ((𝑆 × {-𝐾}) ∘f · (𝑌 ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))))) |
71 | 67, 70 | eqtrd 2778 |
. . . . . . . . . . 11
⊢ (𝜑 → (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = (((𝑆 D 𝑌) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + ((𝑆 × {-𝐾}) ∘f · (𝑌 ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))))) |
72 | | oveq1 7262 |
. . . . . . . . . . . 12
⊢ ((𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌) → ((𝑆 D 𝑌) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (((𝑆 × {𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) |
73 | 72 | oveq1d 7270 |
. . . . . . . . . . 11
⊢ ((𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌) → (((𝑆 D 𝑌) ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + ((𝑆 × {-𝐾}) ∘f · (𝑌 ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + ((𝑆 × {-𝐾}) ∘f · (𝑌 ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))))) |
74 | 71, 73 | sylan9eq 2799 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + ((𝑆 × {-𝐾}) ∘f · (𝑌 ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))))) |
75 | | mulass 10890 |
. . . . . . . . . . . . . . 15
⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 𝑧 ∈ ℂ) → ((𝑥 · 𝑦) · 𝑧) = (𝑥 · (𝑦 · 𝑧))) |
76 | 75 | adantl 481 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ (𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 𝑧 ∈ ℂ)) → ((𝑥 · 𝑦) · 𝑧) = (𝑥 · (𝑦 · 𝑧))) |
77 | 1, 51, 38, 52, 76 | caofass 7548 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (((𝑆 × {-𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = ((𝑆 × {-𝐾}) ∘f · (𝑌 ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))))) |
78 | 77 | oveq2d 7271 |
. . . . . . . . . . . 12
⊢ (𝜑 → ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + (((𝑆 × {-𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + ((𝑆 × {-𝐾}) ∘f · (𝑌 ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))))) |
79 | 78 | eqeq2d 2749 |
. . . . . . . . . . 11
⊢ (𝜑 → ((𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + (((𝑆 × {-𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) ↔ (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + ((𝑆 × {-𝐾}) ∘f · (𝑌 ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))))))) |
80 | 79 | adantr 480 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → ((𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + (((𝑆 × {-𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) ↔ (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + ((𝑆 × {-𝐾}) ∘f · (𝑌 ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))))))) |
81 | 74, 80 | mpbird 256 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + (((𝑆 × {-𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))))) |
82 | | mulcl 10886 |
. . . . . . . . . . . . . 14
⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (𝑥 · 𝑦) ∈ ℂ) |
83 | 82 | adantl 481 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ (𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ)) → (𝑥 · 𝑦) ∈ ℂ) |
84 | | fconst6g 6647 |
. . . . . . . . . . . . . 14
⊢ (𝐾 ∈ ℂ → (𝑆 × {𝐾}):𝑆⟶ℂ) |
85 | 4, 84 | syl 17 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝑆 × {𝐾}):𝑆⟶ℂ) |
86 | | inidm 4149 |
. . . . . . . . . . . . 13
⊢ (𝑆 ∩ 𝑆) = 𝑆 |
87 | 83, 85, 38, 1, 1, 86 | off 7529 |
. . . . . . . . . . . 12
⊢ (𝜑 → ((𝑆 × {𝐾}) ∘f · 𝑌):𝑆⟶ℂ) |
88 | 83, 51, 38, 1, 1, 86 | off 7529 |
. . . . . . . . . . . 12
⊢ (𝜑 → ((𝑆 × {-𝐾}) ∘f · 𝑌):𝑆⟶ℂ) |
89 | | adddir 10897 |
. . . . . . . . . . . . 13
⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 𝑧 ∈ ℂ) → ((𝑥 + 𝑦) · 𝑧) = ((𝑥 · 𝑧) + (𝑦 · 𝑧))) |
90 | 89 | adantl 481 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ (𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 𝑧 ∈ ℂ)) → ((𝑥 + 𝑦) · 𝑧) = ((𝑥 · 𝑧) + (𝑦 · 𝑧))) |
91 | 1, 52, 87, 88, 90 | caofdir 7551 |
. . . . . . . . . . 11
⊢ (𝜑 → ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f + ((𝑆 × {-𝐾}) ∘f · 𝑌)) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + (((𝑆 × {-𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))))) |
92 | 91 | eqeq2d 2749 |
. . . . . . . . . 10
⊢ (𝜑 → ((𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f + ((𝑆 × {-𝐾}) ∘f · 𝑌)) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ↔ (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + (((𝑆 × {-𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))))) |
93 | 92 | adantr 480 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → ((𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f + ((𝑆 × {-𝐾}) ∘f · 𝑌)) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ↔ (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f + (((𝑆 × {-𝐾}) ∘f · 𝑌) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))))) |
94 | 81, 93 | mpbird 256 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f + ((𝑆 × {-𝐾}) ∘f · 𝑌)) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) |
95 | | ofnegsub 11901 |
. . . . . . . . . . . . 13
⊢ ((𝑆 ∈ {ℝ, ℂ} ∧
((𝑆 × {𝐾}) ∘f ·
𝑌):𝑆⟶ℂ ∧ ((𝑆 × {𝐾}) ∘f · 𝑌):𝑆⟶ℂ) → (((𝑆 × {𝐾}) ∘f · 𝑌) ∘f + ((𝑆 × {-1})
∘f · ((𝑆 × {𝐾}) ∘f · 𝑌))) = (((𝑆 × {𝐾}) ∘f · 𝑌) ∘f −
((𝑆 × {𝐾}) ∘f ·
𝑌))) |
96 | 1, 87, 87, 95 | syl3anc 1369 |
. . . . . . . . . . . 12
⊢ (𝜑 → (((𝑆 × {𝐾}) ∘f · 𝑌) ∘f + ((𝑆 × {-1})
∘f · ((𝑆 × {𝐾}) ∘f · 𝑌))) = (((𝑆 × {𝐾}) ∘f · 𝑌) ∘f −
((𝑆 × {𝐾}) ∘f ·
𝑌))) |
97 | | neg1cn 12017 |
. . . . . . . . . . . . . . . . 17
⊢ -1 ∈
ℂ |
98 | 97 | fconst6 6648 |
. . . . . . . . . . . . . . . 16
⊢ (𝑆 × {-1}):𝑆⟶ℂ |
99 | 98 | a1i 11 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (𝑆 × {-1}):𝑆⟶ℂ) |
100 | 1, 99, 85, 38, 76 | caofass 7548 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (((𝑆 × {-1}) ∘f ·
(𝑆 × {𝐾})) ∘f ·
𝑌) = ((𝑆 × {-1}) ∘f ·
((𝑆 × {𝐾}) ∘f ·
𝑌))) |
101 | 97 | a1i 11 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → -1 ∈
ℂ) |
102 | 1, 101, 4 | ofc12 7539 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → ((𝑆 × {-1}) ∘f ·
(𝑆 × {𝐾})) = (𝑆 × {(-1 · 𝐾)})) |
103 | 4 | mulm1d 11357 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝜑 → (-1 · 𝐾) = -𝐾) |
104 | 103 | sneqd 4570 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → {(-1 · 𝐾)} = {-𝐾}) |
105 | 104 | xpeq2d 5610 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → (𝑆 × {(-1 · 𝐾)}) = (𝑆 × {-𝐾})) |
106 | 102, 105 | eqtrd 2778 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → ((𝑆 × {-1}) ∘f ·
(𝑆 × {𝐾})) = (𝑆 × {-𝐾})) |
107 | 106 | oveq1d 7270 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (((𝑆 × {-1}) ∘f ·
(𝑆 × {𝐾})) ∘f ·
𝑌) = ((𝑆 × {-𝐾}) ∘f · 𝑌)) |
108 | 100, 107 | eqtr3d 2780 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ((𝑆 × {-1}) ∘f ·
((𝑆 × {𝐾}) ∘f ·
𝑌)) = ((𝑆 × {-𝐾}) ∘f · 𝑌)) |
109 | 108 | oveq2d 7271 |
. . . . . . . . . . . 12
⊢ (𝜑 → (((𝑆 × {𝐾}) ∘f · 𝑌) ∘f + ((𝑆 × {-1})
∘f · ((𝑆 × {𝐾}) ∘f · 𝑌))) = (((𝑆 × {𝐾}) ∘f · 𝑌) ∘f + ((𝑆 × {-𝐾}) ∘f · 𝑌))) |
110 | | ofsubid 41831 |
. . . . . . . . . . . . 13
⊢ ((𝑆 ∈ {ℝ, ℂ} ∧
((𝑆 × {𝐾}) ∘f ·
𝑌):𝑆⟶ℂ) → (((𝑆 × {𝐾}) ∘f · 𝑌) ∘f −
((𝑆 × {𝐾}) ∘f ·
𝑌)) = (𝑆 × {0})) |
111 | 1, 87, 110 | syl2anc 583 |
. . . . . . . . . . . 12
⊢ (𝜑 → (((𝑆 × {𝐾}) ∘f · 𝑌) ∘f −
((𝑆 × {𝐾}) ∘f ·
𝑌)) = (𝑆 × {0})) |
112 | 96, 109, 111 | 3eqtr3d 2786 |
. . . . . . . . . . 11
⊢ (𝜑 → (((𝑆 × {𝐾}) ∘f · 𝑌) ∘f + ((𝑆 × {-𝐾}) ∘f · 𝑌)) = (𝑆 × {0})) |
113 | 112 | oveq1d 7270 |
. . . . . . . . . 10
⊢ (𝜑 → ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f + ((𝑆 × {-𝐾}) ∘f · 𝑌)) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = ((𝑆 × {0}) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) |
114 | 113 | eqeq2d 2749 |
. . . . . . . . 9
⊢ (𝜑 → ((𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f + ((𝑆 × {-𝐾}) ∘f · 𝑌)) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ↔ (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((𝑆 × {0}) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))))) |
115 | 114 | adantr 480 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → ((𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((((𝑆 × {𝐾}) ∘f · 𝑌) ∘f + ((𝑆 × {-𝐾}) ∘f · 𝑌)) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ↔ (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((𝑆 × {0}) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))))) |
116 | 94, 115 | mpbid 231 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = ((𝑆 × {0}) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) |
117 | | 0cnd 10899 |
. . . . . . . . 9
⊢ (𝜑 → 0 ∈
ℂ) |
118 | | mul02 11083 |
. . . . . . . . . 10
⊢ (𝑥 ∈ ℂ → (0
· 𝑥) =
0) |
119 | 118 | adantl 481 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑥 ∈ ℂ) → (0 · 𝑥) = 0) |
120 | 1, 52, 117, 117, 119 | caofid2 7545 |
. . . . . . . 8
⊢ (𝜑 → ((𝑆 × {0}) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (𝑆 × {0})) |
121 | 120 | adantr 480 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → ((𝑆 × {0}) ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (𝑆 × {0})) |
122 | 116, 121 | eqtrd 2778 |
. . . . . 6
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = (𝑆 × {0})) |
123 | 1 | adantr 480 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → 𝑆 ∈ {ℝ, ℂ}) |
124 | 83, 38, 52, 1, 1, 86 | off 7529 |
. . . . . . . 8
⊢ (𝜑 → (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))):𝑆⟶ℂ) |
125 | 124 | adantr 480 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))):𝑆⟶ℂ) |
126 | 122 | dmeqd 5803 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → dom (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = dom (𝑆 × {0})) |
127 | | 0cn 10898 |
. . . . . . . . . 10
⊢ 0 ∈
ℂ |
128 | 127 | fconst6 6648 |
. . . . . . . . 9
⊢ (𝑆 × {0}):𝑆⟶ℂ |
129 | 128 | fdmi 6596 |
. . . . . . . 8
⊢ dom
(𝑆 × {0}) = 𝑆 |
130 | 126, 129 | eqtrdi 2795 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → dom (𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = 𝑆) |
131 | 123, 125,
130 | dvconstbi 41841 |
. . . . . 6
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → ((𝑆 D (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) = (𝑆 × {0}) ↔ ∃𝑥 ∈ ℂ (𝑌 ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (𝑆 × {𝑥}))) |
132 | 122, 131 | mpbid 231 |
. . . . 5
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → ∃𝑥 ∈ ℂ (𝑌 ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (𝑆 × {𝑥})) |
133 | | oveq1 7262 |
. . . . . . . . . 10
⊢ ((𝑌 ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (𝑆 × {𝑥}) → ((𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f / (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = ((𝑆 × {𝑥}) ∘f / (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))))) |
134 | | efne0 15734 |
. . . . . . . . . . . . . . 15
⊢ (-(𝐾 · 𝑢) ∈ ℂ → (exp‘-(𝐾 · 𝑢)) ≠ 0) |
135 | | eldifsn 4717 |
. . . . . . . . . . . . . . 15
⊢
((exp‘-(𝐾
· 𝑢)) ∈
(ℂ ∖ {0}) ↔ ((exp‘-(𝐾 · 𝑢)) ∈ ℂ ∧ (exp‘-(𝐾 · 𝑢)) ≠ 0)) |
136 | 39, 134, 135 | sylanbrc 582 |
. . . . . . . . . . . . . 14
⊢ (-(𝐾 · 𝑢) ∈ ℂ → (exp‘-(𝐾 · 𝑢)) ∈ (ℂ ∖
{0})) |
137 | 11, 136 | syl 17 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑢 ∈ 𝑆) → (exp‘-(𝐾 · 𝑢)) ∈ (ℂ ∖
{0})) |
138 | 137 | fmpttd 6971 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))):𝑆⟶(ℂ ∖
{0})) |
139 | | ofdivcan4 41834 |
. . . . . . . . . . . 12
⊢ ((𝑆 ∈ {ℝ, ℂ} ∧
𝑌:𝑆⟶ℂ ∧ (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))):𝑆⟶(ℂ ∖ {0})) →
((𝑌 ∘f
· (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f / (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = 𝑌) |
140 | 1, 38, 138, 139 | syl3anc 1369 |
. . . . . . . . . . 11
⊢ (𝜑 → ((𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f / (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = 𝑌) |
141 | 140 | eqeq1d 2740 |
. . . . . . . . . 10
⊢ (𝜑 → (((𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ∘f / (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = ((𝑆 × {𝑥}) ∘f / (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ↔ 𝑌 = ((𝑆 × {𝑥}) ∘f / (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))))) |
142 | 133, 141 | syl5ib 243 |
. . . . . . . . 9
⊢ (𝜑 → ((𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (𝑆 × {𝑥}) → 𝑌 = ((𝑆 × {𝑥}) ∘f / (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))))) |
143 | 142 | adantr 480 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ ℂ) → ((𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (𝑆 × {𝑥}) → 𝑌 = ((𝑆 × {𝑥}) ∘f / (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))))) |
144 | | vex 3426 |
. . . . . . . . . . . . 13
⊢ 𝑥 ∈ V |
145 | 144 | a1i 11 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑢 ∈ 𝑆) → 𝑥 ∈ V) |
146 | | ovexd 7290 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑢 ∈ 𝑆) → (1 / (exp‘(𝐾 · 𝑢))) ∈ V) |
147 | | fconstmpt 5640 |
. . . . . . . . . . . . 13
⊢ (𝑆 × {𝑥}) = (𝑢 ∈ 𝑆 ↦ 𝑥) |
148 | 147 | a1i 11 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝑆 × {𝑥}) = (𝑢 ∈ 𝑆 ↦ 𝑥)) |
149 | | efneg 15735 |
. . . . . . . . . . . . . 14
⊢ ((𝐾 · 𝑢) ∈ ℂ → (exp‘-(𝐾 · 𝑢)) = (1 / (exp‘(𝐾 · 𝑢)))) |
150 | 10, 149 | syl 17 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑢 ∈ 𝑆) → (exp‘-(𝐾 · 𝑢)) = (1 / (exp‘(𝐾 · 𝑢)))) |
151 | 150 | mpteq2dva 5170 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢))) = (𝑢 ∈ 𝑆 ↦ (1 / (exp‘(𝐾 · 𝑢))))) |
152 | 1, 145, 146, 148, 151 | offval2 7531 |
. . . . . . . . . . 11
⊢ (𝜑 → ((𝑆 × {𝑥}) ∘f / (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (𝑢 ∈ 𝑆 ↦ (𝑥 / (1 / (exp‘(𝐾 · 𝑢)))))) |
153 | 152 | adantr 480 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑥 ∈ ℂ) → ((𝑆 × {𝑥}) ∘f / (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (𝑢 ∈ 𝑆 ↦ (𝑥 / (1 / (exp‘(𝐾 · 𝑢)))))) |
154 | | efcl 15720 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝐾 · 𝑢) ∈ ℂ → (exp‘(𝐾 · 𝑢)) ∈ ℂ) |
155 | | efne0 15734 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝐾 · 𝑢) ∈ ℂ → (exp‘(𝐾 · 𝑢)) ≠ 0) |
156 | 154, 155 | jca 511 |
. . . . . . . . . . . . . . . 16
⊢ ((𝐾 · 𝑢) ∈ ℂ → ((exp‘(𝐾 · 𝑢)) ∈ ℂ ∧ (exp‘(𝐾 · 𝑢)) ≠ 0)) |
157 | 10, 156 | syl 17 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ 𝑢 ∈ 𝑆) → ((exp‘(𝐾 · 𝑢)) ∈ ℂ ∧ (exp‘(𝐾 · 𝑢)) ≠ 0)) |
158 | | ax-1ne0 10871 |
. . . . . . . . . . . . . . . . 17
⊢ 1 ≠
0 |
159 | 18, 158 | pm3.2i 470 |
. . . . . . . . . . . . . . . 16
⊢ (1 ∈
ℂ ∧ 1 ≠ 0) |
160 | | divdiv2 11617 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑥 ∈ ℂ ∧ (1 ∈
ℂ ∧ 1 ≠ 0) ∧ ((exp‘(𝐾 · 𝑢)) ∈ ℂ ∧ (exp‘(𝐾 · 𝑢)) ≠ 0)) → (𝑥 / (1 / (exp‘(𝐾 · 𝑢)))) = ((𝑥 · (exp‘(𝐾 · 𝑢))) / 1)) |
161 | 159, 160 | mp3an2 1447 |
. . . . . . . . . . . . . . 15
⊢ ((𝑥 ∈ ℂ ∧
((exp‘(𝐾 ·
𝑢)) ∈ ℂ ∧
(exp‘(𝐾 ·
𝑢)) ≠ 0)) → (𝑥 / (1 / (exp‘(𝐾 · 𝑢)))) = ((𝑥 · (exp‘(𝐾 · 𝑢))) / 1)) |
162 | 157, 161 | sylan2 592 |
. . . . . . . . . . . . . 14
⊢ ((𝑥 ∈ ℂ ∧ (𝜑 ∧ 𝑢 ∈ 𝑆)) → (𝑥 / (1 / (exp‘(𝐾 · 𝑢)))) = ((𝑥 · (exp‘(𝐾 · 𝑢))) / 1)) |
163 | 10, 154 | syl 17 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ 𝑢 ∈ 𝑆) → (exp‘(𝐾 · 𝑢)) ∈ ℂ) |
164 | | mulcl 10886 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑥 ∈ ℂ ∧
(exp‘(𝐾 ·
𝑢)) ∈ ℂ) →
(𝑥 ·
(exp‘(𝐾 ·
𝑢))) ∈
ℂ) |
165 | 163, 164 | sylan2 592 |
. . . . . . . . . . . . . . 15
⊢ ((𝑥 ∈ ℂ ∧ (𝜑 ∧ 𝑢 ∈ 𝑆)) → (𝑥 · (exp‘(𝐾 · 𝑢))) ∈ ℂ) |
166 | 165 | div1d 11673 |
. . . . . . . . . . . . . 14
⊢ ((𝑥 ∈ ℂ ∧ (𝜑 ∧ 𝑢 ∈ 𝑆)) → ((𝑥 · (exp‘(𝐾 · 𝑢))) / 1) = (𝑥 · (exp‘(𝐾 · 𝑢)))) |
167 | 162, 166 | eqtrd 2778 |
. . . . . . . . . . . . 13
⊢ ((𝑥 ∈ ℂ ∧ (𝜑 ∧ 𝑢 ∈ 𝑆)) → (𝑥 / (1 / (exp‘(𝐾 · 𝑢)))) = (𝑥 · (exp‘(𝐾 · 𝑢)))) |
168 | 167 | ancoms 458 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑢 ∈ 𝑆) ∧ 𝑥 ∈ ℂ) → (𝑥 / (1 / (exp‘(𝐾 · 𝑢)))) = (𝑥 · (exp‘(𝐾 · 𝑢)))) |
169 | 168 | an32s 648 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑥 ∈ ℂ) ∧ 𝑢 ∈ 𝑆) → (𝑥 / (1 / (exp‘(𝐾 · 𝑢)))) = (𝑥 · (exp‘(𝐾 · 𝑢)))) |
170 | 169 | mpteq2dva 5170 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑥 ∈ ℂ) → (𝑢 ∈ 𝑆 ↦ (𝑥 / (1 / (exp‘(𝐾 · 𝑢))))) = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢))))) |
171 | 153, 170 | eqtrd 2778 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑥 ∈ ℂ) → ((𝑆 × {𝑥}) ∘f / (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢))))) |
172 | 171 | eqeq2d 2749 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ ℂ) → (𝑌 = ((𝑆 × {𝑥}) ∘f / (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) ↔ 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))))) |
173 | 143, 172 | sylibd 238 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ ℂ) → ((𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (𝑆 × {𝑥}) → 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))))) |
174 | 173 | reximdva 3202 |
. . . . . 6
⊢ (𝜑 → (∃𝑥 ∈ ℂ (𝑌 ∘f · (𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (𝑆 × {𝑥}) → ∃𝑥 ∈ ℂ 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))))) |
175 | 174 | adantr 480 |
. . . . 5
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → (∃𝑥 ∈ ℂ (𝑌 ∘f ·
(𝑢 ∈ 𝑆 ↦ (exp‘-(𝐾 · 𝑢)))) = (𝑆 × {𝑥}) → ∃𝑥 ∈ ℂ 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))))) |
176 | 132, 175 | mpd 15 |
. . . 4
⊢ ((𝜑 ∧ (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) → ∃𝑥 ∈ ℂ 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢))))) |
177 | 176 | ex 412 |
. . 3
⊢ (𝜑 → ((𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌) → ∃𝑥 ∈ ℂ 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))))) |
178 | 1 | adantr 480 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑥 ∈ ℂ ∧ 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))))) → 𝑆 ∈ {ℝ, ℂ}) |
179 | 4 | adantr 480 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑥 ∈ ℂ ∧ 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))))) → 𝐾 ∈ ℂ) |
180 | | simprl 767 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑥 ∈ ℂ ∧ 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))))) → 𝑥 ∈ ℂ) |
181 | | eqid 2738 |
. . . . . . 7
⊢ (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))) = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))) |
182 | 178, 179,
180, 181 | expgrowthi 41840 |
. . . . . 6
⊢ ((𝜑 ∧ (𝑥 ∈ ℂ ∧ 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))))) → (𝑆 D (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢))))) = ((𝑆 × {𝐾}) ∘f · (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))))) |
183 | 182 | 3impb 1113 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ ℂ ∧ 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢))))) → (𝑆 D (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢))))) = ((𝑆 × {𝐾}) ∘f · (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))))) |
184 | | oveq2 7263 |
. . . . . . 7
⊢ (𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))) → (𝑆 D 𝑌) = (𝑆 D (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))))) |
185 | | oveq2 7263 |
. . . . . . 7
⊢ (𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))) → ((𝑆 × {𝐾}) ∘f · 𝑌) = ((𝑆 × {𝐾}) ∘f · (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))))) |
186 | 184, 185 | eqeq12d 2754 |
. . . . . 6
⊢ (𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))) → ((𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌) ↔ (𝑆 D (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢))))) = ((𝑆 × {𝐾}) ∘f · (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢))))))) |
187 | 186 | 3ad2ant3 1133 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ ℂ ∧ 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢))))) → ((𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌) ↔ (𝑆 D (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢))))) = ((𝑆 × {𝐾}) ∘f · (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢))))))) |
188 | 183, 187 | mpbird 256 |
. . . 4
⊢ ((𝜑 ∧ 𝑥 ∈ ℂ ∧ 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢))))) → (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌)) |
189 | 188 | rexlimdv3a 3214 |
. . 3
⊢ (𝜑 → (∃𝑥 ∈ ℂ 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))) → (𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌))) |
190 | 177, 189 | impbid 211 |
. 2
⊢ (𝜑 → ((𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌) ↔ ∃𝑥 ∈ ℂ 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))))) |
191 | | oveq2 7263 |
. . . . . . . 8
⊢ (𝑢 = 𝑡 → (𝐾 · 𝑢) = (𝐾 · 𝑡)) |
192 | 191 | fveq2d 6760 |
. . . . . . 7
⊢ (𝑢 = 𝑡 → (exp‘(𝐾 · 𝑢)) = (exp‘(𝐾 · 𝑡))) |
193 | 192 | oveq2d 7271 |
. . . . . 6
⊢ (𝑢 = 𝑡 → (𝑥 · (exp‘(𝐾 · 𝑢))) = (𝑥 · (exp‘(𝐾 · 𝑡)))) |
194 | 193 | cbvmptv 5183 |
. . . . 5
⊢ (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))) = (𝑡 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑡)))) |
195 | | oveq1 7262 |
. . . . . 6
⊢ (𝑥 = 𝑐 → (𝑥 · (exp‘(𝐾 · 𝑡))) = (𝑐 · (exp‘(𝐾 · 𝑡)))) |
196 | 195 | mpteq2dv 5172 |
. . . . 5
⊢ (𝑥 = 𝑐 → (𝑡 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑡)))) = (𝑡 ∈ 𝑆 ↦ (𝑐 · (exp‘(𝐾 · 𝑡))))) |
197 | 194, 196 | syl5eq 2791 |
. . . 4
⊢ (𝑥 = 𝑐 → (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))) = (𝑡 ∈ 𝑆 ↦ (𝑐 · (exp‘(𝐾 · 𝑡))))) |
198 | 197 | eqeq2d 2749 |
. . 3
⊢ (𝑥 = 𝑐 → (𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))) ↔ 𝑌 = (𝑡 ∈ 𝑆 ↦ (𝑐 · (exp‘(𝐾 · 𝑡)))))) |
199 | 198 | cbvrexvw 3373 |
. 2
⊢
(∃𝑥 ∈
ℂ 𝑌 = (𝑢 ∈ 𝑆 ↦ (𝑥 · (exp‘(𝐾 · 𝑢)))) ↔ ∃𝑐 ∈ ℂ 𝑌 = (𝑡 ∈ 𝑆 ↦ (𝑐 · (exp‘(𝐾 · 𝑡))))) |
200 | 190, 199 | bitrdi 286 |
1
⊢ (𝜑 → ((𝑆 D 𝑌) = ((𝑆 × {𝐾}) ∘f · 𝑌) ↔ ∃𝑐 ∈ ℂ 𝑌 = (𝑡 ∈ 𝑆 ↦ (𝑐 · (exp‘(𝐾 · 𝑡)))))) |