Step | Hyp | Ref
| Expression |
1 | | circlemethhgt.n |
. . 3
⊢ (𝜑 → 𝑁 ∈
ℕ0) |
2 | | 3nn 11186 |
. . . 4
⊢ 3 ∈
ℕ |
3 | 2 | a1i 11 |
. . 3
⊢ (𝜑 → 3 ∈
ℕ) |
4 | | s3len 13639 |
. . . . . 6
⊢
(#‘〈“(Λ ∘𝑓 ·
𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉) =
3 |
5 | 4 | eqcomi 2631 |
. . . . 5
⊢ 3 =
(#‘〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉) |
6 | 5 | a1i 11 |
. . . 4
⊢ (𝜑 → 3 =
(#‘〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉)) |
7 | | simprl 794 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) → 𝑥 ∈ ℝ) |
8 | | simprr 796 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) → 𝑦 ∈ ℝ) |
9 | 7, 8 | remulcld 10070 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) → (𝑥 · 𝑦) ∈ ℝ) |
10 | 9 | recnd 10068 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) → (𝑥 · 𝑦) ∈ ℂ) |
11 | | vmaf 24845 |
. . . . . . . 8
⊢
Λ:ℕ⟶ℝ |
12 | 11 | a1i 11 |
. . . . . . 7
⊢ (𝜑 →
Λ:ℕ⟶ℝ) |
13 | | circlemethhgt.h |
. . . . . . 7
⊢ (𝜑 → 𝐻:ℕ⟶ℝ) |
14 | | nnex 11026 |
. . . . . . . 8
⊢ ℕ
∈ V |
15 | 14 | a1i 11 |
. . . . . . 7
⊢ (𝜑 → ℕ ∈
V) |
16 | | inidm 3822 |
. . . . . . 7
⊢ (ℕ
∩ ℕ) = ℕ |
17 | 10, 12, 13, 15, 15, 16 | off 6912 |
. . . . . 6
⊢ (𝜑 → (Λ
∘𝑓 · 𝐻):ℕ⟶ℂ) |
18 | | cnex 10017 |
. . . . . . 7
⊢ ℂ
∈ V |
19 | 18, 14 | elmap 7886 |
. . . . . 6
⊢
((Λ ∘𝑓 · 𝐻) ∈ (ℂ ↑𝑚
ℕ) ↔ (Λ ∘𝑓 · 𝐻):ℕ⟶ℂ) |
20 | 17, 19 | sylibr 224 |
. . . . 5
⊢ (𝜑 → (Λ
∘𝑓 · 𝐻) ∈ (ℂ ↑𝑚
ℕ)) |
21 | | circlemethhgt.k |
. . . . . . 7
⊢ (𝜑 → 𝐾:ℕ⟶ℝ) |
22 | 10, 12, 21, 15, 15, 16 | off 6912 |
. . . . . 6
⊢ (𝜑 → (Λ
∘𝑓 · 𝐾):ℕ⟶ℂ) |
23 | 18, 14 | elmap 7886 |
. . . . . 6
⊢
((Λ ∘𝑓 · 𝐾) ∈ (ℂ ↑𝑚
ℕ) ↔ (Λ ∘𝑓 · 𝐾):ℕ⟶ℂ) |
24 | 22, 23 | sylibr 224 |
. . . . 5
⊢ (𝜑 → (Λ
∘𝑓 · 𝐾) ∈ (ℂ ↑𝑚
ℕ)) |
25 | 20, 24, 24 | s3cld 13617 |
. . . 4
⊢ (𝜑 → 〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉 ∈ Word (ℂ
↑𝑚 ℕ)) |
26 | 6, 25 | wrdfd 30616 |
. . 3
⊢ (𝜑 → 〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉:(0..^3)⟶(ℂ
↑𝑚 ℕ)) |
27 | 1, 3, 26 | circlemeth 30718 |
. 2
⊢ (𝜑 → Σ𝑛 ∈ (ℕ(repr‘3)𝑁)∏𝑎 ∈ (0..^3)((〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎)‘(𝑛‘𝑎)) = ∫(0(,)1)(∏𝑎 ∈ (0..^3)(((〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎)vts𝑁)‘𝑥) · (exp‘((i · (2
· π)) · (-𝑁 · 𝑥)))) d𝑥) |
28 | | fveq2 6191 |
. . . . . 6
⊢ (𝑎 = 0 →
(〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎) = (〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘0)) |
29 | | fveq2 6191 |
. . . . . 6
⊢ (𝑎 = 0 → (𝑛‘𝑎) = (𝑛‘0)) |
30 | 28, 29 | fveq12d 6197 |
. . . . 5
⊢ (𝑎 = 0 →
((〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎)‘(𝑛‘𝑎)) = ((〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘0)‘(𝑛‘0))) |
31 | | fveq2 6191 |
. . . . . 6
⊢ (𝑎 = 1 →
(〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎) = (〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘1)) |
32 | | fveq2 6191 |
. . . . . 6
⊢ (𝑎 = 1 → (𝑛‘𝑎) = (𝑛‘1)) |
33 | 31, 32 | fveq12d 6197 |
. . . . 5
⊢ (𝑎 = 1 →
((〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎)‘(𝑛‘𝑎)) = ((〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘1)‘(𝑛‘1))) |
34 | | fveq2 6191 |
. . . . . 6
⊢ (𝑎 = 2 →
(〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎) = (〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘2)) |
35 | | fveq2 6191 |
. . . . . 6
⊢ (𝑎 = 2 → (𝑛‘𝑎) = (𝑛‘2)) |
36 | 34, 35 | fveq12d 6197 |
. . . . 5
⊢ (𝑎 = 2 →
((〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎)‘(𝑛‘𝑎)) = ((〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘2)‘(𝑛‘2))) |
37 | 26 | adantr 481 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → 〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉:(0..^3)⟶(ℂ
↑𝑚 ℕ)) |
38 | 37 | ffvelrnda 6359 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) ∧ 𝑎 ∈ (0..^3)) →
(〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎) ∈ (ℂ ↑𝑚
ℕ)) |
39 | | elmapi 7879 |
. . . . . . 7
⊢
((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎) ∈ (ℂ ↑𝑚
ℕ) → (〈“(Λ ∘𝑓 ·
𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎):ℕ⟶ℂ) |
40 | 38, 39 | syl 17 |
. . . . . 6
⊢ (((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) ∧ 𝑎 ∈ (0..^3)) →
(〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎):ℕ⟶ℂ) |
41 | | ssid 3624 |
. . . . . . . . 9
⊢ ℕ
⊆ ℕ |
42 | 41 | a1i 11 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → ℕ ⊆
ℕ) |
43 | 1 | nn0zd 11480 |
. . . . . . . . 9
⊢ (𝜑 → 𝑁 ∈ ℤ) |
44 | 43 | adantr 481 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → 𝑁 ∈ ℤ) |
45 | | 3nn0 11310 |
. . . . . . . . 9
⊢ 3 ∈
ℕ0 |
46 | 45 | a1i 11 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → 3 ∈
ℕ0) |
47 | | simpr 477 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → 𝑛 ∈ (ℕ(repr‘3)𝑁)) |
48 | 42, 44, 46, 47 | reprf 30690 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → 𝑛:(0..^3)⟶ℕ) |
49 | 48 | ffvelrnda 6359 |
. . . . . 6
⊢ (((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) ∧ 𝑎 ∈ (0..^3)) → (𝑛‘𝑎) ∈ ℕ) |
50 | 40, 49 | ffvelrnd 6360 |
. . . . 5
⊢ (((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) ∧ 𝑎 ∈ (0..^3)) →
((〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎)‘(𝑛‘𝑎)) ∈ ℂ) |
51 | 30, 33, 36, 50 | prodfzo03 30681 |
. . . 4
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → ∏𝑎 ∈
(0..^3)((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎)‘(𝑛‘𝑎)) = (((〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘0)‘(𝑛‘0)) ·
(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘1)‘(𝑛‘1)) ·
((〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘2)‘(𝑛‘2))))) |
52 | | ovex 6678 |
. . . . . . . 8
⊢ (Λ
∘𝑓 · 𝐻) ∈ V |
53 | | s3fv0 13636 |
. . . . . . . 8
⊢
((Λ ∘𝑓 · 𝐻) ∈ V → (〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘0) = (Λ
∘𝑓 · 𝐻)) |
54 | 52, 53 | mp1i 13 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) →
(〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘0) = (Λ
∘𝑓 · 𝐻)) |
55 | 54 | fveq1d 6193 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) →
((〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘0)‘(𝑛‘0)) = ((Λ
∘𝑓 · 𝐻)‘(𝑛‘0))) |
56 | | simpl 473 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → 𝜑) |
57 | | c0ex 10034 |
. . . . . . . . . . 11
⊢ 0 ∈
V |
58 | 57 | tpid1 4303 |
. . . . . . . . . 10
⊢ 0 ∈
{0, 1, 2} |
59 | | fzo0to3tp 12554 |
. . . . . . . . . 10
⊢ (0..^3) =
{0, 1, 2} |
60 | 58, 59 | eleqtrri 2700 |
. . . . . . . . 9
⊢ 0 ∈
(0..^3) |
61 | 60 | a1i 11 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → 0 ∈
(0..^3)) |
62 | 48, 61 | ffvelrnd 6360 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → (𝑛‘0) ∈ ℕ) |
63 | | ffn 6045 |
. . . . . . . . . 10
⊢
(Λ:ℕ⟶ℝ → Λ Fn
ℕ) |
64 | 11, 63 | ax-mp 5 |
. . . . . . . . 9
⊢ Λ
Fn ℕ |
65 | 64 | a1i 11 |
. . . . . . . 8
⊢ (𝜑 → Λ Fn
ℕ) |
66 | 13 | ffnd 6046 |
. . . . . . . 8
⊢ (𝜑 → 𝐻 Fn ℕ) |
67 | | eqidd 2623 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑛‘0) ∈ ℕ) →
(Λ‘(𝑛‘0)) = (Λ‘(𝑛‘0))) |
68 | | eqidd 2623 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑛‘0) ∈ ℕ) → (𝐻‘(𝑛‘0)) = (𝐻‘(𝑛‘0))) |
69 | 65, 66, 15, 15, 16, 67, 68 | ofval 6906 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑛‘0) ∈ ℕ) → ((Λ
∘𝑓 · 𝐻)‘(𝑛‘0)) = ((Λ‘(𝑛‘0)) · (𝐻‘(𝑛‘0)))) |
70 | 56, 62, 69 | syl2anc 693 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → ((Λ
∘𝑓 · 𝐻)‘(𝑛‘0)) = ((Λ‘(𝑛‘0)) · (𝐻‘(𝑛‘0)))) |
71 | 55, 70 | eqtrd 2656 |
. . . . 5
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) →
((〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘0)‘(𝑛‘0)) =
((Λ‘(𝑛‘0)) · (𝐻‘(𝑛‘0)))) |
72 | | ovex 6678 |
. . . . . . . . 9
⊢ (Λ
∘𝑓 · 𝐾) ∈ V |
73 | | s3fv1 13637 |
. . . . . . . . 9
⊢
((Λ ∘𝑓 · 𝐾) ∈ V → (〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘1) = (Λ
∘𝑓 · 𝐾)) |
74 | 72, 73 | mp1i 13 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) →
(〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘1) = (Λ
∘𝑓 · 𝐾)) |
75 | 74 | fveq1d 6193 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) →
((〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘1)‘(𝑛‘1)) = ((Λ
∘𝑓 · 𝐾)‘(𝑛‘1))) |
76 | | 1ex 10035 |
. . . . . . . . . . . 12
⊢ 1 ∈
V |
77 | 76 | tpid2 4304 |
. . . . . . . . . . 11
⊢ 1 ∈
{0, 1, 2} |
78 | 77, 59 | eleqtrri 2700 |
. . . . . . . . . 10
⊢ 1 ∈
(0..^3) |
79 | 78 | a1i 11 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → 1 ∈
(0..^3)) |
80 | 48, 79 | ffvelrnd 6360 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → (𝑛‘1) ∈ ℕ) |
81 | 21 | ffnd 6046 |
. . . . . . . . 9
⊢ (𝜑 → 𝐾 Fn ℕ) |
82 | | eqidd 2623 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑛‘1) ∈ ℕ) →
(Λ‘(𝑛‘1)) = (Λ‘(𝑛‘1))) |
83 | | eqidd 2623 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑛‘1) ∈ ℕ) → (𝐾‘(𝑛‘1)) = (𝐾‘(𝑛‘1))) |
84 | 65, 81, 15, 15, 16, 82, 83 | ofval 6906 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑛‘1) ∈ ℕ) → ((Λ
∘𝑓 · 𝐾)‘(𝑛‘1)) = ((Λ‘(𝑛‘1)) · (𝐾‘(𝑛‘1)))) |
85 | 56, 80, 84 | syl2anc 693 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → ((Λ
∘𝑓 · 𝐾)‘(𝑛‘1)) = ((Λ‘(𝑛‘1)) · (𝐾‘(𝑛‘1)))) |
86 | 75, 85 | eqtrd 2656 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) →
((〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘1)‘(𝑛‘1)) =
((Λ‘(𝑛‘1)) · (𝐾‘(𝑛‘1)))) |
87 | | s3fv2 13638 |
. . . . . . . . 9
⊢
((Λ ∘𝑓 · 𝐾) ∈ V → (〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘2) = (Λ
∘𝑓 · 𝐾)) |
88 | 72, 87 | mp1i 13 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) →
(〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘2) = (Λ
∘𝑓 · 𝐾)) |
89 | 88 | fveq1d 6193 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) →
((〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘2)‘(𝑛‘2)) = ((Λ
∘𝑓 · 𝐾)‘(𝑛‘2))) |
90 | | 2ex 11092 |
. . . . . . . . . . . 12
⊢ 2 ∈
V |
91 | 90 | tpid3 4307 |
. . . . . . . . . . 11
⊢ 2 ∈
{0, 1, 2} |
92 | 91, 59 | eleqtrri 2700 |
. . . . . . . . . 10
⊢ 2 ∈
(0..^3) |
93 | 92 | a1i 11 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → 2 ∈
(0..^3)) |
94 | 48, 93 | ffvelrnd 6360 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → (𝑛‘2) ∈ ℕ) |
95 | | eqidd 2623 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑛‘2) ∈ ℕ) →
(Λ‘(𝑛‘2)) = (Λ‘(𝑛‘2))) |
96 | | eqidd 2623 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑛‘2) ∈ ℕ) → (𝐾‘(𝑛‘2)) = (𝐾‘(𝑛‘2))) |
97 | 65, 81, 15, 15, 16, 95, 96 | ofval 6906 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑛‘2) ∈ ℕ) → ((Λ
∘𝑓 · 𝐾)‘(𝑛‘2)) = ((Λ‘(𝑛‘2)) · (𝐾‘(𝑛‘2)))) |
98 | 56, 94, 97 | syl2anc 693 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → ((Λ
∘𝑓 · 𝐾)‘(𝑛‘2)) = ((Λ‘(𝑛‘2)) · (𝐾‘(𝑛‘2)))) |
99 | 89, 98 | eqtrd 2656 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) →
((〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘2)‘(𝑛‘2)) =
((Λ‘(𝑛‘2)) · (𝐾‘(𝑛‘2)))) |
100 | 86, 99 | oveq12d 6668 |
. . . . 5
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) →
(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘1)‘(𝑛‘1)) ·
((〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘2)‘(𝑛‘2))) =
(((Λ‘(𝑛‘1)) · (𝐾‘(𝑛‘1))) · ((Λ‘(𝑛‘2)) · (𝐾‘(𝑛‘2))))) |
101 | 71, 100 | oveq12d 6668 |
. . . 4
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) →
(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘0)‘(𝑛‘0)) ·
(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘1)‘(𝑛‘1)) ·
((〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘2)‘(𝑛‘2)))) =
(((Λ‘(𝑛‘0)) · (𝐻‘(𝑛‘0))) · (((Λ‘(𝑛‘1)) · (𝐾‘(𝑛‘1))) · ((Λ‘(𝑛‘2)) · (𝐾‘(𝑛‘2)))))) |
102 | 51, 101 | eqtrd 2656 |
. . 3
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ(repr‘3)𝑁)) → ∏𝑎 ∈
(0..^3)((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎)‘(𝑛‘𝑎)) = (((Λ‘(𝑛‘0)) · (𝐻‘(𝑛‘0))) · (((Λ‘(𝑛‘1)) · (𝐾‘(𝑛‘1))) · ((Λ‘(𝑛‘2)) · (𝐾‘(𝑛‘2)))))) |
103 | 102 | sumeq2dv 14433 |
. 2
⊢ (𝜑 → Σ𝑛 ∈ (ℕ(repr‘3)𝑁)∏𝑎 ∈ (0..^3)((〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎)‘(𝑛‘𝑎)) = Σ𝑛 ∈ (ℕ(repr‘3)𝑁)(((Λ‘(𝑛‘0)) · (𝐻‘(𝑛‘0))) · (((Λ‘(𝑛‘1)) · (𝐾‘(𝑛‘1))) · ((Λ‘(𝑛‘2)) · (𝐾‘(𝑛‘2)))))) |
104 | | nfv 1843 |
. . . . . 6
⊢
Ⅎ𝑎(𝜑 ∧ 𝑥 ∈ (0(,)1)) |
105 | | nfcv 2764 |
. . . . . 6
⊢
Ⅎ𝑎(((Λ ∘𝑓
· 𝐻)vts𝑁)‘𝑥) |
106 | | fzofi 12773 |
. . . . . . 7
⊢ (1..^3)
∈ Fin |
107 | 106 | a1i 11 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → (1..^3) ∈
Fin) |
108 | 57 | a1i 11 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → 0 ∈
V) |
109 | | eqid 2622 |
. . . . . . . . 9
⊢ 0 =
0 |
110 | 109 | orci 405 |
. . . . . . . 8
⊢ (0 = 0
∨ 0 = 3) |
111 | | 0elfz 12436 |
. . . . . . . . 9
⊢ (3 ∈
ℕ0 → 0 ∈ (0...3)) |
112 | | elfznelfzob 12574 |
. . . . . . . . 9
⊢ (0 ∈
(0...3) → (¬ 0 ∈ (1..^3) ↔ (0 = 0 ∨ 0 =
3))) |
113 | 45, 111, 112 | mp2b 10 |
. . . . . . . 8
⊢ (¬ 0
∈ (1..^3) ↔ (0 = 0 ∨ 0 = 3)) |
114 | 110, 113 | mpbir 221 |
. . . . . . 7
⊢ ¬ 0
∈ (1..^3) |
115 | 114 | a1i 11 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → ¬ 0 ∈
(1..^3)) |
116 | 1 | ad2antrr 762 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑥 ∈ (0(,)1)) ∧ 𝑎 ∈ (1..^3)) → 𝑁 ∈
ℕ0) |
117 | | ioossre 12235 |
. . . . . . . . . . 11
⊢ (0(,)1)
⊆ ℝ |
118 | | ax-resscn 9993 |
. . . . . . . . . . 11
⊢ ℝ
⊆ ℂ |
119 | 117, 118 | sstri 3612 |
. . . . . . . . . 10
⊢ (0(,)1)
⊆ ℂ |
120 | 119 | a1i 11 |
. . . . . . . . 9
⊢ (𝜑 → (0(,)1) ⊆
ℂ) |
121 | 120 | sselda 3603 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → 𝑥 ∈ ℂ) |
122 | 121 | adantr 481 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑥 ∈ (0(,)1)) ∧ 𝑎 ∈ (1..^3)) → 𝑥 ∈ ℂ) |
123 | 26 | ad2antrr 762 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑥 ∈ (0(,)1)) ∧ 𝑎 ∈ (1..^3)) →
〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉:(0..^3)⟶(ℂ
↑𝑚 ℕ)) |
124 | | fzo0ss1 12498 |
. . . . . . . . . . 11
⊢ (1..^3)
⊆ (0..^3) |
125 | 124 | a1i 11 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → (1..^3) ⊆
(0..^3)) |
126 | 125 | sselda 3603 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑥 ∈ (0(,)1)) ∧ 𝑎 ∈ (1..^3)) → 𝑎 ∈ (0..^3)) |
127 | 123, 126 | ffvelrnd 6360 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑥 ∈ (0(,)1)) ∧ 𝑎 ∈ (1..^3)) →
(〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎) ∈ (ℂ ↑𝑚
ℕ)) |
128 | 127, 39 | syl 17 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑥 ∈ (0(,)1)) ∧ 𝑎 ∈ (1..^3)) →
(〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎):ℕ⟶ℂ) |
129 | 116, 122,
128 | vtscl 30716 |
. . . . . 6
⊢ (((𝜑 ∧ 𝑥 ∈ (0(,)1)) ∧ 𝑎 ∈ (1..^3)) →
(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎)vts𝑁)‘𝑥) ∈ ℂ) |
130 | 52, 53 | ax-mp 5 |
. . . . . . . . 9
⊢
(〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘0) = (Λ
∘𝑓 · 𝐻) |
131 | 28, 130 | syl6eq 2672 |
. . . . . . . 8
⊢ (𝑎 = 0 →
(〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎) = (Λ ∘𝑓
· 𝐻)) |
132 | 131 | oveq1d 6665 |
. . . . . . 7
⊢ (𝑎 = 0 →
((〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎)vts𝑁) = ((Λ ∘𝑓
· 𝐻)vts𝑁)) |
133 | 132 | fveq1d 6193 |
. . . . . 6
⊢ (𝑎 = 0 →
(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎)vts𝑁)‘𝑥) = (((Λ ∘𝑓
· 𝐻)vts𝑁)‘𝑥)) |
134 | 1 | adantr 481 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → 𝑁 ∈
ℕ0) |
135 | 17 | adantr 481 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → (Λ
∘𝑓 · 𝐻):ℕ⟶ℂ) |
136 | 134, 121,
135 | vtscl 30716 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → (((Λ
∘𝑓 · 𝐻)vts𝑁)‘𝑥) ∈ ℂ) |
137 | 104, 105,
107, 108, 115, 129, 133, 136 | fprodsplitsn 14720 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → ∏𝑎 ∈ ((1..^3) ∪
{0})(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎)vts𝑁)‘𝑥) = (∏𝑎 ∈ (1..^3)(((〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎)vts𝑁)‘𝑥) · (((Λ
∘𝑓 · 𝐻)vts𝑁)‘𝑥))) |
138 | | uncom 3757 |
. . . . . . . 8
⊢ ((1..^3)
∪ {0}) = ({0} ∪ (1..^3)) |
139 | | fzo0sn0fzo1 12557 |
. . . . . . . . 9
⊢ (3 ∈
ℕ → (0..^3) = ({0} ∪ (1..^3))) |
140 | 2, 139 | ax-mp 5 |
. . . . . . . 8
⊢ (0..^3) =
({0} ∪ (1..^3)) |
141 | 138, 140 | eqtr4i 2647 |
. . . . . . 7
⊢ ((1..^3)
∪ {0}) = (0..^3) |
142 | 141 | a1i 11 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → ((1..^3) ∪ {0}) =
(0..^3)) |
143 | 142 | prodeq1d 14651 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → ∏𝑎 ∈ ((1..^3) ∪
{0})(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎)vts𝑁)‘𝑥) = ∏𝑎 ∈ (0..^3)(((〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎)vts𝑁)‘𝑥)) |
144 | | fzo13pr 12552 |
. . . . . . . . . . . . . . 15
⊢ (1..^3) =
{1, 2} |
145 | 144 | eleq2i 2693 |
. . . . . . . . . . . . . 14
⊢ (𝑎 ∈ (1..^3) ↔ 𝑎 ∈ {1, 2}) |
146 | | vex 3203 |
. . . . . . . . . . . . . . 15
⊢ 𝑎 ∈ V |
147 | 146 | elpr 4198 |
. . . . . . . . . . . . . 14
⊢ (𝑎 ∈ {1, 2} ↔ (𝑎 = 1 ∨ 𝑎 = 2)) |
148 | 145, 147 | bitri 264 |
. . . . . . . . . . . . 13
⊢ (𝑎 ∈ (1..^3) ↔ (𝑎 = 1 ∨ 𝑎 = 2)) |
149 | 31 | adantl 482 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ 𝑎 = 1) → (〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎) = (〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘1)) |
150 | 72, 73 | mp1i 13 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ 𝑎 = 1) → (〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘1) = (Λ
∘𝑓 · 𝐾)) |
151 | 149, 150 | eqtrd 2656 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑎 = 1) → (〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎) = (Λ ∘𝑓
· 𝐾)) |
152 | 34 | adantl 482 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ 𝑎 = 2) → (〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎) = (〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘2)) |
153 | 72, 87 | mp1i 13 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ 𝑎 = 2) → (〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘2) = (Λ
∘𝑓 · 𝐾)) |
154 | 152, 153 | eqtrd 2656 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑎 = 2) → (〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎) = (Λ ∘𝑓
· 𝐾)) |
155 | 151, 154 | jaodan 826 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ (𝑎 = 1 ∨ 𝑎 = 2)) → (〈“(Λ
∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎) = (Λ ∘𝑓
· 𝐾)) |
156 | 148, 155 | sylan2b 492 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑎 ∈ (1..^3)) →
(〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎) = (Λ ∘𝑓
· 𝐾)) |
157 | 156 | adantlr 751 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑥 ∈ (0(,)1)) ∧ 𝑎 ∈ (1..^3)) →
(〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎) = (Λ ∘𝑓
· 𝐾)) |
158 | 157 | oveq1d 6665 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑥 ∈ (0(,)1)) ∧ 𝑎 ∈ (1..^3)) →
((〈“(Λ ∘𝑓 · 𝐻)(Λ ∘𝑓
· 𝐾)(Λ
∘𝑓 · 𝐾)”〉‘𝑎)vts𝑁) = ((Λ ∘𝑓
· 𝐾)vts𝑁)) |
159 | 158 | fveq1d 6193 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑥 ∈ (0(,)1)) ∧ 𝑎 ∈ (1..^3)) →
(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎)vts𝑁)‘𝑥) = (((Λ ∘𝑓
· 𝐾)vts𝑁)‘𝑥)) |
160 | 159 | prodeq2dv 14653 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → ∏𝑎 ∈
(1..^3)(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎)vts𝑁)‘𝑥) = ∏𝑎 ∈ (1..^3)(((Λ
∘𝑓 · 𝐾)vts𝑁)‘𝑥)) |
161 | 22 | adantr 481 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → (Λ
∘𝑓 · 𝐾):ℕ⟶ℂ) |
162 | 134, 121,
161 | vtscl 30716 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → (((Λ
∘𝑓 · 𝐾)vts𝑁)‘𝑥) ∈ ℂ) |
163 | | fprodconst 14708 |
. . . . . . . . 9
⊢ (((1..^3)
∈ Fin ∧ (((Λ ∘𝑓 · 𝐾)vts𝑁)‘𝑥) ∈ ℂ) → ∏𝑎 ∈ (1..^3)(((Λ
∘𝑓 · 𝐾)vts𝑁)‘𝑥) = ((((Λ ∘𝑓
· 𝐾)vts𝑁)‘𝑥)↑(#‘(1..^3)))) |
164 | 107, 162,
163 | syl2anc 693 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → ∏𝑎 ∈ (1..^3)(((Λ
∘𝑓 · 𝐾)vts𝑁)‘𝑥) = ((((Λ ∘𝑓
· 𝐾)vts𝑁)‘𝑥)↑(#‘(1..^3)))) |
165 | | nnuz 11723 |
. . . . . . . . . . . . 13
⊢ ℕ =
(ℤ≥‘1) |
166 | 2, 165 | eleqtri 2699 |
. . . . . . . . . . . 12
⊢ 3 ∈
(ℤ≥‘1) |
167 | | hashfzo 13216 |
. . . . . . . . . . . 12
⊢ (3 ∈
(ℤ≥‘1) → (#‘(1..^3)) = (3 −
1)) |
168 | 166, 167 | ax-mp 5 |
. . . . . . . . . . 11
⊢
(#‘(1..^3)) = (3 − 1) |
169 | | 3m1e2 11137 |
. . . . . . . . . . 11
⊢ (3
− 1) = 2 |
170 | 168, 169 | eqtri 2644 |
. . . . . . . . . 10
⊢
(#‘(1..^3)) = 2 |
171 | 170 | a1i 11 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → (#‘(1..^3)) =
2) |
172 | 171 | oveq2d 6666 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → ((((Λ
∘𝑓 · 𝐾)vts𝑁)‘𝑥)↑(#‘(1..^3))) = ((((Λ
∘𝑓 · 𝐾)vts𝑁)‘𝑥)↑2)) |
173 | 160, 164,
172 | 3eqtrd 2660 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → ∏𝑎 ∈
(1..^3)(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎)vts𝑁)‘𝑥) = ((((Λ ∘𝑓
· 𝐾)vts𝑁)‘𝑥)↑2)) |
174 | 173 | oveq1d 6665 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → (∏𝑎 ∈
(1..^3)(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎)vts𝑁)‘𝑥) · (((Λ
∘𝑓 · 𝐻)vts𝑁)‘𝑥)) = (((((Λ
∘𝑓 · 𝐾)vts𝑁)‘𝑥)↑2) · (((Λ
∘𝑓 · 𝐻)vts𝑁)‘𝑥))) |
175 | 162 | sqcld 13006 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → ((((Λ
∘𝑓 · 𝐾)vts𝑁)‘𝑥)↑2) ∈ ℂ) |
176 | 136, 175 | mulcomd 10061 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → ((((Λ
∘𝑓 · 𝐻)vts𝑁)‘𝑥) · ((((Λ
∘𝑓 · 𝐾)vts𝑁)‘𝑥)↑2)) = (((((Λ
∘𝑓 · 𝐾)vts𝑁)‘𝑥)↑2) · (((Λ
∘𝑓 · 𝐻)vts𝑁)‘𝑥))) |
177 | 174, 176 | eqtr4d 2659 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → (∏𝑎 ∈
(1..^3)(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎)vts𝑁)‘𝑥) · (((Λ
∘𝑓 · 𝐻)vts𝑁)‘𝑥)) = ((((Λ ∘𝑓
· 𝐻)vts𝑁)‘𝑥) · ((((Λ
∘𝑓 · 𝐾)vts𝑁)‘𝑥)↑2))) |
178 | 137, 143,
177 | 3eqtr3d 2664 |
. . . 4
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → ∏𝑎 ∈
(0..^3)(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎)vts𝑁)‘𝑥) = ((((Λ ∘𝑓
· 𝐻)vts𝑁)‘𝑥) · ((((Λ
∘𝑓 · 𝐾)vts𝑁)‘𝑥)↑2))) |
179 | 178 | oveq1d 6665 |
. . 3
⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)1)) → (∏𝑎 ∈
(0..^3)(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎)vts𝑁)‘𝑥) · (exp‘((i · (2
· π)) · (-𝑁 · 𝑥)))) = (((((Λ
∘𝑓 · 𝐻)vts𝑁)‘𝑥) · ((((Λ
∘𝑓 · 𝐾)vts𝑁)‘𝑥)↑2)) · (exp‘((i ·
(2 · π)) · (-𝑁 · 𝑥))))) |
180 | 179 | itgeq2dv 23548 |
. 2
⊢ (𝜑 → ∫(0(,)1)(∏𝑎 ∈
(0..^3)(((〈“(Λ ∘𝑓 · 𝐻)(Λ
∘𝑓 · 𝐾)(Λ ∘𝑓
· 𝐾)”〉‘𝑎)vts𝑁)‘𝑥) · (exp‘((i · (2
· π)) · (-𝑁 · 𝑥)))) d𝑥 = ∫(0(,)1)(((((Λ
∘𝑓 · 𝐻)vts𝑁)‘𝑥) · ((((Λ
∘𝑓 · 𝐾)vts𝑁)‘𝑥)↑2)) · (exp‘((i ·
(2 · π)) · (-𝑁 · 𝑥)))) d𝑥) |
181 | 27, 103, 180 | 3eqtr3d 2664 |
1
⊢ (𝜑 → Σ𝑛 ∈ (ℕ(repr‘3)𝑁)(((Λ‘(𝑛‘0)) · (𝐻‘(𝑛‘0))) · (((Λ‘(𝑛‘1)) · (𝐾‘(𝑛‘1))) · ((Λ‘(𝑛‘2)) · (𝐾‘(𝑛‘2))))) = ∫(0(,)1)(((((Λ
∘𝑓 · 𝐻)vts𝑁)‘𝑥) · ((((Λ
∘𝑓 · 𝐾)vts𝑁)‘𝑥)↑2)) · (exp‘((i ·
(2 · π)) · (-𝑁 · 𝑥)))) d𝑥) |