Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  dirkercncflem2 Structured version   Visualization version   GIF version

Theorem dirkercncflem2 38997
Description: Lemma used to prove that the Dirichlet Kernel is continuous at 𝑌 points that are multiples of (2 · π). (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
dirkercncflem2.d 𝐷 = (𝑛 ∈ ℕ ↦ (𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑛) + 1) / (2 · π)), ((sin‘((𝑛 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))))
dirkercncflem2.f 𝐹 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))
dirkercncflem2.g 𝐺 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))
dirkercncflem2.yne0 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (sin‘(𝑦 / 2)) ≠ 0)
dirkercncflem2.h 𝐻 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))))
dirkercncflem2.i 𝐼 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (π · (cos‘(𝑦 / 2))))
dirkercncflem2.l 𝐿 = (𝑤 ∈ (𝐴(,)𝐵) ↦ (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))))
dirkercncflem2.n (𝜑𝑁 ∈ ℕ)
dirkercncflem2.y (𝜑𝑌 ∈ (𝐴(,)𝐵))
dirkercncflem2.ymod (𝜑 → (𝑌 mod (2 · π)) = 0)
dirkercncflem2.11 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (cos‘(𝑦 / 2)) ≠ 0)
Assertion
Ref Expression
dirkercncflem2 (𝜑 → ((𝐷𝑁)‘𝑌) ∈ (((𝐷𝑁) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) lim 𝑌))
Distinct variable groups:   𝑤,𝐴,𝑦   𝑤,𝐵,𝑦   𝑦,𝐷   𝑤,𝐹,𝑦   𝑤,𝐺,𝑦   𝑤,𝐻,𝑦   𝑤,𝐼,𝑦   𝑦,𝐿   𝑤,𝑁,𝑦   𝑤,𝑌,𝑦   𝑦,𝑛   𝜑,𝑤,𝑦
Allowed substitution hints:   𝜑(𝑛)   𝐴(𝑛)   𝐵(𝑛)   𝐷(𝑤,𝑛)   𝐹(𝑛)   𝐺(𝑛)   𝐻(𝑛)   𝐼(𝑛)   𝐿(𝑤,𝑛)   𝑁(𝑛)   𝑌(𝑛)

