sinccvglem - Mathbox for Paul Chapman

	Mathbox for Paul Chapman		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > sinccvglem		Structured version Visualization version GIF version

Theorem sinccvglem 35870

Description: ((sin‘𝑥) / 𝑥) ⇝ 1 as (real) 𝑥 ⇝ 0. (Contributed by Paul Chapman, 10-Nov-2012.) (Revised by Mario Carneiro, 21-May-2014.)

**Hypotheses**
Ref	Expression
sinccvg.1	⊢ (𝜑 → 𝐹:ℕ⟶(ℝ ∖ {0}))
sinccvg.2	⊢ (𝜑 → 𝐹 ⇝ 0)
sinccvg.3	⊢ 𝐺 = (𝑥 ∈ (ℝ ∖ {0}) ↦ ((sin‘𝑥) / 𝑥))
sinccvg.4	⊢ 𝐻 = (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3)))
sinccvg.5	⊢ (𝜑 → 𝑀 ∈ ℕ)
sinccvg.6	⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) < 1)

**Assertion**
Ref	Expression
sinccvglem	⊢ (𝜑 → (𝐺 ∘ 𝐹) ⇝ 1)

Distinct variable groups: 𝑥,𝑘,𝐹 𝑘,𝐻 𝑘,𝑀 𝜑,𝑘 𝑘,𝐺 Allowed substitution hints: 𝜑(𝑥) 𝐺(𝑥) 𝐻(𝑥) 𝑀(𝑥)

