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 39654
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 3720 . . . . 5 ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ (𝐴(,)𝐵)
2 ioossre 12185 . . . . 5 (𝐴(,)𝐵) ⊆ ℝ
31, 2sstri 3596 . . . 4 ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ
43a1i 11 . . 3 (𝜑 → ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ)
5 dirkercncflem2.n . . . . . . . . 9 (𝜑𝑁 ∈ ℕ)
65adantr 481 . . . . . . . 8 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑁 ∈ ℕ)
76nnred 10987 . . . . . . 7 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑁 ∈ ℝ)
8 halfre 11198 . . . . . . . 8 (1 / 2) ∈ ℝ
98a1i 11 . . . . . . 7 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (1 / 2) ∈ ℝ)
107, 9readdcld 10021 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑁 + (1 / 2)) ∈ ℝ)
114sselda 3587 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑦 ∈ ℝ)
1210, 11remulcld 10022 . . . . 5 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑁 + (1 / 2)) · 𝑦) ∈ ℝ)
1312resincld 14809 . . . 4 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (sin‘((𝑁 + (1 / 2)) · 𝑦)) ∈ ℝ)
14 dirkercncflem2.f . . . 4 𝐹 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))
1513, 14fmptd 6346 . . 3 (𝜑𝐹:((𝐴(,)𝐵) ∖ {𝑌})⟶ℝ)
16 2re 11042 . . . . . . 7 2 ∈ ℝ
17 pire 24131 . . . . . . 7 π ∈ ℝ
1816, 17remulcli 10006 . . . . . 6 (2 · π) ∈ ℝ
1918a1i 11 . . . . 5 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (2 · π) ∈ ℝ)
2011rehalfcld 11231 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑦 / 2) ∈ ℝ)
2120resincld 14809 . . . . 5 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (sin‘(𝑦 / 2)) ∈ ℝ)
2219, 21remulcld 10022 . . . 4 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((2 · π) · (sin‘(𝑦 / 2))) ∈ ℝ)
23 dirkercncflem2.g . . . 4 𝐺 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))
2422, 23fmptd 6346 . . 3 (𝜑𝐺:((𝐴(,)𝐵) ∖ {𝑌})⟶ℝ)
25 iooretop 22492 . . . 4 (𝐴(,)𝐵) ∈ (topGen‘ran (,))
2625a1i 11 . . 3 (𝜑 → (𝐴(,)𝐵) ∈ (topGen‘ran (,)))
27 dirkercncflem2.y . . 3 (𝜑𝑌 ∈ (𝐴(,)𝐵))
28 eqid 2621 . . 3 ((𝐴(,)𝐵) ∖ {𝑌}) = ((𝐴(,)𝐵) ∖ {𝑌})
2914a1i 11 . . . . . . . 8 (𝜑𝐹 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))))
3029oveq2d 6626 . . . . . . 7 (𝜑 → (ℝ D 𝐹) = (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))))
31 resmpt 5413 . . . . . . . . . . . 12 (((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ → ((𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))))
323, 31ax-mp 5 . . . . . . . . . . 11 ((𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))
3332eqcomi 2630 . . . . . . . . . 10 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) = ((𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))
3433a1i 11 . . . . . . . . 9 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) = ((𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
3534oveq2d 6626 . . . . . . . 8 (𝜑 → (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) = (ℝ D ((𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))))
36 ax-resscn 9945 . . . . . . . . . 10 ℝ ⊆ ℂ
3736a1i 11 . . . . . . . . 9 (𝜑 → ℝ ⊆ ℂ)
385nncnd 10988 . . . . . . . . . . . . . 14 (𝜑𝑁 ∈ ℂ)
39 halfcn 11199 . . . . . . . . . . . . . . 15 (1 / 2) ∈ ℂ
4039a1i 11 . . . . . . . . . . . . . 14 (𝜑 → (1 / 2) ∈ ℂ)
4138, 40addcld 10011 . . . . . . . . . . . . 13 (𝜑 → (𝑁 + (1 / 2)) ∈ ℂ)
4241adantr 481 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ℝ) → (𝑁 + (1 / 2)) ∈ ℂ)
4337sselda 3587 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ℝ) → 𝑦 ∈ ℂ)
4442, 43mulcld 10012 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ℝ) → ((𝑁 + (1 / 2)) · 𝑦) ∈ ℂ)
4544sincld 14796 . . . . . . . . . 10 ((𝜑𝑦 ∈ ℝ) → (sin‘((𝑁 + (1 / 2)) · 𝑦)) ∈ ℂ)
46 eqid 2621 . . . . . . . . . 10 (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) = (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))
4745, 46fmptd 6346 . . . . . . . . 9 (𝜑 → (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))):ℝ⟶ℂ)
48 ssid 3608 . . . . . . . . . . 11 ℝ ⊆ ℝ
4948, 3pm3.2i 471 . . . . . . . . . 10 (ℝ ⊆ ℝ ∧ ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ)
5049a1i 11 . . . . . . . . 9 (𝜑 → (ℝ ⊆ ℝ ∧ ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ))
51 eqid 2621 . . . . . . . . . 10 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
5251tgioo2 22529 . . . . . . . . . 10 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
5351, 52dvres 23598 . . . . . . . . 9 (((ℝ ⊆ ℂ ∧ (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))):ℝ⟶ℂ) ∧ (ℝ ⊆ ℝ ∧ ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ)) → (ℝ D ((𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))) = ((ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))))
5437, 47, 50, 53syl21anc 1322 . . . . . . . 8 (𝜑 → (ℝ D ((𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))) = ((ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))))
55 retop 22488 . . . . . . . . . . 11 (topGen‘ran (,)) ∈ Top
56 rehaus 22525 . . . . . . . . . . . . 13 (topGen‘ran (,)) ∈ Haus
5727elioored 39218 . . . . . . . . . . . . 13 (𝜑𝑌 ∈ ℝ)
58 uniretop 22489 . . . . . . . . . . . . . 14 ℝ = (topGen‘ran (,))
5958sncld 21098 . . . . . . . . . . . . 13 (((topGen‘ran (,)) ∈ Haus ∧ 𝑌 ∈ ℝ) → {𝑌} ∈ (Clsd‘(topGen‘ran (,))))
6056, 57, 59sylancr 694 . . . . . . . . . . . 12 (𝜑 → {𝑌} ∈ (Clsd‘(topGen‘ran (,))))
6158difopn 20761 . . . . . . . . . . . 12 (((𝐴(,)𝐵) ∈ (topGen‘ran (,)) ∧ {𝑌} ∈ (Clsd‘(topGen‘ran (,)))) → ((𝐴(,)𝐵) ∖ {𝑌}) ∈ (topGen‘ran (,)))
6225, 60, 61sylancr 694 . . . . . . . . . . 11 (𝜑 → ((𝐴(,)𝐵) ∖ {𝑌}) ∈ (topGen‘ran (,)))
63 isopn3i 20809 . . . . . . . . . . 11 (((topGen‘ran (,)) ∈ Top ∧ ((𝐴(,)𝐵) ∖ {𝑌}) ∈ (topGen‘ran (,))) → ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌})) = ((𝐴(,)𝐵) ∖ {𝑌}))
6455, 62, 63sylancr 694 . . . . . . . . . 10 (𝜑 → ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌})) = ((𝐴(,)𝐵) ∖ {𝑌}))
6564reseq2d 5361 . . . . . . . . 9 (𝜑 → ((ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))) = ((ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
66 reelprrecn 9980 . . . . . . . . . . . . 13 ℝ ∈ {ℝ, ℂ}
6766a1i 11 . . . . . . . . . . . 12 (𝜑 → ℝ ∈ {ℝ, ℂ})
6841adantr 481 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ ℂ) → (𝑁 + (1 / 2)) ∈ ℂ)
69 simpr 477 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ ℂ) → 𝑦 ∈ ℂ)
7068, 69mulcld 10012 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ℂ) → ((𝑁 + (1 / 2)) · 𝑦) ∈ ℂ)
7170sincld 14796 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ℂ) → (sin‘((𝑁 + (1 / 2)) · 𝑦)) ∈ ℂ)
72 eqid 2621 . . . . . . . . . . . . 13 (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) = (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))
7371, 72fmptd 6346 . . . . . . . . . . . 12 (𝜑 → (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))):ℂ⟶ℂ)
74 ssid 3608 . . . . . . . . . . . . 13 ℂ ⊆ ℂ
7574a1i 11 . . . . . . . . . . . 12 (𝜑 → ℂ ⊆ ℂ)
76 dvsinax 39459 . . . . . . . . . . . . . . . 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 5291 . . . . . . . . . . . . . 14 (𝜑 → dom (ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) = dom (𝑦 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
79 eqid 2621 . . . . . . . . . . . . . . 15 (𝑦 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))) = (𝑦 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))))
8070coscld 14797 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ ℂ) → (cos‘((𝑁 + (1 / 2)) · 𝑦)) ∈ ℂ)
8168, 80mulcld 10012 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ ℂ) → ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))) ∈ ℂ)
8279, 81dmmptd 5986 . . . . . . . . . . . . . 14 (𝜑 → dom (𝑦 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))) = ℂ)
8378, 82eqtrd 2655 . . . . . . . . . . . . 13 (𝜑 → dom (ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) = ℂ)
8436, 83syl5sseqr 3638 . . . . . . . . . . . 12 (𝜑 → ℝ ⊆ dom (ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))))
85 dvres3 23600 . . . . . . . . . . . 12 (((ℝ ∈ {ℝ, ℂ} ∧ (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))):ℂ⟶ℂ) ∧ (ℂ ⊆ ℂ ∧ ℝ ⊆ dom (ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))))) → (ℝ D ((𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ℝ)) = ((ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ℝ))
8667, 73, 75, 84, 85syl22anc 1324 . . . . . . . . . . 11 (𝜑 → (ℝ D ((𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ℝ)) = ((ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ℝ))
87 resmpt 5413 . . . . . . . . . . . . 13 (ℝ ⊆ ℂ → ((𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))))
8836, 87mp1i 13 . . . . . . . . . . . 12 (𝜑 → ((𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))))
8988oveq2d 6626 . . . . . . . . . . 11 (𝜑 → (ℝ D ((𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))) ↾ ℝ)) = (ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))))
9077reseq1d 5360 . . . . . . . . . . . 12 (𝜑 → ((ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ℝ) = ((𝑦 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ℝ))
91 resmpt 5413 . . . . . . . . . . . . 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 2671 . . . . . . . . . . 11 (𝜑 → ((ℂ D (𝑦 ∈ ℂ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
9486, 89, 933eqtr3d 2663 . . . . . . . . . 10 (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) = (𝑦 ∈ ℝ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
9594reseq1d 5360 . . . . . . . . 9 (𝜑 → ((ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = ((𝑦 ∈ ℝ ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
96 resmpt 5413 . . . . . . . . . 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 2659 . . . . . . . 8 (𝜑 → ((ℝ D (𝑦 ∈ ℝ ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦)))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
9935, 54, 983eqtrd 2659 . . . . . . 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 2627 . . . . . . 7 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))) = 𝐻)
10330, 99, 1023eqtrd 2659 . . . . . 6 (𝜑 → (ℝ D 𝐹) = 𝐻)
104103dmeqd 5291 . . . . 5 (𝜑 → dom (ℝ D 𝐹) = dom 𝐻)
10511recnd 10020 . . . . . . 7 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑦 ∈ ℂ)
106105, 81syldan 487 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))) ∈ ℂ)
107100, 106dmmptd 5986 . . . . 5 (𝜑 → dom 𝐻 = ((𝐴(,)𝐵) ∖ {𝑌}))
108104, 107eqtr2d 2656 . . . 4 (𝜑 → ((𝐴(,)𝐵) ∖ {𝑌}) = dom (ℝ D 𝐹))
109 eqimss 3641 . . . 4 (((𝐴(,)𝐵) ∖ {𝑌}) = dom (ℝ D 𝐹) → ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ dom (ℝ D 𝐹))
110108, 109syl 17 . . 3 (𝜑 → ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ dom (ℝ D 𝐹))
111 dirkercncflem2.i . . . . . . . 8 𝐼 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (π · (cos‘(𝑦 / 2))))
112111a1i 11 . . . . . . 7 (𝜑𝐼 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (π · (cos‘(𝑦 / 2)))))
113 resmpt 5413 . . . . . . . . . . . . 13 (((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ → ((𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2)))))
1143, 113ax-mp 5 . . . . . . . . . . . 12 ((𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))
115114eqcomi 2630 . . . . . . . . . . 11 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2)))) = ((𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))
116115oveq2i 6621 . . . . . . . . . 10 (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))) = (ℝ D ((𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
117116a1i 11 . . . . . . . . 9 (𝜑 → (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))) = (ℝ D ((𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))))
118 2cn 11043 . . . . . . . . . . . . . 14 2 ∈ ℂ
119 picn 24132 . . . . . . . . . . . . . 14 π ∈ ℂ
120118, 119mulcli 9997 . . . . . . . . . . . . 13 (2 · π) ∈ ℂ
121120a1i 11 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ℝ) → (2 · π) ∈ ℂ)
12243halfcld 11229 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ℝ) → (𝑦 / 2) ∈ ℂ)
123122sincld 14796 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ℝ) → (sin‘(𝑦 / 2)) ∈ ℂ)
124121, 123mulcld 10012 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ℝ) → ((2 · π) · (sin‘(𝑦 / 2))) ∈ ℂ)
125 eqid 2621 . . . . . . . . . . 11 (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) = (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))
126124, 125fmptd 6346 . . . . . . . . . 10 (𝜑 → (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))):ℝ⟶ℂ)
12751, 52dvres 23598 . . . . . . . . . 10 (((ℝ ⊆ ℂ ∧ (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))):ℝ⟶ℂ) ∧ (ℝ ⊆ ℝ ∧ ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℝ)) → (ℝ D ((𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))) = ((ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))))
12837, 126, 50, 127syl21anc 1322 . . . . . . . . 9 (𝜑 → (ℝ D ((𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌}))) = ((ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))))
12964reseq2d 5361 . . . . . . . . . 10 (𝜑 → ((ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))) = ((ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
13036sseli 3583 . . . . . . . . . . . . . . . 16 (𝑦 ∈ ℝ → 𝑦 ∈ ℂ)
131 1cnd 10008 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ ℂ → 1 ∈ ℂ)
132 2cnd 11045 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ ℂ → 2 ∈ ℂ)
133 id 22 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ ℂ → 𝑦 ∈ ℂ)
134 2ne0 11065 . . . . . . . . . . . . . . . . . . . . . 22 2 ≠ 0
135134a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ ℂ → 2 ≠ 0)
136131, 132, 133, 135div13d 10777 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ ℂ → ((1 / 2) · 𝑦) = ((𝑦 / 2) · 1))
137 halfcl 11209 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ ℂ → (𝑦 / 2) ∈ ℂ)
138137mulid1d 10009 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ ℂ → ((𝑦 / 2) · 1) = (𝑦 / 2))
139136, 138eqtrd 2655 . . . . . . . . . . . . . . . . . . 19 (𝑦 ∈ ℂ → ((1 / 2) · 𝑦) = (𝑦 / 2))
140139fveq2d 6157 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ ℂ → (sin‘((1 / 2) · 𝑦)) = (sin‘(𝑦 / 2)))
141140oveq2d 6626 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ ℂ → ((2 · π) · (sin‘((1 / 2) · 𝑦))) = ((2 · π) · (sin‘(𝑦 / 2))))
142141eqcomd 2627 . . . . . . . . . . . . . . . 16 (𝑦 ∈ ℂ → ((2 · π) · (sin‘(𝑦 / 2))) = ((2 · π) · (sin‘((1 / 2) · 𝑦))))
143130, 142syl 17 . . . . . . . . . . . . . . 15 (𝑦 ∈ ℝ → ((2 · π) · (sin‘(𝑦 / 2))) = ((2 · π) · (sin‘((1 / 2) · 𝑦))))
144143adantl 482 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ℝ) → ((2 · π) · (sin‘(𝑦 / 2))) = ((2 · π) · (sin‘((1 / 2) · 𝑦))))
145144mpteq2dva 4709 . . . . . . . . . . . . 13 (𝜑 → (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2)))) = (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))))
146145oveq2d 6626 . . . . . . . . . . . 12 (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) = (ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))))
147120a1i 11 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ ℂ) → (2 · π) ∈ ℂ)
14839a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ ℂ) → (1 / 2) ∈ ℂ)
149148, 69mulcld 10012 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ ℂ) → ((1 / 2) · 𝑦) ∈ ℂ)
150149sincld 14796 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ ℂ) → (sin‘((1 / 2) · 𝑦)) ∈ ℂ)
151147, 150mulcld 10012 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ ℂ) → ((2 · π) · (sin‘((1 / 2) · 𝑦))) ∈ ℂ)
152 eqid 2621 . . . . . . . . . . . . . . . 16 (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))) = (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))
153151, 152fmptd 6346 . . . . . . . . . . . . . . 15 (𝜑 → (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))):ℂ⟶ℂ)
154 2cnd 11045 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 2 ∈ ℂ)
155119a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → π ∈ ℂ)
156154, 155mulcld 10012 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (2 · π) ∈ ℂ)
157 dvasinbx 39468 . . . . . . . . . . . . . . . . . . . 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 11045 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑦 ∈ ℂ) → 2 ∈ ℂ)
160119a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑦 ∈ ℂ) → π ∈ ℂ)
161159, 160, 148mul32d 10198 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦 ∈ ℂ) → ((2 · π) · (1 / 2)) = ((2 · (1 / 2)) · π))
162134a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑦 ∈ ℂ) → 2 ≠ 0)
163159, 162recidd 10748 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑦 ∈ ℂ) → (2 · (1 / 2)) = 1)
164163oveq1d 6625 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦 ∈ ℂ) → ((2 · (1 / 2)) · π) = (1 · π))
165160mulid2d 10010 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦 ∈ ℂ) → (1 · π) = π)
166161, 164, 1653eqtrd 2659 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑦 ∈ ℂ) → ((2 · π) · (1 / 2)) = π)
167139fveq2d 6157 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 ∈ ℂ → (cos‘((1 / 2) · 𝑦)) = (cos‘(𝑦 / 2)))
168167adantl 482 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑦 ∈ ℂ) → (cos‘((1 / 2) · 𝑦)) = (cos‘(𝑦 / 2)))
169166, 168oveq12d 6628 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ ℂ) → (((2 · π) · (1 / 2)) · (cos‘((1 / 2) · 𝑦))) = (π · (cos‘(𝑦 / 2))))
170169mpteq2dva 4709 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑦 ∈ ℂ ↦ (((2 · π) · (1 / 2)) · (cos‘((1 / 2) · 𝑦)))) = (𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))))
171158, 170eqtrd 2655 . . . . . . . . . . . . . . . . . 18 (𝜑 → (ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) = (𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))))
172171dmeqd 5291 . . . . . . . . . . . . . . . . 17 (𝜑 → dom (ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) = dom (𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))))
173 eqid 2621 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))) = (𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2))))
17469halfcld 11229 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ ℂ) → (𝑦 / 2) ∈ ℂ)
175174coscld 14797 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ ℂ) → (cos‘(𝑦 / 2)) ∈ ℂ)
176160, 175mulcld 10012 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ ℂ) → (π · (cos‘(𝑦 / 2))) ∈ ℂ)
177173, 176dmmptd 5986 . . . . . . . . . . . . . . . . 17 (𝜑 → dom (𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))) = ℂ)
178172, 177eqtrd 2655 . . . . . . . . . . . . . . . 16 (𝜑 → dom (ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) = ℂ)
17936, 178syl5sseqr 3638 . . . . . . . . . . . . . . 15 (𝜑 → ℝ ⊆ dom (ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))))
180 dvres3 23600 . . . . . . . . . . . . . . 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 1324 . . . . . . . . . . . . . 14 (𝜑 → (ℝ D ((𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))) ↾ ℝ)) = ((ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) ↾ ℝ))
182 resmpt 5413 . . . . . . . . . . . . . . . 16 (ℝ ⊆ ℂ → ((𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))))
18336, 182mp1i 13 . . . . . . . . . . . . . . 15 (𝜑 → ((𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))))
184183oveq2d 6626 . . . . . . . . . . . . . 14 (𝜑 → (ℝ D ((𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦)))) ↾ ℝ)) = (ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))))
185171reseq1d 5360 . . . . . . . . . . . . . 14 (𝜑 → ((ℂ D (𝑦 ∈ ℂ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) ↾ ℝ) = ((𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))) ↾ ℝ))
186181, 184, 1853eqtr3d 2663 . . . . . . . . . . . . 13 (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) = ((𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))) ↾ ℝ))
187 resmpt 5413 . . . . . . . . . . . . . 14 (ℝ ⊆ ℂ → ((𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ (π · (cos‘(𝑦 / 2)))))
18836, 187ax-mp 5 . . . . . . . . . . . . 13 ((𝑦 ∈ ℂ ↦ (π · (cos‘(𝑦 / 2)))) ↾ ℝ) = (𝑦 ∈ ℝ ↦ (π · (cos‘(𝑦 / 2))))
189186, 188syl6eq 2671 . . . . . . . . . . . 12 (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘((1 / 2) · 𝑦))))) = (𝑦 ∈ ℝ ↦ (π · (cos‘(𝑦 / 2)))))
190146, 189eqtrd 2655 . . . . . . . . . . 11 (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) = (𝑦 ∈ ℝ ↦ (π · (cos‘(𝑦 / 2)))))
191190reseq1d 5360 . . . . . . . . . 10 (𝜑 → ((ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = ((𝑦 ∈ ℝ ↦ (π · (cos‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
1924resmptd 5416 . . . . . . . . . 10 (𝜑 → ((𝑦 ∈ ℝ ↦ (π · (cos‘(𝑦 / 2)))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (π · (cos‘(𝑦 / 2)))))
193129, 191, 1923eqtrd 2659 . . . . . . . . 9 (𝜑 → ((ℝ D (𝑦 ∈ ℝ ↦ ((2 · π) · (sin‘(𝑦 / 2))))) ↾ ((int‘(topGen‘ran (,)))‘((𝐴(,)𝐵) ∖ {𝑌}))) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (π · (cos‘(𝑦 / 2)))))
194117, 128, 1933eqtrd 2659 . . . . . . . 8 (𝜑 → (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (π · (cos‘(𝑦 / 2)))))
195194eqcomd 2627 . . . . . . 7 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (π · (cos‘(𝑦 / 2)))) = (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))))
19623a1i 11 . . . . . . . . 9 (𝜑𝐺 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2)))))
197196oveq2d 6626 . . . . . . . 8 (𝜑 → (ℝ D 𝐺) = (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))))
198197eqcomd 2627 . . . . . . 7 (𝜑 → (ℝ D (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2))))) = (ℝ D 𝐺))
199112, 195, 1983eqtrrd 2660 . . . . . 6 (𝜑 → (ℝ D 𝐺) = 𝐼)
200199dmeqd 5291 . . . . 5 (𝜑 → dom (ℝ D 𝐺) = dom 𝐼)
201105, 176syldan 487 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (π · (cos‘(𝑦 / 2))) ∈ ℂ)
202111, 201dmmptd 5986 . . . . 5 (𝜑 → dom 𝐼 = ((𝐴(,)𝐵) ∖ {𝑌}))
203200, 202eqtr2d 2656 . . . 4 (𝜑 → ((𝐴(,)𝐵) ∖ {𝑌}) = dom (ℝ D 𝐺))
204 eqimss 3641 . . . 4 (((𝐴(,)𝐵) ∖ {𝑌}) = dom (ℝ D 𝐺) → ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ dom (ℝ D 𝐺))
205203, 204syl 17 . . 3 (𝜑 → ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ dom (ℝ D 𝐺))
206105, 70syldan 487 . . . . . . . 8 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑁 + (1 / 2)) · 𝑦) ∈ ℂ)
207206ralrimiva 2961 . . . . . . 7 (𝜑 → ∀𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})((𝑁 + (1 / 2)) · 𝑦) ∈ ℂ)
208 eqid 2621 . . . . . . . 8 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))
209208fnmpt 5982 . . . . . . 7 (∀𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})((𝑁 + (1 / 2)) · 𝑦) ∈ ℂ → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) Fn ((𝐴(,)𝐵) ∖ {𝑌}))
210207, 209syl 17 . . . . . 6 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) Fn ((𝐴(,)𝐵) ∖ {𝑌}))
211 eqidd 2622 . . . . . . . . . 10 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)))
212 simpr 477 . . . . . . . . . . 11 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ 𝑦 = 𝑤) → 𝑦 = 𝑤)
213212oveq2d 6626 . . . . . . . . . 10 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ 𝑦 = 𝑤) → ((𝑁 + (1 / 2)) · 𝑦) = ((𝑁 + (1 / 2)) · 𝑤))
214 simpr 477 . . . . . . . . . 10 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}))
21538adantr 481 . . . . . . . . . . . 12 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑁 ∈ ℂ)
216 1cnd 10008 . . . . . . . . . . . . 13 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 1 ∈ ℂ)
217216halfcld 11229 . . . . . . . . . . . 12 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (1 / 2) ∈ ℂ)
218215, 217addcld 10011 . . . . . . . . . . 11 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑁 + (1 / 2)) ∈ ℂ)
219 eldifi 3715 . . . . . . . . . . . . . 14 (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → 𝑤 ∈ (𝐴(,)𝐵))
220219elioored 39218 . . . . . . . . . . . . 13 (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → 𝑤 ∈ ℝ)
221220recnd 10020 . . . . . . . . . . . 12 (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → 𝑤 ∈ ℂ)
222221adantl 482 . . . . . . . . . . 11 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑤 ∈ ℂ)
223218, 222mulcld 10012 . . . . . . . . . 10 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑁 + (1 / 2)) · 𝑤) ∈ ℂ)
224211, 213, 214, 223fvmptd 6250 . . . . . . . . 9 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤) = ((𝑁 + (1 / 2)) · 𝑤))
225 eleq1 2686 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑤 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↔ 𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})))
226225anbi2d 739 . . . . . . . . . . . . . . 15 (𝑦 = 𝑤 → ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ↔ (𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}))))
227 oveq1 6617 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑤 → (𝑦 mod (2 · π)) = (𝑤 mod (2 · π)))
228227neeq1d 2849 . . . . . . . . . . . . . . 15 (𝑦 = 𝑤 → ((𝑦 mod (2 · π)) ≠ 0 ↔ (𝑤 mod (2 · π)) ≠ 0))
229226, 228imbi12d 334 . . . . . . . . . . . . . 14 (𝑦 = 𝑤 → (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑦 mod (2 · π)) ≠ 0) ↔ ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑤 mod (2 · π)) ≠ 0)))
230 eldifi 3715 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → 𝑦 ∈ (𝐴(,)𝐵))
231 elioore 12155 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ (𝐴(,)𝐵) → 𝑦 ∈ ℝ)
232230, 231, 1303syl 18 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → 𝑦 ∈ ℂ)
233 2cnd 11045 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → 2 ∈ ℂ)
234119a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → π ∈ ℂ)
235134a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → 2 ≠ 0)
236 0re 9992 . . . . . . . . . . . . . . . . . . . . . 22 0 ∈ ℝ
237 pipos 24133 . . . . . . . . . . . . . . . . . . . . . 22 0 < π
238236, 237gtneii 10101 . . . . . . . . . . . . . . . . . . . . 21 π ≠ 0
239238a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → π ≠ 0)
240232, 233, 234, 235, 239divdiv1d 10784 . . . . . . . . . . . . . . . . . . 19 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → ((𝑦 / 2) / π) = (𝑦 / (2 · π)))
241240eqcomd 2627 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → (𝑦 / (2 · π)) = ((𝑦 / 2) / π))
242241adantl 482 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑦 / (2 · π)) = ((𝑦 / 2) / π))
243 dirkercncflem2.yne0 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (sin‘(𝑦 / 2)) ≠ 0)
244243neneqd 2795 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ (sin‘(𝑦 / 2)) = 0)
245105halfcld 11229 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑦 / 2) ∈ ℂ)
246 sineq0 24194 . . . . . . . . . . . . . . . . . . 19 ((𝑦 / 2) ∈ ℂ → ((sin‘(𝑦 / 2)) = 0 ↔ ((𝑦 / 2) / π) ∈ ℤ))
247245, 246syl 17 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((sin‘(𝑦 / 2)) = 0 ↔ ((𝑦 / 2) / π) ∈ ℤ))
248244, 247mtbid 314 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ ((𝑦 / 2) / π) ∈ ℤ)
249242, 248eqneltrd 2717 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ (𝑦 / (2 · π)) ∈ ℤ)
250 2rp 11789 . . . . . . . . . . . . . . . . . 18 2 ∈ ℝ+
251 pirp 24134 . . . . . . . . . . . . . . . . . 18 π ∈ ℝ+
252 rpmulcl 11807 . . . . . . . . . . . . . . . . . 18 ((2 ∈ ℝ+ ∧ π ∈ ℝ+) → (2 · π) ∈ ℝ+)
253250, 251, 252mp2an 707 . . . . . . . . . . . . . . . . 17 (2 · π) ∈ ℝ+
254 mod0 12623 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ℝ ∧ (2 · π) ∈ ℝ+) → ((𝑦 mod (2 · π)) = 0 ↔ (𝑦 / (2 · π)) ∈ ℤ))
25511, 253, 254sylancl 693 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑦 mod (2 · π)) = 0 ↔ (𝑦 / (2 · π)) ∈ ℤ))
256249, 255mtbird 315 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ (𝑦 mod (2 · π)) = 0)
257256neqned 2797 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑦 mod (2 · π)) ≠ 0)
258229, 257chvarv 2262 . . . . . . . . . . . . 13 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑤 mod (2 · π)) ≠ 0)
259258neneqd 2795 . . . . . . . . . . . 12 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ (𝑤 mod (2 · π)) = 0)
260 simpll 789 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → 𝜑)
261 simpr 477 . . . . . . . . . . . . . 14 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌))
262221ad2antlr 762 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → 𝑤 ∈ ℂ)
26357recnd 10020 . . . . . . . . . . . . . . . 16 (𝜑𝑌 ∈ ℂ)
264263ad2antrr 761 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → 𝑌 ∈ ℂ)
265 0red 9993 . . . . . . . . . . . . . . . . . . 19 (𝜑 → 0 ∈ ℝ)
2665nnred 10987 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑁 ∈ ℝ)
267 1red 10007 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 1 ∈ ℝ)
268267rehalfcld 11231 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (1 / 2) ∈ ℝ)
269266, 268readdcld 10021 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑁 + (1 / 2)) ∈ ℝ)
2705nngt0d 11016 . . . . . . . . . . . . . . . . . . 19 (𝜑 → 0 < 𝑁)
271250a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 2 ∈ ℝ+)
272271rpreccld 11834 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (1 / 2) ∈ ℝ+)
273266, 272ltaddrpd 11857 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑁 < (𝑁 + (1 / 2)))
274265, 266, 269, 270, 273lttrd 10150 . . . . . . . . . . . . . . . . . 18 (𝜑 → 0 < (𝑁 + (1 / 2)))
275274gt0ne0d 10544 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑁 + (1 / 2)) ≠ 0)
27641, 275jca 554 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑁 + (1 / 2)) ∈ ℂ ∧ (𝑁 + (1 / 2)) ≠ 0))
277276ad2antrr 761 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → ((𝑁 + (1 / 2)) ∈ ℂ ∧ (𝑁 + (1 / 2)) ≠ 0))
278 mulcan 10616 . . . . . . . . . . . . . . 15 ((𝑤 ∈ ℂ ∧ 𝑌 ∈ ℂ ∧ ((𝑁 + (1 / 2)) ∈ ℂ ∧ (𝑁 + (1 / 2)) ≠ 0)) → (((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌) ↔ 𝑤 = 𝑌))
279262, 264, 277, 278syl3anc 1323 . . . . . . . . . . . . . 14 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → (((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌) ↔ 𝑤 = 𝑌))
280261, 279mpbid 222 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → 𝑤 = 𝑌)
281 oveq1 6617 . . . . . . . . . . . . . 14 (𝑤 = 𝑌 → (𝑤 mod (2 · π)) = (𝑌 mod (2 · π)))
282 dirkercncflem2.ymod . . . . . . . . . . . . . 14 (𝜑 → (𝑌 mod (2 · π)) = 0)
283281, 282sylan9eqr 2677 . . . . . . . . . . . . 13 ((𝜑𝑤 = 𝑌) → (𝑤 mod (2 · π)) = 0)
284260, 280, 283syl2anc 692 . . . . . . . . . . . 12 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)) → (𝑤 mod (2 · π)) = 0)
285259, 284mtand 690 . . . . . . . . . . 11 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌))
28641, 263mulcld 10012 . . . . . . . . . . . . 13 (𝜑 → ((𝑁 + (1 / 2)) · 𝑌) ∈ ℂ)
287286adantr 481 . . . . . . . . . . . 12 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑁 + (1 / 2)) · 𝑌) ∈ ℂ)
288 elsn2g 4186 . . . . . . . . . . . 12 (((𝑁 + (1 / 2)) · 𝑌) ∈ ℂ → (((𝑁 + (1 / 2)) · 𝑤) ∈ {((𝑁 + (1 / 2)) · 𝑌)} ↔ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)))
289287, 288syl 17 . . . . . . . . . . 11 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (((𝑁 + (1 / 2)) · 𝑤) ∈ {((𝑁 + (1 / 2)) · 𝑌)} ↔ ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌)))
290285, 289mtbird 315 . . . . . . . . . 10 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ ((𝑁 + (1 / 2)) · 𝑤) ∈ {((𝑁 + (1 / 2)) · 𝑌)})
291223, 290eldifd 3570 . . . . . . . . 9 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑁 + (1 / 2)) · 𝑤) ∈ (ℂ ∖ {((𝑁 + (1 / 2)) · 𝑌)}))
292224, 291eqeltrd 2698 . . . . . . . 8 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤) ∈ (ℂ ∖ {((𝑁 + (1 / 2)) · 𝑌)}))
293 sinf 14790 . . . . . . . . . . . 12 sin:ℂ⟶ℂ
294293fdmi 6014 . . . . . . . . . . 11 dom sin = ℂ
295294eqcomi 2630 . . . . . . . . . 10 ℂ = dom sin
296295a1i 11 . . . . . . . . 9 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ℂ = dom sin)
297296difeq1d 3710 . . . . . . . 8 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (ℂ ∖ {((𝑁 + (1 / 2)) · 𝑌)}) = (dom sin ∖ {((𝑁 + (1 / 2)) · 𝑌)}))
298292, 297eleqtrd 2700 . . . . . . 7 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤) ∈ (dom sin ∖ {((𝑁 + (1 / 2)) · 𝑌)}))
299298ralrimiva 2961 . . . . . 6 (𝜑 → ∀𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤) ∈ (dom sin ∖ {((𝑁 + (1 / 2)) · 𝑌)}))
300 fnfvrnss 6351 . . . . . 6 (((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) Fn ((𝐴(,)𝐵) ∖ {𝑌}) ∧ ∀𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤) ∈ (dom sin ∖ {((𝑁 + (1 / 2)) · 𝑌)})) → ran (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) ⊆ (dom sin ∖ {((𝑁 + (1 / 2)) · 𝑌)}))
301210, 299, 300syl2anc 692 . . . . 5 (𝜑 → ran (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) ⊆ (dom sin ∖ {((𝑁 + (1 / 2)) · 𝑌)}))
302 uncom 3740 . . . . . . . . . 10 (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) = ({𝑌} ∪ ((𝐴(,)𝐵) ∖ {𝑌}))
303302a1i 11 . . . . . . . . 9 (𝜑 → (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) = ({𝑌} ∪ ((𝐴(,)𝐵) ∖ {𝑌})))
30427snssd 4314 . . . . . . . . . 10 (𝜑 → {𝑌} ⊆ (𝐴(,)𝐵))
305 undif 4026 . . . . . . . . . 10 ({𝑌} ⊆ (𝐴(,)𝐵) ↔ ({𝑌} ∪ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝐴(,)𝐵))
306304, 305sylib 208 . . . . . . . . 9 (𝜑 → ({𝑌} ∪ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝐴(,)𝐵))
307303, 306eqtrd 2655 . . . . . . . 8 (𝜑 → (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) = (𝐴(,)𝐵))
308307mpteq1d 4703 . . . . . . 7 (𝜑 → (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))))
309 iftrue 4069 . . . . . . . . . . . . 13 (𝑤 = 𝑌 → if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = ((𝑁 + (1 / 2)) · 𝑌))
310 oveq2 6618 . . . . . . . . . . . . 13 (𝑤 = 𝑌 → ((𝑁 + (1 / 2)) · 𝑤) = ((𝑁 + (1 / 2)) · 𝑌))
311309, 310eqtr4d 2658 . . . . . . . . . . . 12 (𝑤 = 𝑌 → if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = ((𝑁 + (1 / 2)) · 𝑤))
312311adantl 482 . . . . . . . . . . 11 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = ((𝑁 + (1 / 2)) · 𝑤))
313 iffalse 4072 . . . . . . . . . . . . 13 𝑤 = 𝑌 → if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))
314313adantl 482 . . . . . . . . . . . 12 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))
315 eqidd 2622 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)))
316 oveq2 6618 . . . . . . . . . . . . . 14 (𝑦 = 𝑤 → ((𝑁 + (1 / 2)) · 𝑦) = ((𝑁 + (1 / 2)) · 𝑤))
317316adantl 482 . . . . . . . . . . . . 13 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → ((𝑁 + (1 / 2)) · 𝑦) = ((𝑁 + (1 / 2)) · 𝑤))
318 simpl 473 . . . . . . . . . . . . . . 15 ((𝑤 ∈ (𝐴(,)𝐵) ∧ ¬ 𝑤 = 𝑌) → 𝑤 ∈ (𝐴(,)𝐵))
319 id 22 . . . . . . . . . . . . . . . . 17 𝑤 = 𝑌 → ¬ 𝑤 = 𝑌)
320 velsn 4169 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ {𝑌} ↔ 𝑤 = 𝑌)
321319, 320sylnibr 319 . . . . . . . . . . . . . . . 16 𝑤 = 𝑌 → ¬ 𝑤 ∈ {𝑌})
322321adantl 482 . . . . . . . . . . . . . . 15 ((𝑤 ∈ (𝐴(,)𝐵) ∧ ¬ 𝑤 = 𝑌) → ¬ 𝑤 ∈ {𝑌})
323318, 322eldifd 3570 . . . . . . . . . . . . . 14 ((𝑤 ∈ (𝐴(,)𝐵) ∧ ¬ 𝑤 = 𝑌) → 𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}))
324323adantll 749 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → 𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}))
32541adantr 481 . . . . . . . . . . . . . . 15 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (𝑁 + (1 / 2)) ∈ ℂ)
326 elioore 12155 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ (𝐴(,)𝐵) → 𝑤 ∈ ℝ)
327326recnd 10020 . . . . . . . . . . . . . . . 16 (𝑤 ∈ (𝐴(,)𝐵) → 𝑤 ∈ ℂ)
328327adantl 482 . . . . . . . . . . . . . . 15 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → 𝑤 ∈ ℂ)
329325, 328mulcld 10012 . . . . . . . . . . . . . 14 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → ((𝑁 + (1 / 2)) · 𝑤) ∈ ℂ)
330329adantr 481 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → ((𝑁 + (1 / 2)) · 𝑤) ∈ ℂ)
331315, 317, 324, 330fvmptd 6250 . . . . . . . . . . . 12 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤) = ((𝑁 + (1 / 2)) · 𝑤))
332314, 331eqtrd 2655 . . . . . . . . . . 11 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = ((𝑁 + (1 / 2)) · 𝑤))
333312, 332pm2.61dan 831 . . . . . . . . . 10 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = ((𝑁 + (1 / 2)) · 𝑤))
334333mpteq2dva 4709 . . . . . . . . 9 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)))
335 ioosscn 39158 . . . . . . . . . . . . . 14 (𝐴(,)𝐵) ⊆ ℂ
336 resmpt 5413 . . . . . . . . . . . . . 14 ((𝐴(,)𝐵) ⊆ ℂ → ((𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ↾ (𝐴(,)𝐵)) = (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)))
337335, 336ax-mp 5 . . . . . . . . . . . . 13 ((𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ↾ (𝐴(,)𝐵)) = (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤))
338 eqid 2621 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) = (𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤))
339338mulc1cncf 22631 . . . . . . . . . . . . . . . 16 ((𝑁 + (1 / 2)) ∈ ℂ → (𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ (ℂ–cn→ℂ))
34041, 339syl 17 . . . . . . . . . . . . . . 15 (𝜑 → (𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ (ℂ–cn→ℂ))
34151cnfldtop 22510 . . . . . . . . . . . . . . . . . . 19 (TopOpen‘ℂfld) ∈ Top
342 unicntop 22512 . . . . . . . . . . . . . . . . . . . 20 ℂ = (TopOpen‘ℂfld)
343342restid 16026 . . . . . . . . . . . . . . . . . . 19 ((TopOpen‘ℂfld) ∈ Top → ((TopOpen‘ℂfld) ↾t ℂ) = (TopOpen‘ℂfld))
344341, 343ax-mp 5 . . . . . . . . . . . . . . . . . 18 ((TopOpen‘ℂfld) ↾t ℂ) = (TopOpen‘ℂfld)
345344eqcomi 2630 . . . . . . . . . . . . . . . . 17 (TopOpen‘ℂfld) = ((TopOpen‘ℂfld) ↾t ℂ)
34651, 345, 345cncfcn 22635 . . . . . . . . . . . . . . . 16 ((ℂ ⊆ ℂ ∧ ℂ ⊆ ℂ) → (ℂ–cn→ℂ) = ((TopOpen‘ℂfld) Cn (TopOpen‘ℂfld)))
34774, 75, 346sylancr 694 . . . . . . . . . . . . . . 15 (𝜑 → (ℂ–cn→ℂ) = ((TopOpen‘ℂfld) Cn (TopOpen‘ℂfld)))
348340, 347eleqtrd 2700 . . . . . . . . . . . . . 14 (𝜑 → (𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((TopOpen‘ℂfld) Cn (TopOpen‘ℂfld)))
3492, 37syl5ss 3598 . . . . . . . . . . . . . 14 (𝜑 → (𝐴(,)𝐵) ⊆ ℂ)
350342cnrest 21012 . . . . . . . . . . . . . 14 (((𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((TopOpen‘ℂfld) Cn (TopOpen‘ℂfld)) ∧ (𝐴(,)𝐵) ⊆ ℂ) → ((𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ↾ (𝐴(,)𝐵)) ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
351348, 349, 350syl2anc 692 . . . . . . . . . . . . 13 (𝜑 → ((𝑤 ∈ ℂ ↦ ((𝑁 + (1 / 2)) · 𝑤)) ↾ (𝐴(,)𝐵)) ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
352337, 351syl5eqelr 2703 . . . . . . . . . . . 12 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
35351cnfldtopon 22509 . . . . . . . . . . . . . 14 (TopOpen‘ℂfld) ∈ (TopOn‘ℂ)
354 resttopon 20888 . . . . . . . . . . . . . 14 (((TopOpen‘ℂfld) ∈ (TopOn‘ℂ) ∧ (𝐴(,)𝐵) ⊆ ℂ) → ((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) ∈ (TopOn‘(𝐴(,)𝐵)))
355353, 349, 354sylancr 694 . . . . . . . . . . . . 13 (𝜑 → ((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) ∈ (TopOn‘(𝐴(,)𝐵)))
356 cncnp 21007 . . . . . . . . . . . . 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 222 . . . . . . . . . . 11 (𝜑 → ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)):(𝐴(,)𝐵)⟶ℂ ∧ ∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦)))
359358simprd 479 . . . . . . . . . 10 (𝜑 → ∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦))
360 fveq2 6153 . . . . . . . . . . . 12 (𝑦 = 𝑌 → ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦) = ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
361360eleq2d 2684 . . . . . . . . . . 11 (𝑦 = 𝑌 → ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦) ↔ (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌)))
362361rspccva 3297 . . . . . . . . . 10 ((∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦) ∧ 𝑌 ∈ (𝐴(,)𝐵)) → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
363359, 27, 362syl2anc 692 . . . . . . . . 9 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑤)) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
364334, 363eqeltrd 2698 . . . . . . . 8 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
365307eqcomd 2627 . . . . . . . . . . 11 (𝜑 → (𝐴(,)𝐵) = (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}))
366365oveq2d 6626 . . . . . . . . . 10 (𝜑 → ((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) = ((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})))
367366oveq1d 6625 . . . . . . . . 9 (𝜑 → (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld)) = (((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld)))
368367fveq1d 6155 . . . . . . . 8 (𝜑 → ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌) = ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌))
369364, 368eleqtrd 2700 . . . . . . 7 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌))
370308, 369eqeltrd 2698 . . . . . 6 (𝜑 → (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌))
371 eqid 2621 . . . . . . 7 ((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) = ((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}))
372 eqid 2621 . . . . . . 7 (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) = (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)))
373206, 208fmptd 6346 . . . . . . 7 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)):((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ)
3744, 36syl6ss 3599 . . . . . . 7 (𝜑 → ((𝐴(,)𝐵) ∖ {𝑌}) ⊆ ℂ)
375371, 51, 372, 373, 374, 263ellimc 23560 . . . . . 6 (𝜑 → (((𝑁 + (1 / 2)) · 𝑌) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) lim 𝑌) ↔ (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, ((𝑁 + (1 / 2)) · 𝑌), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌)))
376370, 375mpbird 247 . . . . 5 (𝜑 → ((𝑁 + (1 / 2)) · 𝑌) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)) lim 𝑌))
377134a1i 11 . . . . . . . . . . . 12 (𝜑 → 2 ≠ 0)
378238a1i 11 . . . . . . . . . . . 12 (𝜑 → π ≠ 0)
379154, 155, 377, 378mulne0d 10631 . . . . . . . . . . 11 (𝜑 → (2 · π) ≠ 0)
380263, 156, 379divcan1d 10754 . . . . . . . . . 10 (𝜑 → ((𝑌 / (2 · π)) · (2 · π)) = 𝑌)
381380eqcomd 2627 . . . . . . . . 9 (𝜑𝑌 = ((𝑌 / (2 · π)) · (2 · π)))
382381oveq2d 6626 . . . . . . . 8 (𝜑 → ((𝑁 + (1 / 2)) · 𝑌) = ((𝑁 + (1 / 2)) · ((𝑌 / (2 · π)) · (2 · π))))
383382fveq2d 6157 . . . . . . 7 (𝜑 → (sin‘((𝑁 + (1 / 2)) · 𝑌)) = (sin‘((𝑁 + (1 / 2)) · ((𝑌 / (2 · π)) · (2 · π)))))
384263, 156, 379divcld 10753 . . . . . . . . . . 11 (𝜑 → (𝑌 / (2 · π)) ∈ ℂ)
38541, 384, 156mul12d 10197 . . . . . . . . . 10 (𝜑 → ((𝑁 + (1 / 2)) · ((𝑌 / (2 · π)) · (2 · π))) = ((𝑌 / (2 · π)) · ((𝑁 + (1 / 2)) · (2 · π))))
38641, 154, 155mulassd 10015 . . . . . . . . . . . 12 (𝜑 → (((𝑁 + (1 / 2)) · 2) · π) = ((𝑁 + (1 / 2)) · (2 · π)))
387386eqcomd 2627 . . . . . . . . . . 11 (𝜑 → ((𝑁 + (1 / 2)) · (2 · π)) = (((𝑁 + (1 / 2)) · 2) · π))
388387oveq2d 6626 . . . . . . . . . 10 (𝜑 → ((𝑌 / (2 · π)) · ((𝑁 + (1 / 2)) · (2 · π))) = ((𝑌 / (2 · π)) · (((𝑁 + (1 / 2)) · 2) · π)))
38938, 40, 154adddird 10017 . . . . . . . . . . . . 13 (𝜑 → ((𝑁 + (1 / 2)) · 2) = ((𝑁 · 2) + ((1 / 2) · 2)))
390154, 377recid2d 10749 . . . . . . . . . . . . . 14 (𝜑 → ((1 / 2) · 2) = 1)
391390oveq2d 6626 . . . . . . . . . . . . 13 (𝜑 → ((𝑁 · 2) + ((1 / 2) · 2)) = ((𝑁 · 2) + 1))
392389, 391eqtrd 2655 . . . . . . . . . . . 12 (𝜑 → ((𝑁 + (1 / 2)) · 2) = ((𝑁 · 2) + 1))
393392oveq1d 6625 . . . . . . . . . . 11 (𝜑 → (((𝑁 + (1 / 2)) · 2) · π) = (((𝑁 · 2) + 1) · π))
394393oveq2d 6626 . . . . . . . . . 10 (𝜑 → ((𝑌 / (2 · π)) · (((𝑁 + (1 / 2)) · 2) · π)) = ((𝑌 / (2 · π)) · (((𝑁 · 2) + 1) · π)))
395385, 388, 3943eqtrd 2659 . . . . . . . . 9 (𝜑 → ((𝑁 + (1 / 2)) · ((𝑌 / (2 · π)) · (2 · π))) = ((𝑌 / (2 · π)) · (((𝑁 · 2) + 1) · π)))
39638, 154mulcld 10012 . . . . . . . . . . 11 (𝜑 → (𝑁 · 2) ∈ ℂ)
397 1cnd 10008 . . . . . . . . . . 11 (𝜑 → 1 ∈ ℂ)
398396, 397addcld 10011 . . . . . . . . . 10 (𝜑 → ((𝑁 · 2) + 1) ∈ ℂ)
399384, 398, 155mulassd 10015 . . . . . . . . 9 (𝜑 → (((𝑌 / (2 · π)) · ((𝑁 · 2) + 1)) · π) = ((𝑌 / (2 · π)) · (((𝑁 · 2) + 1) · π)))
400395, 399eqtr4d 2658 . . . . . . . 8 (𝜑 → ((𝑁 + (1 / 2)) · ((𝑌 / (2 · π)) · (2 · π))) = (((𝑌 / (2 · π)) · ((𝑁 · 2) + 1)) · π))
401400fveq2d 6157 . . . . . . 7 (𝜑 → (sin‘((𝑁 + (1 / 2)) · ((𝑌 / (2 · π)) · (2 · π)))) = (sin‘(((𝑌 / (2 · π)) · ((𝑁 · 2) + 1)) · π)))
402 mod0 12623 . . . . . . . . . . 11 ((𝑌 ∈ ℝ ∧ (2 · π) ∈ ℝ+) → ((𝑌 mod (2 · π)) = 0 ↔ (𝑌 / (2 · π)) ∈ ℤ))
40357, 253, 402sylancl 693 . . . . . . . . . 10 (𝜑 → ((𝑌 mod (2 · π)) = 0 ↔ (𝑌 / (2 · π)) ∈ ℤ))
404282, 403mpbid 222 . . . . . . . . 9 (𝜑 → (𝑌 / (2 · π)) ∈ ℤ)
4055nnzd 11433 . . . . . . . . . . 11 (𝜑𝑁 ∈ ℤ)
406 2z 11361 . . . . . . . . . . . 12 2 ∈ ℤ
407406a1i 11 . . . . . . . . . . 11 (𝜑 → 2 ∈ ℤ)
408405, 407zmulcld 11440 . . . . . . . . . 10 (𝜑 → (𝑁 · 2) ∈ ℤ)
409408peano2zd 11437 . . . . . . . . 9 (𝜑 → ((𝑁 · 2) + 1) ∈ ℤ)
410404, 409zmulcld 11440 . . . . . . . 8 (𝜑 → ((𝑌 / (2 · π)) · ((𝑁 · 2) + 1)) ∈ ℤ)
411 sinkpi 24192 . . . . . . . 8 (((𝑌 / (2 · π)) · ((𝑁 · 2) + 1)) ∈ ℤ → (sin‘(((𝑌 / (2 · π)) · ((𝑁 · 2) + 1)) · π)) = 0)
412410, 411syl 17 . . . . . . 7 (𝜑 → (sin‘(((𝑌 / (2 · π)) · ((𝑁 · 2) + 1)) · π)) = 0)
413383, 401, 4123eqtrd 2659 . . . . . 6 (𝜑 → (sin‘((𝑁 + (1 / 2)) · 𝑌)) = 0)
414 sincn 24119 . . . . . . . 8 sin ∈ (ℂ–cn→ℂ)
415414a1i 11 . . . . . . 7 (𝜑 → sin ∈ (ℂ–cn→ℂ))
416415, 286cnlimci 23576 . . . . . 6 (𝜑 → (sin‘((𝑁 + (1 / 2)) · 𝑌)) ∈ (sin lim ((𝑁 + (1 / 2)) · 𝑌)))
417413, 416eqeltrrd 2699 . . . . 5 (𝜑 → 0 ∈ (sin lim ((𝑁 + (1 / 2)) · 𝑌)))
418301, 376, 417limccog 39284 . . . 4 (𝜑 → 0 ∈ ((sin ∘ (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))) lim 𝑌))
41914a1i 11 . . . . . . . . 9 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝐹 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑁 + (1 / 2)) · 𝑦))))
420213fveq2d 6157 . . . . . . . . 9 (((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ 𝑦 = 𝑤) → (sin‘((𝑁 + (1 / 2)) · 𝑦)) = (sin‘((𝑁 + (1 / 2)) · 𝑤)))
421223sincld 14796 . . . . . . . . 9 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (sin‘((𝑁 + (1 / 2)) · 𝑤)) ∈ ℂ)
422419, 420, 214, 421fvmptd 6250 . . . . . . . 8 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝐹𝑤) = (sin‘((𝑁 + (1 / 2)) · 𝑤)))
423224fveq2d 6157 . . . . . . . 8 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (sin‘((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = (sin‘((𝑁 + (1 / 2)) · 𝑤)))
424422, 423eqtr4d 2658 . . . . . . 7 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝐹𝑤) = (sin‘((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)))
425424mpteq2dva 4709 . . . . . 6 (𝜑 → (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (𝐹𝑤)) = (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))))
42615feqmptd 6211 . . . . . 6 (𝜑𝐹 = (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (𝐹𝑤)))
427 fcompt 6360 . . . . . . 7 ((sin:ℂ⟶ℂ ∧ (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦)):((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ) → (sin ∘ (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))) = (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))))
428293, 373, 427sylancr 694 . . . . . 6 (𝜑 → (sin ∘ (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))) = (𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (sin‘((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))))
429425, 426, 4283eqtr4rd 2666 . . . . 5 (𝜑 → (sin ∘ (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))) = 𝐹)
430429oveq1d 6625 . . . 4 (𝜑 → ((sin ∘ (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · 𝑦))) lim 𝑌) = (𝐹 lim 𝑌))
431418, 430eleqtrd 2700 . . 3 (𝜑 → 0 ∈ (𝐹 lim 𝑌))
432 simpr 477 . . . . . . . . . 10 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → 𝑤 = 𝑌)
433432iftrued 4071 . . . . . . . . 9 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → if(𝑤 = 𝑌, 0, (𝐺𝑤)) = 0)
434263, 154, 156, 377, 379divdiv32d 10778 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑌 / 2) / (2 · π)) = ((𝑌 / (2 · π)) / 2))
435434oveq1d 6625 . . . . . . . . . . . . . . . 16 (𝜑 → (((𝑌 / 2) / (2 · π)) · (2 · π)) = (((𝑌 / (2 · π)) / 2) · (2 · π)))
436263halfcld 11229 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑌 / 2) ∈ ℂ)
437436, 156, 379divcan1d 10754 . . . . . . . . . . . . . . . 16 (𝜑 → (((𝑌 / 2) / (2 · π)) · (2 · π)) = (𝑌 / 2))
438384, 154, 156, 377div32d 10776 . . . . . . . . . . . . . . . . 17 (𝜑 → (((𝑌 / (2 · π)) / 2) · (2 · π)) = ((𝑌 / (2 · π)) · ((2 · π) / 2)))
439155, 154, 377divcan3d 10758 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((2 · π) / 2) = π)
440439oveq2d 6626 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑌 / (2 · π)) · ((2 · π) / 2)) = ((𝑌 / (2 · π)) · π))
441438, 440eqtrd 2655 . . . . . . . . . . . . . . . 16 (𝜑 → (((𝑌 / (2 · π)) / 2) · (2 · π)) = ((𝑌 / (2 · π)) · π))
442435, 437, 4413eqtr3d 2663 . . . . . . . . . . . . . . 15 (𝜑 → (𝑌 / 2) = ((𝑌 / (2 · π)) · π))
443442fveq2d 6157 . . . . . . . . . . . . . 14 (𝜑 → (sin‘(𝑌 / 2)) = (sin‘((𝑌 / (2 · π)) · π)))
444 sinkpi 24192 . . . . . . . . . . . . . . 15 ((𝑌 / (2 · π)) ∈ ℤ → (sin‘((𝑌 / (2 · π)) · π)) = 0)
445404, 444syl 17 . . . . . . . . . . . . . 14 (𝜑 → (sin‘((𝑌 / (2 · π)) · π)) = 0)
446443, 445eqtrd 2655 . . . . . . . . . . . . 13 (𝜑 → (sin‘(𝑌 / 2)) = 0)
447446oveq2d 6626 . . . . . . . . . . . 12 (𝜑 → ((2 · π) · (sin‘(𝑌 / 2))) = ((2 · π) · 0))
448156mul01d 10187 . . . . . . . . . . . 12 (𝜑 → ((2 · π) · 0) = 0)
449447, 448eqtrd 2655 . . . . . . . . . . 11 (𝜑 → ((2 · π) · (sin‘(𝑌 / 2))) = 0)
450449eqcomd 2627 . . . . . . . . . 10 (𝜑 → 0 = ((2 · π) · (sin‘(𝑌 / 2))))
451450ad2antrr 761 . . . . . . . . 9 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → 0 = ((2 · π) · (sin‘(𝑌 / 2))))
452 oveq1 6617 . . . . . . . . . . . . 13 (𝑤 = 𝑌 → (𝑤 / 2) = (𝑌 / 2))
453452fveq2d 6157 . . . . . . . . . . . 12 (𝑤 = 𝑌 → (sin‘(𝑤 / 2)) = (sin‘(𝑌 / 2)))
454453oveq2d 6626 . . . . . . . . . . 11 (𝑤 = 𝑌 → ((2 · π) · (sin‘(𝑤 / 2))) = ((2 · π) · (sin‘(𝑌 / 2))))
455454eqcomd 2627 . . . . . . . . . 10 (𝑤 = 𝑌 → ((2 · π) · (sin‘(𝑌 / 2))) = ((2 · π) · (sin‘(𝑤 / 2))))
456455adantl 482 . . . . . . . . 9 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → ((2 · π) · (sin‘(𝑌 / 2))) = ((2 · π) · (sin‘(𝑤 / 2))))
457433, 451, 4563eqtrd 2659 . . . . . . . 8 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → if(𝑤 = 𝑌, 0, (𝐺𝑤)) = ((2 · π) · (sin‘(𝑤 / 2))))
458 iffalse 4072 . . . . . . . . . 10 𝑤 = 𝑌 → if(𝑤 = 𝑌, 0, (𝐺𝑤)) = (𝐺𝑤))
459458adantl 482 . . . . . . . . 9 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → if(𝑤 = 𝑌, 0, (𝐺𝑤)) = (𝐺𝑤))
46023a1i 11 . . . . . . . . . 10 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → 𝐺 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((2 · π) · (sin‘(𝑦 / 2)))))
461 oveq1 6617 . . . . . . . . . . . . 13 (𝑦 = 𝑤 → (𝑦 / 2) = (𝑤 / 2))
462461fveq2d 6157 . . . . . . . . . . . 12 (𝑦 = 𝑤 → (sin‘(𝑦 / 2)) = (sin‘(𝑤 / 2)))
463462oveq2d 6626 . . . . . . . . . . 11 (𝑦 = 𝑤 → ((2 · π) · (sin‘(𝑦 / 2))) = ((2 · π) · (sin‘(𝑤 / 2))))
464463adantl 482 . . . . . . . . . 10 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → ((2 · π) · (sin‘(𝑦 / 2))) = ((2 · π) · (sin‘(𝑤 / 2))))
465120a1i 11 . . . . . . . . . . . 12 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (2 · π) ∈ ℂ)
466328halfcld 11229 . . . . . . . . . . . . 13 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (𝑤 / 2) ∈ ℂ)
467466sincld 14796 . . . . . . . . . . . 12 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (sin‘(𝑤 / 2)) ∈ ℂ)
468465, 467mulcld 10012 . . . . . . . . . . 11 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → ((2 · π) · (sin‘(𝑤 / 2))) ∈ ℂ)
469468adantr 481 . . . . . . . . . 10 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → ((2 · π) · (sin‘(𝑤 / 2))) ∈ ℂ)
470460, 464, 324, 469fvmptd 6250 . . . . . . . . 9 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝐺𝑤) = ((2 · π) · (sin‘(𝑤 / 2))))
471459, 470eqtrd 2655 . . . . . . . 8 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → if(𝑤 = 𝑌, 0, (𝐺𝑤)) = ((2 · π) · (sin‘(𝑤 / 2))))
472457, 471pm2.61dan 831 . . . . . . 7 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → if(𝑤 = 𝑌, 0, (𝐺𝑤)) = ((2 · π) · (sin‘(𝑤 / 2))))
473472mpteq2dva 4709 . . . . . 6 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))))
474 eqid 2621 . . . . . . . . . . 11 (𝑤 ∈ ℂ ↦ ((2 · π) · (sin‘(𝑤 / 2)))) = (𝑤 ∈ ℂ ↦ ((2 · π) · (sin‘(𝑤 / 2))))
47575, 156, 75constcncfg 39415 . . . . . . . . . . . 12 (𝜑 → (𝑤 ∈ ℂ ↦ (2 · π)) ∈ (ℂ–cn→ℂ))
476 id 22 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ ℂ → 𝑤 ∈ ℂ)
477 2cnd 11045 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ ℂ → 2 ∈ ℂ)
478134a1i 11 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ ℂ → 2 ≠ 0)
479476, 477, 478divrec2d 10757 . . . . . . . . . . . . . . . 16 (𝑤 ∈ ℂ → (𝑤 / 2) = ((1 / 2) · 𝑤))
480479mpteq2ia 4705 . . . . . . . . . . . . . . 15 (𝑤 ∈ ℂ ↦ (𝑤 / 2)) = (𝑤 ∈ ℂ ↦ ((1 / 2) · 𝑤))
481 eqid 2621 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ ℂ ↦ ((1 / 2) · 𝑤)) = (𝑤 ∈ ℂ ↦ ((1 / 2) · 𝑤))
482481mulc1cncf 22631 . . . . . . . . . . . . . . . 16 ((1 / 2) ∈ ℂ → (𝑤 ∈ ℂ ↦ ((1 / 2) · 𝑤)) ∈ (ℂ–cn→ℂ))
48339, 482ax-mp 5 . . . . . . . . . . . . . . 15 (𝑤 ∈ ℂ ↦ ((1 / 2) · 𝑤)) ∈ (ℂ–cn→ℂ)
484480, 483eqeltri 2694 . . . . . . . . . . . . . 14 (𝑤 ∈ ℂ ↦ (𝑤 / 2)) ∈ (ℂ–cn→ℂ)
485484a1i 11 . . . . . . . . . . . . 13 (𝜑 → (𝑤 ∈ ℂ ↦ (𝑤 / 2)) ∈ (ℂ–cn→ℂ))
486415, 485cncfmpt1f 22639 . . . . . . . . . . . 12 (𝜑 → (𝑤 ∈ ℂ ↦ (sin‘(𝑤 / 2))) ∈ (ℂ–cn→ℂ))
487475, 486mulcncf 23138 . . . . . . . . . . 11 (𝜑 → (𝑤 ∈ ℂ ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ (ℂ–cn→ℂ))
488474, 487, 349, 75, 468cncfmptssg 39414 . . . . . . . . . 10 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
489 eqid 2621 . . . . . . . . . . . 12 ((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) = ((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵))
49051, 489, 345cncfcn 22635 . . . . . . . . . . 11 (((𝐴(,)𝐵) ⊆ ℂ ∧ ℂ ⊆ ℂ) → ((𝐴(,)𝐵)–cn→ℂ) = (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
491349, 74, 490sylancl 693 . . . . . . . . . 10 (𝜑 → ((𝐴(,)𝐵)–cn→ℂ) = (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
492488, 491eleqtrd 2700 . . . . . . . . 9 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
493 cncnp 21007 . . . . . . . . . 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 222 . . . . . . . 8 (𝜑 → ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))):(𝐴(,)𝐵)⟶ℂ ∧ ∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦)))
496495simprd 479 . . . . . . 7 (𝜑 → ∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦))
497360eleq2d 2684 . . . . . . . 8 (𝑦 = 𝑌 → ((𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦) ↔ (𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌)))
498497rspccva 3297 . . . . . . 7 ((∀𝑦 ∈ (𝐴(,)𝐵)(𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦) ∧ 𝑌 ∈ (𝐴(,)𝐵)) → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
499496, 27, 498syl2anc 692 . . . . . 6 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((2 · π) · (sin‘(𝑤 / 2)))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
500473, 499eqeltrd 2698 . . . . 5 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
501307mpteq1d 4703 . . . . 5 (𝜑 → (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤))))
502366eqcomd 2627 . . . . . . 7 (𝜑 → ((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) = ((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)))
503502oveq1d 6625 . . . . . 6 (𝜑 → (((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld)) = (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld)))
504503fveq1d 6155 . . . . 5 (𝜑 → ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌) = ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
505500, 501, 5043eltr4d 2713 . . . 4 (𝜑 → (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌))
506 eqid 2621 . . . . 5 (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤))) = (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤)))
50711, 124syldan 487 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((2 · π) · (sin‘(𝑦 / 2))) ∈ ℂ)
508507, 23fmptd 6346 . . . . 5 (𝜑𝐺:((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ)
509371, 51, 506, 508, 374, 263ellimc 23560 . . . 4 (𝜑 → (0 ∈ (𝐺 lim 𝑌) ↔ (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, 0, (𝐺𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌)))
510505, 509mpbird 247 . . 3 (𝜑 → 0 ∈ (𝐺 lim 𝑌))
511256nrexdv 2996 . . . 4 (𝜑 → ¬ ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝑦 mod (2 · π)) = 0)
512 ffun 6010 . . . . . . 7 (𝐺:((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ → Fun 𝐺)
513508, 512syl 17 . . . . . 6 (𝜑 → Fun 𝐺)
514 fvelima 6210 . . . . . 6 ((Fun 𝐺 ∧ 0 ∈ (𝐺 “ ((𝐴(,)𝐵) ∖ {𝑌}))) → ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝐺𝑦) = 0)
515513, 514sylan 488 . . . . 5 ((𝜑 ∧ 0 ∈ (𝐺 “ ((𝐴(,)𝐵) ∖ {𝑌}))) → ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝐺𝑦) = 0)
516 2cnd 11045 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 2 ∈ ℂ)
517119a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → π ∈ ℂ)
518134a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 2 ≠ 0)
519238a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → π ≠ 0)
520105, 516, 517, 518, 519divdiv1d 10784 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝑦 / 2) / π) = (𝑦 / (2 · π)))
521520eqcomd 2627 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝑦 / (2 · π)) = ((𝑦 / 2) / π))
522521adantr 481 . . . . . . . . . 10 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → (𝑦 / (2 · π)) = ((𝑦 / 2) / π))
523 2cnd 11045 . . . . . . . . . . . . . . . . . . 19 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → 2 ∈ ℂ)
524119a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → π ∈ ℂ)
525523, 524mulcld 10012 . . . . . . . . . . . . . . . . . 18 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → (2 · π) ∈ ℂ)
526232adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → 𝑦 ∈ ℂ)
527526halfcld 11229 . . . . . . . . . . . . . . . . . . 19 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → (𝑦 / 2) ∈ ℂ)
528527sincld 14796 . . . . . . . . . . . . . . . . . 18 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → (sin‘(𝑦 / 2)) ∈ ℂ)
529525, 528mulcld 10012 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → ((2 · π) · (sin‘(𝑦 / 2))) ∈ ℂ)
53023fvmpt2 6253 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ ((2 · π) · (sin‘(𝑦 / 2))) ∈ ℂ) → (𝐺𝑦) = ((2 · π) · (sin‘(𝑦 / 2))))
531529, 530syldan 487 . . . . . . . . . . . . . . . 16 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → (𝐺𝑦) = ((2 · π) · (sin‘(𝑦 / 2))))
532531eqcomd 2627 . . . . . . . . . . . . . . 15 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → ((2 · π) · (sin‘(𝑦 / 2))) = (𝐺𝑦))
533 simpr 477 . . . . . . . . . . . . . . 15 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → (𝐺𝑦) = 0)
534532, 533eqtrd 2655 . . . . . . . . . . . . . 14 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → ((2 · π) · (sin‘(𝑦 / 2))) = 0)
535120a1i 11 . . . . . . . . . . . . . . . 16 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → (2 · π) ∈ ℂ)
536232halfcld 11229 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → (𝑦 / 2) ∈ ℂ)
537536sincld 14796 . . . . . . . . . . . . . . . 16 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → (sin‘(𝑦 / 2)) ∈ ℂ)
538535, 537mul0ord 10629 . . . . . . . . . . . . . . 15 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → (((2 · π) · (sin‘(𝑦 / 2))) = 0 ↔ ((2 · π) = 0 ∨ (sin‘(𝑦 / 2)) = 0)))
539538adantr 481 . . . . . . . . . . . . . 14 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → (((2 · π) · (sin‘(𝑦 / 2))) = 0 ↔ ((2 · π) = 0 ∨ (sin‘(𝑦 / 2)) = 0)))
540534, 539mpbid 222 . . . . . . . . . . . . 13 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → ((2 · π) = 0 ∨ (sin‘(𝑦 / 2)) = 0))
541 2cnne0 11194 . . . . . . . . . . . . . . 15 (2 ∈ ℂ ∧ 2 ≠ 0)
542119, 238pm3.2i 471 . . . . . . . . . . . . . . 15 (π ∈ ℂ ∧ π ≠ 0)
543 mulne0 10621 . . . . . . . . . . . . . . 15 (((2 ∈ ℂ ∧ 2 ≠ 0) ∧ (π ∈ ℂ ∧ π ≠ 0)) → (2 · π) ≠ 0)
544541, 542, 543mp2an 707 . . . . . . . . . . . . . 14 (2 · π) ≠ 0
545544neii 2792 . . . . . . . . . . . . 13 ¬ (2 · π) = 0
546 pm2.53 388 . . . . . . . . . . . . 13 (((2 · π) = 0 ∨ (sin‘(𝑦 / 2)) = 0) → (¬ (2 · π) = 0 → (sin‘(𝑦 / 2)) = 0))
547540, 545, 546mpisyl 21 . . . . . . . . . . . 12 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (𝐺𝑦) = 0) → (sin‘(𝑦 / 2)) = 0)
548547adantll 749 . . . . . . . . . . 11 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → (sin‘(𝑦 / 2)) = 0)
549105adantr 481 . . . . . . . . . . . . 13 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → 𝑦 ∈ ℂ)
550549halfcld 11229 . . . . . . . . . . . 12 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → (𝑦 / 2) ∈ ℂ)
551550, 246syl 17 . . . . . . . . . . 11 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → ((sin‘(𝑦 / 2)) = 0 ↔ ((𝑦 / 2) / π) ∈ ℤ))
552548, 551mpbid 222 . . . . . . . . . 10 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → ((𝑦 / 2) / π) ∈ ℤ)
553522, 552eqeltrd 2698 . . . . . . . . 9 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → (𝑦 / (2 · π)) ∈ ℤ)
55411adantr 481 . . . . . . . . . 10 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → 𝑦 ∈ ℝ)
555554, 253, 254sylancl 693 . . . . . . . . 9 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → ((𝑦 mod (2 · π)) = 0 ↔ (𝑦 / (2 · π)) ∈ ℤ))
556553, 555mpbird 247 . . . . . . . 8 (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) ∧ (𝐺𝑦) = 0) → (𝑦 mod (2 · π)) = 0)
557556ex 450 . . . . . . 7 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝐺𝑦) = 0 → (𝑦 mod (2 · π)) = 0))
558557reximdva 3012 . . . . . 6 (𝜑 → (∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝐺𝑦) = 0 → ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝑦 mod (2 · π)) = 0))
559558adantr 481 . . . . 5 ((𝜑 ∧ 0 ∈ (𝐺 “ ((𝐴(,)𝐵) ∖ {𝑌}))) → (∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝐺𝑦) = 0 → ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝑦 mod (2 · π)) = 0))
560515, 559mpd 15 . . . 4 ((𝜑 ∧ 0 ∈ (𝐺 “ ((𝐴(,)𝐵) ∖ {𝑌}))) → ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝑦 mod (2 · π)) = 0)
561511, 560mtand 690 . . 3 (𝜑 → ¬ 0 ∈ (𝐺 “ ((𝐴(,)𝐵) ∖ {𝑌})))
562 simpr 477 . . . . . . . . 9 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → 𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}))
563111fvmpt2 6253 . . . . . . . . 9 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (π · (cos‘(𝑦 / 2))) ∈ ℂ) → (𝐼𝑦) = (π · (cos‘(𝑦 / 2))))
564562, 201, 563syl2anc 692 . . . . . . . 8 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝐼𝑦) = (π · (cos‘(𝑦 / 2))))
565536coscld 14797 . . . . . . . . . 10 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) → (cos‘(𝑦 / 2)) ∈ ℂ)
566565adantl 482 . . . . . . . . 9 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (cos‘(𝑦 / 2)) ∈ ℂ)
567 dirkercncflem2.11 . . . . . . . . 9 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (cos‘(𝑦 / 2)) ≠ 0)
568517, 566, 519, 567mulne0d 10631 . . . . . . . 8 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (π · (cos‘(𝑦 / 2))) ≠ 0)
569564, 568eqnetrd 2857 . . . . . . 7 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝐼𝑦) ≠ 0)
570569neneqd 2795 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ¬ (𝐼𝑦) = 0)
571570nrexdv 2996 . . . . 5 (𝜑 → ¬ ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝐼𝑦) = 0)
572201, 111fmptd 6346 . . . . . . 7 (𝜑𝐼:((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ)
573 ffun 6010 . . . . . . 7 (𝐼:((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ → Fun 𝐼)
574572, 573syl 17 . . . . . 6 (𝜑 → Fun 𝐼)
575 fvelima 6210 . . . . . 6 ((Fun 𝐼 ∧ 0 ∈ (𝐼 “ ((𝐴(,)𝐵) ∖ {𝑌}))) → ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝐼𝑦) = 0)
576574, 575sylan 488 . . . . 5 ((𝜑 ∧ 0 ∈ (𝐼 “ ((𝐴(,)𝐵) ∖ {𝑌}))) → ∃𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})(𝐼𝑦) = 0)
577571, 576mtand 690 . . . 4 (𝜑 → ¬ 0 ∈ (𝐼 “ ((𝐴(,)𝐵) ∖ {𝑌})))
578199imaeq1d 5429 . . . 4 (𝜑 → ((ℝ D 𝐺) “ ((𝐴(,)𝐵) ∖ {𝑌})) = (𝐼 “ ((𝐴(,)𝐵) ∖ {𝑌})))
579577, 578neleqtrrd 2720 . . 3 (𝜑 → ¬ 0 ∈ ((ℝ D 𝐺) “ ((𝐴(,)𝐵) ∖ {𝑌})))
580 dirkercncflem2.d . . . . . 6 𝐷 = (𝑛 ∈ ℕ ↦ (𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑛) + 1) / (2 · π)), ((sin‘((𝑛 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))))
581580dirkerval2 39644 . . . . 5 ((𝑁 ∈ ℕ ∧ 𝑌 ∈ ℝ) → ((𝐷𝑁)‘𝑌) = if((𝑌 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑌)) / ((2 · π) · (sin‘(𝑌 / 2))))))
5825, 57, 581syl2anc 692 . . . 4 (𝜑 → ((𝐷𝑁)‘𝑌) = if((𝑌 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑌)) / ((2 · π) · (sin‘(𝑌 / 2))))))
583282iftrued 4071 . . . . 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 4069 . . . . . . . . . . . . . 14 (𝑤 = 𝑌 → if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)) = (((2 · 𝑁) + 1) / (2 · π)))
587586adantl 482 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)) = (((2 · 𝑁) + 1) / (2 · π)))
588154, 38mulcld 10012 . . . . . . . . . . . . . . . . . 18 (𝜑 → (2 · 𝑁) ∈ ℂ)
589588, 397addcld 10011 . . . . . . . . . . . . . . . . 17 (𝜑 → ((2 · 𝑁) + 1) ∈ ℂ)
590589, 154, 155, 377, 378divdiv1d 10784 . . . . . . . . . . . . . . . 16 (𝜑 → ((((2 · 𝑁) + 1) / 2) / π) = (((2 · 𝑁) + 1) / (2 · π)))
591590eqcomd 2627 . . . . . . . . . . . . . . 15 (𝜑 → (((2 · 𝑁) + 1) / (2 · π)) = ((((2 · 𝑁) + 1) / 2) / π))
592588, 397, 154, 377divdird 10791 . . . . . . . . . . . . . . . . 17 (𝜑 → (((2 · 𝑁) + 1) / 2) = (((2 · 𝑁) / 2) + (1 / 2)))
59338, 154, 377divcan3d 10758 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((2 · 𝑁) / 2) = 𝑁)
594593oveq1d 6625 . . . . . . . . . . . . . . . . 17 (𝜑 → (((2 · 𝑁) / 2) + (1 / 2)) = (𝑁 + (1 / 2)))
595592, 594eqtrd 2655 . . . . . . . . . . . . . . . 16 (𝜑 → (((2 · 𝑁) + 1) / 2) = (𝑁 + (1 / 2)))
596595oveq1d 6625 . . . . . . . . . . . . . . 15 (𝜑 → ((((2 · 𝑁) + 1) / 2) / π) = ((𝑁 + (1 / 2)) / π))
597591, 596eqtrd 2655 . . . . . . . . . . . . . 14 (𝜑 → (((2 · 𝑁) + 1) / (2 · π)) = ((𝑁 + (1 / 2)) / π))
598597ad2antrr 761 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → (((2 · 𝑁) + 1) / (2 · π)) = ((𝑁 + (1 / 2)) / π))
599310fveq2d 6157 . . . . . . . . . . . . . . . . 17 (𝑤 = 𝑌 → (cos‘((𝑁 + (1 / 2)) · 𝑤)) = (cos‘((𝑁 + (1 / 2)) · 𝑌)))
600599oveq2d 6626 . . . . . . . . . . . . . . . 16 (𝑤 = 𝑌 → ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) = ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑌))))
601452fveq2d 6157 . . . . . . . . . . . . . . . . 17 (𝑤 = 𝑌 → (cos‘(𝑤 / 2)) = (cos‘(𝑌 / 2)))
602601oveq2d 6626 . . . . . . . . . . . . . . . 16 (𝑤 = 𝑌 → (π · (cos‘(𝑤 / 2))) = (π · (cos‘(𝑌 / 2))))
603600, 602oveq12d 6628 . . . . . . . . . . . . . . 15 (𝑤 = 𝑌 → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))) = (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑌))) / (π · (cos‘(𝑌 / 2)))))
604603adantl 482 . . . . . . . . . . . . . 14 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))) = (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑌))) / (π · (cos‘(𝑌 / 2)))))
60538, 40, 263adddird 10017 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝑁 + (1 / 2)) · 𝑌) = ((𝑁 · 𝑌) + ((1 / 2) · 𝑌)))
606397, 154, 263, 377div32d 10776 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → ((1 / 2) · 𝑌) = (1 · (𝑌 / 2)))
607436mulid2d 10010 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → (1 · (𝑌 / 2)) = (𝑌 / 2))
608606, 607eqtrd 2655 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ((1 / 2) · 𝑌) = (𝑌 / 2))
609608oveq2d 6626 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝑁 · 𝑌) + ((1 / 2) · 𝑌)) = ((𝑁 · 𝑌) + (𝑌 / 2)))
61038, 263mulcld 10012 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (𝑁 · 𝑌) ∈ ℂ)
611610, 436addcomd 10190 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝑁 · 𝑌) + (𝑌 / 2)) = ((𝑌 / 2) + (𝑁 · 𝑌)))
612605, 609, 6113eqtrd 2659 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑁 + (1 / 2)) · 𝑌) = ((𝑌 / 2) + (𝑁 · 𝑌)))
613612fveq2d 6157 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (cos‘((𝑁 + (1 / 2)) · 𝑌)) = (cos‘((𝑌 / 2) + (𝑁 · 𝑌))))
614610, 156, 379divcan1d 10754 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (((𝑁 · 𝑌) / (2 · π)) · (2 · π)) = (𝑁 · 𝑌))
615614eqcomd 2627 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑁 · 𝑌) = (((𝑁 · 𝑌) / (2 · π)) · (2 · π)))
616615oveq2d 6626 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑌 / 2) + (𝑁 · 𝑌)) = ((𝑌 / 2) + (((𝑁 · 𝑌) / (2 · π)) · (2 · π))))
617616fveq2d 6157 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (cos‘((𝑌 / 2) + (𝑁 · 𝑌))) = (cos‘((𝑌 / 2) + (((𝑁 · 𝑌) / (2 · π)) · (2 · π)))))
61838, 263, 156, 379divassd 10788 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝑁 · 𝑌) / (2 · π)) = (𝑁 · (𝑌 / (2 · π))))
619405, 404zmulcld 11440 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑁 · (𝑌 / (2 · π))) ∈ ℤ)
620618, 619eqeltrd 2698 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑁 · 𝑌) / (2 · π)) ∈ ℤ)
621 cosper 24155 . . . . . . . . . . . . . . . . . . . 20 (((𝑌 / 2) ∈ ℂ ∧ ((𝑁 · 𝑌) / (2 · π)) ∈ ℤ) → (cos‘((𝑌 / 2) + (((𝑁 · 𝑌) / (2 · π)) · (2 · π)))) = (cos‘(𝑌 / 2)))
622436, 620, 621syl2anc 692 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (cos‘((𝑌 / 2) + (((𝑁 · 𝑌) / (2 · π)) · (2 · π)))) = (cos‘(𝑌 / 2)))
623613, 617, 6223eqtrd 2659 . . . . . . . . . . . . . . . . . 18 (𝜑 → (cos‘((𝑁 + (1 / 2)) · 𝑌)) = (cos‘(𝑌 / 2)))
624623oveq2d 6626 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑌))) = ((𝑁 + (1 / 2)) · (cos‘(𝑌 / 2))))
625624oveq1d 6625 . . . . . . . . . . . . . . . 16 (𝜑 → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑌))) / (π · (cos‘(𝑌 / 2)))) = (((𝑁 + (1 / 2)) · (cos‘(𝑌 / 2))) / (π · (cos‘(𝑌 / 2)))))
626436coscld 14797 . . . . . . . . . . . . . . . . 17 (𝜑 → (cos‘(𝑌 / 2)) ∈ ℂ)
627263, 154, 155, 377, 378divdiv1d 10784 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝑌 / 2) / π) = (𝑌 / (2 · π)))
628627, 404eqeltrd 2698 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑌 / 2) / π) ∈ ℤ)
629628zred 11434 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝑌 / 2) / π) ∈ ℝ)
630629, 272ltaddrpd 11857 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑌 / 2) / π) < (((𝑌 / 2) / π) + (1 / 2)))
631 halflt1 11202 . . . . . . . . . . . . . . . . . . . . . 22 (1 / 2) < 1
632631a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (1 / 2) < 1)
633268, 267, 629, 632ltadd2dd 10148 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (((𝑌 / 2) / π) + (1 / 2)) < (((𝑌 / 2) / π) + 1))
634 btwnnz 11405 . . . . . . . . . . . . . . . . . . . 20 ((((𝑌 / 2) / π) ∈ ℤ ∧ ((𝑌 / 2) / π) < (((𝑌 / 2) / π) + (1 / 2)) ∧ (((𝑌 / 2) / π) + (1 / 2)) < (((𝑌 / 2) / π) + 1)) → ¬ (((𝑌 / 2) / π) + (1 / 2)) ∈ ℤ)
635628, 630, 633, 634syl3anc 1323 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ¬ (((𝑌 / 2) / π) + (1 / 2)) ∈ ℤ)
636 coseq0 39406 . . . . . . . . . . . . . . . . . . . 20 ((𝑌 / 2) ∈ ℂ → ((cos‘(𝑌 / 2)) = 0 ↔ (((𝑌 / 2) / π) + (1 / 2)) ∈ ℤ))
637436, 636syl 17 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((cos‘(𝑌 / 2)) = 0 ↔ (((𝑌 / 2) / π) + (1 / 2)) ∈ ℤ))
638635, 637mtbird 315 . . . . . . . . . . . . . . . . . 18 (𝜑 → ¬ (cos‘(𝑌 / 2)) = 0)
639638neqned 2797 . . . . . . . . . . . . . . . . 17 (𝜑 → (cos‘(𝑌 / 2)) ≠ 0)
64041, 155, 626, 378, 639divcan5rd 10780 . . . . . . . . . . . . . . . 16 (𝜑 → (((𝑁 + (1 / 2)) · (cos‘(𝑌 / 2))) / (π · (cos‘(𝑌 / 2)))) = ((𝑁 + (1 / 2)) / π))
641625, 640eqtrd 2655 . . . . . . . . . . . . . . 15 (𝜑 → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑌))) / (π · (cos‘(𝑌 / 2)))) = ((𝑁 + (1 / 2)) / π))
642641ad2antrr 761 . . . . . . . . . . . . . 14 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑌))) / (π · (cos‘(𝑌 / 2)))) = ((𝑁 + (1 / 2)) / π))
643604, 642eqtr2d 2656 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → ((𝑁 + (1 / 2)) / π) = (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))))
644587, 598, 6433eqtrrd 2660 . . . . . . . . . . . 12 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))) = if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)))
645 iffalse 4072 . . . . . . . . . . . . . 14 𝑤 = 𝑌 → if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)) = ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))
646645adantl 482 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)) = ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))
647 eqidd 2622 . . . . . . . . . . . . . 14 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))))
648 fveq2 6153 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑤 → (𝐻𝑦) = (𝐻𝑤))
649 fveq2 6153 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑤 → (𝐼𝑦) = (𝐼𝑤))
650648, 649oveq12d 6628 . . . . . . . . . . . . . . 15 (𝑦 = 𝑤 → ((𝐻𝑦) / (𝐼𝑦)) = ((𝐻𝑤) / (𝐼𝑤)))
651650adantl 482 . . . . . . . . . . . . . 14 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → ((𝐻𝑦) / (𝐼𝑦)) = ((𝐻𝑤) / (𝐼𝑤)))
652106, 100fmptd 6346 . . . . . . . . . . . . . . . . 17 (𝜑𝐻:((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ)
653652ad2antrr 761 . . . . . . . . . . . . . . . 16 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → 𝐻:((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ)
654653, 324ffvelrnd 6321 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝐻𝑤) ∈ ℂ)
655572ad2antrr 761 . . . . . . . . . . . . . . . 16 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → 𝐼:((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ)
656655, 324ffvelrnd 6321 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝐼𝑤) ∈ ℂ)
657111a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → 𝐼 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (π · (cos‘(𝑦 / 2)))))
658 simpr 477 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → 𝑦 = 𝑤)
659658oveq1d 6625 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → (𝑦 / 2) = (𝑤 / 2))
660659fveq2d 6157 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → (cos‘(𝑦 / 2)) = (cos‘(𝑤 / 2)))
661660oveq2d 6626 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → (π · (cos‘(𝑦 / 2))) = (π · (cos‘(𝑤 / 2))))
662119a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝑤 ∈ (𝐴(,)𝐵) → π ∈ ℂ)
663327halfcld 11229 . . . . . . . . . . . . . . . . . . . 20 (𝑤 ∈ (𝐴(,)𝐵) → (𝑤 / 2) ∈ ℂ)
664663coscld 14797 . . . . . . . . . . . . . . . . . . 19 (𝑤 ∈ (𝐴(,)𝐵) → (cos‘(𝑤 / 2)) ∈ ℂ)
665662, 664mulcld 10012 . . . . . . . . . . . . . . . . . 18 (𝑤 ∈ (𝐴(,)𝐵) → (π · (cos‘(𝑤 / 2))) ∈ ℂ)
666665ad2antlr 762 . . . . . . . . . . . . . . . . 17 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (π · (cos‘(𝑤 / 2))) ∈ ℂ)
667657, 661, 324, 666fvmptd 6250 . . . . . . . . . . . . . . . 16 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝐼𝑤) = (π · (cos‘(𝑤 / 2))))
668542a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (π ∈ ℂ ∧ π ≠ 0))
669664ad2antlr 762 . . . . . . . . . . . . . . . . 17 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (cos‘(𝑤 / 2)) ∈ ℂ)
670 simpll 789 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → 𝜑)
671461fveq2d 6157 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = 𝑤 → (cos‘(𝑦 / 2)) = (cos‘(𝑤 / 2)))
672671neeq1d 2849 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = 𝑤 → ((cos‘(𝑦 / 2)) ≠ 0 ↔ (cos‘(𝑤 / 2)) ≠ 0))
673226, 672imbi12d 334 . . . . . . . . . . . . . . . . . . 19 (𝑦 = 𝑤 → (((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (cos‘(𝑦 / 2)) ≠ 0) ↔ ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (cos‘(𝑤 / 2)) ≠ 0)))
674673, 567chvarv 2262 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑤 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (cos‘(𝑤 / 2)) ≠ 0)
675670, 324, 674syl2anc 692 . . . . . . . . . . . . . . . . 17 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (cos‘(𝑤 / 2)) ≠ 0)
676 mulne0 10621 . . . . . . . . . . . . . . . . 17 (((π ∈ ℂ ∧ π ≠ 0) ∧ ((cos‘(𝑤 / 2)) ∈ ℂ ∧ (cos‘(𝑤 / 2)) ≠ 0)) → (π · (cos‘(𝑤 / 2))) ≠ 0)
677668, 669, 675, 676syl12anc 1321 . . . . . . . . . . . . . . . 16 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (π · (cos‘(𝑤 / 2))) ≠ 0)
678667, 677eqnetrd 2857 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝐼𝑤) ≠ 0)
679654, 656, 678divcld 10753 . . . . . . . . . . . . . 14 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → ((𝐻𝑤) / (𝐼𝑤)) ∈ ℂ)
680647, 651, 324, 679fvmptd 6250 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤) = ((𝐻𝑤) / (𝐼𝑤)))
681100a1i 11 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → 𝐻 = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦)))))
682317fveq2d 6157 . . . . . . . . . . . . . . . 16 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → (cos‘((𝑁 + (1 / 2)) · 𝑦)) = (cos‘((𝑁 + (1 / 2)) · 𝑤)))
683682oveq2d 6626 . . . . . . . . . . . . . . 15 ((((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) ∧ 𝑦 = 𝑤) → ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))) = ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))))
684329coscld 14797 . . . . . . . . . . . . . . . . 17 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (cos‘((𝑁 + (1 / 2)) · 𝑤)) ∈ ℂ)
685325, 684mulcld 10012 . . . . . . . . . . . . . . . 16 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) ∈ ℂ)
686685adantr 481 . . . . . . . . . . . . . . 15 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) ∈ ℂ)
687681, 683, 324, 686fvmptd 6250 . . . . . . . . . . . . . 14 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (𝐻𝑤) = ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))))
688687, 667oveq12d 6628 . . . . . . . . . . . . 13 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → ((𝐻𝑤) / (𝐼𝑤)) = (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))))
689646, 680, 6883eqtrrd 2660 . . . . . . . . . . . 12 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ ¬ 𝑤 = 𝑌) → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))) = if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)))
690644, 689pm2.61dan 831 . . . . . . . . . . 11 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2)))) = if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)))
691690mpteq2dva 4709 . . . . . . . . . 10 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2))))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))))
692585, 691eqtr2d 2656 . . . . . . . . 9 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))) = 𝐿)
693349, 41, 75constcncfg 39415 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (𝑁 + (1 / 2))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
694 cosf 14791 . . . . . . . . . . . . . . . . . . 19 cos:ℂ⟶ℂ
695231, 44sylan2 491 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ (𝐴(,)𝐵)) → ((𝑁 + (1 / 2)) · 𝑦) ∈ ℂ)
696 eqid 2621 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦)) = (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))
697695, 696fmptd 6346 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦)):(𝐴(,)𝐵)⟶ℂ)
698 fcompt 6360 . . . . . . . . . . . . . . . . . . 19 ((cos:ℂ⟶ℂ ∧ (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦)):(𝐴(,)𝐵)⟶ℂ) → (cos ∘ (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ (cos‘((𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))))
699694, 697, 698sylancr 694 . . . . . . . . . . . . . . . . . 18 (𝜑 → (cos ∘ (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ (cos‘((𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))))
700 eqidd 2622 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦)) = (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦)))
701316adantl 482 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑦 = 𝑤) → ((𝑁 + (1 / 2)) · 𝑦) = ((𝑁 + (1 / 2)) · 𝑤))
702 simpr 477 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → 𝑤 ∈ (𝐴(,)𝐵))
703700, 701, 702, 329fvmptd 6250 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → ((𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤) = ((𝑁 + (1 / 2)) · 𝑤))
704703fveq2d 6157 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (cos‘((𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤)) = (cos‘((𝑁 + (1 / 2)) · 𝑤)))
705704mpteq2dva 4709 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (cos‘((𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))‘𝑤))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ (cos‘((𝑁 + (1 / 2)) · 𝑤))))
706699, 705eqtr2d 2656 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (cos‘((𝑁 + (1 / 2)) · 𝑤))) = (cos ∘ (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))))
707349, 41, 75constcncfg 39415 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑦 ∈ (𝐴(,)𝐵) ↦ (𝑁 + (1 / 2))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
708349, 75idcncfg 39416 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑦 ∈ (𝐴(,)𝐵) ↦ 𝑦) ∈ ((𝐴(,)𝐵)–cn→ℂ))
709707, 708mulcncf 23138 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
710 coscn 24120 . . . . . . . . . . . . . . . . . . 19 cos ∈ (ℂ–cn→ℂ)
711710a1i 11 . . . . . . . . . . . . . . . . . 18 (𝜑 → cos ∈ (ℂ–cn→ℂ))
712709, 711cncfco 22633 . . . . . . . . . . . . . . . . 17 (𝜑 → (cos ∘ (𝑦 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · 𝑦))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
713706, 712eqeltrd 2698 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (cos‘((𝑁 + (1 / 2)) · 𝑤))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
714693, 713mulcncf 23138 . . . . . . . . . . . . . . 15 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤)))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
715 eqid 2621 . . . . . . . . . . . . . . . 16 (𝑤 ∈ (𝐴(,)𝐵) ↦ (π · (cos‘(𝑤 / 2)))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ (π · (cos‘(𝑤 / 2))))
716349, 155, 75constcncfg 39415 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ π) ∈ ((𝐴(,)𝐵)–cn→ℂ))
717 2cnd 11045 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → 2 ∈ ℂ)
718134a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → 2 ≠ 0)
719328, 717, 718divrecd 10756 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (𝑤 / 2) = (𝑤 · (1 / 2)))
720719mpteq2dva 4709 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (𝑤 / 2)) = (𝑤 ∈ (𝐴(,)𝐵) ↦ (𝑤 · (1 / 2))))
721 eqid 2621 . . . . . . . . . . . . . . . . . . . 20 (𝑤 ∈ ℂ ↦ (𝑤 · (1 / 2))) = (𝑤 ∈ ℂ ↦ (𝑤 · (1 / 2)))
722 cncfmptid 22638 . . . . . . . . . . . . . . . . . . . . . . 23 ((ℂ ⊆ ℂ ∧ ℂ ⊆ ℂ) → (𝑤 ∈ ℂ ↦ 𝑤) ∈ (ℂ–cn→ℂ))
72374, 74, 722mp2an 707 . . . . . . . . . . . . . . . . . . . . . 22 (𝑤 ∈ ℂ ↦ 𝑤) ∈ (ℂ–cn→ℂ)
724723a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑤 ∈ ℂ ↦ 𝑤) ∈ (ℂ–cn→ℂ))
72574a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 / 2) ∈ ℂ → ℂ ⊆ ℂ)
726 id 22 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 / 2) ∈ ℂ → (1 / 2) ∈ ℂ)
727725, 726, 725constcncfg 39415 . . . . . . . . . . . . . . . . . . . . . 22 ((1 / 2) ∈ ℂ → (𝑤 ∈ ℂ ↦ (1 / 2)) ∈ (ℂ–cn→ℂ))
72839, 727mp1i 13 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑤 ∈ ℂ ↦ (1 / 2)) ∈ (ℂ–cn→ℂ))
729724, 728mulcncf 23138 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑤 ∈ ℂ ↦ (𝑤 · (1 / 2))) ∈ (ℂ–cn→ℂ))
730719, 466eqeltrrd 2699 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (𝑤 · (1 / 2)) ∈ ℂ)
731721, 729, 349, 75, 730cncfmptssg 39414 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (𝑤 · (1 / 2))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
732720, 731eqeltrd 2698 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (𝑤 / 2)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
733711, 732cncfmpt1f 22639 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (cos‘(𝑤 / 2))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
734716, 733mulcncf 23138 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (π · (cos‘(𝑤 / 2)))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
735 ssid 3608 . . . . . . . . . . . . . . . . 17 (𝐴(,)𝐵) ⊆ (𝐴(,)𝐵)
736735a1i 11 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐴(,)𝐵) ⊆ (𝐴(,)𝐵))
737 difssd 3721 . . . . . . . . . . . . . . . 16 (𝜑 → (ℂ ∖ {0}) ⊆ ℂ)
738665adantl 482 . . . . . . . . . . . . . . . . 17 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (π · (cos‘(𝑤 / 2))) ∈ ℂ)
739119a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → π ∈ ℂ)
740664adantl 482 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (cos‘(𝑤 / 2)) ∈ ℂ)
741238a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → π ≠ 0)
742601adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑤 = 𝑌) → (cos‘(𝑤 / 2)) = (cos‘(𝑌 / 2)))
743639adantr 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑤 = 𝑌) → (cos‘(𝑌 / 2)) ≠ 0)
744742, 743eqnetrd 2857 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑤 = 𝑌) → (cos‘(𝑤 / 2)) ≠ 0)
745744adantlr 750 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑤 ∈ (𝐴(,)𝐵)) ∧ 𝑤 = 𝑌) → (cos‘(𝑤 / 2)) ≠ 0)
746745, 675pm2.61dan 831 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (cos‘(𝑤 / 2)) ≠ 0)
747739, 740, 741, 746mulne0d 10631 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (π · (cos‘(𝑤 / 2))) ≠ 0)
748747neneqd 2795 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → ¬ (π · (cos‘(𝑤 / 2))) = 0)
749 elsng 4167 . . . . . . . . . . . . . . . . . . 19 ((π · (cos‘(𝑤 / 2))) ∈ ℂ → ((π · (cos‘(𝑤 / 2))) ∈ {0} ↔ (π · (cos‘(𝑤 / 2))) = 0))
750738, 749syl 17 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → ((π · (cos‘(𝑤 / 2))) ∈ {0} ↔ (π · (cos‘(𝑤 / 2))) = 0))
751748, 750mtbird 315 . . . . . . . . . . . . . . . . 17 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → ¬ (π · (cos‘(𝑤 / 2))) ∈ {0})
752738, 751eldifd 3570 . . . . . . . . . . . . . . . 16 ((𝜑𝑤 ∈ (𝐴(,)𝐵)) → (π · (cos‘(𝑤 / 2))) ∈ (ℂ ∖ {0}))
753715, 734, 736, 737, 752cncfmptssg 39414 . . . . . . . . . . . . . . 15 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (π · (cos‘(𝑤 / 2)))) ∈ ((𝐴(,)𝐵)–cn→(ℂ ∖ {0})))
754714, 753divcncf 23139 . . . . . . . . . . . . . 14 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2))))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
755754, 491eleqtrd 2700 . . . . . . . . . . . . 13 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑤))) / (π · (cos‘(𝑤 / 2))))) ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
756585, 755eqeltrd 2698 . . . . . . . . . . . 12 (𝜑𝐿 ∈ (((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) Cn (TopOpen‘ℂfld)))
757 cncnp 21007 . . . . . . . . . . . . 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 222 . . . . . . . . . . 11 (𝜑 → (𝐿:(𝐴(,)𝐵)⟶ℂ ∧ ∀𝑦 ∈ (𝐴(,)𝐵)𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦)))
760759simprd 479 . . . . . . . . . 10 (𝜑 → ∀𝑦 ∈ (𝐴(,)𝐵)𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦))
761360eleq2d 2684 . . . . . . . . . . 11 (𝑦 = 𝑌 → (𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦) ↔ 𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌)))
762761rspccva 3297 . . . . . . . . . 10 ((∀𝑦 ∈ (𝐴(,)𝐵)𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑦) ∧ 𝑌 ∈ (𝐴(,)𝐵)) → 𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
763760, 27, 762syl2anc 692 . . . . . . . . 9 (𝜑𝐿 ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
764692, 763eqeltrd 2698 . . . . . . . 8 (𝜑 → (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (𝐴(,)𝐵)) CnP (TopOpen‘ℂfld))‘𝑌))
765307mpteq1d 4703 . . . . . . . 8 (𝜑 → (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))) = (𝑤 ∈ (𝐴(,)𝐵) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))))
766764, 765, 5043eltr4d 2713 . . . . . . 7 (𝜑 → (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌))
767 eqid 2621 . . . . . . . 8 (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))) = (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤)))
768100fvmpt2 6253 . . . . . . . . . . . 12 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))) ∈ ℂ) → (𝐻𝑦) = ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))))
769562, 106, 768syl2anc 692 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝐻𝑦) = ((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))))
770769, 564oveq12d 6628 . . . . . . . . . 10 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝐻𝑦) / (𝐼𝑦)) = (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))) / (π · (cos‘(𝑦 / 2)))))
771106, 201, 568divcld 10753 . . . . . . . . . 10 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (((𝑁 + (1 / 2)) · (cos‘((𝑁 + (1 / 2)) · 𝑦))) / (π · (cos‘(𝑦 / 2)))) ∈ ℂ)
772770, 771eqeltrd 2698 . . . . . . . . 9 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝐻𝑦) / (𝐼𝑦)) ∈ ℂ)
773 eqid 2621 . . . . . . . . 9 (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))
774772, 773fmptd 6346 . . . . . . . 8 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))):((𝐴(,)𝐵) ∖ {𝑌})⟶ℂ)
775371, 51, 767, 774, 374, 263ellimc 23560 . . . . . . 7 (𝜑 → ((((2 · 𝑁) + 1) / (2 · π)) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))) lim 𝑌) ↔ (𝑤 ∈ (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌}) ↦ if(𝑤 = 𝑌, (((2 · 𝑁) + 1) / (2 · π)), ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦)))‘𝑤))) ∈ ((((TopOpen‘ℂfld) ↾t (((𝐴(,)𝐵) ∖ {𝑌}) ∪ {𝑌})) CnP (TopOpen‘ℂfld))‘𝑌)))
776766, 775mpbird 247 . . . . . 6 (𝜑 → (((2 · 𝑁) + 1) / (2 · π)) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))) lim 𝑌))
777103eqcomd 2627 . . . . . . . . . 10 (𝜑𝐻 = (ℝ D 𝐹))
778777fveq1d 6155 . . . . . . . . 9 (𝜑 → (𝐻𝑦) = ((ℝ D 𝐹)‘𝑦))
779199eqcomd 2627 . . . . . . . . . 10 (𝜑𝐼 = (ℝ D 𝐺))
780779fveq1d 6155 . . . . . . . . 9 (𝜑 → (𝐼𝑦) = ((ℝ D 𝐺)‘𝑦))
781778, 780oveq12d 6628 . . . . . . . 8 (𝜑 → ((𝐻𝑦) / (𝐼𝑦)) = (((ℝ D 𝐹)‘𝑦) / ((ℝ D 𝐺)‘𝑦)))
782781mpteq2dv 4710 . . . . . . 7 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (((ℝ D 𝐹)‘𝑦) / ((ℝ D 𝐺)‘𝑦))))
783782oveq1d 6625 . . . . . 6 (𝜑 → ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐻𝑦) / (𝐼𝑦))) lim 𝑌) = ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (((ℝ D 𝐹)‘𝑦) / ((ℝ D 𝐺)‘𝑦))) lim 𝑌))
784776, 783eleqtrd 2700 . . . . 5 (𝜑 → (((2 · 𝑁) + 1) / (2 · π)) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (((ℝ D 𝐹)‘𝑦) / ((ℝ D 𝐺)‘𝑦))) lim 𝑌))
785583, 784eqeltrd 2698 . . . 4 (𝜑 → if((𝑌 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑌)) / ((2 · π) · (sin‘(𝑌 / 2))))) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (((ℝ D 𝐹)‘𝑦) / ((ℝ D 𝐺)‘𝑦))) lim 𝑌))
786582, 785eqeltrd 2698 . . 3 (𝜑 → ((𝐷𝑁)‘𝑌) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ (((ℝ D 𝐹)‘𝑦) / ((ℝ D 𝐺)‘𝑦))) lim 𝑌))
7874, 15, 24, 26, 27, 28, 110, 205, 431, 510, 561, 579, 786lhop 23700 . 2 (𝜑 → ((𝐷𝑁)‘𝑌) ∈ ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐹𝑦) / (𝐺𝑦))) lim 𝑌))
788580dirkerval 39641 . . . . . 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 5360 . . . 4 (𝜑 → ((𝐷𝑁) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) = ((𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
7914resmptd 5416 . . . 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)))))))
792256iffalsed 4074 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → if((𝑦 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2))))) = ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))
79313recnd 10020 . . . . . . . 8 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (sin‘((𝑁 + (1 / 2)) · 𝑦)) ∈ ℂ)
79414fvmpt2 6253 . . . . . . . 8 ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ∧ (sin‘((𝑁 + (1 / 2)) · 𝑦)) ∈ ℂ) → (𝐹𝑦) = (sin‘((𝑁 + (1 / 2)) · 𝑦)))
795562, 793, 794syl2anc 692 . . . . . . 7 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝐹𝑦) = (sin‘((𝑁 + (1 / 2)) · 𝑦)))
796562, 507, 530syl2anc 692 . . . . . . 7 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → (𝐺𝑦) = ((2 · π) · (sin‘(𝑦 / 2))))
797795, 796oveq12d 6628 . . . . . 6 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → ((𝐹𝑦) / (𝐺𝑦)) = ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))
798792, 797eqtr4d 2658 . . . . 5 ((𝜑𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌})) → if((𝑦 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2))))) = ((𝐹𝑦) / (𝐺𝑦)))
799798mpteq2dva 4709 . . . 4 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑁) + 1) / (2 · π)), ((sin‘((𝑁 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))) = (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐹𝑦) / (𝐺𝑦))))
800790, 791, 7993eqtrrd 2660 . . 3 (𝜑 → (𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐹𝑦) / (𝐺𝑦))) = ((𝐷𝑁) ↾ ((𝐴(,)𝐵) ∖ {𝑌})))
801800oveq1d 6625 . 2 (𝜑 → ((𝑦 ∈ ((𝐴(,)𝐵) ∖ {𝑌}) ↦ ((𝐹𝑦) / (𝐺𝑦))) lim 𝑌) = (((𝐷𝑁) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) lim 𝑌))
802787, 801eleqtrd 2700 1 (𝜑 → ((𝐷𝑁)‘𝑌) ∈ (((𝐷𝑁) ↾ ((𝐴(,)𝐵) ∖ {𝑌})) lim 𝑌))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wo 383  wa 384   = wceq 1480  wcel 1987  wne 2790  wral 2907  wrex 2908  cdif 3556  cun 3557  wss 3559  ifcif 4063  {csn 4153  {cpr 4155   class class class wbr 4618  cmpt 4678  dom cdm 5079  ran crn 5080  cres 5081  cima 5082  ccom 5083  Fun wfun 5846   Fn wfn 5847  wf 5848  cfv 5852  (class class class)co 6610  cc 9886  cr 9887  0cc0 9888  1c1 9889   + caddc 9891   · cmul 9893   < clt 10026   / cdiv 10636  cn 10972  2c2 11022  cz 11329  +crp 11784  (,)cioo 12125   mod cmo 12616  sincsin 14730  cosccos 14731  πcpi 14733  t crest 16013  TopOpenctopn 16014  topGenctg 16030  fldccnfld 19678  Topctop 20630  TopOnctopon 20647  Clsdccld 20743  intcnt 20744   Cn ccn 20951   CnP ccnp 20952  Hauscha 21035  cnccncf 22602   lim climc 23549   D cdv 23550
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1836  ax-6 1885  ax-7 1932  ax-8 1989  ax-9 1996  ax-10 2016  ax-11 2031  ax-12 2044  ax-13 2245  ax-ext 2601  ax-rep 4736  ax-sep 4746  ax-nul 4754  ax-pow 4808  ax-pr 4872  ax-un 6909  ax-inf2 8490  ax-cnex 9944  ax-resscn 9945  ax-1cn 9946  ax-icn 9947  ax-addcl 9948  ax-addrcl 9949  ax-mulcl 9950  ax-mulrcl 9951  ax-mulcom 9952  ax-addass 9953  ax-mulass 9954  ax-distr 9955  ax-i2m1 9956  ax-1ne0 9957  ax-1rid 9958  ax-rnegex 9959  ax-rrecex 9960  ax-cnre 9961  ax-pre-lttri 9962  ax-pre-lttrn 9963  ax-pre-ltadd 9964  ax-pre-mulgt0 9965  ax-pre-sup 9966  ax-addf 9967  ax-mulf 9968
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1037  df-3an 1038  df-tru 1483  df-fal 1486  df-ex 1702  df-nf 1707  df-sb 1878  df-eu 2473  df-mo 2474  df-clab 2608  df-cleq 2614  df-clel 2617  df-nfc 2750  df-ne 2791  df-nel 2894  df-ral 2912  df-rex 2913  df-reu 2914  df-rmo 2915  df-rab 2916  df-v 3191  df-sbc 3422  df-csb 3519  df-dif 3562  df-un 3564  df-in 3566  df-ss 3573  df-pss 3575  df-nul 3897  df-if 4064  df-pw 4137  df-sn 4154  df-pr 4156  df-tp 4158  df-op 4160  df-uni 4408  df-int 4446  df-iun 4492  df-iin 4493  df-br 4619  df-opab 4679  df-mpt 4680  df-tr 4718  df-eprel 4990  df-id 4994  df-po 5000  df-so 5001  df-fr 5038  df-se 5039  df-we 5040  df-xp 5085  df-rel 5086  df-cnv 5087  df-co 5088  df-dm 5089  df-rn 5090  df-res 5091  df-ima 5092  df-pred 5644  df-ord 5690  df-on 5691  df-lim 5692  df-suc 5693  df-iota 5815  df-fun 5854  df-fn 5855  df-f 5856  df-f1 5857  df-fo 5858  df-f1o 5859  df-fv 5860  df-isom 5861  df-riota 6571  df-ov 6613  df-oprab 6614  df-mpt2 6615  df-of 6857  df-om 7020  df-1st 7120  df-2nd 7121  df-supp 7248  df-wrecs 7359  df-recs 7420  df-rdg 7458  df-1o 7512  df-2o 7513  df-oadd 7516  df-er 7694  df-map 7811  df-pm 7812  df-ixp 7861  df-en 7908  df-dom 7909  df-sdom 7910  df-fin 7911  df-fsupp 8228  df-fi 8269  df-sup 8300  df-inf 8301  df-oi 8367  df-card 8717  df-cda 8942  df-pnf 10028  df-mnf 10029  df-xr 10030  df-ltxr 10031  df-le 10032  df-sub 10220  df-neg 10221  df-div 10637  df-nn 10973  df-2 11031  df-3 11032  df-4 11033  df-5 11034  df-6 11035  df-7 11036  df-8 11037  df-9 11038  df-n0 11245  df-z 11330  df-dec 11446  df-uz 11640  df-q 11741  df-rp 11785  df-xneg 11898  df-xadd 11899  df-xmul 11900  df-ioo 12129  df-ioc 12130  df-ico 12131  df-icc 12132  df-fz 12277  df-fzo 12415  df-fl 12541  df-mod 12617  df-seq 12750  df-exp 12809  df-fac 13009  df-bc 13038  df-hash 13066  df-shft 13749  df-cj 13781  df-re 13782  df-im 13783  df-sqrt 13917  df-abs 13918  df-limsup 14144  df-clim 14161  df-rlim 14162  df-sum 14359  df-ef 14734  df-sin 14736  df-cos 14737  df-pi 14739  df-struct 15794  df-ndx 15795  df-slot 15796  df-base 15797  df-sets 15798  df-ress 15799  df-plusg 15886  df-mulr 15887  df-starv 15888  df-sca 15889  df-vsca 15890  df-ip 15891  df-tset 15892  df-ple 15893  df-ds 15896  df-unif 15897  df-hom 15898  df-cco 15899  df-rest 16015  df-topn 16016  df-0g 16034  df-gsum 16035  df-topgen 16036  df-pt 16037  df-prds 16040  df-xrs 16094  df-qtop 16099  df-imas 16100  df-xps 16102  df-mre 16178  df-mrc 16179  df-acs 16181  df-mgm 17174  df-sgrp 17216  df-mnd 17227  df-submnd 17268  df-mulg 17473  df-cntz 17682  df-cmn 18127  df-psmet 19670  df-xmet 19671  df-met 19672  df-bl 19673  df-mopn 19674  df-fbas 19675  df-fg 19676  df-cnfld 19679  df-top 20631  df-topon 20648  df-topsp 20661  df-bases 20674  df-cld 20746  df-ntr 20747  df-cls 20748  df-nei 20825  df-lp 20863  df-perf 20864  df-cn 20954  df-cnp 20955  df-t1 21041  df-haus 21042  df-cmp 21113  df-tx 21288  df-hmeo 21481  df-fil 21573  df-fm 21665  df-flim 21666  df-flf 21667  df-xms 22048  df-ms 22049  df-tms 22050  df-cncf 22604  df-limc 23553  df-dv 23554
This theorem is referenced by:  dirkercncflem3  39655
  Copyright terms: Public domain W3C validator