Proof of Theorem dirkercncflem2
StepHypRef Expression
1 difss 3699 . . . . 5 ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ (𝐴(,)𝐵)
2 ioossre 12106 . . . . 5 (𝐴(,)𝐵) ⊆ ℝ
31, 2sstri 3577 . . . 4 ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ
43a1i 11 . . 3 (𝜑 → ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ)
5 dirkercncflem2.n . . . . . . . . 9 (𝜑𝑁 ∈ ℕ)
65adantr 480 . . . . . . . 8 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑁 ∈ ℕ)
76nnred 10912 . . . . . . 7 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑁 ∈ ℝ)
8 halfre 11123 . . . . . . . 8 (1 / 2) ∈ ℝ
98a1i 11 . . . . . . 7 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (1 / 2) ∈ ℝ)
107, 9readdcld 9948 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑁 + (1 / 2)) ∈ ℝ)
114sselda 3568 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑦 ∈ ℝ)
1210, 11remulcld 9949 . . . . 5 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑁 + (1 / 2)) · 𝑦) ∈ ℝ)
1312resincld 14712 . . . 4 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (sin‘((𝑁 + (1 / 2)) · 𝑦)) ∈ ℝ)
14 dirkercncflem2.f . . . 4 𝐹 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))
1513, 14fmptd 6292 . . 3 (𝜑𝐹:((𝐴(,)𝐵) ∖ {𝑌})⟶ℝ)
16 2re 10967 . . . . . . 7 2 ∈ ℝ
17 pire 24014 . . . . . . 7 π ∈ ℝ
1816, 17remulcli 9933 . . . . . 6 (2 · π) ∈ ℝ
1918a1i 11 . . . . 5 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (2 · π) ∈ ℝ)
2011rehalfcld 11156 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑦 / 2) ∈ ℝ)
2120resincld 14712 . . . . 5 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (sin‘(𝑦 / 2)) ∈ ℝ)
2219, 21remulcld 9949 . . . 4 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((2 · π) · (sin‘(𝑦 / 2))) ∈ ℝ)
23 dirkercncflem2.g . . . 4 𝐺 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))
2422, 23fmptd 6292 . . 3 (𝜑𝐺:((𝐴(,)𝐵) ∖ {𝑌})⟶ℝ)
25 iooretop 22379 . . . 4 (𝐴(,)𝐵) ∈ (topGen‘ran (,))
2625a1i 11 . . 3 (𝜑 → (𝐴(,)𝐵) ∈ (topGen‘ran (,)))
27 dirkercncflem2.y . . 3 (𝜑𝑌 ∈ (𝐴(,)𝐵))
28 eqid 2610 . . 3 ((𝐴(,)𝐵) ∖ {𝑌}) = ((𝐴(,)𝐵) ∖ {𝑌})
2914a1i 11 . . . . . . . 8 (𝜑𝐹 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))))
3029oveq2d 6565 . . . . . . 7 (𝜑 → (ℝ D 𝐹) = (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))))
31 resmpt 5369 . . . . . . . . . . . 12 (((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ → ((𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))))
323, 31ax-mp 5 . . . . . . . . . . 11 ((𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))
3332eqcomi 2619 . . . . . . . . . 10 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) = ((𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))
3433a1i 11 . . . . . . . . 9 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) = ((𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
3534oveq2d 6565 . . . . . . . 8 (𝜑 → (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) = (ℝ D ((𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))))
36 ax-resscn 9872 . . . . . . . . . 10 ℝ ⊆ ℂ
3736a1i 11 . . . . . . . . 9 (𝜑 → ℝ ⊆ ℂ)
385nncnd 10913 . . . . . . . . . . . . . 14 (𝜑𝑁 ∈ ℂ)
39 halfcn 11124 . . . . . . . . . . . . . . 15 (1 / 2) ∈ ℂ
4039a1i 11 . . . . . . . . . . . . . 14 (𝜑 → (1 / 2) ∈ ℂ)
4138, 40addcld 9938 . . . . . . . . . . . . 13 (𝜑 → (𝑁 + (1 / 2)) ∈ ℂ)
4241adantr 480 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ℝ) → (𝑁 + (1 / 2)) ∈ ℂ)
4337sselda 3568 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ℝ) → 𝑦 ∈ ℂ)
4442, 43mulcld 9939 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ℝ) → ((𝑁 + (1 / 2)) · 𝑦) ∈ ℂ)
4544sincld 14699 . . . . . . . . . 10 ((𝜑𝑦 ∈ ℝ) → (sin‘((𝑁 + (1 / 2)) · 𝑦)) ∈ ℂ)
46 eqid 2610 . . . . . . . . . 10 (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) = (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))
4745, 46fmptd 6292 . . . . . . . . 9 (𝜑 → (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))):ℝ⟶ℂ)
48 ssid 3587 . . . . . . . . . . 11 ℝ ⊆ ℝ
4948, 3pm3.2i 470 . . . . . . . . . 10 (ℝ ⊆ ℝ ∧ ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ)
5049a1i 11 . . . . . . . . 9 (𝜑 → (ℝ ⊆ ℝ ∧ ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ))
51 eqid 2610 . . . . . . . . . 10 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
5251tgioo2 22414 . . . . . . . . . 10 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
5351, 52dvres 23481 . . . . . . . . 9 (((ℝ ⊆ ℂ ∧ (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))):ℝ⟶ℂ) ∧ (ℝ ⊆ ℝ ∧ ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ)) → (ℝ D ((𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))) = ((ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))))
5437, 47, 50, 53syl21anc 1317 . . . . . . . 8 (𝜑 → (ℝ D ((𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))) = ((ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))))
55 retop 22375 . . . . . . . . . . 11 (topGen‘ran (,)) ∈ Top
56 rehaus 22410 . . . . . . . . . . . . 13 (topGen‘ran (,)) ∈ Haus
572, 27sseldi 3566 . . . . . . . . . . . . 13 (𝜑𝑌 ∈ ℝ)
58 uniretop 22376 . . . . . . . . . . . . . 14 ℝ = (topGen‘ran (,))
5958sncld 20985 . . . . . . . . . . . . 13 (((topGen‘ran (,)) ∈ Haus ∧ 𝑌 ∈ ℝ) → {𝑌} ∈ (Clsd‘(topGen‘ran (,))))
6056, 57, 59sylancr 694 . . . . . . . . . . . 12 (𝜑 → {𝑌} ∈ (Clsd‘(topGen‘ran (,))))
6158difopn 20648 . . . . . . . . . . . 12 (((𝐴(,)𝐵) ∈ (topGen‘ran (,)) ∧ {𝑌} ∈ (Clsd‘(topGen‘ran (,)))) → ((𝐴(,)𝐵) ∖ {𝑌}) ∈ (topGen‘ran (,)))
6225, 60, 61sylancr 694 . . . . . . . . . . 11 (𝜑 → ((𝐴(,)𝐵) ∖ {𝑌}) ∈ (topGen‘ran (,)))
63 isopn3i 20696 . . . . . . . . . . 11 (((topGen‘ran (,)) ∈ Top ∧ ((𝐴(,)𝐵) ∖ {𝑌}) ∈ (topGen‘ran (,))) → ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌})) = ((𝐴(,)𝐵) ∖ {𝑌}))
6455, 62, 63sylancr 694 . . . . . . . . . 10 (𝜑 → ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌})) = ((𝐴(,)𝐵) ∖ {𝑌}))
6564reseq2d 5317 . . . . . . . . 9 (𝜑 → ((ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))) = ((ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
66 reelprrecn 9907 . . . . . . . . . . . . 13 ℝ ∈ {ℝ, ℂ}
6766a1i 11 . . . . . . . . . . . 12 (𝜑 → ℝ ∈ {ℝ, ℂ})
6841adantr 480 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ ℂ) → (𝑁 + (1 / 2)) ∈ ℂ)
69 simpr 476 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ ℂ) → 𝑦 ∈ ℂ)
7068, 69mulcld 9939 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ℂ) → ((𝑁 + (1 / 2)) · 𝑦) ∈ ℂ)
7170sincld 14699 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ℂ) → (sin‘((𝑁 + (1 / 2)) · 𝑦)) ∈ ℂ)
72 eqid 2610 . . . . . . . . . . . . 13 (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) = (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))
7371, 72fmptd 6292 . . . . . . . . . . . 12 (𝜑 → (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))):ℂ⟶ℂ)
74 ssid 3587 . . . . . . . . . . . . 13 ℂ ⊆ ℂ
7574a1i 11 . . . . . . . . . . . 12 (𝜑 → ℂ ⊆ ℂ)
76 dvsinax 38801 . . . . . . . . . . . . . . . 16 ((𝑁 + (1 / 2)) ∈ ℂ → (ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) = (𝑦 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
7741, 76syl 17 . . . . . . . . . . . . . . 15 (𝜑 → (ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) = (𝑦 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
7877dmeqd 5248 . . . . . . . . . . . . . 14 (𝜑 → dom (ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) = dom (𝑦 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
79 eqid 2610 . . . . . . . . . . . . . . 15 (𝑦 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))) = (𝑦 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))))
8070coscld 14700 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ ℂ) → (cos‘((𝑁 + (1 / 2)) · 𝑦)) ∈ ℂ)
8168, 80mulcld 9939 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ ℂ) → ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))) ∈ ℂ)
8279, 81dmmptd 5937 . . . . . . . . . . . . . 14 (𝜑 → dom (𝑦 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))) = ℂ)
8378, 82eqtrd 2644 . . . . . . . . . . . . 13 (𝜑 → dom (ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) = ℂ)
8436, 83syl5sseqr 3617 . . . . . . . . . . . 12 (𝜑 → ℝ ⊆ dom (ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))))
85 dvres3 23483 . . . . . . . . . . . 12 (((ℝ ∈ {ℝ, ℂ} ∧ (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))):ℂ⟶ℂ) ∧ (ℂ ⊆ ℂ ∧ ℝ ⊆ dom (ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))))) → (ℝ D ((𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ℝ)) = ((ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ℝ))
8667, 73, 75, 84, 85syl22anc 1319 . . . . . . . . . . 11 (𝜑 → (ℝ D ((𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ℝ)) = ((ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ℝ))
87 resmpt 5369 . . . . . . . . . . . . 13 (ℝ ⊆ ℂ → ((𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))))
8836, 87mp1i 13 . . . . . . . . . . . 12 (𝜑 → ((𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))))
8988oveq2d 6565 . . . . . . . . . . 11 (𝜑 → (ℝ D ((𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ℝ)) = (ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))))
9077reseq1d 5316 . . . . . . . . . . . 12 (𝜑 → ((ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ℝ) = ((𝑦 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ℝ))
91 resmpt 5369 . . . . . . . . . . . . 13 (ℝ ⊆ ℂ → ((𝑦 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
9236, 91ax-mp 5 . . . . . . . . . . . 12 ((𝑦 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))))
9390, 92syl6eq 2660 . . . . . . . . . . 11 (𝜑 → ((ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
9486, 89, 933eqtr3d 2652 . . . . . . . . . 10 (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) = (𝑦 ∈ ℝ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
9594reseq1d 5316 . . . . . . . . 9 (𝜑 → ((ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = ((𝑦 ∈ ℝ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
96 resmpt 5369 . . . . . . . . . 10 (((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ → ((𝑦 ∈ ℝ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
973, 96mp1i 13 . . . . . . . . 9 (𝜑 → ((𝑦 ∈ ℝ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
9865, 95, 973eqtrd 2648 . . . . . . . 8 (𝜑 → ((ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
9935, 54, 983eqtrd 2648 . . . . . . 7 (𝜑 → (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
100 dirkercncflem2.h . . . . . . . . 9 𝐻 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))))
101100a1i 11 . . . . . . . 8 (𝜑𝐻 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
102101eqcomd 2616 . . . . . . 7 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))) = 𝐻)
10330, 99, 1023eqtrd 2648 . . . . . 6 (𝜑 → (ℝ D 𝐹) = 𝐻)
104103dmeqd 5248 . . . . 5 (𝜑 → dom (ℝ D 𝐹) = dom 𝐻)
10511recnd 9947 . . . . . . 7 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑦 ∈ ℂ)
106105, 81syldan 486 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))) ∈ ℂ)
107100, 106dmmptd 5937 . . . . 5 (𝜑 → dom 𝐻 = ((𝐴(,)𝐵) ∖ {𝑌}))
108104, 107eqtr2d 2645 . . . 4 (𝜑 → ((𝐴(,)𝐵) ∖ {𝑌}) = dom (ℝ D 𝐹))
109 eqimss 3620 . . . 4 (((𝐴(,)𝐵) ∖ {𝑌}) = dom (ℝ D 𝐹) → ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ dom (ℝ D 𝐹))
110108, 109syl 17 . . 3 (𝜑 → ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ dom (ℝ D 𝐹))
111 dirkercncflem2.i . . . . . . . 8 𝐼 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (π · (cos‘(𝑦 / 2))))
112111a1i 11 . . . . . . 7 (𝜑𝐼 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (π · (cos‘(𝑦 / 2)))))
113 resmpt 5369 . . . . . . . . . . . . 13 (((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ → ((𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2)))))
1143, 113ax-mp 5 . . . . . . . . . . . 12 ((𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))
115114eqcomi 2619 . . . . . . . . . . 11 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2)))) = ((𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))
116115oveq2i 6560 . . . . . . . . . 10 (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))) = (ℝ D ((𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
117116a1i 11 . . . . . . . . 9 (𝜑 → (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))) = (ℝ D ((𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))))
118 2cn 10968 . . . . . . . . . . . . . 14 2 ∈ ℂ
119 picn 24015 . . . . . . . . . . . . . 14 π ∈ ℂ
120118, 119mulcli 9924 . . . . . . . . . . . . 13 (2 · π) ∈ ℂ
121120a1i 11 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ℝ) → (2 · π) ∈ ℂ)
12243halfcld 11154 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ℝ) → (𝑦 / 2) ∈ ℂ)
123122sincld 14699 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ℝ) → (sin‘(𝑦 / 2)) ∈ ℂ)
124121, 123mulcld 9939 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ℝ) → ((2 · π) · (sin‘(𝑦 / 2))) ∈ ℂ)
125 eqid 2610 . . . . . . . . . . 11 (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) = (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))
126124, 125fmptd 6292 . . . . . . . . . 10 (𝜑 → (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))):ℝ⟶ℂ)
12751, 52dvres 23481 . . . . . . . . . 10 (((ℝ ⊆ ℂ ∧ (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))):ℝ⟶ℂ) ∧ (ℝ ⊆ ℝ ∧ ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ)) → (ℝ D ((𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))) = ((ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))))
12837, 126, 50, 127syl21anc 1317 . . . . . . . . 9 (𝜑 → (ℝ D ((𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))) = ((ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))))
12964reseq2d 5317 . . . . . . . . . 10 (𝜑 → ((ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))) = ((ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
13036sseli 3564 . . . . . . . . . . . . . . . 16 (𝑦 ∈ ℝ → 𝑦 ∈ ℂ)
131 1cnd 9935 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ ℂ → 1 ∈ ℂ)
132 2cnd 10970 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ ℂ → 2 ∈ ℂ)
133 id 22 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ ℂ → 𝑦 ∈ ℂ)
134 2ne0 10990 . . . . . . . . . . . . . . . . . . . . . 22 2 ≠ 0
135134a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ ℂ → 2 ≠ 0)
136131, 132, 133, 135div13d 10704 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ ℂ → ((1 / 2) · 𝑦) = ((𝑦 / 2) · 1))
137 halfcl 11134 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ ℂ → (𝑦 / 2) ∈ ℂ)
138137mulid1d 9936 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ ℂ → ((𝑦 / 2) · 1) = (𝑦 / 2))
139136, 138eqtrd 2644 . . . . . . . . . . . . . . . . . . 19 (𝑦 ∈ ℂ → ((1 / 2) · 𝑦) = (𝑦 / 2))
140139fveq2d 6107 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ ℂ → (sin‘((1 / 2) · 𝑦)) = (sin‘(𝑦 / 2)))
141140oveq2d 6565 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ ℂ → ((2 · π) · (sin‘((1 / 2) · 𝑦))) = ((2 · π) · (sin‘(𝑦 / 2))))
142141eqcomd 2616 . . . . . . . . . . . . . . . 16 (𝑦 ∈ ℂ → ((2 · π) · (sin‘(𝑦 / 2))) = ((2 · π) · (sin‘((1 / 2) · 𝑦))))
143130, 142syl 17 . . . . . . . . . . . . . . 15 (𝑦 ∈ ℝ → ((2 · π) · (sin‘(𝑦 / 2))) = ((2 · π) · (sin‘((1 / 2) · 𝑦))))
144143adantl 481 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ℝ) → ((2 · π) · (sin‘(𝑦 / 2))) = ((2 · π) · (sin‘((1 / 2) · 𝑦))))
145144mpteq2dva 4672 . . . . . . . . . . . . 13 (𝜑 → (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) = (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))))
146145oveq2d 6565 . . . . . . . . . . . 12 (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) = (ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))))
147120a1i 11 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ ℂ) → (2 · π) ∈ ℂ)
14839a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ ℂ) → (1 / 2) ∈ ℂ)
149148, 69mulcld 9939 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ ℂ) → ((1 / 2) · 𝑦) ∈ ℂ)
150149sincld 14699 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ ℂ) → (sin‘((1 / 2) · 𝑦)) ∈ ℂ)
151147, 150mulcld 9939 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ ℂ) → ((2 · π) · (sin‘((1 / 2) · 𝑦))) ∈ ℂ)
152 eqid 2610 . . . . . . . . . . . . . . . 16 (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))) = (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))
153151, 152fmptd 6292 . . . . . . . . . . . . . . 15 (𝜑 → (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))):ℂ⟶ℂ)
154 2cnd 10970 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 2 ∈ ℂ)
155119a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → π ∈ ℂ)
156154, 155mulcld 9939 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (2 · π) ∈ ℂ)
157 dvasinbx 38810 . . . . . . . . . . . . . . . . . . . 20 (((2 · π) ∈ ℂ ∧ (1 / 2) ∈ ℂ) → (ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) = (𝑦 ∈ ℂ ↦ (((2 · π) · (1 / 2)) · (cos‘((1 / 2) · 𝑦)))))
158156, 39, 157sylancl 693 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) = (𝑦 ∈ ℂ ↦ (((2 · π) · (1 / 2)) · (cos‘((1 / 2) · 𝑦)))))
159 2cnd 10970 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑦 ∈ ℂ) → 2 ∈ ℂ)
160119a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑦 ∈ ℂ) → π ∈ ℂ)
161159, 160, 148mul32d 10125 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦 ∈ ℂ) → ((2 · π) · (1 / 2)) = ((2 · (1 / 2)) · π))
162134a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑦 ∈ ℂ) → 2 ≠ 0)
163159, 162recidd 10675 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑦 ∈ ℂ) → (2 · (1 / 2)) = 1)
164163oveq1d 6564 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦 ∈ ℂ) → ((2 · (1 / 2)) · π) = (1 · π))
165160mulid2d 9937 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦 ∈ ℂ) → (1 · π) = π)
166161, 164, 1653eqtrd 2648 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑦 ∈ ℂ) → ((2 · π) · (1 / 2)) = π)
167139fveq2d 6107 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 ∈ ℂ → (cos‘((1 / 2) · 𝑦)) = (cos‘(𝑦 / 2)))
168167adantl 481 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑦 ∈ ℂ) → (cos‘((1 / 2) · 𝑦)) = (cos‘(𝑦 / 2)))
169166, 168oveq12d 6567 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ ℂ) → (((2 · π) · (1 / 2)) · (cos‘((1 / 2) · 𝑦))) = (π · (cos‘(𝑦 / 2))))
170169mpteq2dva 4672 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑦 ∈ ℂ ↦ (((2 · π) · (1 / 2)) · (cos‘((1 / 2) · 𝑦)))) = (𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))))
171158, 170eqtrd 2644 . . . . . . . . . . . . . . . . . 18 (𝜑 → (ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) = (𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))))
172171dmeqd 5248 . . . . . . . . . . . . . . . . 17 (𝜑 → dom (ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) = dom (𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))))
173 eqid 2610 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))) = (𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2))))
17469halfcld 11154 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ ℂ) → (𝑦 / 2) ∈ ℂ)
175174coscld 14700 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ ℂ) → (cos‘(𝑦 / 2)) ∈ ℂ)
176160, 175mulcld 9939 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ ℂ) → (π · (cos‘(𝑦 / 2))) ∈ ℂ)
177173, 176dmmptd 5937 . . . . . . . . . . . . . . . . 17 (𝜑 → dom (𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))) = ℂ)
178172, 177eqtrd 2644 . . . . . . . . . . . . . . . 16 (𝜑 → dom (ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) = ℂ)
17936, 178syl5sseqr 3617 . . . . . . . . . . . . . . 15 (𝜑 → ℝ ⊆ dom (ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))))
180 dvres3 23483 . . . . . . . . . . . . . . 15 (((ℝ ∈ {ℝ, ℂ} ∧ (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))):ℂ⟶ℂ) ∧ (ℂ ⊆ ℂ ∧ ℝ ⊆ dom (ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))))) → (ℝ D ((𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))) ↾ ℝ)) = ((ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) ↾ ℝ))
18167, 153, 75, 179, 180syl22anc 1319 . . . . . . . . . . . . . 14 (𝜑 → (ℝ D ((𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))) ↾ ℝ)) = ((ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) ↾ ℝ))
182 resmpt 5369 . . . . . . . . . . . . . . . 16 (ℝ ⊆ ℂ → ((𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))))
18336, 182mp1i 13 . . . . . . . . . . . . . . 15 (𝜑 → ((𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))))
184183oveq2d 6565 . . . . . . . . . . . . . 14 (𝜑 → (ℝ D ((𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))) ↾ ℝ)) = (ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))))
185171reseq1d 5316 . . . . . . . . . . . . . 14 (𝜑 → ((ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) ↾ ℝ) = ((𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))) ↾ ℝ))
186181, 184, 1853eqtr3d 2652 . . . . . . . . . . . . 13 (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) = ((𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))) ↾ ℝ))
187 resmpt 5369 . . . . . . . . . . . . . 14 (ℝ ⊆ ℂ → ((𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ (π · (cos‘(𝑦 / 2)))))
18836, 187ax-mp 5 . . . . . . . . . . . . 13 ((𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ (π · (cos‘(𝑦 / 2))))
189186, 188syl6eq 2660 . . . . . . . . . . . 12 (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) = (𝑦 ∈ ℝ ↦ (π · (cos‘(𝑦 / 2)))))
190146, 189eqtrd 2644 . . . . . . . . . . 11 (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) = (𝑦 ∈ ℝ ↦ (π · (cos‘(𝑦 / 2)))))
191190reseq1d 5316 . . . . . . . . . 10 (𝜑 → ((ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = ((𝑦 ∈ ℝ ↦ (π · (cos‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
1924resmptd 5371 . . . . . . . . . 10 (𝜑 → ((𝑦 ∈ ℝ ↦ (π · (cos‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (π · (cos‘(𝑦 / 2)))))
193129, 191, 1923eqtrd 2648 . . . . . . . . 9 (𝜑 → ((ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (π · (cos‘(𝑦 / 2)))))
194117, 128, 1933eqtrd 2648 . . . . . . . 8 (𝜑 → (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (π · (cos‘(𝑦 / 2)))))
195194eqcomd 2616 . . . . . . 7 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (π · (cos‘(𝑦 / 2)))) = (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))))
19623a1i 11 . . . . . . . . 9 (𝜑𝐺 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2)))))
197196oveq2d 6565 . . . . . . . 8 (𝜑 → (ℝ D 𝐺) = (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))))
198197eqcomd 2616 . . . . . . 7 (𝜑 → (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))) = (ℝ D 𝐺))
199112, 195, 1983eqtrrd 2649 . . . . . 6 (𝜑 → (ℝ D 𝐺) = 𝐼)
200199dmeqd 5248 . . . . 5 (𝜑 → dom (ℝ D 𝐺) = dom 𝐼)
201105, 176syldan 486 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (π · (cos‘(𝑦 / 2))) ∈ ℂ)
202111, 201dmmptd 5937 . . . . 5 (𝜑 → dom 𝐼 = ((𝐴(,)𝐵) ∖ {𝑌}))
203200, 202eqtr2d 2645 . . . 4 (𝜑 → ((𝐴(,)𝐵) ∖ {𝑌}) = dom (ℝ D 𝐺))
204 eqimss 3620 . . . 4 (((𝐴(,)𝐵) ∖ {𝑌}) = dom (ℝ D 𝐺) → ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ dom (ℝ D 𝐺))
205203, 204syl 17 . . 3 (𝜑 → ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ dom (ℝ D 𝐺))
206105, 70syldan 486 . . . . . . . 8 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑁 + (1 / 2)) · 𝑦) ∈ ℂ)
207206ralrimiva 2949 . . . . . . 7 (𝜑 → ∀𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})((𝑁 + (1 / 2)) · 𝑦) ∈ ℂ)
208 eqid 2610 . . . . . . . 8 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))
209208fnmpt 5933 . . . . . . 7 (∀𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})((𝑁 + (1 / 2)) · 𝑦) ∈ ℂ → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) Fn ((𝐴(,)𝐵) ∖ {𝑌}))
210207, 209syl 17 . . . . . 6 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) Fn ((𝐴(,)𝐵) ∖ {𝑌}))
211 eqidd 2611 . . . . . . . . . 10 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)))
212 simpr 476 . . . . . . . . . . 11 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ 𝑦 = 𝑤) → 𝑦 = 𝑤)
213212oveq2d 6565 . . . . . . . . . 10 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ 𝑦 = 𝑤) → ((𝑁 + (1 / 2)) · 𝑦) = ((𝑁 + (1 / 2)) · 𝑤))
214 simpr 476 . . . . . . . . . 10 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}))
21538adantr 480 . . . . . . . . . . . 12 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑁 ∈ ℂ)
216 1cnd 9935 . . . . . . . . . . . . 13 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 1 ∈ ℂ)
217216halfcld 11154 . . . . . . . . . . . 12 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (1 / 2) ∈ ℂ)
218215, 217addcld 9938 . . . . . . . . . . 11 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑁 + (1 / 2)) ∈ ℂ)
219 eldifi 3694 . . . . . . . . . . . . . 14 (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → 𝑤 ∈ (𝐴(,)𝐵))
220 elioore 12076 . . . . . . . . . . . . . 14 (𝑤 ∈ (𝐴(,)𝐵) → 𝑤 ∈ ℝ)
221219, 220syl 17 . . . . . . . . . . . . 13 (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → 𝑤 ∈ ℝ)
222221recnd 9947 . . . . . . . . . . . 12 (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → 𝑤 ∈ ℂ)
223222adantl 481 . . . . . . . . . . 11 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑤 ∈ ℂ)
224218, 223mulcld 9939 . . . . . . . . . 10 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑁 + (1 / 2)) · 𝑤) ∈ ℂ)
225211, 213, 214, 224fvmptd 6197 . . . . . . . . 9 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤) = ((𝑁 + (1 / 2)) · 𝑤))
226 eleq1 2676 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑤 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↔ 𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})))
227226anbi2d 736 . . . . . . . . . . . . . . 15 (𝑦 = 𝑤 → ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ↔ (𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}))))
228 oveq1 6556 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑤 → (𝑦 mod (2 · π)) = (𝑤 mod (2 · π)))
229228neeq1d 2841 . . . . . . . . . . . . . . 15 (𝑦 = 𝑤 → ((𝑦 mod (2 · π)) ≠ 0 ↔ (𝑤 mod (2 · π)) ≠ 0))
230227, 229imbi12d 333 . . . . . . . . . . . . . 14 (𝑦 = 𝑤 → (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑦 mod (2 · π)) ≠ 0) ↔ ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑤 mod (2 · π)) ≠ 0)))
231 eldifi 3694 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → 𝑦 ∈ (𝐴(,)𝐵))
232 elioore 12076 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ (𝐴(,)𝐵) → 𝑦 ∈ ℝ)
233231, 232, 1303syl 18 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → 𝑦 ∈ ℂ)
234 2cnd 10970 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → 2 ∈ ℂ)
235119a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → π ∈ ℂ)
236134a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → 2 ≠ 0)
237 0re 9919 . . . . . . . . . . . . . . . . . . . . . 22 0 ∈ ℝ
238 pipos 24016 . . . . . . . . . . . . . . . . . . . . . 22 0 < π
239237, 238gtneii 10028 . . . . . . . . . . . . . . . . . . . . 21 π ≠ 0
240239a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → π ≠ 0)
241233, 234, 235, 236, 240divdiv1d 10711 . . . . . . . . . . . . . . . . . . 19 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → ((𝑦 / 2) / π) = (𝑦 / (2 · π)))
242241eqcomd 2616 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → (𝑦 / (2 · π)) = ((𝑦 / 2) / π))
243242adantl 481 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑦 / (2 · π)) = ((𝑦 / 2) / π))
244 dirkercncflem2.yne0 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (sin‘(𝑦 / 2)) ≠ 0)
245244neneqd 2787 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ (sin‘(𝑦 / 2)) = 0)
246105halfcld 11154 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑦 / 2) ∈ ℂ)
247 sineq0 24077 . . . . . . . . . . . . . . . . . . 19 ((𝑦 / 2) ∈ ℂ → ((sin‘(𝑦 / 2)) = 0 ↔ ((𝑦 / 2) / π) ∈ ℤ))
248246, 247syl 17 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((sin‘(𝑦 / 2)) = 0 ↔ ((𝑦 / 2) / π) ∈ ℤ))
249245, 248mtbid 313 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ ((𝑦 / 2) / π) ∈ ℤ)
250243, 249eqneltrd 2707 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ (𝑦 / (2 · π)) ∈ ℤ)
251 2rp 11713 . . . . . . . . . . . . . . . . . 18 2 ∈ ℝ+
252 pirp 24017 . . . . . . . . . . . . . . . . . 18 π ∈ ℝ+
253 rpmulcl 11731 . . . . . . . . . . . . . . . . . 18 ((2 ∈ ℝ+ ∧ π ∈ ℝ+) → (2 · π) ∈ ℝ+)
254251, 252, 253mp2an 704 . . . . . . . . . . . . . . . . 17 (2 · π) ∈ ℝ+
255 mod0 12537 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ℝ ∧ (2 · π) ∈ ℝ+) → ((𝑦 mod (2 · π)) = 0 ↔ (𝑦 / (2 · π)) ∈ ℤ))
25611, 254, 255sylancl 693 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑦 mod (2 · π)) = 0 ↔ (𝑦 / (2 · π)) ∈ ℤ))
257250, 256mtbird 314 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ (𝑦 mod (2 · π)) = 0)
258257neqned 2789 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑦 mod (2 · π)) ≠ 0)
259230, 258chvarv 2251 . . . . . . . . . . . . 13 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑤 mod (2 · π)) ≠ 0)
260259neneqd 2787 . . . . . . . . . . . 12 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ (𝑤 mod (2 · π)) = 0)
261 simpll 786 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → 𝜑)
262 simpr 476 . . . . . . . . . . . . . 14 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌))
263222ad2antlr 759 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → 𝑤 ∈ ℂ)
26457recnd 9947 . . . . . . . . . . . . . . . 16 (𝜑𝑌 ∈ ℂ)
265264ad2antrr 758 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → 𝑌 ∈ ℂ)
266 0red 9920 . . . . . . . . . . . . . . . . . . 19 (𝜑 → 0 ∈ ℝ)
2675nnred 10912 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑁 ∈ ℝ)
268 1red 9934 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 1 ∈ ℝ)
269268rehalfcld 11156 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (1 / 2) ∈ ℝ)
270267, 269readdcld 9948 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑁 + (1 / 2)) ∈ ℝ)
2715nngt0d 10941 . . . . . . . . . . . . . . . . . . 19 (𝜑 → 0 < 𝑁)
272251a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 2 ∈ ℝ+)
273272rpreccld 11758 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (1 / 2) ∈ ℝ+)
274267, 273ltaddrpd 11781 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑁 < (𝑁 + (1 / 2)))
275266, 267, 270, 271, 274lttrd 10077 . . . . . . . . . . . . . . . . . 18 (𝜑 → 0 < (𝑁 + (1 / 2)))
276275gt0ne0d 10471 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑁 + (1 / 2)) ≠ 0)
27741, 276jca 553 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑁 + (1 / 2)) ∈ ℂ ∧ (𝑁 + (1 / 2)) ≠ 0))
278277ad2antrr 758 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → ((𝑁 + (1 / 2)) ∈ ℂ ∧ (𝑁 + (1 / 2)) ≠ 0))
279 mulcan 10543 . . . . . . . . . . . . . . 15 ((𝑤 ∈ ℂ ∧ 𝑌 ∈ ℂ ∧ ((𝑁 + (1 / 2)) ∈ ℂ ∧ (𝑁 + (1 / 2)) ≠ 0)) → (((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌) ↔ 𝑤 = 𝑌))
280263, 265, 278, 279syl3anc 1318 . . . . . . . . . . . . . 14 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → (((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌) ↔ 𝑤 = 𝑌))
281262, 280mpbid 221 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → 𝑤 = 𝑌)
282 oveq1 6556 . . . . . . . . . . . . . 14 (𝑤 = 𝑌 → (𝑤 mod (2 · π)) = (𝑌 mod (2 · π)))
283 dirkercncflem2.ymod . . . . . . . . . . . . . 14 (𝜑 → (𝑌 mod (2 · π)) = 0)
284282, 283sylan9eqr 2666 . . . . . . . . . . . . 13 ((𝜑𝑤 = 𝑌) → (𝑤 mod (2 · π)) = 0)
285261, 281, 284syl2anc 691 . . . . . . . . . . . 12 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → (𝑤 mod (2 · π)) = 0)
286260, 285mtand 689 . . . . . . . . . . 11 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌))
28741, 264mulcld 9939 . . . . . . . . . . . . 13 (𝜑 → ((𝑁 + (1 / 2)) · 𝑌) ∈ ℂ)
288287adantr 480 . . . . . . . . . . . 12 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑁 + (1 / 2)) · 𝑌) ∈ ℂ)
289 elsn2g 4157 . . . . . . . . . . . 12 (((𝑁 + (1 / 2)) · 𝑌) ∈ ℂ → (((𝑁 + (1 / 2)) · 𝑤) ∈ {((𝑁 + (1 / 2)) · 𝑌)} ↔ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)))
290288, 289syl 17 . . . . . . . . . . 11 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (((𝑁 + (1 / 2)) · 𝑤) ∈ {((𝑁 + (1 / 2)) · 𝑌)} ↔ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)))
291286, 290mtbird 314 . . . . . . . . . 10 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ ((𝑁 + (1 / 2)) · 𝑤) ∈ {((𝑁 + (1 / 2)) · 𝑌)})
292224, 291eldifd 3551 . . . . . . . . 9 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑁 + (1 / 2)) · 𝑤) ∈ (ℂ ∖ {((𝑁 + (1 / 2)) · 𝑌)}))
293225, 292eqeltrd 2688 . . . . . . . 8 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤) ∈ (ℂ ∖ {((𝑁 + (1 / 2)) · 𝑌)}))
294 sinf 14693 . . . . . . . . . . . 12 sin:ℂ⟶ℂ
295294fdmi 5965 . . . . . . . . . . 11 dom sin = ℂ
296295eqcomi 2619 . . . . . . . . . 10 ℂ = dom sin
297296a1i 11 . . . . . . . . 9 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ℂ = dom sin)
298297difeq1d 3689 . . . . . . . 8 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (ℂ ∖ {((𝑁 + (1 / 2)) · 𝑌)}) = (dom sin ∖ {((𝑁 + (1 / 2)) · 𝑌)}))
299293, 298eleqtrd 2690 . . . . . . 7 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤) ∈ (dom sin ∖ {((𝑁 + (1 / 2)) · 𝑌)}))
300299ralrimiva 2949 . . . . . 6 (𝜑 → ∀𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤) ∈ (dom sin ∖ {((𝑁 + (1 / 2)) · 𝑌)}))
301 fnfvrnss 6297 . . . . . 6 (((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) Fn ((𝐴(,)𝐵) ∖ {𝑌}) ∧ ∀𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤) ∈ (dom sin ∖ {((𝑁 + (1 / 2)) · 𝑌)})) → ran (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) ⊆ (dom sin ∖ {((𝑁 + (1 / 2)) · 𝑌)}))
302210, 300, 301syl2anc 691 . . . . 5 (𝜑 → ran (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) ⊆ (dom sin ∖ {((𝑁 + (1 / 2)) · 𝑌)}))
303 uncom 3719 . . . . . . . . . 10 (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) = ({𝑌} ∪ ((𝐴(,)𝐵) ∖ {𝑌}))
304303a1i 11 . . . . . . . . 9 (𝜑 → (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) = ({𝑌} ∪ ((𝐴(,)𝐵) ∖ {𝑌})))
30527snssd 4281 . . . . . . . . . 10 (𝜑 → {𝑌} ⊆ (𝐴(,)𝐵))
306 undif 4001 . . . . . . . . . 10 ({𝑌} ⊆ (𝐴(,)𝐵) ↔ ({𝑌} ∪ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝐴(,)𝐵))
307305, 306sylib 207 . . . . . . . . 9 (𝜑 → ({𝑌} ∪ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝐴(,)𝐵))
308304, 307eqtrd 2644 . . . . . . . 8 (𝜑 → (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) = (𝐴(,)𝐵))
309308mpteq1d 4666 . . . . . . 7 (𝜑 → (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))))
310 iftrue 4042 . . . . . . . . . . . . 13 (𝑤 = 𝑌 → if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = ((𝑁 + (1 / 2)) · 𝑌))
311 oveq2 6557 . . . . . . . . . . . . 13 (𝑤 = 𝑌 → ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌))
312310, 311eqtr4d 2647 . . . . . . . . . . . 12 (𝑤 = 𝑌 → if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = ((𝑁 + (1 / 2)) · 𝑤))
313312adantl 481 . . . . . . . . . . 11 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = ((𝑁 + (1 / 2)) · 𝑤))
314 iffalse 4045 . . . . . . . . . . . . 13 𝑤 = 𝑌 → if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))
315314adantl 481 . . . . . . . . . . . 12 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))
316 eqidd 2611 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)))
317 oveq2 6557 . . . . . . . . . . . . . 14 (𝑦 = 𝑤 → ((𝑁 + (1 / 2)) · 𝑦) = ((𝑁 + (1 / 2)) · 𝑤))
318317adantl 481 . . . . . . . . . . . . 13 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → ((𝑁 + (1 / 2)) · 𝑦) = ((𝑁 + (1 / 2)) · 𝑤))
319 simpl 472 . . . . . . . . . . . . . . 15 ((𝑤 ∈ (𝐴(,)𝐵) ∧ ¬ 𝑤 = 𝑌) → 𝑤 ∈ (𝐴(,)𝐵))
320 id 22 . . . . . . . . . . . . . . . . 17 𝑤 = 𝑌 → ¬ 𝑤 = 𝑌)
321 velsn 4141 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ {𝑌} ↔ 𝑤 = 𝑌)
322320, 321sylnibr 318 . . . . . . . . . . . . . . . 16 𝑤 = 𝑌 → ¬ 𝑤 ∈ {𝑌})
323322adantl 481 . . . . . . . . . . . . . . 15 ((𝑤 ∈ (𝐴(,)𝐵) ∧ ¬ 𝑤 = 𝑌) → ¬ 𝑤 ∈ {𝑌})
324319, 323eldifd 3551 . . . . . . . . . . . . . 14 ((𝑤 ∈ (𝐴(,)𝐵) ∧ ¬ 𝑤 = 𝑌) → 𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}))
325324adantll 746 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → 𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}))
32641adantr 480 . . . . . . . . . . . . . . 15 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (𝑁 + (1 / 2)) ∈ ℂ)
327220recnd 9947 . . . . . . . . . . . . . . . 16 (𝑤 ∈ (𝐴(,)𝐵) → 𝑤 ∈ ℂ)
328327adantl 481 . . . . . . . . . . . . . . 15 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → 𝑤 ∈ ℂ)
329326, 328mulcld 9939 . . . . . . . . . . . . . 14 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → ((𝑁 + (1 / 2)) · 𝑤) ∈ ℂ)
330329adantr 480 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → ((𝑁 + (1 / 2)) · 𝑤) ∈ ℂ)
331316, 318, 325, 330fvmptd 6197 . . . . . . . . . . . 12 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤) = ((𝑁 + (1 / 2)) · 𝑤))
332315, 331eqtrd 2644 . . . . . . . . . . 11 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = ((𝑁 + (1 / 2)) · 𝑤))
333313, 332pm2.61dan 828 . . . . . . . . . 10 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = ((𝑁 + (1 / 2)) · 𝑤))
334333mpteq2dva 4672 . . . . . . . . 9 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)))
335 ioosscn 38563 . . . . . . . . . . . . . 14 (𝐴(,)𝐵) ⊆ ℂ
336 resmpt 5369 . . . . . . . . . . . . . 14 ((𝐴(,)𝐵) ⊆ ℂ → ((𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ↾ (𝐴(,)𝐵)) = (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)))
337335, 336ax-mp 5 . . . . . . . . . . . . 13 ((𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ↾ (𝐴(,)𝐵)) = (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤))
338 eqid 2610 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) = (𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤))
339338mulc1cncf 22516 . . . . . . . . . . . . . . . 16 ((𝑁 + (1 / 2)) ∈ ℂ → (𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ (ℂ–cn→ℂ))
34041, 339syl 17 . . . . . . . . . . . . . . 15 (𝜑 → (𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ (ℂ–cn→ℂ))
34151cnfldtop 22397 . . . . . . . . . . . . . . . . . . 19 (TopOpen‘ℂfld) ∈ Top
342 unicntop 38230 . . . . . . . . . . . . . . . . . . . 20 ℂ = (TopOpen‘ℂfld)
343342restid 15917 . . . . . . . . . . . . . . . . . . 19 ((TopOpen‘ℂfld) ∈ Top → ((TopOpen‘ℂfld) ↾t ℂ) = (TopOpen‘ℂfld))
344341, 343ax-mp 5 . . . . . . . . . . . . . . . . . 18 ((TopOpen‘ℂfld) ↾t ℂ) = (TopOpen‘ℂfld)
345344eqcomi 2619 . . . . . . . . . . . . . . . . 17 (TopOpen‘ℂfld) = ((TopOpen‘ℂfld) ↾t ℂ)
34651, 345, 345cncfcn 22520 . . . . . . . . . . . . . . . 16 ((ℂ ⊆ ℂ ∧ ℂ ⊆ ℂ) → (ℂ–cn→ℂ) = ((TopOpen‘ℂfld) Cn (TopOpen‘ℂfld)))
34774, 75, 346sylancr 694 . . . . . . . . . . . . . . 15 (𝜑 → (ℂ–cn→ℂ) = ((TopOpen‘ℂfld) Cn (TopOpen‘ℂfld)))
348340, 347eleqtrd 2690 . . . . . . . . . . . . . 14 (𝜑 → (𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((TopOpen‘ℂfld) Cn (TopOpen‘ℂfld)))
3492, 37syl5ss 3579 . . . . . . . . . . . . . 14 (𝜑 → (𝐴(,)𝐵) ⊆ ℂ)
350342cnrest 20899 . . . . . . . . . . . . . 14 (((𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((TopOpen‘ℂfld) Cn (TopOpen‘ℂfld)) ∧ (𝐴(,)𝐵) ⊆ ℂ) → ((𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ↾ (𝐴(,)𝐵)) ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
351348, 349, 350syl2anc 691 . . . . . . . . . . . . 13 (𝜑 → ((𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ↾ (𝐴(,)𝐵)) ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
352337, 351syl5eqelr 2693 . . . . . . . . . . . 12 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
35351cnfldtopon 22396 . . . . . . . . . . . . . 14 (TopOpen‘ℂfld) ∈ (TopOn‘ℂ)
354 resttopon 20775 . . . . . . . . . . . . . 14 (((TopOpen‘ℂfld) ∈ (TopOn‘ℂ) ∧ (𝐴(,)𝐵) ⊆ ℂ) → ((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) ∈ (TopOn‘(𝐴(,)𝐵)))
355353, 349, 354sylancr 694 . . . . . . . . . . . . 13 (𝜑 → ((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) ∈ (TopOn‘(𝐴(,)𝐵)))
356 cncnp 20894 . . . . . . . . . . . . 13 ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) ∈ (TopOn‘(𝐴(,)𝐵)) ∧ (TopOpen‘ℂfld) ∈ (TopOn‘ℂ)) → ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)) ↔ ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)):(𝐴(,)𝐵)⟶ℂ ∧ ∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦))))
357355, 353, 356sylancl 693 . . . . . . . . . . . 12 (𝜑 → ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)) ↔ ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)):(𝐴(,)𝐵)⟶ℂ ∧ ∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦))))
358352, 357mpbid 221 . . . . . . . . . . 11 (𝜑 → ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)):(𝐴(,)𝐵)⟶ℂ ∧ ∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦)))
359358simprd 478 . . . . . . . . . 10 (𝜑 → ∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦))
360 fveq2 6103 . . . . . . . . . . . 12 (𝑦 = 𝑌 → ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦) = ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
361360eleq2d 2673 . . . . . . . . . . 11 (𝑦 = 𝑌 → ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦) ↔ (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌)))
362361rspccva 3281 . . . . . . . . . 10 ((∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦) ∧ 𝑌 ∈ (𝐴(,)𝐵)) → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
363359, 27, 362syl2anc 691 . . . . . . . . 9 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
364334, 363eqeltrd 2688 . . . . . . . 8 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
365308eqcomd 2616 . . . . . . . . . . 11 (𝜑 → (𝐴(,)𝐵) = (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}))
366365oveq2d 6565 . . . . . . . . . 10 (𝜑 → ((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) = ((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})))
367366oveq1d 6564 . . . . . . . . 9 (𝜑 → (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld)) = (((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld)))
368367fveq1d 6105 . . . . . . . 8 (𝜑 → ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌) = ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌))
369364, 368eleqtrd 2690 . . . . . . 7 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌))
370309, 369eqeltrd 2688 . . . . . 6 (𝜑 → (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌))
371 eqid 2610 . . . . . . 7 ((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) = ((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}))
372 eqid 2610 . . . . . . 7 (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) = (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)))
373206, 208fmptd 6292 . . . . . . 7 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)):((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ)
3744, 36syl6ss 3580 . . . . . . 7 (𝜑 → ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℂ)
375371, 51, 372, 373, 374, 264ellimc 23443 . . . . . 6 (𝜑 → (((𝑁 + (1 / 2)) · 𝑌) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) lim 𝑌) ↔ (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌)))
376370, 375mpbird 246 . . . . 5 (𝜑 → ((𝑁 + (1 / 2)) · 𝑌) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) lim 𝑌))
377134a1i 11 . . . . . . . . . . . 12 (𝜑 → 2 ≠ 0)
378239a1i 11 . . . . . . . . . . . 12 (𝜑 → π ≠ 0)
379154, 155, 377, 378mulne0d 10558 . . . . . . . . . . 11 (𝜑 → (2 · π) ≠ 0)
380264, 156, 379divcan1d 10681 . . . . . . . . . 10 (𝜑 → ((𝑌 / (2 · π)) · (2 · π)) = 𝑌)
381380eqcomd 2616 . . . . . . . . 9 (𝜑𝑌 = ((𝑌 / (2 · π)) · (2 · π)))
382381oveq2d 6565 . . . . . . . 8 (𝜑 → ((𝑁 + (1 / 2)) · 𝑌) = ((𝑁 + (1 / 2)) · ((𝑌 / (2 · π)) · (2 · π))))
383382fveq2d 6107 . . . . . . 7 (𝜑 → (sin‘((𝑁 + (1 / 2)) · 𝑌)) = (sin‘((𝑁 + (1 / 2)) · ((𝑌 / (2 · π)) · (2 · π)))))
384264, 156, 379divcld 10680 . . . . . . . . . . 11 (𝜑 → (𝑌 / (2 · π)) ∈ ℂ)
38541, 384, 156mul12d 10124 . . . . . . . . . 10 (𝜑 → ((𝑁 + (1 / 2)) · ((𝑌 / (2 · π)) · (2 · π))) = ((𝑌 / (2 · π)) · ((𝑁 + (1 / 2)) · (2 · π))))
38641, 154, 155mulassd 9942 . . . . . . . . . . . 12 (𝜑 → (((𝑁 + (1 / 2)) · 2) · π) = ((𝑁 + (1 / 2)) · (2 · π)))
387386eqcomd 2616 . . . . . . . . . . 11 (𝜑 → ((𝑁 + (1 / 2)) · (2 · π)) = (((𝑁 + (1 / 2)) · 2) · π))
388387oveq2d 6565 . . . . . . . . . 10 (𝜑 → ((𝑌 / (2 · π)) · ((𝑁 + (1 / 2)) · (2 · π))) = ((𝑌 / (2 · π)) · (((𝑁 + (1 / 2)) · 2) · π)))
38938, 40, 154adddird 9944 . . . . . . . . . . . . 13 (𝜑 → ((𝑁 + (1 / 2)) · 2) = ((𝑁 · 2) + ((1 / 2) · 2)))
390154, 377recid2d 10676 . . . . . . . . . . . . . 14 (𝜑 → ((1 / 2) · 2) = 1)
391390oveq2d 6565 . . . . . . . . . . . . 13 (𝜑 → ((𝑁 · 2) + ((1 / 2) · 2)) = ((𝑁 · 2) + 1))
392389, 391eqtrd 2644 . . . . . . . . . . . 12 (𝜑 → ((𝑁 + (1 / 2)) · 2) = ((𝑁 · 2) + 1))
393392oveq1d 6564 . . . . . . . . . . 11 (𝜑 → (((𝑁 + (1 / 2)) · 2) · π) = (((𝑁 · 2) + 1) · π))
394393oveq2d 6565 . . . . . . . . . 10 (𝜑 → ((𝑌 / (2 · π)) · (((𝑁 + (1 / 2)) · 2) · π)) = ((𝑌 / (2 · π)) · (((𝑁 · 2) + 1) · π)))
395385, 388, 3943eqtrd 2648 . . . . . . . . 9 (𝜑 → ((𝑁 + (1 / 2)) · ((𝑌 / (2 · π)) · (2 · π))) = ((𝑌 / (2 · π)) · (((𝑁 · 2) + 1) · π)))
39638, 154mulcld 9939 . . . . . . . . . . 11 (𝜑 → (𝑁 · 2) ∈ ℂ)
397 1cnd 9935 . . . . . . . . . . 11 (𝜑 → 1 ∈ ℂ)
398396, 397addcld 9938 . . . . . . . . . 10 (𝜑 → ((𝑁 · 2) + 1) ∈ ℂ)
399384, 398, 155mulassd 9942 . . . . . . . . 9 (𝜑 → (((𝑌 / (2 · π)) · ((𝑁 · 2) + 1)) · π) = ((𝑌 / (2 · π)) · (((𝑁 · 2) + 1) · π)))
400395, 399eqtr4d 2647 . . . . . . . 8 (𝜑 → ((𝑁 + (1 / 2)) · ((𝑌 / (2 · π)) · (2 · π))) = (((𝑌 / (2 · π)) · ((𝑁 · 2) + 1)) · π))
401400fveq2d 6107 . . . . . . 7 (𝜑 → (sin‘((𝑁 + (1 / 2)) · ((𝑌 / (2 · π)) · (2 · π)))) = (sin‘(((𝑌 / (2 · π)) · ((𝑁 · 2) + 1)) · π)))
402 mod0 12537 . . . . . . . . . . 11 ((𝑌 ∈ ℝ ∧ (2 · π) ∈ ℝ+) → ((𝑌 mod (2 · π)) = 0 ↔ (𝑌 / (2 · π)) ∈ ℤ))
40357, 254, 402sylancl 693 . . . . . . . . . 10 (𝜑 → ((𝑌 mod (2 · π)) = 0 ↔ (𝑌 / (2 · π)) ∈ ℤ))
404283, 403mpbid 221 . . . . . . . . 9 (𝜑 → (𝑌 / (2 · π)) ∈ ℤ)
4055nnzd 11357 . . . . . . . . . . 11 (𝜑𝑁 ∈ ℤ)
406 2z 11286 . . . . . . . . . . . 12 2 ∈ ℤ
407406a1i 11 . . . . . . . . . . 11 (𝜑 → 2 ∈ ℤ)
408405, 407zmulcld 11364 . . . . . . . . . 10 (𝜑 → (𝑁 · 2) ∈ ℤ)
409408peano2zd 11361 . . . . . . . . 9 (𝜑 → ((𝑁 · 2) + 1) ∈ ℤ)
410404, 409zmulcld 11364 . . . . . . . 8 (𝜑 → ((𝑌 / (2 · π)) · ((𝑁 · 2) + 1)) ∈ ℤ)
411 sinkpi 24075 . . . . . . . 8 (((𝑌 / (2 · π)) · ((𝑁 · 2) + 1)) ∈ ℤ → (sin‘(((𝑌 / (2 · π)) · ((𝑁 · 2) + 1)) · π)) = 0)
412410, 411syl 17 . . . . . . 7 (𝜑 → (sin‘(((𝑌 / (2 · π)) · ((𝑁 · 2) + 1)) · π)) = 0)
413383, 401, 4123eqtrd 2648 . . . . . 6 (𝜑 → (sin‘((𝑁 + (1 / 2)) · 𝑌)) = 0)
414 sincn 24002 . . . . . . . 8 sin ∈ (ℂ–cn→ℂ)
415414a1i 11 . . . . . . 7 (𝜑 → sin ∈ (ℂ–cn→ℂ))
416415, 287cnlimci 23459 . . . . . 6 (𝜑 → (sin‘((𝑁 + (1 / 2)) · 𝑌)) ∈ (sin lim ((𝑁 + (1 / 2)) · 𝑌)))
417413, 416eqeltrrd 2689 . . . . 5 (𝜑 → 0 ∈ (sin lim ((𝑁 + (1 / 2)) · 𝑌)))
418302, 376, 417limccog 38687 . . . 4 (𝜑 → 0 ∈ ((sin ∘ (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))) lim 𝑌))
41914a1i 11 . . . . . . . . 9 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝐹 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))))
420213fveq2d 6107 . . . . . . . . 9 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ 𝑦 = 𝑤) → (sin‘((𝑁 + (1 / 2)) · 𝑦)) = (sin‘((𝑁 + (1 / 2)) · 𝑤)))
421224sincld 14699 . . . . . . . . 9 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (sin‘((𝑁 + (1 / 2)) · 𝑤)) ∈ ℂ)
422419, 420, 214, 421fvmptd 6197 . . . . . . . 8 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝐹𝑤) = (sin‘((𝑁 + (1 / 2)) · 𝑤)))
423225fveq2d 6107 . . . . . . . 8 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (sin‘((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = (sin‘((𝑁 + (1 / 2)) · 𝑤)))
424422, 423eqtr4d 2647 . . . . . . 7 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝐹𝑤) = (sin‘((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)))
425424mpteq2dva 4672 . . . . . 6 (𝜑 → (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (𝐹𝑤)) = (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))))
42615feqmptd 6159 . . . . . 6 (𝜑𝐹 = (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (𝐹𝑤)))
427 fcompt 6306 . . . . . . 7 ((sin:ℂ⟶ℂ ∧ (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)):((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ) → (sin ∘ (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))) = (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))))
428294, 373, 427sylancr 694 . . . . . 6 (𝜑 → (sin ∘ (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))) = (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))))
429425, 426, 4283eqtr4rd 2655 . . . . 5 (𝜑 → (sin ∘ (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))) = 𝐹)
430429oveq1d 6564 . . . 4 (𝜑 → ((sin ∘ (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))) lim 𝑌) = (𝐹 lim 𝑌))
431418, 430eleqtrd 2690 . . 3 (𝜑 → 0 ∈ (𝐹 lim 𝑌))
432 simpr 476 . . . . . . . . . 10 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → 𝑤 = 𝑌)
433432iftrued 4044 . . . . . . . . 9 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → if(𝑤 = 𝑌, 0, (𝐺𝑤)) = 0)
434264, 154, 156, 377, 379divdiv32d 10705 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑌 / 2) / (2 · π)) = ((𝑌 / (2 · π)) / 2))
435434oveq1d 6564 . . . . . . . . . . . . . . . 16 (𝜑 → (((𝑌 / 2) / (2 · π)) · (2 · π)) = (((𝑌 / (2 · π)) / 2) · (2 · π)))
436264halfcld 11154 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑌 / 2) ∈ ℂ)
437436, 156, 379divcan1d 10681 . . . . . . . . . . . . . . . 16 (𝜑 → (((𝑌 / 2) / (2 · π)) · (2 · π)) = (𝑌 / 2))
438384, 154, 156, 377div32d 10703 . . . . . . . . . . . . . . . . 17 (𝜑 → (((𝑌 / (2 · π)) / 2) · (2 · π)) = ((𝑌 / (2 · π)) · ((2 · π) / 2)))
439155, 154, 377divcan3d 10685 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((2 · π) / 2) = π)
440439oveq2d 6565 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑌 / (2 · π)) · ((2 · π) / 2)) = ((𝑌 / (2 · π)) · π))
441438, 440eqtrd 2644 . . . . . . . . . . . . . . . 16 (𝜑 → (((𝑌 / (2 · π)) / 2) · (2 · π)) = ((𝑌 / (2 · π)) · π))
442435, 437, 4413eqtr3d 2652 . . . . . . . . . . . . . . 15 (𝜑 → (𝑌 / 2) = ((𝑌 / (2 · π)) · π))
443442fveq2d 6107 . . . . . . . . . . . . . 14 (𝜑 → (sin‘(𝑌 / 2)) = (sin‘((𝑌 / (2 · π)) · π)))
444 sinkpi 24075 . . . . . . . . . . . . . . 15 ((𝑌 / (2 · π)) ∈ ℤ → (sin‘((𝑌 / (2 · π)) · π)) = 0)
445404, 444syl 17 . . . . . . . . . . . . . 14 (𝜑 → (sin‘((𝑌 / (2 · π)) · π)) = 0)
446443, 445eqtrd 2644 . . . . . . . . . . . . 13 (𝜑 → (sin‘(𝑌 / 2)) = 0)
447446oveq2d 6565 . . . . . . . . . . . 12 (𝜑 → ((2 · π) · (sin‘(𝑌 / 2))) = ((2 · π) · 0))
448156mul01d 10114 . . . . . . . . . . . 12 (𝜑 → ((2 · π) · 0) = 0)
449447, 448eqtrd 2644 . . . . . . . . . . 11 (𝜑 → ((2 · π) · (sin‘(𝑌 / 2))) = 0)
450449eqcomd 2616 . . . . . . . . . 10 (𝜑 → 0 = ((2 · π) · (sin‘(𝑌 / 2))))
451450ad2antrr 758 . . . . . . . . 9 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → 0 = ((2 · π) · (sin‘(𝑌 / 2))))
452 oveq1 6556 . . . . . . . . . . . . 13 (𝑤 = 𝑌 → (𝑤 / 2) = (𝑌 / 2))
453452fveq2d 6107 . . . . . . . . . . . 12 (𝑤 = 𝑌 → (sin‘(𝑤 / 2)) = (sin‘(𝑌 / 2)))
454453oveq2d 6565 . . . . . . . . . . 11 (𝑤 = 𝑌 → ((2 · π) · (sin‘(𝑤 / 2))) = ((2 · π) · (sin‘(𝑌 / 2))))
455454eqcomd 2616 . . . . . . . . . 10 (𝑤 = 𝑌 → ((2 · π) · (sin‘(𝑌 / 2))) = ((2 · π) · (sin‘(𝑤 / 2))))
456455adantl 481 . . . . . . . . 9 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → ((2 · π) · (sin‘(𝑌 / 2))) = ((2 · π) · (sin‘(𝑤 / 2))))
457433, 451, 4563eqtrd 2648 . . . . . . . 8 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → if(𝑤 = 𝑌, 0, (𝐺𝑤)) = ((2 · π) · (sin‘(𝑤 / 2))))
458 iffalse 4045 . . . . . . . . . 10 𝑤 = 𝑌 → if(𝑤 = 𝑌, 0, (𝐺𝑤)) = (𝐺𝑤))
459458adantl 481 . . . . . . . . 9 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → if(𝑤 = 𝑌, 0, (𝐺𝑤)) = (𝐺𝑤))
46023a1i 11 . . . . . . . . . 10 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → 𝐺 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2)))))
461 oveq1 6556 . . . . . . . . . . . . 13 (𝑦 = 𝑤 → (𝑦 / 2) = (𝑤 / 2))
462461fveq2d 6107 . . . . . . . . . . . 12 (𝑦 = 𝑤 → (sin‘(𝑦 / 2)) = (sin‘(𝑤 / 2)))
463462oveq2d 6565 . . . . . . . . . . 11 (𝑦 = 𝑤 → ((2 · π) · (sin‘(𝑦 / 2))) = ((2 · π) · (sin‘(𝑤 / 2))))
464463adantl 481 . . . . . . . . . 10 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → ((2 · π) · (sin‘(𝑦 / 2))) = ((2 · π) · (sin‘(𝑤 / 2))))
465120a1i 11 . . . . . . . . . . . 12 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (2 · π) ∈ ℂ)
466328halfcld 11154 . . . . . . . . . . . . 13 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (𝑤 / 2) ∈ ℂ)
467466sincld 14699 . . . . . . . . . . . 12 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (sin‘(𝑤 / 2)) ∈ ℂ)
468465, 467mulcld 9939 . . . . . . . . . . 11 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → ((2 · π) · (sin‘(𝑤 / 2))) ∈ ℂ)
469468adantr 480 . . . . . . . . . 10 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → ((2 · π) · (sin‘(𝑤 / 2))) ∈ ℂ)
470460, 464, 325, 469fvmptd 6197 . . . . . . . . 9 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝐺𝑤) = ((2 · π) · (sin‘(𝑤 / 2))))
471459, 470eqtrd 2644 . . . . . . . 8 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → if(𝑤 = 𝑌, 0, (𝐺𝑤)) = ((2 · π) · (sin‘(𝑤 / 2))))
472457, 471pm2.61dan 828 . . . . . . 7 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → if(𝑤 = 𝑌, 0, (𝐺𝑤)) = ((2 · π) · (sin‘(𝑤 / 2))))
473472mpteq2dva 4672 . . . . . 6 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))))
474 eqid 2610 . . . . . . . . . . 11 (𝑤 ∈ ℂ ↦ ((2 · π) · (sin‘(𝑤 / 2)))) = (𝑤 ∈ ℂ ↦ ((2 · π) · (sin‘(𝑤 / 2))))
47575, 156, 75constcncfg 38756 . . . . . . . . . . . 12 (𝜑 → (𝑤 ∈ ℂ ↦ (2 · π)) ∈ (ℂ–cn→ℂ))
476 id 22 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ ℂ → 𝑤 ∈ ℂ)
477 2cnd 10970 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ ℂ → 2 ∈ ℂ)
478134a1i 11 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ ℂ → 2 ≠ 0)
479476, 477, 478divrec2d 10684 . . . . . . . . . . . . . . . 16 (𝑤 ∈ ℂ → (𝑤 / 2) = ((1 / 2) · 𝑤))
480479mpteq2ia 4668 . . . . . . . . . . . . . . 15 (𝑤 ∈ ℂ ↦ (𝑤 / 2)) = (𝑤 ∈ ℂ ↦ ((1 / 2) · 𝑤))
481 eqid 2610 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ ℂ ↦ ((1 / 2) · 𝑤)) = (𝑤 ∈ ℂ ↦ ((1 / 2) · 𝑤))
482481mulc1cncf 22516 . . . . . . . . . . . . . . . 16 ((1 / 2) ∈ ℂ → (𝑤 ∈ ℂ ↦ ((1 / 2) · 𝑤)) ∈ (ℂ–cn→ℂ))
48339, 482ax-mp 5 . . . . . . . . . . . . . . 15 (𝑤 ∈ ℂ ↦ ((1 / 2) · 𝑤)) ∈ (ℂ–cn→ℂ)
484480, 483eqeltri 2684 . . . . . . . . . . . . . 14 (𝑤 ∈ ℂ ↦ (𝑤 / 2)) ∈ (ℂ–cn→ℂ)
485484a1i 11 . . . . . . . . . . . . 13 (𝜑 → (𝑤 ∈ ℂ ↦ (𝑤 / 2)) ∈ (ℂ–cn→ℂ))
486415, 485cncfmpt1f 22524 . . . . . . . . . . . 12 (𝜑 → (𝑤 ∈ ℂ ↦ (sin‘(𝑤 / 2))) ∈ (ℂ–cn→ℂ))
487475, 486mulcncf 23023 . . . . . . . . . . 11 (𝜑 → (𝑤 ∈ ℂ ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ (ℂ–cn→ℂ))
488474, 487, 349, 75, 468cncfmptssg 38755 . . . . . . . . . 10 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
489 eqid 2610 . . . . . . . . . . . 12 ((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) = ((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵))
49051, 489, 345cncfcn 22520 . . . . . . . . . . 11 (((𝐴(,)𝐵) ⊆ ℂ ∧ ℂ ⊆ ℂ) → ((𝐴(,)𝐵)–cn→ℂ) = (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
491349, 74, 490sylancl 693 . . . . . . . . . 10 (𝜑 → ((𝐴(,)𝐵)–cn→ℂ) = (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
492488, 491eleqtrd 2690 . . . . . . . . 9 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
493 cncnp 20894 . . . . . . . . . 10 ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) ∈ (TopOn‘(𝐴(,)𝐵)) ∧ (TopOpen‘ℂfld) ∈ (TopOn‘ℂ)) → ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)) ↔ ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))):(𝐴(,)𝐵)⟶ℂ ∧ ∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦))))
494355, 353, 493sylancl 693 . . . . . . . . 9 (𝜑 → ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)) ↔ ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))):(𝐴(,)𝐵)⟶ℂ ∧ ∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦))))
495492, 494mpbid 221 . . . . . . . 8 (𝜑 → ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))):(𝐴(,)𝐵)⟶ℂ ∧ ∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦)))
496495simprd 478 . . . . . . 7 (𝜑 → ∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦))
497360eleq2d 2673 . . . . . . . 8 (𝑦 = 𝑌 → ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦) ↔ (𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌)))
498497rspccva 3281 . . . . . . 7 ((∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦) ∧ 𝑌 ∈ (𝐴(,)𝐵)) → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
499496, 27, 498syl2anc 691 . . . . . 6 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
500473, 499eqeltrd 2688 . . . . 5 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
501308mpteq1d 4666 . . . . 5 (𝜑 → (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤))))
502366eqcomd 2616 . . . . . . 7 (𝜑 → ((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) = ((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)))
503502oveq1d 6564 . . . . . 6 (𝜑 → (((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld)) = (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld)))
504503fveq1d 6105 . . . . 5 (𝜑 → ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌) = ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
505500, 501, 5043eltr4d 2703 . . . 4 (𝜑 → (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌))
506 eqid 2610 . . . . 5 (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤))) = (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤)))
50711, 124syldan 486 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((2 · π) · (sin‘(𝑦 / 2))) ∈ ℂ)
508507, 23fmptd 6292 . . . . 5 (𝜑𝐺:((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ)
509371, 51, 506, 508, 374, 264ellimc 23443 . . . 4 (𝜑 → (0 ∈ (𝐺 lim 𝑌) ↔ (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌)))
510505, 509mpbird 246 . . 3 (𝜑 → 0 ∈ (𝐺 lim 𝑌))
511257nrexdv 2984 . . . 4 (𝜑 → ¬ ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝑦 mod (2 · π)) = 0)
512 ffun 5961 . . . . . . 7 (𝐺:((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ → Fun 𝐺)
513508, 512syl 17 . . . . . 6 (𝜑 → Fun 𝐺)
514 fvelima 6158 . . . . . 6 ((Fun 𝐺 ∧ 0 ∈ (𝐺 “ ((𝐴(,)𝐵) ∖ {𝑌}))) → ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝐺𝑦) = 0)
515513, 514sylan 487 . . . . 5 ((𝜑 ∧ 0 ∈ (𝐺 “ ((𝐴(,)𝐵) ∖ {𝑌}))) → ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝐺𝑦) = 0)
516 2cnd 10970 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 2 ∈ ℂ)
517119a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → π ∈ ℂ)
518134a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 2 ≠ 0)
519239a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → π ≠ 0)
520105, 516, 517, 518, 519divdiv1d 10711 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑦 / 2) / π) = (𝑦 / (2 · π)))
521520eqcomd 2616 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑦 / (2 · π)) = ((𝑦 / 2) / π))
522521adantr 480 . . . . . . . . . 10 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → (𝑦 / (2 · π)) = ((𝑦 / 2) / π))
523 2cnd 10970 . . . . . . . . . . . . . . . . . . 19 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → 2 ∈ ℂ)
524119a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → π ∈ ℂ)
525523, 524mulcld 9939 . . . . . . . . . . . . . . . . . 18 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → (2 · π) ∈ ℂ)
526233adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → 𝑦 ∈ ℂ)
527526halfcld 11154 . . . . . . . . . . . . . . . . . . 19 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → (𝑦 / 2) ∈ ℂ)
528527sincld 14699 . . . . . . . . . . . . . . . . . 18 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → (sin‘(𝑦 / 2)) ∈ ℂ)
529525, 528mulcld 9939 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → ((2 · π) · (sin‘(𝑦 / 2))) ∈ ℂ)
53023fvmpt2 6200 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ ((2 · π) · (sin‘(𝑦 / 2))) ∈ ℂ) → (𝐺𝑦) = ((2 · π) · (sin‘(𝑦 / 2))))
531529, 530syldan 486 . . . . . . . . . . . . . . . 16 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → (𝐺𝑦) = ((2 · π) · (sin‘(𝑦 / 2))))
532531eqcomd 2616 . . . . . . . . . . . . . . 15 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → ((2 · π) · (sin‘(𝑦 / 2))) = (𝐺𝑦))
533 simpr 476 . . . . . . . . . . . . . . 15 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → (𝐺𝑦) = 0)
534532, 533eqtrd 2644 . . . . . . . . . . . . . 14 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → ((2 · π) · (sin‘(𝑦 / 2))) = 0)
535120a1i 11 . . . . . . . . . . . . . . . 16 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → (2 · π) ∈ ℂ)
536233halfcld 11154 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → (𝑦 / 2) ∈ ℂ)
537536sincld 14699 . . . . . . . . . . . . . . . 16 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → (sin‘(𝑦 / 2)) ∈ ℂ)
538535, 537mul0ord 10556 . . . . . . . . . . . . . . 15 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → (((2 · π) · (sin‘(𝑦 / 2))) = 0 ↔ ((2 · π) = 0 ∨ (sin‘(𝑦 / 2)) = 0)))
539538adantr 480 . . . . . . . . . . . . . 14 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → (((2 · π) · (sin‘(𝑦 / 2))) = 0 ↔ ((2 · π) = 0 ∨ (sin‘(𝑦 / 2)) = 0)))
540534, 539mpbid 221 . . . . . . . . . . . . 13 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → ((2 · π) = 0 ∨ (sin‘(𝑦 / 2)) = 0))
541 2cnne0 11119 . . . . . . . . . . . . . . 15 (2 ∈ ℂ ∧ 2 ≠ 0)
542119, 239pm3.2i 470 . . . . . . . . . . . . . . 15 (π ∈ ℂ ∧ π ≠ 0)
543 mulne0 10548 . . . . . . . . . . . . . . 15 (((2 ∈ ℂ ∧ 2 ≠ 0) ∧ (π ∈ ℂ ∧ π ≠ 0)) → (2 · π) ≠ 0)
544541, 542, 543mp2an 704 . . . . . . . . . . . . . 14 (2 · π) ≠ 0
545544neii 2784 . . . . . . . . . . . . 13 ¬ (2 · π) = 0
546 pm2.53 387 . . . . . . . . . . . . 13 (((2 · π) = 0 ∨ (sin‘(𝑦 / 2)) = 0) → (¬ (2 · π) = 0 → (sin‘(𝑦 / 2)) = 0))
547540, 545, 546mpisyl 21 . . . . . . . . . . . 12 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → (sin‘(𝑦 / 2)) = 0)
548547adantll 746 . . . . . . . . . . 11 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → (sin‘(𝑦 / 2)) = 0)
549105adantr 480 . . . . . . . . . . . . 13 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → 𝑦 ∈ ℂ)
550549halfcld 11154 . . . . . . . . . . . 12 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → (𝑦 / 2) ∈ ℂ)
551550, 247syl 17 . . . . . . . . . . 11 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → ((sin‘(𝑦 / 2)) = 0 ↔ ((𝑦 / 2) / π) ∈ ℤ))
552548, 551mpbid 221 . . . . . . . . . 10 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → ((𝑦 / 2) / π) ∈ ℤ)
553522, 552eqeltrd 2688 . . . . . . . . 9 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → (𝑦 / (2 · π)) ∈ ℤ)
55411adantr 480 . . . . . . . . . 10 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → 𝑦 ∈ ℝ)
555554, 254, 255sylancl 693 . . . . . . . . 9 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → ((𝑦 mod (2 · π)) = 0 ↔ (𝑦 / (2 · π)) ∈ ℤ))
556553, 555mpbird 246 . . . . . . . 8 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → (𝑦 mod (2 · π)) = 0)
557556ex 449 . . . . . . 7 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝐺𝑦) = 0 → (𝑦 mod (2 · π)) = 0))
558557reximdva 3000 . . . . . 6 (𝜑 → (∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝐺𝑦) = 0 → ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝑦 mod (2 · π)) = 0))
559558adantr 480 . . . . 5 ((𝜑 ∧ 0 ∈ (𝐺 “ ((𝐴(,)𝐵) ∖ {𝑌}))) → (∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝐺𝑦) = 0 → ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝑦 mod (2 · π)) = 0))
560515, 559mpd 15 . . . 4 ((𝜑 ∧ 0 ∈ (𝐺 “ ((𝐴(,)𝐵) ∖ {𝑌}))) → ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝑦 mod (2 · π)) = 0)
561511, 560mtand 689 . . 3 (𝜑 → ¬ 0 ∈ (𝐺 “ ((𝐴(,)𝐵) ∖ {𝑌})))
562 simpr 476 . . . . . . . . 9 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}))
563111fvmpt2 6200 . . . . . . . . 9 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (π · (cos‘(𝑦 / 2))) ∈ ℂ) → (𝐼𝑦) = (π · (cos‘(𝑦 / 2))))
564562, 201, 563syl2anc 691 . . . . . . . 8 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝐼𝑦) = (π · (cos‘(𝑦 / 2))))
565536coscld 14700 . . . . . . . . . 10 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → (cos‘(𝑦 / 2)) ∈ ℂ)
566565adantl 481 . . . . . . . . 9 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (cos‘(𝑦 / 2)) ∈ ℂ)
567 dirkercncflem2.11 . . . . . . . . 9 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (cos‘(𝑦 / 2)) ≠ 0)
568517, 566, 519, 567mulne0d 10558 . . . . . . . 8 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (π · (cos‘(𝑦 / 2))) ≠ 0)
569564, 568eqnetrd 2849 . . . . . . 7 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝐼𝑦) ≠ 0)
570569neneqd 2787 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ (𝐼𝑦) = 0)
571570nrexdv 2984 . . . . 5 (𝜑 → ¬ ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝐼𝑦) = 0)
572201, 111fmptd 6292 . . . . . . 7 (𝜑𝐼:((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ)
573 ffun 5961 . . . . . . 7 (𝐼:((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ → Fun 𝐼)
574572, 573syl 17 . . . . . 6 (𝜑 → Fun 𝐼)
575 fvelima 6158 . . . . . 6 ((Fun 𝐼 ∧ 0 ∈ (𝐼 “ ((𝐴(,)𝐵) ∖ {𝑌}))) → ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝐼𝑦) = 0)
576574, 575sylan 487 . . . . 5 ((𝜑 ∧ 0 ∈ (𝐼 “ ((𝐴(,)𝐵) ∖ {𝑌}))) → ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝐼𝑦) = 0)
577571, 576mtand 689 . . . 4 (𝜑 → ¬ 0 ∈ (𝐼 “ ((𝐴(,)𝐵) ∖ {𝑌})))
578199imaeq1d 5384 . . . 4 (𝜑 → ((ℝ D 𝐺) “ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝐼 “ ((𝐴(,)𝐵) ∖ {𝑌})))
579577, 578neleqtrrd 2710 . . 3 (𝜑 → ¬ 0 ∈ ((ℝ D 𝐺) “ ((𝐴(,)𝐵) ∖ {𝑌})))
580 dirkercncflem2.d . . . . . 6 𝐷 = (𝑛 ∈ ℕ ↦ (𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑛) + 1) / (2 · π)), ((sin‘((𝑛 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))))
581580dirkerval2 38987 . . . . 5 ((𝑁 ∈ ℕ ∧ 𝑌 ∈ ℝ) → ((𝐷𝑁)‘𝑌) = if((𝑌 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑌)) / ((2 · π) · (sin‘(𝑌 / 2))))))
5825, 57, 581syl2anc 691 . . . 4 (𝜑 → ((𝐷𝑁)‘𝑌) = if((𝑌 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑌)) / ((2 · π) · (sin‘(𝑌 / 2))))))
583283iftrued 4044 . . . . 5 (𝜑 → if((𝑌 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑌)) / ((2 · π) · (sin‘(𝑌 / 2))))) = (((2 · 𝑁) + 1) / (2 · π)))
584 dirkercncflem2.l . . . . . . . . . . 11 𝐿 = (𝑤 ∈ (𝐴(,)𝐵) ↦ (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))))
585584a1i 11 . . . . . . . . . 10 (𝜑𝐿 = (𝑤 ∈ (𝐴(,)𝐵) ↦ (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2))))))
586 iftrue 4042 . . . . . . . . . . . . . 14 (𝑤 = 𝑌 → if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)) = (((2 · 𝑁) + 1) / (2 · π)))
587586adantl 481 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)) = (((2 · 𝑁) + 1) / (2 · π)))
588154, 38mulcld 9939 . . . . . . . . . . . . . . . . . 18 (𝜑 → (2 · 𝑁) ∈ ℂ)
589588, 397addcld 9938 . . . . . . . . . . . . . . . . 17 (𝜑 → ((2 · 𝑁) + 1) ∈ ℂ)
590589, 154, 155, 377, 378divdiv1d 10711 . . . . . . . . . . . . . . . 16 (𝜑 → ((((2 · 𝑁) + 1) / 2) / π) = (((2 · 𝑁) + 1) / (2 · π)))
591590eqcomd 2616 . . . . . . . . . . . . . . 15 (𝜑 → (((2 · 𝑁) + 1) / (2 · π)) = ((((2 · 𝑁) + 1) / 2) / π))
592588, 397, 154, 377divdird 10718 . . . . . . . . . . . . . . . . 17 (𝜑 → (((2 · 𝑁) + 1) / 2) = (((2 · 𝑁) / 2) + (1 / 2)))
59338, 154, 377divcan3d 10685 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((2 · 𝑁) / 2) = 𝑁)
594593oveq1d 6564 . . . . . . . . . . . . . . . . 17 (𝜑 → (((2 · 𝑁) / 2) + (1 / 2)) = (𝑁 + (1 / 2)))
595592, 594eqtrd 2644 . . . . . . . . . . . . . . . 16 (𝜑 → (((2 · 𝑁) + 1) / 2) = (𝑁 + (1 / 2)))
596595oveq1d 6564 . . . . . . . . . . . . . . 15 (𝜑 → ((((2 · 𝑁) + 1) / 2) / π) = ((𝑁 + (1 / 2)) / π))
597591, 596eqtrd 2644 . . . . . . . . . . . . . 14 (𝜑 → (((2 · 𝑁) + 1) / (2 · π)) = ((𝑁 + (1 / 2)) / π))
598597ad2antrr 758 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → (((2 · 𝑁) + 1) / (2 · π)) = ((𝑁 + (1 / 2)) / π))
599311fveq2d 6107 . . . . . . . . . . . . . . . . 17 (𝑤 = 𝑌 → (cos‘((𝑁 + (1 / 2)) · 𝑤)) = (cos‘((𝑁 + (1 / 2)) · 𝑌)))
600599oveq2d 6565 . . . . . . . . . . . . . . . 16 (𝑤 = 𝑌 → ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) = ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑌))))
601452fveq2d 6107 . . . . . . . . . . . . . . . . 17 (𝑤 = 𝑌 → (cos‘(𝑤 / 2)) = (cos‘(𝑌 / 2)))
602601oveq2d 6565 . . . . . . . . . . . . . . . 16 (𝑤 = 𝑌 → (π · (cos‘(𝑤 / 2))) = (π · (cos‘(𝑌 / 2))))
603600, 602oveq12d 6567 . . . . . . . . . . . . . . 15 (𝑤 = 𝑌 → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))) = (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑌))) / (π · (cos‘(𝑌 / 2)))))
604603adantl 481 . . . . . . . . . . . . . 14 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))) = (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑌))) / (π · (cos‘(𝑌 / 2)))))
60538, 40, 264adddird 9944 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝑁 + (1 / 2)) · 𝑌) = ((𝑁 · 𝑌) + ((1 / 2) · 𝑌)))
606397, 154, 264, 377div32d 10703 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → ((1 / 2) · 𝑌) = (1 · (𝑌 / 2)))
607436mulid2d 9937 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → (1 · (𝑌 / 2)) = (𝑌 / 2))
608606, 607eqtrd 2644 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ((1 / 2) · 𝑌) = (𝑌 / 2))
609608oveq2d 6565 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝑁 · 𝑌) + ((1 / 2) · 𝑌)) = ((𝑁 · 𝑌) + (𝑌 / 2)))
61038, 264mulcld 9939 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (𝑁 · 𝑌) ∈ ℂ)
611610, 436addcomd 10117 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝑁 · 𝑌) + (𝑌 / 2)) = ((𝑌 / 2) + (𝑁 · 𝑌)))
612605, 609, 6113eqtrd 2648 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑁 + (1 / 2)) · 𝑌) = ((𝑌 / 2) + (𝑁 · 𝑌)))
613612fveq2d 6107 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (cos‘((𝑁 + (1 / 2)) · 𝑌)) = (cos‘((𝑌 / 2) + (𝑁 · 𝑌))))
614610, 156, 379divcan1d 10681 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (((𝑁 · 𝑌) / (2 · π)) · (2 · π)) = (𝑁 · 𝑌))
615614eqcomd 2616 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑁 · 𝑌) = (((𝑁 · 𝑌) / (2 · π)) · (2 · π)))
616615oveq2d 6565 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑌 / 2) + (𝑁 · 𝑌)) = ((𝑌 / 2) + (((𝑁 · 𝑌) / (2 · π)) · (2 · π))))
617616fveq2d 6107 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (cos‘((𝑌 / 2) + (𝑁 · 𝑌))) = (cos‘((𝑌 / 2) + (((𝑁 · 𝑌) / (2 · π)) · (2 · π)))))
61838, 264, 156, 379divassd 10715 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝑁 · 𝑌) / (2 · π)) = (𝑁 · (𝑌 / (2 · π))))
619405, 404zmulcld 11364 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑁 · (𝑌 / (2 · π))) ∈ ℤ)
620618, 619eqeltrd 2688 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑁 · 𝑌) / (2 · π)) ∈ ℤ)
621 cosper 24038 . . . . . . . . . . . . . . . . . . . 20 (((𝑌 / 2) ∈ ℂ ∧ ((𝑁 · 𝑌) / (2 · π)) ∈ ℤ) → (cos‘((𝑌 / 2) + (((𝑁 · 𝑌) / (2 · π)) · (2 · π)))) = (cos‘(𝑌 / 2)))
622436, 620, 621syl2anc 691 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (cos‘((𝑌 / 2) + (((𝑁 · 𝑌) / (2 · π)) · (2 · π)))) = (cos‘(𝑌 / 2)))
623613, 617, 6223eqtrd 2648 . . . . . . . . . . . . . . . . . 18 (𝜑 → (cos‘((𝑁 + (1 / 2)) · 𝑌)) = (cos‘(𝑌 / 2)))
624623oveq2d 6565 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑌))) = ((𝑁 + (1 / 2)) · (cos‘(𝑌 / 2))))
625624oveq1d 6564 . . . . . . . . . . . . . . . 16 (𝜑 → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑌))) / (π · (cos‘(𝑌 / 2)))) = (((𝑁 + (1 / 2)) · (cos‘(𝑌 / 2))) / (π · (cos‘(𝑌 / 2)))))
626436coscld 14700 . . . . . . . . . . . . . . . . 17 (𝜑 → (cos‘(𝑌 / 2)) ∈ ℂ)
627264, 154, 155, 377, 378divdiv1d 10711 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝑌 / 2) / π) = (𝑌 / (2 · π)))
628627, 404eqeltrd 2688 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑌 / 2) / π) ∈ ℤ)
629628zred 11358 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝑌 / 2) / π) ∈ ℝ)
630629, 273ltaddrpd 11781 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑌 / 2) / π) < (((𝑌 / 2) / π) + (1 / 2)))
631 halflt1 11127 . . . . . . . . . . . . . . . . . . . . . 22 (1 / 2) < 1
632631a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (1 / 2) < 1)
633269, 268, 629, 632ltadd2dd 10075 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (((𝑌 / 2) / π) + (1 / 2)) < (((𝑌 / 2) / π) + 1))
634 btwnnz 11329 . . . . . . . . . . . . . . . . . . . 20 ((((𝑌 / 2) / π) ∈ ℤ ∧ ((𝑌 / 2) / π) < (((𝑌 / 2) / π) + (1 / 2)) ∧ (((𝑌 / 2) / π) + (1 / 2)) < (((𝑌 / 2) / π) + 1)) → ¬ (((𝑌 / 2) / π) + (1 / 2)) ∈ ℤ)
635628, 630, 633, 634syl3anc 1318 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ¬ (((𝑌 / 2) / π) + (1 / 2)) ∈ ℤ)
636 coseq0 38747 . . . . . . . . . . . . . . . . . . . 20 ((𝑌 / 2) ∈ ℂ → ((cos‘(𝑌 / 2)) = 0 ↔ (((𝑌 / 2) / π) + (1 / 2)) ∈ ℤ))
637436, 636syl 17 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((cos‘(𝑌 / 2)) = 0 ↔ (((𝑌 / 2) / π) + (1 / 2)) ∈ ℤ))
638635, 637mtbird 314 . . . . . . . . . . . . . . . . . 18 (𝜑 → ¬ (cos‘(𝑌 / 2)) = 0)
639638neqned 2789 . . . . . . . . . . . . . . . . 17 (𝜑 → (cos‘(𝑌 / 2)) ≠ 0)
64041, 155, 626, 378, 639divcan5rd 10707 . . . . . . . . . . . . . . . 16 (𝜑 → (((𝑁 + (1 / 2)) · (cos‘(𝑌 / 2))) / (π · (cos‘(𝑌 / 2)))) = ((𝑁 + (1 / 2)) / π))
641625, 640eqtrd 2644 . . . . . . . . . . . . . . 15 (𝜑 → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑌))) / (π · (cos‘(𝑌 / 2)))) = ((𝑁 + (1 / 2)) / π))
642641ad2antrr 758 . . . . . . . . . . . . . 14 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑌))) / (π · (cos‘(𝑌 / 2)))) = ((𝑁 + (1 / 2)) / π))
643604, 642eqtr2d 2645 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → ((𝑁 + (1 / 2)) / π) = (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))))
644587, 598, 6433eqtrrd 2649 . . . . . . . . . . . 12 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))) = if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)))
645 iffalse 4045 . . . . . . . . . . . . . 14 𝑤 = 𝑌 → if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)) = ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))
646645adantl 481 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)) = ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))
647 eqidd 2611 . . . . . . . . . . . . . 14 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))))
648 fveq2 6103 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑤 → (𝐻𝑦) = (𝐻𝑤))
649 fveq2 6103 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑤 → (𝐼𝑦) = (𝐼𝑤))
650648, 649oveq12d 6567 . . . . . . . . . . . . . . 15 (𝑦 = 𝑤 → ((𝐻𝑦) / (𝐼𝑦)) = ((𝐻𝑤) / (𝐼𝑤)))
651650adantl 481 . . . . . . . . . . . . . 14 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → ((𝐻𝑦) / (𝐼𝑦)) = ((𝐻𝑤) / (𝐼𝑤)))
652106, 100fmptd 6292 . . . . . . . . . . . . . . . . 17 (𝜑𝐻:((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ)
653652ad2antrr 758 . . . . . . . . . . . . . . . 16 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → 𝐻:((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ)
654653, 325ffvelrnd 6268 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝐻𝑤) ∈ ℂ)
655572ad2antrr 758 . . . . . . . . . . . . . . . 16 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → 𝐼:((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ)
656655, 325ffvelrnd 6268 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝐼𝑤) ∈ ℂ)
657111a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → 𝐼 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (π · (cos‘(𝑦 / 2)))))
658 simpr 476 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → 𝑦 = 𝑤)
659658oveq1d 6564 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → (𝑦 / 2) = (𝑤 / 2))
660659fveq2d 6107 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → (cos‘(𝑦 / 2)) = (cos‘(𝑤 / 2)))
661660oveq2d 6565 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → (π · (cos‘(𝑦 / 2))) = (π · (cos‘(𝑤 / 2))))
662119a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝑤 ∈ (𝐴(,)𝐵) → π ∈ ℂ)
663327halfcld 11154 . . . . . . . . . . . . . . . . . . . 20 (𝑤 ∈ (𝐴(,)𝐵) → (𝑤 / 2) ∈ ℂ)
664663coscld 14700 . . . . . . . . . . . . . . . . . . 19 (𝑤 ∈ (𝐴(,)𝐵) → (cos‘(𝑤 / 2)) ∈ ℂ)
665662, 664mulcld 9939 . . . . . . . . . . . . . . . . . 18 (𝑤 ∈ (𝐴(,)𝐵) → (π · (cos‘(𝑤 / 2))) ∈ ℂ)
666665ad2antlr 759 . . . . . . . . . . . . . . . . 17 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (π · (cos‘(𝑤 / 2))) ∈ ℂ)
667657, 661, 325, 666fvmptd 6197 . . . . . . . . . . . . . . . 16 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝐼𝑤) = (π · (cos‘(𝑤 / 2))))
668542a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (π ∈ ℂ ∧ π ≠ 0))
669664ad2antlr 759 . . . . . . . . . . . . . . . . 17 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (cos‘(𝑤 / 2)) ∈ ℂ)
670 simpll 786 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → 𝜑)
671461fveq2d 6107 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = 𝑤 → (cos‘(𝑦 / 2)) = (cos‘(𝑤 / 2)))
672671neeq1d 2841 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = 𝑤 → ((cos‘(𝑦 / 2)) ≠ 0 ↔ (cos‘(𝑤 / 2)) ≠ 0))
673227, 672imbi12d 333 . . . . . . . . . . . . . . . . . . 19 (𝑦 = 𝑤 → (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (cos‘(𝑦 / 2)) ≠ 0) ↔ ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (cos‘(𝑤 / 2)) ≠ 0)))
674673, 567chvarv 2251 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (cos‘(𝑤 / 2)) ≠ 0)
675670, 325, 674syl2anc 691 . . . . . . . . . . . . . . . . 17 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (cos‘(𝑤 / 2)) ≠ 0)
676 mulne0 10548 . . . . . . . . . . . . . . . . 17 (((π ∈ ℂ ∧ π ≠ 0) ∧ ((cos‘(𝑤 / 2)) ∈ ℂ ∧ (cos‘(𝑤 / 2)) ≠ 0)) → (π · (cos‘(𝑤 / 2))) ≠ 0)
677668, 669, 675, 676syl12anc 1316 . . . . . . . . . . . . . . . 16 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (π · (cos‘(𝑤 / 2))) ≠ 0)
678667, 677eqnetrd 2849 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝐼𝑤) ≠ 0)
679654, 656, 678divcld 10680 . . . . . . . . . . . . . 14 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → ((𝐻𝑤) / (𝐼𝑤)) ∈ ℂ)
680647, 651, 325, 679fvmptd 6197 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤) = ((𝐻𝑤) / (𝐼𝑤)))
681100a1i 11 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → 𝐻 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
682318fveq2d 6107 . . . . . . . . . . . . . . . 16 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → (cos‘((𝑁 + (1 / 2)) · 𝑦)) = (cos‘((𝑁 + (1 / 2)) · 𝑤)))
683682oveq2d 6565 . . . . . . . . . . . . . . 15 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))) = ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))))
684329coscld 14700 . . . . . . . . . . . . . . . . 17 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (cos‘((𝑁 + (1 / 2)) · 𝑤)) ∈ ℂ)
685326, 684mulcld 9939 . . . . . . . . . . . . . . . 16 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) ∈ ℂ)
686685adantr 480 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) ∈ ℂ)
687681, 683, 325, 686fvmptd 6197 . . . . . . . . . . . . . 14 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝐻𝑤) = ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))))
688687, 667oveq12d 6567 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → ((𝐻𝑤) / (𝐼𝑤)) = (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))))
689646, 680, 6883eqtrrd 2649 . . . . . . . . . . . 12 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))) = if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)))
690644, 689pm2.61dan 828 . . . . . . . . . . 11 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))) = if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)))
691690mpteq2dva 4672 . . . . . . . . . 10 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2))))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))))
692585, 691eqtr2d 2645 . . . . . . . . 9 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))) = 𝐿)
693349, 41, 75constcncfg 38756 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (𝑁 + (1 / 2))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
694 cosf 14694 . . . . . . . . . . . . . . . . . . 19 cos:ℂ⟶ℂ
695232, 44sylan2 490 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ (𝐴(,)𝐵)) → ((𝑁 + (1 / 2)) · 𝑦) ∈ ℂ)
696 eqid 2610 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦)) = (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))
697695, 696fmptd 6292 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦)):(𝐴(,)𝐵)⟶ℂ)
698 fcompt 6306 . . . . . . . . . . . . . . . . . . 19 ((cos:ℂ⟶ℂ ∧ (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦)):(𝐴(,)𝐵)⟶ℂ) → (cos ∘ (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ (cos‘((𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))))
699694, 697, 698sylancr 694 . . . . . . . . . . . . . . . . . 18 (𝜑 → (cos ∘ (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ (cos‘((𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))))
700 eqidd 2611 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦)) = (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦)))
701317adantl 481 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑦 = 𝑤) → ((𝑁 + (1 / 2)) · 𝑦) = ((𝑁 + (1 / 2)) · 𝑤))
702 simpr 476 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → 𝑤 ∈ (𝐴(,)𝐵))
703700, 701, 702, 329fvmptd 6197 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → ((𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤) = ((𝑁 + (1 / 2)) · 𝑤))
704703fveq2d 6107 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (cos‘((𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = (cos‘((𝑁 + (1 / 2)) · 𝑤)))
705704mpteq2dva 4672 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (cos‘((𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ (cos‘((𝑁 + (1 / 2)) · 𝑤))))
706699, 705eqtr2d 2645 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (cos‘((𝑁 + (1 / 2)) · 𝑤))) = (cos ∘ (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))))
707349, 41, 75constcncfg 38756 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑦 ∈ (𝐴(,)𝐵) ↦ (𝑁 + (1 / 2))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
708349, 75idcncfg 38757 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑦 ∈ (𝐴(,)𝐵) ↦ 𝑦) ∈ ((𝐴(,)𝐵)–cn→ℂ))
709707, 708mulcncf 23023 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
710 coscn 24003 . . . . . . . . . . . . . . . . . . 19 cos ∈ (ℂ–cn→ℂ)
711710a1i 11 . . . . . . . . . . . . . . . . . 18 (𝜑 → cos ∈ (ℂ–cn→ℂ))
712709, 711cncfco 22518 . . . . . . . . . . . . . . . . 17 (𝜑 → (cos ∘ (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
713706, 712eqeltrd 2688 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (cos‘((𝑁 + (1 / 2)) · 𝑤))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
714693, 713mulcncf 23023 . . . . . . . . . . . . . . 15 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤)))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
715 eqid 2610 . . . . . . . . . . . . . . . 16 (𝑤 ∈ (𝐴(,)𝐵) ↦ (π · (cos‘(𝑤 / 2)))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ (π · (cos‘(𝑤 / 2))))
716349, 155, 75constcncfg 38756 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ π) ∈ ((𝐴(,)𝐵)–cn→ℂ))
717 2cnd 10970 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → 2 ∈ ℂ)
718134a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → 2 ≠ 0)
719328, 717, 718divrecd 10683 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (𝑤 / 2) = (𝑤 · (1 / 2)))
720719mpteq2dva 4672 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (𝑤 / 2)) = (𝑤 ∈ (𝐴(,)𝐵) ↦ (𝑤 · (1 / 2))))
721 eqid 2610 . . . . . . . . . . . . . . . . . . . 20 (𝑤 ∈ ℂ ↦ (𝑤 · (1 / 2))) = (𝑤 ∈ ℂ ↦ (𝑤 · (1 / 2)))
722 cncfmptid 22523 . . . . . . . . . . . . . . . . . . . . . . 23 ((ℂ ⊆ ℂ ∧ ℂ ⊆ ℂ) → (𝑤 ∈ ℂ ↦ 𝑤) ∈ (ℂ–cn→ℂ))
72374, 74, 722mp2an 704 . . . . . . . . . . . . . . . . . . . . . 22 (𝑤 ∈ ℂ ↦ 𝑤) ∈ (ℂ–cn→ℂ)
724723a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑤 ∈ ℂ ↦ 𝑤) ∈ (ℂ–cn→ℂ))
72574a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 / 2) ∈ ℂ → ℂ ⊆ ℂ)
726 id 22 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 / 2) ∈ ℂ → (1 / 2) ∈ ℂ)
727725, 726, 725constcncfg 38756 . . . . . . . . . . . . . . . . . . . . . 22 ((1 / 2) ∈ ℂ → (𝑤 ∈ ℂ ↦ (1 / 2)) ∈ (ℂ–cn→ℂ))
72839, 727mp1i 13 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑤 ∈ ℂ ↦ (1 / 2)) ∈ (ℂ–cn→ℂ))
729724, 728mulcncf 23023 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑤 ∈ ℂ ↦ (𝑤 · (1 / 2))) ∈ (ℂ–cn→ℂ))
730719, 466eqeltrrd 2689 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (𝑤 · (1 / 2)) ∈ ℂ)
731721, 729, 349, 75, 730cncfmptssg 38755 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (𝑤 · (1 / 2))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
732720, 731eqeltrd 2688 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (𝑤 / 2)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
733711, 732cncfmpt1f 22524 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (cos‘(𝑤 / 2))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
734716, 733mulcncf 23023 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (π · (cos‘(𝑤 / 2)))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
735 ssid 3587 . . . . . . . . . . . . . . . . 17 (𝐴(,)𝐵) ⊆ (𝐴(,)𝐵)
736735a1i 11 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐴(,)𝐵) ⊆ (𝐴(,)𝐵))
737 difssd 3700 . . . . . . . . . . . . . . . 16 (𝜑 → (ℂ ∖ {0}) ⊆ ℂ)
738665adantl 481 . . . . . . . . . . . . . . . . 17 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (π · (cos‘(𝑤 / 2))) ∈ ℂ)
739119a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → π ∈ ℂ)
740664adantl 481 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (cos‘(𝑤 / 2)) ∈ ℂ)
741239a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → π ≠ 0)
742601adantl 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑤 = 𝑌) → (cos‘(𝑤 / 2)) = (cos‘(𝑌 / 2)))
743639adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑤 = 𝑌) → (cos‘(𝑌 / 2)) ≠ 0)
744742, 743eqnetrd 2849 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑤 = 𝑌) → (cos‘(𝑤 / 2)) ≠ 0)
745744adantlr 747 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → (cos‘(𝑤 / 2)) ≠ 0)
746745, 675pm2.61dan 828 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (cos‘(𝑤 / 2)) ≠ 0)
747739, 740, 741, 746mulne0d 10558 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (π · (cos‘(𝑤 / 2))) ≠ 0)
748747neneqd 2787 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → ¬ (π · (cos‘(𝑤 / 2))) = 0)
749 elsng 4139 . . . . . . . . . . . . . . . . . . 19 ((π · (cos‘(𝑤 / 2))) ∈ ℂ → ((π · (cos‘(𝑤 / 2))) ∈ {0} ↔ (π · (cos‘(𝑤 / 2))) = 0))
750738, 749syl 17 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → ((π · (cos‘(𝑤 / 2))) ∈ {0} ↔ (π · (cos‘(𝑤 / 2))) = 0))
751748, 750mtbird 314 . . . . . . . . . . . . . . . . 17 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → ¬ (π · (cos‘(𝑤 / 2))) ∈ {0})
752738, 751eldifd 3551 . . . . . . . . . . . . . . . 16 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (π · (cos‘(𝑤 / 2))) ∈ (ℂ ∖ {0}))
753715, 734, 736, 737, 752cncfmptssg 38755 . . . . . . . . . . . . . . 15 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (π · (cos‘(𝑤 / 2)))) ∈ ((𝐴(,)𝐵)–cn→(ℂ ∖ {0})))
754714, 753divcncf 38769 . . . . . . . . . . . . . 14 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2))))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
755754, 491eleqtrd 2690 . . . . . . . . . . . . 13 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2))))) ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
756585, 755eqeltrd 2688 . . . . . . . . . . . 12 (𝜑𝐿 ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
757 cncnp 20894 . . . . . . . . . . . . 13 ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) ∈ (TopOn‘(𝐴(,)𝐵)) ∧ (TopOpen‘ℂfld) ∈ (TopOn‘ℂ)) → (𝐿 ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)) ↔ (𝐿:(𝐴(,)𝐵)⟶ℂ ∧ ∀𝑦 ∈ (𝐴(,)𝐵)𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦))))
758355, 353, 757sylancl 693 . . . . . . . . . . . 12 (𝜑 → (𝐿 ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)) ↔ (𝐿:(𝐴(,)𝐵)⟶ℂ ∧ ∀𝑦 ∈ (𝐴(,)𝐵)𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦))))
759756, 758mpbid 221 . . . . . . . . . . 11 (𝜑 → (𝐿:(𝐴(,)𝐵)⟶ℂ ∧ ∀𝑦 ∈ (𝐴(,)𝐵)𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦)))
760759simprd 478 . . . . . . . . . 10 (𝜑 → ∀𝑦 ∈ (𝐴(,)𝐵)𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦))
761360eleq2d 2673 . . . . . . . . . . 11 (𝑦 = 𝑌 → (𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦) ↔ 𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌)))
762761rspccva 3281 . . . . . . . . . 10 ((∀𝑦 ∈ (𝐴(,)𝐵)𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦) ∧ 𝑌 ∈ (𝐴(,)𝐵)) → 𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
763760, 27, 762syl2anc 691 . . . . . . . . 9 (𝜑𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
764692, 763eqeltrd 2688 . . . . . . . 8 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
765308mpteq1d 4666 . . . . . . . 8 (𝜑 → (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))))
766764, 765, 5043eltr4d 2703 . . . . . . 7 (𝜑 → (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌))
767 eqid 2610 . . . . . . . 8 (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))) = (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)))
768100fvmpt2 6200 . . . . . . . . . . . 12 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))) ∈ ℂ) → (𝐻𝑦) = ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))))
769562, 106, 768syl2anc 691 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝐻𝑦) = ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))))
770769, 564oveq12d 6567 . . . . . . . . . 10 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝐻𝑦) / (𝐼𝑦)) = (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))) / (π · (cos‘(𝑦 / 2)))))
771106, 201, 568divcld 10680 . . . . . . . . . 10 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))) / (π · (cos‘(𝑦 / 2)))) ∈ ℂ)
772770, 771eqeltrd 2688 . . . . . . . . 9 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝐻𝑦) / (𝐼𝑦)) ∈ ℂ)
773 eqid 2610 . . . . . . . . 9 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))
774772, 773fmptd 6292 . . . . . . . 8 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))):((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ)
775371, 51, 767, 774, 374, 264ellimc 23443 . . . . . . 7 (𝜑 → ((((2 · 𝑁) + 1) / (2 · π)) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))) lim 𝑌) ↔ (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌)))
776766, 775mpbird 246 . . . . . 6 (𝜑 → (((2 · 𝑁) + 1) / (2 · π)) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))) lim 𝑌))
777103eqcomd 2616 . . . . . . . . . 10 (𝜑𝐻 = (ℝ D 𝐹))
778777fveq1d 6105 . . . . . . . . 9 (𝜑 → (𝐻𝑦) = ((ℝ D 𝐹)‘𝑦))
779199eqcomd 2616 . . . . . . . . . 10 (𝜑𝐼 = (ℝ D 𝐺))
780779fveq1d 6105 . . . . . . . . 9 (𝜑 → (𝐼𝑦) = ((ℝ D 𝐺)‘𝑦))
781778, 780oveq12d 6567 . . . . . . . 8 (𝜑 → ((𝐻𝑦) / (𝐼𝑦)) = (((ℝ D 𝐹)‘𝑦) / ((ℝ D 𝐺)‘𝑦)))
782781mpteq2dv 4673 . . . . . . 7 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (((ℝ D 𝐹)‘𝑦) / ((ℝ D 𝐺)‘𝑦))))
783782oveq1d 6564 . . . . . 6 (𝜑 → ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))) lim 𝑌) = ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (((ℝ D 𝐹)‘𝑦) / ((ℝ D 𝐺)‘𝑦))) lim 𝑌))
784776, 783eleqtrd 2690 . . . . 5 (𝜑 → (((2 · 𝑁) + 1) / (2 · π)) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (((ℝ D 𝐹)‘𝑦) / ((ℝ D 𝐺)‘𝑦))) lim 𝑌))
785583, 784eqeltrd 2688 . . . 4 (𝜑 → if((𝑌 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑌)) / ((2 · π) · (sin‘(𝑌 / 2))))) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (((ℝ D 𝐹)‘𝑦) / ((ℝ D 𝐺)‘𝑦))) lim 𝑌))
786582, 785eqeltrd 2688 . . 3 (𝜑 → ((𝐷𝑁)‘𝑌) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (((ℝ D 𝐹)‘𝑦) / ((ℝ D 𝐺)‘𝑦))) lim 𝑌))
7874, 15, 24, 26, 27, 28, 110, 205, 431, 510, 561, 579, 786lhop 23583 . 2 (𝜑 → ((𝐷𝑁)‘𝑌) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐹𝑦) / (𝐺𝑦))) lim 𝑌))
788580dirkerval 38984 . . . . . 6 (𝑁 ∈ ℕ → (𝐷𝑁) = (𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))))
7895, 788syl 17 . . . . 5 (𝜑 → (𝐷𝑁) = (𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))))
790789reseq1d 5316 . . . 4 (𝜑 → ((𝐷𝑁) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = ((𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
7914resmptd 5371 . . . 4 (𝜑 → ((𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))))
792257iffalsed 4047 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → if((𝑦 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2))))) = ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))
79313recnd 9947 . . . . . . . 8 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (sin‘((𝑁 + (1 / 2)) · 𝑦)) ∈ ℂ)
79414fvmpt2 6200 . . . . . . . 8 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (sin‘((𝑁 + (1 / 2)) · 𝑦)) ∈ ℂ) → (𝐹𝑦) = (sin‘((𝑁 + (1 / 2)) · 𝑦)))
795562, 793, 794syl2anc 691 . . . . . . 7 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝐹𝑦) = (sin‘((𝑁 + (1 / 2)) · 𝑦)))
796562, 507, 530syl2anc 691 . . . . . . 7 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝐺𝑦) = ((2 · π) · (sin‘(𝑦 / 2))))
797795, 796oveq12d 6567 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝐹𝑦) / (𝐺𝑦)) = ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))
798792, 797eqtr4d 2647 . . . . 5 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → if((𝑦 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2))))) = ((𝐹𝑦) / (𝐺𝑦)))
799798mpteq2dva 4672 . . . 4 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐹𝑦) / (𝐺𝑦))))
800790, 791, 7993eqtrrd 2649 . . 3 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐹𝑦) / (𝐺𝑦))) = ((𝐷𝑁) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
801800oveq1d 6564 . 2 (𝜑 → ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐹𝑦) / (𝐺𝑦))) lim 𝑌) = (((𝐷𝑁) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) lim 𝑌))
802787, 801eleqtrd 2690 1 (𝜑 → ((𝐷𝑁)‘𝑌) ∈ (((𝐷𝑁) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) lim 𝑌))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 195  wo 382  wa 383   = wceq 1475  wcel 1977  wne 2780  wral 2896  wrex 2897  cdif 3537  cun 3538  wss 3540  ifcif 4036  {csn 4125  {cpr 4127   class class class wbr 4583  cmpt 4643  dom cdm 5038  ran crn 5039  cres 5040  cima 5041  ccom 5042  Fun wfun 5798   Fn wfn 5799  wf 5800  cfv 5804  (class class class)co 6549  cc 9813  cr 9814  0cc0 9815  1c1 9816   + caddc 9818   · cmul 9820   < clt 9953   / cdiv 10563  cn 10897  2c2 10947  cz 11254  +crp 11708  (,)cioo 12046   mod cmo 12530  sincsin 14633  cosccos 14634  πcpi 14636  t crest 15904  TopOpenctopn 15905  topGenctg 15921  fldccnfld 19567  Topctop 20517  TopOnctopon 20518  Clsdccld 20630  intcnt 20631   Cn ccn 20838   CnP ccnp 20839  Hauscha 20922  cnccncf 22487   lim climc 23432   D cdv 23433
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-rep 4699  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847  ax-inf2 8421  ax-cnex 9871  ax-resscn 9872  ax-1cn 9873  ax-icn 9874  ax-addcl 9875  ax-addrcl 9876  ax-mulcl 9877  ax-mulrcl 9878  ax-mulcom 9879  ax-addass 9880  ax-mulass 9881  ax-distr 9882  ax-i2m1 9883  ax-1ne0 9884  ax-1rid 9885  ax-rnegex 9886  ax-rrecex 9887  ax-cnre 9888  ax-pre-lttri 9889  ax-pre-lttrn 9890  ax-pre-ltadd 9891  ax-pre-mulgt0 9892  ax-pre-sup 9893  ax-addf 9894  ax-mulf 9895
This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3or 1032  df-3an 1033  df-tru 1478  df-fal 1481  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-nel 2783  df-ral 2901  df-rex 2902  df-reu 2903  df-rmo 2904  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-pss 3556  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-tp 4130  df-op 4132  df-uni 4373  df-int 4411  df-iun 4457  df-iin 4458  df-br 4584  df-opab 4644  df-mpt 4645  df-tr 4681  df-eprel 4949  df-id 4953  df-po 4959  df-so 4960  df-fr 4997  df-se 4998  df-we 4999  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-pred 5597  df-ord 5643  df-on 5644  df-lim 5645  df-suc 5646  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812  df-isom 5813  df-riota 6511  df-ov 6552  df-oprab 6553  df-mpt2 6554  df-of 6795  df-om 6958  df-1st 7059  df-2nd 7060  df-supp 7183  df-wrecs 7294  df-recs 7355  df-rdg 7393  df-1o 7447  df-2o 7448  df-oadd 7451  df-er 7629  df-map 7746  df-pm 7747  df-ixp 7795  df-en 7842  df-dom 7843  df-sdom 7844  df-fin 7845  df-fsupp 8159  df-fi 8200  df-sup 8231  df-inf 8232  df-oi 8298  df-card 8648  df-cda 8873  df-pnf 9955  df-mnf 9956  df-xr 9957  df-ltxr 9958  df-le 9959  df-sub 10147  df-neg 10148  df-div 10564  df-nn 10898  df-2 10956  df-3 10957  df-4 10958  df-5 10959  df-6 10960  df-7 10961  df-8 10962  df-9 10963  df-n0 11170  df-z 11255  df-dec 11370  df-uz 11564  df-q 11665  df-rp 11709  df-xneg 11822  df-xadd 11823  df-xmul 11824  df-ioo 12050  df-ioc 12051  df-ico 12052  df-icc 12053  df-fz 12198  df-fzo 12335  df-fl 12455  df-mod 12531  df-seq 12664  df-exp 12723  df-fac 12923  df-bc 12952  df-hash 12980  df-shft 13655  df-cj 13687  df-re 13688  df-im 13689  df-sqrt 13823  df-abs 13824  df-limsup 14050  df-clim 14067  df-rlim 14068  df-sum 14265  df-ef 14637  df-sin 14639  df-cos 14640  df-pi 14642  df-struct 15697  df-ndx 15698  df-slot 15699  df-base 15700  df-sets 15701  df-ress 15702  df-plusg 15781  df-mulr 15782  df-starv 15783  df-sca 15784  df-vsca 15785  df-ip 15786  df-tset 15787  df-ple 15788  df-ds 15791  df-unif 15792  df-hom 15793  df-cco 15794  df-rest 15906  df-topn 15907  df-0g 15925  df-gsum 15926  df-topgen 15927  df-pt 15928  df-prds 15931  df-xrs 15985  df-qtop 15990  df-imas 15991  df-xps 15993  df-mre 16069  df-mrc 16070  df-acs 16072  df-mgm 17065  df-sgrp 17107  df-mnd 17118  df-submnd 17159  df-mulg 17364  df-cntz 17573  df-cmn 18018  df-psmet 19559  df-xmet 19560  df-met 19561  df-bl 19562  df-mopn 19563  df-fbas 19564  df-fg 19565  df-cnfld 19568  df-top 20521  df-bases 20522  df-topon 20523  df-topsp 20524  df-cld 20633  df-ntr 20634  df-cls 20635  df-nei 20712  df-lp 20750  df-perf 20751  df-cn 20841  df-cnp 20842  df-t1 20928  df-haus 20929  df-cmp 21000  df-tx 21175  df-hmeo 21368  df-fil 21460  df-fm 21552  df-flim 21553  df-flf 21554  df-xms 21935  df-ms 21936  df-tms 21937  df-cncf 22489  df-limc 23436  df-dv 23437
This theorem is referenced by:  dirkercncflem3  38998
  Copyright terms: Public domain W3C validator