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 35704

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 2731	. 2 ⊢ (ℤ_≥‘𝑀) = (ℤ_≥‘𝑀)
2		sinccvg.5	. . 3 ⊢ (𝜑 → 𝑀 ∈ ℕ)
3	2	nnzd 12492	. 2 ⊢ (𝜑 → 𝑀 ∈ ℤ)
4		sinccvg.2	. . . 4 ⊢ (𝜑 → 𝐹 ⇝ 0)
5		sinccvg.4	. . . . . 6 ⊢ 𝐻 = (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3)))
6	5	funmpt2 6520	. . . . 5 ⊢ Fun 𝐻
7		sinccvg.1	. . . . . 6 ⊢ (𝜑 → 𝐹:ℕ⟶(ℝ ∖ {0}))
8		nnex 12128	. . . . . 6 ⊢ ℕ ∈ V
9		fex 7160	. . . . . 6 ⊢ ((𝐹:ℕ⟶(ℝ ∖ {0}) ∧ ℕ ∈ V) → 𝐹 ∈ V)
10	7, 8, 9	sylancl 586	. . . . 5 ⊢ (𝜑 → 𝐹 ∈ V)
11		cofunexg 7881	. . . . 5 ⊢ ((Fun 𝐻 ∧ 𝐹 ∈ V) → (𝐻 ∘ 𝐹) ∈ V)
12	6, 10, 11	sylancr 587	. . . 4 ⊢ (𝜑 → (𝐻 ∘ 𝐹) ∈ V)
13	7	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 𝐹:ℕ⟶(ℝ ∖ {0}))
14		eluznn 12813	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℕ ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 𝑘 ∈ ℕ)
15	2, 14	sylan 580	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 𝑘 ∈ ℕ)
16	13, 15	ffvelcdmd 7018	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ∈ (ℝ ∖ {0}))
17		eldifsn 4738	. . . . . . 7 ⊢ ((𝐹‘𝑘) ∈ (ℝ ∖ {0}) ↔ ((𝐹‘𝑘) ∈ ℝ ∧ (𝐹‘𝑘) ≠ 0))
18	16, 17	sylib 218	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐹‘𝑘) ∈ ℝ ∧ (𝐹‘𝑘) ≠ 0))
19	18	simpld 494	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ∈ ℝ)
20	19	recnd 11137	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ∈ ℂ)
21		ax-1cn 11061	. . . . . 6 ⊢ 1 ∈ ℂ
22		sqcl 14022	. . . . . . 7 ⊢ (𝑥 ∈ ℂ → (𝑥↑2) ∈ ℂ)
23		3cn 12203	. . . . . . . 8 ⊢ 3 ∈ ℂ
24		3ne0 12228	. . . . . . . 8 ⊢ 3 ≠ 0
25		divcl 11779	. . . . . . . 8 ⊢ (((𝑥↑2) ∈ ℂ ∧ 3 ∈ ℂ ∧ 3 ≠ 0) → ((𝑥↑2) / 3) ∈ ℂ)
26	23, 24, 25	mp3an23 1455	. . . . . . 7 ⊢ ((𝑥↑2) ∈ ℂ → ((𝑥↑2) / 3) ∈ ℂ)
27	22, 26	syl 17	. . . . . 6 ⊢ (𝑥 ∈ ℂ → ((𝑥↑2) / 3) ∈ ℂ)
28		subcl 11356	. . . . . 6 ⊢ ((1 ∈ ℂ ∧ ((𝑥↑2) / 3) ∈ ℂ) → (1 − ((𝑥↑2) / 3)) ∈ ℂ)
29	21, 27, 28	sylancr 587	. . . . 5 ⊢ (𝑥 ∈ ℂ → (1 − ((𝑥↑2) / 3)) ∈ ℂ)
30	5, 29	fmpti 7045	. . . 4 ⊢ 𝐻:ℂ⟶ℂ
31		eqid 2731	. . . . . . . . . 10 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
32	31	cnfldtopon 24695	. . . . . . . . 9 ⊢ (TopOpen‘ℂ_fld) ∈ (TopOn‘ℂ)
33	32	a1i 11	. . . . . . . 8 ⊢ (⊤ → (TopOpen‘ℂ_fld) ∈ (TopOn‘ℂ))
34		1cnd 11104	. . . . . . . . 9 ⊢ (⊤ → 1 ∈ ℂ)
35	33, 33, 34	cnmptc 23575	. . . . . . . 8 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ 1) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
36	31	sqcn 24792	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ (𝑥↑2)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
37	36	a1i 11	. . . . . . . . 9 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ (𝑥↑2)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
38	31	divccn 24789	. . . . . . . . . . 11 ⊢ ((3 ∈ ℂ ∧ 3 ≠ 0) → (𝑦 ∈ ℂ ↦ (𝑦 / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
39	23, 24, 38	mp2an 692	. . . . . . . . . 10 ⊢ (𝑦 ∈ ℂ ↦ (𝑦 / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
40	39	a1i 11	. . . . . . . . 9 ⊢ (⊤ → (𝑦 ∈ ℂ ↦ (𝑦 / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
41		oveq1 7353	. . . . . . . . 9 ⊢ (𝑦 = (𝑥↑2) → (𝑦 / 3) = ((𝑥↑2) / 3))
42	33, 37, 33, 40, 41	cnmpt11 23576	. . . . . . . 8 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ ((𝑥↑2) / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
43	31	subcn 24780	. . . . . . . . 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 23579	. . . . . . 7 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3))) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
46	45	mptru 1548	. . . . . 6 ⊢ (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3))) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
47	31	cncfcn1 24829	. . . . . 6 ⊢ (ℂ–cn→ℂ) = ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
48	46, 5, 47	3eltr4i 2844	. . . . 5 ⊢ 𝐻 ∈ (ℂ–cn→ℂ)
49		cncfi 24812	. . . . 5 ⊢ ((𝐻 ∈ (ℂ–cn→ℂ) ∧ 0 ∈ ℂ ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ ℝ⁺ ∀𝑤 ∈ ℂ ((abs‘(𝑤 − 0)) < 𝑧 → (abs‘((𝐻‘𝑤) − (𝐻‘0))) < 𝑦))
50	48, 49	mp3an1 1450	. . . 4 ⊢ ((0 ∈ ℂ ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ ℝ⁺ ∀𝑤 ∈ ℂ ((abs‘(𝑤 − 0)) < 𝑧 → (abs‘((𝐻‘𝑤) − (𝐻‘0))) < 𝑦))
51		fvco3 6921	. . . . . 6 ⊢ ((𝐹:ℕ⟶(ℝ ∖ {0}) ∧ 𝑘 ∈ ℕ) → ((𝐻 ∘ 𝐹)‘𝑘) = (𝐻‘(𝐹‘𝑘)))
52	7, 51	sylan 580	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐻 ∘ 𝐹)‘𝑘) = (𝐻‘(𝐹‘𝑘)))
53	15, 52	syldan 591	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) = (𝐻‘(𝐹‘𝑘)))
54	1, 4, 12, 3, 20, 30, 50, 53	climcn1lem 15507	. . 3 ⊢ (𝜑 → (𝐻 ∘ 𝐹) ⇝ (𝐻‘0))
55		0cn 11101	. . . 4 ⊢ 0 ∈ ℂ
56		sq0i 14097	. . . . . . . . 9 ⊢ (𝑥 = 0 → (𝑥↑2) = 0)
57	56	oveq1d 7361	. . . . . . . 8 ⊢ (𝑥 = 0 → ((𝑥↑2) / 3) = (0 / 3))
58	23, 24	div0i 11852	. . . . . . . 8 ⊢ (0 / 3) = 0
59	57, 58	eqtrdi 2782	. . . . . . 7 ⊢ (𝑥 = 0 → ((𝑥↑2) / 3) = 0)
60	59	oveq2d 7362	. . . . . 6 ⊢ (𝑥 = 0 → (1 − ((𝑥↑2) / 3)) = (1 − 0))
61		1m0e1 12238	. . . . . 6 ⊢ (1 − 0) = 1
62	60, 61	eqtrdi 2782	. . . . 5 ⊢ (𝑥 = 0 → (1 − ((𝑥↑2) / 3)) = 1)
63		1ex 11105	. . . . 5 ⊢ 1 ∈ V
64	62, 5, 63	fvmpt 6929	. . . 4 ⊢ (0 ∈ ℂ → (𝐻‘0) = 1)
65	55, 64	ax-mp 5	. . 3 ⊢ (𝐻‘0) = 1
66	54, 65	breqtrdi 5132	. 2 ⊢ (𝜑 → (𝐻 ∘ 𝐹) ⇝ 1)
67		sinccvg.3	. . . 4 ⊢ 𝐺 = (𝑥 ∈ (ℝ ∖ {0}) ↦ ((sin‘𝑥) / 𝑥))
68	67	funmpt2 6520	. . 3 ⊢ Fun 𝐺
69		cofunexg 7881	. . 3 ⊢ ((Fun 𝐺 ∧ 𝐹 ∈ V) → (𝐺 ∘ 𝐹) ∈ V)
70	68, 10, 69	sylancr 587	. 2 ⊢ (𝜑 → (𝐺 ∘ 𝐹) ∈ V)
71		oveq1 7353	. . . . . . . 8 ⊢ (𝑥 = (𝐹‘𝑘) → (𝑥↑2) = ((𝐹‘𝑘)↑2))
72	71	oveq1d 7361	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑘) → ((𝑥↑2) / 3) = (((𝐹‘𝑘)↑2) / 3))
73	72	oveq2d 7362	. . . . . 6 ⊢ (𝑥 = (𝐹‘𝑘) → (1 − ((𝑥↑2) / 3)) = (1 − (((𝐹‘𝑘)↑2) / 3)))
74		ovex 7379	. . . . . 6 ⊢ (1 − (((𝐹‘𝑘)↑2) / 3)) ∈ V
75	73, 5, 74	fvmpt 6929	. . . . 5 ⊢ ((𝐹‘𝑘) ∈ ℂ → (𝐻‘(𝐹‘𝑘)) = (1 − (((𝐹‘𝑘)↑2) / 3)))
76	20, 75	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐻‘(𝐹‘𝑘)) = (1 − (((𝐹‘𝑘)↑2) / 3)))
77	53, 76	eqtrd 2766	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) = (1 − (((𝐹‘𝑘)↑2) / 3)))
78		1re 11109	. . . 4 ⊢ 1 ∈ ℝ
79	19	resqcld 14029	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐹‘𝑘)↑2) ∈ ℝ)
80		3nn 12201	. . . . 5 ⊢ 3 ∈ ℕ
81		nndivre 12163	. . . . 5 ⊢ ((((𝐹‘𝑘)↑2) ∈ ℝ ∧ 3 ∈ ℕ) → (((𝐹‘𝑘)↑2) / 3) ∈ ℝ)
82	79, 80, 81	sylancl 586	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((𝐹‘𝑘)↑2) / 3) ∈ ℝ)
83		resubcl 11422	. . . 4 ⊢ ((1 ∈ ℝ ∧ (((𝐹‘𝑘)↑2) / 3) ∈ ℝ) → (1 − (((𝐹‘𝑘)↑2) / 3)) ∈ ℝ)
84	78, 82, 83	sylancr 587	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) ∈ ℝ)
85	77, 84	eqeltrd 2831	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) ∈ ℝ)
86		fvco3 6921	. . . . . 6 ⊢ ((𝐹:ℕ⟶(ℝ ∖ {0}) ∧ 𝑘 ∈ ℕ) → ((𝐺 ∘ 𝐹)‘𝑘) = (𝐺‘(𝐹‘𝑘)))
87	7, 86	sylan 580	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐺 ∘ 𝐹)‘𝑘) = (𝐺‘(𝐹‘𝑘)))
88	15, 87	syldan 591	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) = (𝐺‘(𝐹‘𝑘)))
89		fveq2 6822	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑘) → (sin‘𝑥) = (sin‘(𝐹‘𝑘)))
90		id 22	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑘) → 𝑥 = (𝐹‘𝑘))
91	89, 90	oveq12d 7364	. . . . . 6 ⊢ (𝑥 = (𝐹‘𝑘) → ((sin‘𝑥) / 𝑥) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
92		ovex 7379	. . . . . 6 ⊢ ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ∈ V
93	91, 67, 92	fvmpt 6929	. . . . 5 ⊢ ((𝐹‘𝑘) ∈ (ℝ ∖ {0}) → (𝐺‘(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
94	16, 93	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐺‘(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
95	88, 94	eqtrd 2766	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
96	19	resincld 16049	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(𝐹‘𝑘)) ∈ ℝ)
97	18	simprd 495	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ≠ 0)
98	96, 19, 97	redivcld 11946	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ∈ ℝ)
99	95, 98	eqeltrd 2831	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) ∈ ℝ)
100		1cnd 11104	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 1 ∈ ℂ)
101	82	recnd 11137	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((𝐹‘𝑘)↑2) / 3) ∈ ℂ)
102	20	abscld 15343	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ ℝ)
103	102	recnd 11137	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ ℂ)
104	100, 101, 103	subdird 11571	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) = ((1 · (abs‘(𝐹‘𝑘))) − ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘)))))
105	103	mullidd 11127	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 · (abs‘(𝐹‘𝑘))) = (abs‘(𝐹‘𝑘)))
106		df-3 12186	. . . . . . . . . . . . 13 ⊢ 3 = (2 + 1)
107	106	oveq2i 7357	. . . . . . . . . . . 12 ⊢ ((abs‘(𝐹‘𝑘))↑3) = ((abs‘(𝐹‘𝑘))↑(2 + 1))
108		2nn0 12395	. . . . . . . . . . . . . 14 ⊢ 2 ∈ ℕ₀
109		expp1 13972	. . . . . . . . . . . . . 14 ⊢ (((abs‘(𝐹‘𝑘)) ∈ ℂ ∧ 2 ∈ ℕ₀) → ((abs‘(𝐹‘𝑘))↑(2 + 1)) = (((abs‘(𝐹‘𝑘))↑2) · (abs‘(𝐹‘𝑘))))
110	103, 108, 109	sylancl 586	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑(2 + 1)) = (((abs‘(𝐹‘𝑘))↑2) · (abs‘(𝐹‘𝑘))))
111		absresq 15206	. . . . . . . . . . . . . . 15 ⊢ ((𝐹‘𝑘) ∈ ℝ → ((abs‘(𝐹‘𝑘))↑2) = ((𝐹‘𝑘)↑2))
112	19, 111	syl 17	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑2) = ((𝐹‘𝑘)↑2))
113	112	oveq1d 7361	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((abs‘(𝐹‘𝑘))↑2) · (abs‘(𝐹‘𝑘))) = (((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))))
114	110, 113	eqtrd 2766	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑(2 + 1)) = (((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))))
115	107, 114	eqtrid 2778	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑3) = (((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))))
116	115	oveq1d 7361	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((abs‘(𝐹‘𝑘))↑3) / 3) = ((((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))) / 3))
117	79	recnd 11137	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐹‘𝑘)↑2) ∈ ℂ)
118	23	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 3 ∈ ℂ)
119	24	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 3 ≠ 0)
120	117, 103, 118, 119	div23d 11931	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))) / 3) = ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘))))
121	116, 120	eqtr2d 2767	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘))) = (((abs‘(𝐹‘𝑘))↑3) / 3))
122	105, 121	oveq12d 7364	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 · (abs‘(𝐹‘𝑘))) − ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘)))) = ((abs‘(𝐹‘𝑘)) − (((abs‘(𝐹‘𝑘))↑3) / 3)))
123	104, 122	eqtrd 2766	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) = ((abs‘(𝐹‘𝑘)) − (((abs‘(𝐹‘𝑘))↑3) / 3)))
124	20, 97	absrpcld 15355	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ ℝ⁺)
125	124	rpgt0d 12934	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 0 < (abs‘(𝐹‘𝑘)))
126		sinccvg.6	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) < 1)
127		ltle 11198	. . . . . . . . . . . 12 ⊢ (((abs‘(𝐹‘𝑘)) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘(𝐹‘𝑘)) < 1 → (abs‘(𝐹‘𝑘)) ≤ 1))
128	102, 78, 127	sylancl 586	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) < 1 → (abs‘(𝐹‘𝑘)) ≤ 1))
129	126, 128	mpd 15	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ≤ 1)
130		0xr 11156	. . . . . . . . . . 11 ⊢ 0 ∈ ℝ^*
131		elioc2 13306	. . . . . . . . . . 11 ⊢ ((0 ∈ ℝ^* ∧ 1 ∈ ℝ) → ((abs‘(𝐹‘𝑘)) ∈ (0(,]1) ↔ ((abs‘(𝐹‘𝑘)) ∈ ℝ ∧ 0 < (abs‘(𝐹‘𝑘)) ∧ (abs‘(𝐹‘𝑘)) ≤ 1)))
132	130, 78, 131	mp2an 692	. . . . . . . . . 10 ⊢ ((abs‘(𝐹‘𝑘)) ∈ (0(,]1) ↔ ((abs‘(𝐹‘𝑘)) ∈ ℝ ∧ 0 < (abs‘(𝐹‘𝑘)) ∧ (abs‘(𝐹‘𝑘)) ≤ 1))
133	102, 125, 129, 132	syl3anbrc 1344	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ (0(,]1))
134		sin01bnd 16091	. . . . . . . . 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 5113	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) < (sin‘(abs‘(𝐹‘𝑘))))
138	102	resincld 16049	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(abs‘(𝐹‘𝑘))) ∈ ℝ)
139	84, 138, 124	ltmuldivd 12978	. . . . . 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 6822	. . . . . . . 8 ⊢ ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → (sin‘(abs‘(𝐹‘𝑘))) = (sin‘(𝐹‘𝑘)))
142		id 22	. . . . . . . 8 ⊢ ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → (abs‘(𝐹‘𝑘)) = (𝐹‘𝑘))
143	141, 142	oveq12d 7364	. . . . . . 7 ⊢ ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
144	143	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘))))
145		sinneg 16052	. . . . . . . . . 10 ⊢ ((𝐹‘𝑘) ∈ ℂ → (sin‘-(𝐹‘𝑘)) = -(sin‘(𝐹‘𝑘)))
146	20, 145	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘-(𝐹‘𝑘)) = -(sin‘(𝐹‘𝑘)))
147	146	oveq1d 7361	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)) = (-(sin‘(𝐹‘𝑘)) / -(𝐹‘𝑘)))
148	96	recnd 11137	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(𝐹‘𝑘)) ∈ ℂ)
149	148, 20, 97	div2negd 11909	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (-(sin‘(𝐹‘𝑘)) / -(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
150	147, 149	eqtrd 2766	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
151		fveq2 6822	. . . . . . . . 9 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → (sin‘(abs‘(𝐹‘𝑘))) = (sin‘-(𝐹‘𝑘)))
152		id 22	. . . . . . . . 9 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → (abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘))
153	151, 152	oveq12d 7364	. . . . . . . 8 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)))
154	153	eqeq1d 2733	. . . . . . 7 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → (((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ↔ ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘))))
155	150, 154	syl5ibrcom 247	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘))))
156	19	absord 15320	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) ∨ (abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘)))
157	144, 155, 156	mpjaod 860	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
158	140, 157	breqtrd 5117	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) < ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
159	84, 98, 158	ltled 11258	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) ≤ ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
160	159, 77, 95	3brtr4d 5123	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) ≤ ((𝐺 ∘ 𝐹)‘𝑘))
161	78	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 1 ∈ ℝ)
162	135	simprd 495	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(abs‘(𝐹‘𝑘))) < (abs‘(𝐹‘𝑘)))
163	103	mulridd 11126	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) · 1) = (abs‘(𝐹‘𝑘)))
164	162, 163	breqtrrd 5119	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(abs‘(𝐹‘𝑘))) < ((abs‘(𝐹‘𝑘)) · 1))
165	138, 161, 124	ltdivmuld 12982	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) < 1 ↔ (sin‘(abs‘(𝐹‘𝑘))) < ((abs‘(𝐹‘𝑘)) · 1)))
166	164, 165	mpbird 257	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) < 1)
167	157, 166	eqbrtrrd 5115	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) < 1)
168	98, 161, 167	ltled 11258	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ≤ 1)
169	95, 168	eqbrtrd 5113	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) ≤ 1)
170	1, 3, 66, 70, 85, 99, 160, 169	climsqz 15545	1 ⊢ (𝜑 → (𝐺 ∘ 𝐹) ⇝ 1)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1086 = wceq 1541 ⊤wtru 1542 ∈ wcel 2111 ≠ wne 2928 ∀wral 3047 ∃wrex 3056 Vcvv 3436 ∖ cdif 3899 {csn 4576 class class class wbr 5091 ↦ cmpt 5172 ∘ ccom 5620 Fun wfun 6475 ⟶wf 6477 ‘cfv 6481 (class class class)co 7346 ℂcc 11001 ℝcr 11002 0cc0 11003 1c1 11004 + caddc 11006 · cmul 11008 ℝ^*cxr 11142 < clt 11143 ≤ cle 11144 − cmin 11341 -cneg 11342 / cdiv 11771 ℕcn 12122 2c2 12177 3c3 12178 ℕ₀cn0 12378 ℤ_≥cuz 12729 ℝ⁺crp 12887 (,]cioc 13243 ↑cexp 13965 abscabs 15138 ⇝ cli 15388 sincsin 15967 TopOpenctopn 17322 ℂ_fldccnfld 21289 TopOnctopon 22823 Cn ccn 23137 ×_t ctx 23473 –cn→ccncf 24794

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1968 ax-7 2009 ax-8 2113 ax-9 2121 ax-10 2144 ax-11 2160 ax-12 2180 ax-ext 2703 ax-rep 5217 ax-sep 5234 ax-nul 5244 ax-pow 5303 ax-pr 5370 ax-un 7668 ax-inf2 9531 ax-cnex 11059 ax-resscn 11060 ax-1cn 11061 ax-icn 11062 ax-addcl 11063 ax-addrcl 11064 ax-mulcl 11065 ax-mulrcl 11066 ax-mulcom 11067 ax-addass 11068 ax-mulass 11069 ax-distr 11070 ax-i2m1 11071 ax-1ne0 11072 ax-1rid 11073 ax-rnegex 11074 ax-rrecex 11075 ax-cnre 11076 ax-pre-lttri 11077 ax-pre-lttrn 11078 ax-pre-ltadd 11079 ax-pre-mulgt0 11080 ax-pre-sup 11081

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1544 df-fal 1554 df-ex 1781 df-nf 1785 df-sb 2068 df-mo 2535 df-eu 2564 df-clab 2710 df-cleq 2723 df-clel 2806 df-nfc 2881 df-ne 2929 df-nel 3033 df-ral 3048 df-rex 3057 df-rmo 3346 df-reu 3347 df-rab 3396 df-v 3438 df-sbc 3742 df-csb 3851 df-dif 3905 df-un 3907 df-in 3909 df-ss 3919 df-pss 3922 df-nul 4284 df-if 4476 df-pw 4552 df-sn 4577 df-pr 4579 df-tp 4581 df-op 4583 df-uni 4860 df-int 4898 df-iun 4943 df-iin 4944 df-br 5092 df-opab 5154 df-mpt 5173 df-tr 5199 df-id 5511 df-eprel 5516 df-po 5524 df-so 5525 df-fr 5569 df-se 5570 df-we 5571 df-xp 5622 df-rel 5623 df-cnv 5624 df-co 5625 df-dm 5626 df-rn 5627 df-res 5628 df-ima 5629 df-pred 6248 df-ord 6309 df-on 6310 df-lim 6311 df-suc 6312 df-iota 6437 df-fun 6483 df-fn 6484 df-f 6485 df-f1 6486 df-fo 6487 df-f1o 6488 df-fv 6489 df-isom 6490 df-riota 7303 df-ov 7349 df-oprab 7350 df-mpo 7351 df-of 7610 df-om 7797 df-1st 7921 df-2nd 7922 df-supp 8091 df-frecs 8211 df-wrecs 8242 df-recs 8291 df-rdg 8329 df-1o 8385 df-2o 8386 df-er 8622 df-map 8752 df-pm 8753 df-ixp 8822 df-en 8870 df-dom 8871 df-sdom 8872 df-fin 8873 df-fsupp 9246 df-fi 9295 df-sup 9326 df-inf 9327 df-oi 9396 df-card 9829 df-pnf 11145 df-mnf 11146 df-xr 11147 df-ltxr 11148 df-le 11149 df-sub 11343 df-neg 11344 df-div 11772 df-nn 12123 df-2 12185 df-3 12186 df-4 12187 df-5 12188 df-6 12189 df-7 12190 df-8 12191 df-9 12192 df-n0 12379 df-z 12466 df-dec 12586 df-uz 12730 df-q 12844 df-rp 12888 df-xneg 13008 df-xadd 13009 df-xmul 13010 df-ioc 13247 df-ico 13248 df-icc 13249 df-fz 13405 df-fzo 13552 df-fl 13693 df-seq 13906 df-exp 13966 df-fac 14178 df-hash 14235 df-shft 14971 df-cj 15003 df-re 15004 df-im 15005 df-sqrt 15139 df-abs 15140 df-limsup 15375 df-clim 15392 df-rlim 15393 df-sum 15591 df-ef 15971 df-sin 15973 df-struct 17055 df-sets 17072 df-slot 17090 df-ndx 17102 df-base 17118 df-ress 17139 df-plusg 17171 df-mulr 17172 df-starv 17173 df-sca 17174 df-vsca 17175 df-ip 17176 df-tset 17177 df-ple 17178 df-ds 17180 df-unif 17181 df-hom 17182 df-cco 17183 df-rest 17323 df-topn 17324 df-0g 17342 df-gsum 17343 df-topgen 17344 df-pt 17345 df-prds 17348 df-xrs 17403 df-qtop 17408 df-imas 17409 df-xps 17411 df-mre 17485 df-mrc 17486 df-acs 17488 df-mgm 18545 df-sgrp 18624 df-mnd 18640 df-submnd 18689 df-mulg 18978 df-cntz 19227 df-cmn 19692 df-psmet 21281 df-xmet 21282 df-met 21283 df-bl 21284 df-mopn 21285 df-cnfld 21290 df-top 22807 df-topon 22824 df-topsp 22846 df-bases 22859 df-cn 23140 df-cnp 23141 df-tx 23475 df-hmeo 23668 df-xms 24233 df-ms 24234 df-tms 24235 df-cncf 24796

This theorem is referenced by: sinccvg 35705

W3C validator