Proof of Theorem sinccvglem Dummy variables 𝑤 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eqid 2737	. 2 ⊢ (ℤ_≥‘𝑀) = (ℤ_≥‘𝑀)
2		sinccvg.5	. . 3 ⊢ (𝜑 → 𝑀 ∈ ℕ)
3	2	nnzd 12541	. 2 ⊢ (𝜑 → 𝑀 ∈ ℤ)
4		sinccvg.2	. . . 4 ⊢ (𝜑 → 𝐹 ⇝ 0)
5		sinccvg.4	. . . . . 6 ⊢ 𝐻 = (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3)))
6	5	funmpt2 6531	. . . . 5 ⊢ Fun 𝐻
7		sinccvg.1	. . . . . 6 ⊢ (𝜑 → 𝐹:ℕ⟶(ℝ ∖ {0}))
8		nnex 12171	. . . . . 6 ⊢ ℕ ∈ V
9		fex 7174	. . . . . 6 ⊢ ((𝐹:ℕ⟶(ℝ ∖ {0}) ∧ ℕ ∈ V) → 𝐹 ∈ V)
10	7, 8, 9	sylancl 587	. . . . 5 ⊢ (𝜑 → 𝐹 ∈ V)
11		cofunexg 7895	. . . . 5 ⊢ ((Fun 𝐻 ∧ 𝐹 ∈ V) → (𝐻 ∘ 𝐹) ∈ V)
12	6, 10, 11	sylancr 588	. . . 4 ⊢ (𝜑 → (𝐻 ∘ 𝐹) ∈ V)
13	7	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 𝐹:ℕ⟶(ℝ ∖ {0}))
14		eluznn 12859	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℕ ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 𝑘 ∈ ℕ)
15	2, 14	sylan 581	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 𝑘 ∈ ℕ)
16	13, 15	ffvelcdmd 7031	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ∈ (ℝ ∖ {0}))
17		eldifsn 4730	. . . . . . 7 ⊢ ((𝐹‘𝑘) ∈ (ℝ ∖ {0}) ↔ ((𝐹‘𝑘) ∈ ℝ ∧ (𝐹‘𝑘) ≠ 0))
18	16, 17	sylib 218	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐹‘𝑘) ∈ ℝ ∧ (𝐹‘𝑘) ≠ 0))
19	18	simpld 494	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ∈ ℝ)
20	19	recnd 11164	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ∈ ℂ)
21		ax-1cn 11087	. . . . . 6 ⊢ 1 ∈ ℂ
22		sqcl 14071	. . . . . . 7 ⊢ (𝑥 ∈ ℂ → (𝑥↑2) ∈ ℂ)
23		3cn 12253	. . . . . . . 8 ⊢ 3 ∈ ℂ
24		3ne0 12278	. . . . . . . 8 ⊢ 3 ≠ 0
25		divcl 11806	. . . . . . . 8 ⊢ (((𝑥↑2) ∈ ℂ ∧ 3 ∈ ℂ ∧ 3 ≠ 0) → ((𝑥↑2) / 3) ∈ ℂ)
26	23, 24, 25	mp3an23 1456	. . . . . . 7 ⊢ ((𝑥↑2) ∈ ℂ → ((𝑥↑2) / 3) ∈ ℂ)
27	22, 26	syl 17	. . . . . 6 ⊢ (𝑥 ∈ ℂ → ((𝑥↑2) / 3) ∈ ℂ)
28		subcl 11383	. . . . . 6 ⊢ ((1 ∈ ℂ ∧ ((𝑥↑2) / 3) ∈ ℂ) → (1 − ((𝑥↑2) / 3)) ∈ ℂ)
29	21, 27, 28	sylancr 588	. . . . 5 ⊢ (𝑥 ∈ ℂ → (1 − ((𝑥↑2) / 3)) ∈ ℂ)
30	5, 29	fmpti 7058	. . . 4 ⊢ 𝐻:ℂ⟶ℂ
31		eqid 2737	. . . . . . . . . 10 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
32	31	cnfldtopon 24757	. . . . . . . . 9 ⊢ (TopOpen‘ℂ_fld) ∈ (TopOn‘ℂ)
33	32	a1i 11	. . . . . . . 8 ⊢ (⊤ → (TopOpen‘ℂ_fld) ∈ (TopOn‘ℂ))
34		1cnd 11130	. . . . . . . . 9 ⊢ (⊤ → 1 ∈ ℂ)
35	33, 33, 34	cnmptc 23637	. . . . . . . 8 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ 1) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
36	31	sqcn 24851	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ (𝑥↑2)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
37	36	a1i 11	. . . . . . . . 9 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ (𝑥↑2)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
38	31	divccn 24850	. . . . . . . . . . 11 ⊢ ((3 ∈ ℂ ∧ 3 ≠ 0) → (𝑦 ∈ ℂ ↦ (𝑦 / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
39	23, 24, 38	mp2an 693	. . . . . . . . . 10 ⊢ (𝑦 ∈ ℂ ↦ (𝑦 / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
40	39	a1i 11	. . . . . . . . 9 ⊢ (⊤ → (𝑦 ∈ ℂ ↦ (𝑦 / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
41		oveq1 7367	. . . . . . . . 9 ⊢ (𝑦 = (𝑥↑2) → (𝑦 / 3) = ((𝑥↑2) / 3))
42	33, 37, 33, 40, 41	cnmpt11 23638	. . . . . . . 8 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ ((𝑥↑2) / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
43	31	subcn 24842	. . . . . . . . 9 ⊢ − ∈ (((TopOpen‘ℂ_fld) ×_t (TopOpen‘ℂ_fld)) Cn (TopOpen‘ℂ_fld))
44	43	a1i 11	. . . . . . . 8 ⊢ (⊤ → − ∈ (((TopOpen‘ℂ_fld) ×_t (TopOpen‘ℂ_fld)) Cn (TopOpen‘ℂ_fld)))
45	33, 35, 42, 44	cnmpt12f 23641	. . . . . . 7 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3))) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
46	45	mptru 1549	. . . . . 6 ⊢ (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3))) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
47	31	cncfcn1 24888	. . . . . 6 ⊢ (ℂ–cn→ℂ) = ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
48	46, 5, 47	3eltr4i 2850	. . . . 5 ⊢ 𝐻 ∈ (ℂ–cn→ℂ)
49		cncfi 24871	. . . . 5 ⊢ ((𝐻 ∈ (ℂ–cn→ℂ) ∧ 0 ∈ ℂ ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ ℝ⁺ ∀𝑤 ∈ ℂ ((abs‘(𝑤 − 0)) < 𝑧 → (abs‘((𝐻‘𝑤) − (𝐻‘0))) < 𝑦))
50	48, 49	mp3an1 1451	. . . 4 ⊢ ((0 ∈ ℂ ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ ℝ⁺ ∀𝑤 ∈ ℂ ((abs‘(𝑤 − 0)) < 𝑧 → (abs‘((𝐻‘𝑤) − (𝐻‘0))) < 𝑦))
51		fvco3 6933	. . . . . 6 ⊢ ((𝐹:ℕ⟶(ℝ ∖ {0}) ∧ 𝑘 ∈ ℕ) → ((𝐻 ∘ 𝐹)‘𝑘) = (𝐻‘(𝐹‘𝑘)))
52	7, 51	sylan 581	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐻 ∘ 𝐹)‘𝑘) = (𝐻‘(𝐹‘𝑘)))
53	15, 52	syldan 592	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) = (𝐻‘(𝐹‘𝑘)))
54	1, 4, 12, 3, 20, 30, 50, 53	climcn1lem 15556	. . 3 ⊢ (𝜑 → (𝐻 ∘ 𝐹) ⇝ (𝐻‘0))
55		0cn 11127	. . . 4 ⊢ 0 ∈ ℂ
56		sq0i 14146	. . . . . . . . 9 ⊢ (𝑥 = 0 → (𝑥↑2) = 0)
57	56	oveq1d 7375	. . . . . . . 8 ⊢ (𝑥 = 0 → ((𝑥↑2) / 3) = (0 / 3))
58	23, 24	div0i 11880	. . . . . . . 8 ⊢ (0 / 3) = 0
59	57, 58	eqtrdi 2788	. . . . . . 7 ⊢ (𝑥 = 0 → ((𝑥↑2) / 3) = 0)
60	59	oveq2d 7376	. . . . . 6 ⊢ (𝑥 = 0 → (1 − ((𝑥↑2) / 3)) = (1 − 0))
61		1m0e1 12288	. . . . . 6 ⊢ (1 − 0) = 1
62	60, 61	eqtrdi 2788	. . . . 5 ⊢ (𝑥 = 0 → (1 − ((𝑥↑2) / 3)) = 1)
63		1ex 11131	. . . . 5 ⊢ 1 ∈ V
64	62, 5, 63	fvmpt 6941	. . . 4 ⊢ (0 ∈ ℂ → (𝐻‘0) = 1)
65	55, 64	ax-mp 5	. . 3 ⊢ (𝐻‘0) = 1
66	54, 65	breqtrdi 5127	. 2 ⊢ (𝜑 → (𝐻 ∘ 𝐹) ⇝ 1)
67		sinccvg.3	. . . 4 ⊢ 𝐺 = (𝑥 ∈ (ℝ ∖ {0}) ↦ ((sin‘𝑥) / 𝑥))
68	67	funmpt2 6531	. . 3 ⊢ Fun 𝐺
69		cofunexg 7895	. . 3 ⊢ ((Fun 𝐺 ∧ 𝐹 ∈ V) → (𝐺 ∘ 𝐹) ∈ V)
70	68, 10, 69	sylancr 588	. 2 ⊢ (𝜑 → (𝐺 ∘ 𝐹) ∈ V)
71		oveq1 7367	. . . . . . . 8 ⊢ (𝑥 = (𝐹‘𝑘) → (𝑥↑2) = ((𝐹‘𝑘)↑2))
72	71	oveq1d 7375	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑘) → ((𝑥↑2) / 3) = (((𝐹‘𝑘)↑2) / 3))
73	72	oveq2d 7376	. . . . . 6 ⊢ (𝑥 = (𝐹‘𝑘) → (1 − ((𝑥↑2) / 3)) = (1 − (((𝐹‘𝑘)↑2) / 3)))
74		ovex 7393	. . . . . 6 ⊢ (1 − (((𝐹‘𝑘)↑2) / 3)) ∈ V
75	73, 5, 74	fvmpt 6941	. . . . 5 ⊢ ((𝐹‘𝑘) ∈ ℂ → (𝐻‘(𝐹‘𝑘)) = (1 − (((𝐹‘𝑘)↑2) / 3)))
76	20, 75	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐻‘(𝐹‘𝑘)) = (1 − (((𝐹‘𝑘)↑2) / 3)))
77	53, 76	eqtrd 2772	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) = (1 − (((𝐹‘𝑘)↑2) / 3)))
78		1re 11135	. . . 4 ⊢ 1 ∈ ℝ
79	19	resqcld 14078	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐹‘𝑘)↑2) ∈ ℝ)
80		3nn 12251	. . . . 5 ⊢ 3 ∈ ℕ
81		nndivre 12209	. . . . 5 ⊢ ((((𝐹‘𝑘)↑2) ∈ ℝ ∧ 3 ∈ ℕ) → (((𝐹‘𝑘)↑2) / 3) ∈ ℝ)
82	79, 80, 81	sylancl 587	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((𝐹‘𝑘)↑2) / 3) ∈ ℝ)
83		resubcl 11449	. . . 4 ⊢ ((1 ∈ ℝ ∧ (((𝐹‘𝑘)↑2) / 3) ∈ ℝ) → (1 − (((𝐹‘𝑘)↑2) / 3)) ∈ ℝ)
84	78, 82, 83	sylancr 588	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) ∈ ℝ)
85	77, 84	eqeltrd 2837	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) ∈ ℝ)
86		fvco3 6933	. . . . . 6 ⊢ ((𝐹:ℕ⟶(ℝ ∖ {0}) ∧ 𝑘 ∈ ℕ) → ((𝐺 ∘ 𝐹)‘𝑘) = (𝐺‘(𝐹‘𝑘)))
87	7, 86	sylan 581	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐺 ∘ 𝐹)‘𝑘) = (𝐺‘(𝐹‘𝑘)))
88	15, 87	syldan 592	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) = (𝐺‘(𝐹‘𝑘)))
89		fveq2 6834	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑘) → (sin‘𝑥) = (sin‘(𝐹‘𝑘)))
90		id 22	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑘) → 𝑥 = (𝐹‘𝑘))
91	89, 90	oveq12d 7378	. . . . . 6 ⊢ (𝑥 = (𝐹‘𝑘) → ((sin‘𝑥) / 𝑥) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
92		ovex 7393	. . . . . 6 ⊢ ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ∈ V
93	91, 67, 92	fvmpt 6941	. . . . 5 ⊢ ((𝐹‘𝑘) ∈ (ℝ ∖ {0}) → (𝐺‘(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
94	16, 93	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐺‘(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
95	88, 94	eqtrd 2772	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
96	19	resincld 16101	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(𝐹‘𝑘)) ∈ ℝ)
97	18	simprd 495	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ≠ 0)
98	96, 19, 97	redivcld 11974	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ∈ ℝ)
99	95, 98	eqeltrd 2837	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) ∈ ℝ)
100		1cnd 11130	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 1 ∈ ℂ)
101	82	recnd 11164	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((𝐹‘𝑘)↑2) / 3) ∈ ℂ)
102	20	abscld 15392	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ ℝ)
103	102	recnd 11164	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ ℂ)
104	100, 101, 103	subdird 11598	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) = ((1 · (abs‘(𝐹‘𝑘))) − ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘)))))
105	103	mullidd 11154	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 · (abs‘(𝐹‘𝑘))) = (abs‘(𝐹‘𝑘)))
106		df-3 12236	. . . . . . . . . . . . 13 ⊢ 3 = (2 + 1)
107	106	oveq2i 7371	. . . . . . . . . . . 12 ⊢ ((abs‘(𝐹‘𝑘))↑3) = ((abs‘(𝐹‘𝑘))↑(2 + 1))
108		2nn0 12445	. . . . . . . . . . . . . 14 ⊢ 2 ∈ ℕ₀
109		expp1 14021	. . . . . . . . . . . . . 14 ⊢ (((abs‘(𝐹‘𝑘)) ∈ ℂ ∧ 2 ∈ ℕ₀) → ((abs‘(𝐹‘𝑘))↑(2 + 1)) = (((abs‘(𝐹‘𝑘))↑2) · (abs‘(𝐹‘𝑘))))
110	103, 108, 109	sylancl 587	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑(2 + 1)) = (((abs‘(𝐹‘𝑘))↑2) · (abs‘(𝐹‘𝑘))))
111		absresq 15255	. . . . . . . . . . . . . . 15 ⊢ ((𝐹‘𝑘) ∈ ℝ → ((abs‘(𝐹‘𝑘))↑2) = ((𝐹‘𝑘)↑2))
112	19, 111	syl 17	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑2) = ((𝐹‘𝑘)↑2))
113	112	oveq1d 7375	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((abs‘(𝐹‘𝑘))↑2) · (abs‘(𝐹‘𝑘))) = (((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))))
114	110, 113	eqtrd 2772	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑(2 + 1)) = (((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))))
115	107, 114	eqtrid 2784	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑3) = (((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))))
116	115	oveq1d 7375	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((abs‘(𝐹‘𝑘))↑3) / 3) = ((((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))) / 3))
117	79	recnd 11164	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐹‘𝑘)↑2) ∈ ℂ)
118	23	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 3 ∈ ℂ)
119	24	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 3 ≠ 0)
120	117, 103, 118, 119	div23d 11959	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))) / 3) = ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘))))
121	116, 120	eqtr2d 2773	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘))) = (((abs‘(𝐹‘𝑘))↑3) / 3))
122	105, 121	oveq12d 7378	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 · (abs‘(𝐹‘𝑘))) − ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘)))) = ((abs‘(𝐹‘𝑘)) − (((abs‘(𝐹‘𝑘))↑3) / 3)))
123	104, 122	eqtrd 2772	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) = ((abs‘(𝐹‘𝑘)) − (((abs‘(𝐹‘𝑘))↑3) / 3)))
124	20, 97	absrpcld 15404	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ ℝ⁺)
125	124	rpgt0d 12980	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 0 < (abs‘(𝐹‘𝑘)))
126		sinccvg.6	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) < 1)
127		ltle 11225	. . . . . . . . . . . 12 ⊢ (((abs‘(𝐹‘𝑘)) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘(𝐹‘𝑘)) < 1 → (abs‘(𝐹‘𝑘)) ≤ 1))
128	102, 78, 127	sylancl 587	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) < 1 → (abs‘(𝐹‘𝑘)) ≤ 1))
129	126, 128	mpd 15	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ≤ 1)
130		0xr 11183	. . . . . . . . . . 11 ⊢ 0 ∈ ℝ^*
131		elioc2 13353	. . . . . . . . . . 11 ⊢ ((0 ∈ ℝ^* ∧ 1 ∈ ℝ) → ((abs‘(𝐹‘𝑘)) ∈ (0(,]1) ↔ ((abs‘(𝐹‘𝑘)) ∈ ℝ ∧ 0 < (abs‘(𝐹‘𝑘)) ∧ (abs‘(𝐹‘𝑘)) ≤ 1)))
132	130, 78, 131	mp2an 693	. . . . . . . . . 10 ⊢ ((abs‘(𝐹‘𝑘)) ∈ (0(,]1) ↔ ((abs‘(𝐹‘𝑘)) ∈ ℝ ∧ 0 < (abs‘(𝐹‘𝑘)) ∧ (abs‘(𝐹‘𝑘)) ≤ 1))
133	102, 125, 129, 132	syl3anbrc 1345	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ (0(,]1))
134		sin01bnd 16143	. . . . . . . . 9 ⊢ ((abs‘(𝐹‘𝑘)) ∈ (0(,]1) → (((abs‘(𝐹‘𝑘)) − (((abs‘(𝐹‘𝑘))↑3) / 3)) < (sin‘(abs‘(𝐹‘𝑘))) ∧ (sin‘(abs‘(𝐹‘𝑘))) < (abs‘(𝐹‘𝑘))))
135	133, 134	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((abs‘(𝐹‘𝑘)) − (((abs‘(𝐹‘𝑘))↑3) / 3)) < (sin‘(abs‘(𝐹‘𝑘))) ∧ (sin‘(abs‘(𝐹‘𝑘))) < (abs‘(𝐹‘𝑘))))
136	135	simpld 494	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) − (((abs‘(𝐹‘𝑘))↑3) / 3)) < (sin‘(abs‘(𝐹‘𝑘))))
137	123, 136	eqbrtrd 5108	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) < (sin‘(abs‘(𝐹‘𝑘))))
138	102	resincld 16101	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(abs‘(𝐹‘𝑘))) ∈ ℝ)
139	84, 138, 124	ltmuldivd 13024	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) < (sin‘(abs‘(𝐹‘𝑘))) ↔ (1 − (((𝐹‘𝑘)↑2) / 3)) < ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘)))))
140	137, 139	mpbid 232	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) < ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))))
141		fveq2 6834	. . . . . . . 8 ⊢ ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → (sin‘(abs‘(𝐹‘𝑘))) = (sin‘(𝐹‘𝑘)))
142		id 22	. . . . . . . 8 ⊢ ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → (abs‘(𝐹‘𝑘)) = (𝐹‘𝑘))
143	141, 142	oveq12d 7378	. . . . . . 7 ⊢ ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
144	143	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘))))
145		sinneg 16104	. . . . . . . . . 10 ⊢ ((𝐹‘𝑘) ∈ ℂ → (sin‘-(𝐹‘𝑘)) = -(sin‘(𝐹‘𝑘)))
146	20, 145	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘-(𝐹‘𝑘)) = -(sin‘(𝐹‘𝑘)))
147	146	oveq1d 7375	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)) = (-(sin‘(𝐹‘𝑘)) / -(𝐹‘𝑘)))
148	96	recnd 11164	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(𝐹‘𝑘)) ∈ ℂ)
149	148, 20, 97	div2negd 11937	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (-(sin‘(𝐹‘𝑘)) / -(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
150	147, 149	eqtrd 2772	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
151		fveq2 6834	. . . . . . . . 9 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → (sin‘(abs‘(𝐹‘𝑘))) = (sin‘-(𝐹‘𝑘)))
152		id 22	. . . . . . . . 9 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → (abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘))
153	151, 152	oveq12d 7378	. . . . . . . 8 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)))
154	153	eqeq1d 2739	. . . . . . 7 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → (((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ↔ ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘))))
155	150, 154	syl5ibrcom 247	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘))))
156	19	absord 15369	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) ∨ (abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘)))
157	144, 155, 156	mpjaod 861	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
158	140, 157	breqtrd 5112	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) < ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
159	84, 98, 158	ltled 11285	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) ≤ ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
160	159, 77, 95	3brtr4d 5118	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) ≤ ((𝐺 ∘ 𝐹)‘𝑘))
161	78	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 1 ∈ ℝ)
162	135	simprd 495	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(abs‘(𝐹‘𝑘))) < (abs‘(𝐹‘𝑘)))
163	103	mulridd 11153	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) · 1) = (abs‘(𝐹‘𝑘)))
164	162, 163	breqtrrd 5114	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(abs‘(𝐹‘𝑘))) < ((abs‘(𝐹‘𝑘)) · 1))
165	138, 161, 124	ltdivmuld 13028	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) < 1 ↔ (sin‘(abs‘(𝐹‘𝑘))) < ((abs‘(𝐹‘𝑘)) · 1)))
166	164, 165	mpbird 257	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) < 1)
167	157, 166	eqbrtrrd 5110	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) < 1)
168	98, 161, 167	ltled 11285	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ≤ 1)
169	95, 168	eqbrtrd 5108	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) ≤ 1)
170	1, 3, 66, 70, 85, 99, 160, 169	climsqz 15594	1 ⊢ (𝜑 → (𝐺 ∘ 𝐹) ⇝ 1)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1087 = wceq 1542 ⊤wtru 1543 ∈ wcel 2114 ≠ wne 2933 ∀wral 3052 ∃wrex 3062 Vcvv 3430 ∖ cdif 3887 {csn 4568 class class class wbr 5086 ↦ cmpt 5167 ∘ ccom 5628 Fun wfun 6486 ⟶wf 6488 ‘cfv 6492 (class class class)co 7360 ℂcc 11027 ℝcr 11028 0cc0 11029 1c1 11030 + caddc 11032 · cmul 11034 ℝ^*cxr 11169 < clt 11170 ≤ cle 11171 − cmin 11368 -cneg 11369 / cdiv 11798 ℕcn 12165 2c2 12227 3c3 12228 ℕ₀cn0 12428 ℤ_≥cuz 12779 ℝ⁺crp 12933 (,]cioc 13290 ↑cexp 14014 abscabs 15187 ⇝ cli 15437 sincsin 16019 TopOpenctopn 17375 ℂ_fldccnfld 21344 TopOnctopon 22885 Cn ccn 23199 ×_t ctx 23535 –cn→ccncf 24853

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2709 ax-rep 5212 ax-sep 5231 ax-nul 5241 ax-pow 5302 ax-pr 5370 ax-un 7682 ax-inf2 9553 ax-cnex 11085 ax-resscn 11086 ax-1cn 11087 ax-icn 11088 ax-addcl 11089 ax-addrcl 11090 ax-mulcl 11091 ax-mulrcl 11092 ax-mulcom 11093 ax-addass 11094 ax-mulass 11095 ax-distr 11096 ax-i2m1 11097 ax-1ne0 11098 ax-1rid 11099 ax-rnegex 11100 ax-rrecex 11101 ax-cnre 11102 ax-pre-lttri 11103 ax-pre-lttrn 11104 ax-pre-ltadd 11105 ax-pre-mulgt0 11106 ax-pre-sup 11107

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2540 df-eu 2570 df-clab 2716 df-cleq 2729 df-clel 2812 df-nfc 2886 df-ne 2934 df-nel 3038 df-ral 3053 df-rex 3063 df-rmo 3343 df-reu 3344 df-rab 3391 df-v 3432 df-sbc 3730 df-csb 3839 df-dif 3893 df-un 3895 df-in 3897 df-ss 3907 df-pss 3910 df-nul 4275 df-if 4468 df-pw 4544 df-sn 4569 df-pr 4571 df-tp 4573 df-op 4575 df-uni 4852 df-int 4891 df-iun 4936 df-iin 4937 df-br 5087 df-opab 5149 df-mpt 5168 df-tr 5194 df-id 5519 df-eprel 5524 df-po 5532 df-so 5533 df-fr 5577 df-se 5578 df-we 5579 df-xp 5630 df-rel 5631 df-cnv 5632 df-co 5633 df-dm 5634 df-rn 5635 df-res 5636 df-ima 5637 df-pred 6259 df-ord 6320 df-on 6321 df-lim 6322 df-suc 6323 df-iota 6448 df-fun 6494 df-fn 6495 df-f 6496 df-f1 6497 df-fo 6498 df-f1o 6499 df-fv 6500 df-isom 6501 df-riota 7317 df-ov 7363 df-oprab 7364 df-mpo 7365 df-of 7624 df-om 7811 df-1st 7935 df-2nd 7936 df-supp 8104 df-frecs 8224 df-wrecs 8255 df-recs 8304 df-rdg 8342 df-1o 8398 df-2o 8399 df-er 8636 df-map 8768 df-pm 8769 df-ixp 8839 df-en 8887 df-dom 8888 df-sdom 8889 df-fin 8890 df-fsupp 9268 df-fi 9317 df-sup 9348 df-inf 9349 df-oi 9418 df-card 9854 df-pnf 11172 df-mnf 11173 df-xr 11174 df-ltxr 11175 df-le 11176 df-sub 11370 df-neg 11371 df-div 11799 df-nn 12166 df-2 12235 df-3 12236 df-4 12237 df-5 12238 df-6 12239 df-7 12240 df-8 12241 df-9 12242 df-n0 12429 df-z 12516 df-dec 12636 df-uz 12780 df-q 12890 df-rp 12934 df-xneg 13054 df-xadd 13055 df-xmul 13056 df-ioc 13294 df-ico 13295 df-icc 13296 df-fz 13453 df-fzo 13600 df-fl 13742 df-seq 13955 df-exp 14015 df-fac 14227 df-hash 14284 df-shft 15020 df-cj 15052 df-re 15053 df-im 15054 df-sqrt 15188 df-abs 15189 df-limsup 15424 df-clim 15441 df-rlim 15442 df-sum 15640 df-ef 16023 df-sin 16025 df-struct 17108 df-sets 17125 df-slot 17143 df-ndx 17155 df-base 17171 df-ress 17192 df-plusg 17224 df-mulr 17225 df-starv 17226 df-sca 17227 df-vsca 17228 df-ip 17229 df-tset 17230 df-ple 17231 df-ds 17233 df-unif 17234 df-hom 17235 df-cco 17236 df-rest 17376 df-topn 17377 df-0g 17395 df-gsum 17396 df-topgen 17397 df-pt 17398 df-prds 17401 df-xrs 17457 df-qtop 17462 df-imas 17463 df-xps 17465 df-mre 17539 df-mrc 17540 df-acs 17542 df-mgm 18599 df-sgrp 18678 df-mnd 18694 df-submnd 18743 df-mulg 19035 df-cntz 19283 df-cmn 19748 df-psmet 21336 df-xmet 21337 df-met 21338 df-bl 21339 df-mopn 21340 df-cnfld 21345 df-top 22869 df-topon 22886 df-topsp 22908 df-bases 22921 df-cn 23202 df-cnp 23203 df-tx 23537 df-hmeo 23730 df-xms 24295 df-ms 24296 df-tms 24297 df-cncf 24855

This theorem is referenced by: sinccvg 35871

W3C validator