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 33639

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 2739	. 2 ⊢ (ℤ_≥‘𝑀) = (ℤ_≥‘𝑀)
2		sinccvg.5	. . 3 ⊢ (𝜑 → 𝑀 ∈ ℕ)
3	2	nnzd 12434	. 2 ⊢ (𝜑 → 𝑀 ∈ ℤ)
4		sinccvg.2	. . . 4 ⊢ (𝜑 → 𝐹 ⇝ 0)
5		sinccvg.4	. . . . . 6 ⊢ 𝐻 = (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3)))
6	5	funmpt2 6480	. . . . 5 ⊢ Fun 𝐻
7		sinccvg.1	. . . . . 6 ⊢ (𝜑 → 𝐹:ℕ⟶(ℝ ∖ {0}))
8		nnex 11988	. . . . . 6 ⊢ ℕ ∈ V
9		fex 7111	. . . . . 6 ⊢ ((𝐹:ℕ⟶(ℝ ∖ {0}) ∧ ℕ ∈ V) → 𝐹 ∈ V)
10	7, 8, 9	sylancl 586	. . . . 5 ⊢ (𝜑 → 𝐹 ∈ V)
11		cofunexg 7800	. . . . 5 ⊢ ((Fun 𝐻 ∧ 𝐹 ∈ V) → (𝐻 ∘ 𝐹) ∈ V)
12	6, 10, 11	sylancr 587	. . . 4 ⊢ (𝜑 → (𝐻 ∘ 𝐹) ∈ V)
13	7	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 𝐹:ℕ⟶(ℝ ∖ {0}))
14		eluznn 12667	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℕ ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 𝑘 ∈ ℕ)
15	2, 14	sylan 580	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 𝑘 ∈ ℕ)
16	13, 15	ffvelrnd 6971	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ∈ (ℝ ∖ {0}))
17		eldifsn 4721	. . . . . . 7 ⊢ ((𝐹‘𝑘) ∈ (ℝ ∖ {0}) ↔ ((𝐹‘𝑘) ∈ ℝ ∧ (𝐹‘𝑘) ≠ 0))
18	16, 17	sylib 217	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐹‘𝑘) ∈ ℝ ∧ (𝐹‘𝑘) ≠ 0))
19	18	simpld 495	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ∈ ℝ)
20	19	recnd 11012	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ∈ ℂ)
21		ax-1cn 10938	. . . . . 6 ⊢ 1 ∈ ℂ
22		sqcl 13847	. . . . . . 7 ⊢ (𝑥 ∈ ℂ → (𝑥↑2) ∈ ℂ)
23		3cn 12063	. . . . . . . 8 ⊢ 3 ∈ ℂ
24		3ne0 12088	. . . . . . . 8 ⊢ 3 ≠ 0
25		divcl 11648	. . . . . . . 8 ⊢ (((𝑥↑2) ∈ ℂ ∧ 3 ∈ ℂ ∧ 3 ≠ 0) → ((𝑥↑2) / 3) ∈ ℂ)
26	23, 24, 25	mp3an23 1452	. . . . . . 7 ⊢ ((𝑥↑2) ∈ ℂ → ((𝑥↑2) / 3) ∈ ℂ)
27	22, 26	syl 17	. . . . . 6 ⊢ (𝑥 ∈ ℂ → ((𝑥↑2) / 3) ∈ ℂ)
28		subcl 11229	. . . . . 6 ⊢ ((1 ∈ ℂ ∧ ((𝑥↑2) / 3) ∈ ℂ) → (1 − ((𝑥↑2) / 3)) ∈ ℂ)
29	21, 27, 28	sylancr 587	. . . . 5 ⊢ (𝑥 ∈ ℂ → (1 − ((𝑥↑2) / 3)) ∈ ℂ)
30	5, 29	fmpti 6995	. . . 4 ⊢ 𝐻:ℂ⟶ℂ
31		eqid 2739	. . . . . . . . . 10 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
32	31	cnfldtopon 23955	. . . . . . . . 9 ⊢ (TopOpen‘ℂ_fld) ∈ (TopOn‘ℂ)
33	32	a1i 11	. . . . . . . 8 ⊢ (⊤ → (TopOpen‘ℂ_fld) ∈ (TopOn‘ℂ))
34		1cnd 10979	. . . . . . . . 9 ⊢ (⊤ → 1 ∈ ℂ)
35	33, 33, 34	cnmptc 22822	. . . . . . . 8 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ 1) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
36	31	sqcn 24046	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ (𝑥↑2)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
37	36	a1i 11	. . . . . . . . 9 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ (𝑥↑2)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
38	31	divccn 24045	. . . . . . . . . . 11 ⊢ ((3 ∈ ℂ ∧ 3 ≠ 0) → (𝑦 ∈ ℂ ↦ (𝑦 / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
39	23, 24, 38	mp2an 689	. . . . . . . . . 10 ⊢ (𝑦 ∈ ℂ ↦ (𝑦 / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
40	39	a1i 11	. . . . . . . . 9 ⊢ (⊤ → (𝑦 ∈ ℂ ↦ (𝑦 / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
41		oveq1 7291	. . . . . . . . 9 ⊢ (𝑦 = (𝑥↑2) → (𝑦 / 3) = ((𝑥↑2) / 3))
42	33, 37, 33, 40, 41	cnmpt11 22823	. . . . . . . 8 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ ((𝑥↑2) / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
43	31	subcn 24038	. . . . . . . . 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 22826	. . . . . . 7 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3))) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
46	45	mptru 1546	. . . . . 6 ⊢ (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3))) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
47	31	cncfcn1 24083	. . . . . 6 ⊢ (ℂ–cn→ℂ) = ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
48	46, 5, 47	3eltr4i 2853	. . . . 5 ⊢ 𝐻 ∈ (ℂ–cn→ℂ)
49		cncfi 24066	. . . . 5 ⊢ ((𝐻 ∈ (ℂ–cn→ℂ) ∧ 0 ∈ ℂ ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ ℝ⁺ ∀𝑤 ∈ ℂ ((abs‘(𝑤 − 0)) < 𝑧 → (abs‘((𝐻‘𝑤) − (𝐻‘0))) < 𝑦))
50	48, 49	mp3an1 1447	. . . 4 ⊢ ((0 ∈ ℂ ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ ℝ⁺ ∀𝑤 ∈ ℂ ((abs‘(𝑤 − 0)) < 𝑧 → (abs‘((𝐻‘𝑤) − (𝐻‘0))) < 𝑦))
51		fvco3 6876	. . . . . 6 ⊢ ((𝐹:ℕ⟶(ℝ ∖ {0}) ∧ 𝑘 ∈ ℕ) → ((𝐻 ∘ 𝐹)‘𝑘) = (𝐻‘(𝐹‘𝑘)))
52	7, 51	sylan 580	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐻 ∘ 𝐹)‘𝑘) = (𝐻‘(𝐹‘𝑘)))
53	15, 52	syldan 591	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) = (𝐻‘(𝐹‘𝑘)))
54	1, 4, 12, 3, 20, 30, 50, 53	climcn1lem 15321	. . 3 ⊢ (𝜑 → (𝐻 ∘ 𝐹) ⇝ (𝐻‘0))
55		0cn 10976	. . . 4 ⊢ 0 ∈ ℂ
56		sq0i 13919	. . . . . . . . 9 ⊢ (𝑥 = 0 → (𝑥↑2) = 0)
57	56	oveq1d 7299	. . . . . . . 8 ⊢ (𝑥 = 0 → ((𝑥↑2) / 3) = (0 / 3))
58	23, 24	div0i 11718	. . . . . . . 8 ⊢ (0 / 3) = 0
59	57, 58	eqtrdi 2795	. . . . . . 7 ⊢ (𝑥 = 0 → ((𝑥↑2) / 3) = 0)
60	59	oveq2d 7300	. . . . . 6 ⊢ (𝑥 = 0 → (1 − ((𝑥↑2) / 3)) = (1 − 0))
61		1m0e1 12103	. . . . . 6 ⊢ (1 − 0) = 1
62	60, 61	eqtrdi 2795	. . . . 5 ⊢ (𝑥 = 0 → (1 − ((𝑥↑2) / 3)) = 1)
63		1ex 10980	. . . . 5 ⊢ 1 ∈ V
64	62, 5, 63	fvmpt 6884	. . . 4 ⊢ (0 ∈ ℂ → (𝐻‘0) = 1)
65	55, 64	ax-mp 5	. . 3 ⊢ (𝐻‘0) = 1
66	54, 65	breqtrdi 5116	. 2 ⊢ (𝜑 → (𝐻 ∘ 𝐹) ⇝ 1)
67		sinccvg.3	. . . 4 ⊢ 𝐺 = (𝑥 ∈ (ℝ ∖ {0}) ↦ ((sin‘𝑥) / 𝑥))
68	67	funmpt2 6480	. . 3 ⊢ Fun 𝐺
69		cofunexg 7800	. . 3 ⊢ ((Fun 𝐺 ∧ 𝐹 ∈ V) → (𝐺 ∘ 𝐹) ∈ V)
70	68, 10, 69	sylancr 587	. 2 ⊢ (𝜑 → (𝐺 ∘ 𝐹) ∈ V)
71		oveq1 7291	. . . . . . . 8 ⊢ (𝑥 = (𝐹‘𝑘) → (𝑥↑2) = ((𝐹‘𝑘)↑2))
72	71	oveq1d 7299	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑘) → ((𝑥↑2) / 3) = (((𝐹‘𝑘)↑2) / 3))
73	72	oveq2d 7300	. . . . . 6 ⊢ (𝑥 = (𝐹‘𝑘) → (1 − ((𝑥↑2) / 3)) = (1 − (((𝐹‘𝑘)↑2) / 3)))
74		ovex 7317	. . . . . 6 ⊢ (1 − (((𝐹‘𝑘)↑2) / 3)) ∈ V
75	73, 5, 74	fvmpt 6884	. . . . 5 ⊢ ((𝐹‘𝑘) ∈ ℂ → (𝐻‘(𝐹‘𝑘)) = (1 − (((𝐹‘𝑘)↑2) / 3)))
76	20, 75	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐻‘(𝐹‘𝑘)) = (1 − (((𝐹‘𝑘)↑2) / 3)))
77	53, 76	eqtrd 2779	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) = (1 − (((𝐹‘𝑘)↑2) / 3)))
78		1re 10984	. . . 4 ⊢ 1 ∈ ℝ
79	19	resqcld 13974	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐹‘𝑘)↑2) ∈ ℝ)
80		3nn 12061	. . . . 5 ⊢ 3 ∈ ℕ
81		nndivre 12023	. . . . 5 ⊢ ((((𝐹‘𝑘)↑2) ∈ ℝ ∧ 3 ∈ ℕ) → (((𝐹‘𝑘)↑2) / 3) ∈ ℝ)
82	79, 80, 81	sylancl 586	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((𝐹‘𝑘)↑2) / 3) ∈ ℝ)
83		resubcl 11294	. . . 4 ⊢ ((1 ∈ ℝ ∧ (((𝐹‘𝑘)↑2) / 3) ∈ ℝ) → (1 − (((𝐹‘𝑘)↑2) / 3)) ∈ ℝ)
84	78, 82, 83	sylancr 587	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) ∈ ℝ)
85	77, 84	eqeltrd 2840	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) ∈ ℝ)
86		fvco3 6876	. . . . . 6 ⊢ ((𝐹:ℕ⟶(ℝ ∖ {0}) ∧ 𝑘 ∈ ℕ) → ((𝐺 ∘ 𝐹)‘𝑘) = (𝐺‘(𝐹‘𝑘)))
87	7, 86	sylan 580	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐺 ∘ 𝐹)‘𝑘) = (𝐺‘(𝐹‘𝑘)))
88	15, 87	syldan 591	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) = (𝐺‘(𝐹‘𝑘)))
89		fveq2 6783	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑘) → (sin‘𝑥) = (sin‘(𝐹‘𝑘)))
90		id 22	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑘) → 𝑥 = (𝐹‘𝑘))
91	89, 90	oveq12d 7302	. . . . . 6 ⊢ (𝑥 = (𝐹‘𝑘) → ((sin‘𝑥) / 𝑥) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
92		ovex 7317	. . . . . 6 ⊢ ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ∈ V
93	91, 67, 92	fvmpt 6884	. . . . 5 ⊢ ((𝐹‘𝑘) ∈ (ℝ ∖ {0}) → (𝐺‘(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
94	16, 93	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐺‘(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
95	88, 94	eqtrd 2779	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
96	19	resincld 15861	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(𝐹‘𝑘)) ∈ ℝ)
97	18	simprd 496	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ≠ 0)
98	96, 19, 97	redivcld 11812	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ∈ ℝ)
99	95, 98	eqeltrd 2840	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) ∈ ℝ)
100		1cnd 10979	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 1 ∈ ℂ)
101	82	recnd 11012	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((𝐹‘𝑘)↑2) / 3) ∈ ℂ)
102	20	abscld 15157	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ ℝ)
103	102	recnd 11012	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ ℂ)
104	100, 101, 103	subdird 11441	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) = ((1 · (abs‘(𝐹‘𝑘))) − ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘)))))
105	103	mulid2d 11002	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 · (abs‘(𝐹‘𝑘))) = (abs‘(𝐹‘𝑘)))
106		df-3 12046	. . . . . . . . . . . . 13 ⊢ 3 = (2 + 1)
107	106	oveq2i 7295	. . . . . . . . . . . 12 ⊢ ((abs‘(𝐹‘𝑘))↑3) = ((abs‘(𝐹‘𝑘))↑(2 + 1))
108		2nn0 12259	. . . . . . . . . . . . . 14 ⊢ 2 ∈ ℕ₀
109		expp1 13798	. . . . . . . . . . . . . 14 ⊢ (((abs‘(𝐹‘𝑘)) ∈ ℂ ∧ 2 ∈ ℕ₀) → ((abs‘(𝐹‘𝑘))↑(2 + 1)) = (((abs‘(𝐹‘𝑘))↑2) · (abs‘(𝐹‘𝑘))))
110	103, 108, 109	sylancl 586	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑(2 + 1)) = (((abs‘(𝐹‘𝑘))↑2) · (abs‘(𝐹‘𝑘))))
111		absresq 15023	. . . . . . . . . . . . . . 15 ⊢ ((𝐹‘𝑘) ∈ ℝ → ((abs‘(𝐹‘𝑘))↑2) = ((𝐹‘𝑘)↑2))
112	19, 111	syl 17	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑2) = ((𝐹‘𝑘)↑2))
113	112	oveq1d 7299	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((abs‘(𝐹‘𝑘))↑2) · (abs‘(𝐹‘𝑘))) = (((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))))
114	110, 113	eqtrd 2779	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑(2 + 1)) = (((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))))
115	107, 114	eqtrid 2791	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑3) = (((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))))
116	115	oveq1d 7299	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((abs‘(𝐹‘𝑘))↑3) / 3) = ((((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))) / 3))
117	79	recnd 11012	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐹‘𝑘)↑2) ∈ ℂ)
118	23	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 3 ∈ ℂ)
119	24	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 3 ≠ 0)
120	117, 103, 118, 119	div23d 11797	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))) / 3) = ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘))))
121	116, 120	eqtr2d 2780	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘))) = (((abs‘(𝐹‘𝑘))↑3) / 3))
122	105, 121	oveq12d 7302	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 · (abs‘(𝐹‘𝑘))) − ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘)))) = ((abs‘(𝐹‘𝑘)) − (((abs‘(𝐹‘𝑘))↑3) / 3)))
123	104, 122	eqtrd 2779	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) = ((abs‘(𝐹‘𝑘)) − (((abs‘(𝐹‘𝑘))↑3) / 3)))
124	20, 97	absrpcld 15169	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ ℝ⁺)
125	124	rpgt0d 12784	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 0 < (abs‘(𝐹‘𝑘)))
126		sinccvg.6	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) < 1)
127		ltle 11072	. . . . . . . . . . . 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 11031	. . . . . . . . . . 11 ⊢ 0 ∈ ℝ^*
131		elioc2 13151	. . . . . . . . . . 11 ⊢ ((0 ∈ ℝ^* ∧ 1 ∈ ℝ) → ((abs‘(𝐹‘𝑘)) ∈ (0(,]1) ↔ ((abs‘(𝐹‘𝑘)) ∈ ℝ ∧ 0 < (abs‘(𝐹‘𝑘)) ∧ (abs‘(𝐹‘𝑘)) ≤ 1)))
132	130, 78, 131	mp2an 689	. . . . . . . . . 10 ⊢ ((abs‘(𝐹‘𝑘)) ∈ (0(,]1) ↔ ((abs‘(𝐹‘𝑘)) ∈ ℝ ∧ 0 < (abs‘(𝐹‘𝑘)) ∧ (abs‘(𝐹‘𝑘)) ≤ 1))
133	102, 125, 129, 132	syl3anbrc 1342	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ (0(,]1))
134		sin01bnd 15903	. . . . . . . . 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 495	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) − (((abs‘(𝐹‘𝑘))↑3) / 3)) < (sin‘(abs‘(𝐹‘𝑘))))
137	123, 136	eqbrtrd 5097	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) < (sin‘(abs‘(𝐹‘𝑘))))
138	102	resincld 15861	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(abs‘(𝐹‘𝑘))) ∈ ℝ)
139	84, 138, 124	ltmuldivd 12828	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) < (sin‘(abs‘(𝐹‘𝑘))) ↔ (1 − (((𝐹‘𝑘)↑2) / 3)) < ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘)))))
140	137, 139	mpbid 231	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) < ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))))
141		fveq2 6783	. . . . . . . 8 ⊢ ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → (sin‘(abs‘(𝐹‘𝑘))) = (sin‘(𝐹‘𝑘)))
142		id 22	. . . . . . . 8 ⊢ ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → (abs‘(𝐹‘𝑘)) = (𝐹‘𝑘))
143	141, 142	oveq12d 7302	. . . . . . 7 ⊢ ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
144	143	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘))))
145		sinneg 15864	. . . . . . . . . 10 ⊢ ((𝐹‘𝑘) ∈ ℂ → (sin‘-(𝐹‘𝑘)) = -(sin‘(𝐹‘𝑘)))
146	20, 145	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘-(𝐹‘𝑘)) = -(sin‘(𝐹‘𝑘)))
147	146	oveq1d 7299	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)) = (-(sin‘(𝐹‘𝑘)) / -(𝐹‘𝑘)))
148	96	recnd 11012	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(𝐹‘𝑘)) ∈ ℂ)
149	148, 20, 97	div2negd 11775	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (-(sin‘(𝐹‘𝑘)) / -(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
150	147, 149	eqtrd 2779	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
151		fveq2 6783	. . . . . . . . 9 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → (sin‘(abs‘(𝐹‘𝑘))) = (sin‘-(𝐹‘𝑘)))
152		id 22	. . . . . . . . 9 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → (abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘))
153	151, 152	oveq12d 7302	. . . . . . . 8 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)))
154	153	eqeq1d 2741	. . . . . . 7 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → (((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ↔ ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘))))
155	150, 154	syl5ibrcom 246	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘))))
156	19	absord 15136	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) ∨ (abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘)))
157	144, 155, 156	mpjaod 857	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
158	140, 157	breqtrd 5101	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) < ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
159	84, 98, 158	ltled 11132	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) ≤ ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
160	159, 77, 95	3brtr4d 5107	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) ≤ ((𝐺 ∘ 𝐹)‘𝑘))
161	78	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 1 ∈ ℝ)
162	135	simprd 496	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(abs‘(𝐹‘𝑘))) < (abs‘(𝐹‘𝑘)))
163	103	mulid1d 11001	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) · 1) = (abs‘(𝐹‘𝑘)))
164	162, 163	breqtrrd 5103	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(abs‘(𝐹‘𝑘))) < ((abs‘(𝐹‘𝑘)) · 1))
165	138, 161, 124	ltdivmuld 12832	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) < 1 ↔ (sin‘(abs‘(𝐹‘𝑘))) < ((abs‘(𝐹‘𝑘)) · 1)))
166	164, 165	mpbird 256	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) < 1)
167	157, 166	eqbrtrrd 5099	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) < 1)
168	98, 161, 167	ltled 11132	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ≤ 1)
169	95, 168	eqbrtrd 5097	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) ≤ 1)
170	1, 3, 66, 70, 85, 99, 160, 169	climsqz 15359	1 ⊢ (𝜑 → (𝐺 ∘ 𝐹) ⇝ 1)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 205 ∧ wa 396 ∧ w3a 1086 = wceq 1539 ⊤wtru 1540 ∈ wcel 2107 ≠ wne 2944 ∀wral 3065 ∃wrex 3066 Vcvv 3433 ∖ cdif 3885 {csn 4562 class class class wbr 5075 ↦ cmpt 5158 ∘ ccom 5594 Fun wfun 6431 ⟶wf 6433 ‘cfv 6437 (class class class)co 7284 ℂcc 10878 ℝcr 10879 0cc0 10880 1c1 10881 + caddc 10883 · cmul 10885 ℝ^*cxr 11017 < clt 11018 ≤ cle 11019 − cmin 11214 -cneg 11215 / cdiv 11641 ℕcn 11982 2c2 12037 3c3 12038 ℕ₀cn0 12242 ℤ_≥cuz 12591 ℝ⁺crp 12739 (,]cioc 13089 ↑cexp 13791 abscabs 14954 ⇝ cli 15202 sincsin 15782 TopOpenctopn 17141 ℂ_fldccnfld 20606 TopOnctopon 22068 Cn ccn 22384 ×_t ctx 22720 –cn→ccncf 24048

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2710 ax-rep 5210 ax-sep 5224 ax-nul 5231 ax-pow 5289 ax-pr 5353 ax-un 7597 ax-inf2 9408 ax-cnex 10936 ax-resscn 10937 ax-1cn 10938 ax-icn 10939 ax-addcl 10940 ax-addrcl 10941 ax-mulcl 10942 ax-mulrcl 10943 ax-mulcom 10944 ax-addass 10945 ax-mulass 10946 ax-distr 10947 ax-i2m1 10948 ax-1ne0 10949 ax-1rid 10950 ax-rnegex 10951 ax-rrecex 10952 ax-cnre 10953 ax-pre-lttri 10954 ax-pre-lttrn 10955 ax-pre-ltadd 10956 ax-pre-mulgt0 10957 ax-pre-sup 10958 ax-mulf 10960

This theorem depends on definitions: df-bi 206 df-an 397 df-or 845 df-3or 1087 df-3an 1088 df-tru 1542 df-fal 1552 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2541 df-eu 2570 df-clab 2717 df-cleq 2731 df-clel 2817 df-nfc 2890 df-ne 2945 df-nel 3051 df-ral 3070 df-rex 3071 df-rmo 3072 df-reu 3073 df-rab 3074 df-v 3435 df-sbc 3718 df-csb 3834 df-dif 3891 df-un 3893 df-in 3895 df-ss 3905 df-pss 3907 df-nul 4258 df-if 4461 df-pw 4536 df-sn 4563 df-pr 4565 df-tp 4567 df-op 4569 df-uni 4841 df-int 4881 df-iun 4927 df-iin 4928 df-br 5076 df-opab 5138 df-mpt 5159 df-tr 5193 df-id 5490 df-eprel 5496 df-po 5504 df-so 5505 df-fr 5545 df-se 5546 df-we 5547 df-xp 5596 df-rel 5597 df-cnv 5598 df-co 5599 df-dm 5600 df-rn 5601 df-res 5602 df-ima 5603 df-pred 6206 df-ord 6273 df-on 6274 df-lim 6275 df-suc 6276 df-iota 6395 df-fun 6439 df-fn 6440 df-f 6441 df-f1 6442 df-fo 6443 df-f1o 6444 df-fv 6445 df-isom 6446 df-riota 7241 df-ov 7287 df-oprab 7288 df-mpo 7289 df-of 7542 df-om 7722 df-1st 7840 df-2nd 7841 df-supp 7987 df-frecs 8106 df-wrecs 8137 df-recs 8211 df-rdg 8250 df-1o 8306 df-2o 8307 df-er 8507 df-map 8626 df-pm 8627 df-ixp 8695 df-en 8743 df-dom 8744 df-sdom 8745 df-fin 8746 df-fsupp 9138 df-fi 9179 df-sup 9210 df-inf 9211 df-oi 9278 df-card 9706 df-pnf 11020 df-mnf 11021 df-xr 11022 df-ltxr 11023 df-le 11024 df-sub 11216 df-neg 11217 df-div 11642 df-nn 11983 df-2 12045 df-3 12046 df-4 12047 df-5 12048 df-6 12049 df-7 12050 df-8 12051 df-9 12052 df-n0 12243 df-z 12329 df-dec 12447 df-uz 12592 df-q 12698 df-rp 12740 df-xneg 12857 df-xadd 12858 df-xmul 12859 df-ioc 13093 df-ico 13094 df-icc 13095 df-fz 13249 df-fzo 13392 df-fl 13521 df-seq 13731 df-exp 13792 df-fac 13997 df-hash 14054 df-shft 14787 df-cj 14819 df-re 14820 df-im 14821 df-sqrt 14955 df-abs 14956 df-limsup 15189 df-clim 15206 df-rlim 15207 df-sum 15407 df-ef 15786 df-sin 15788 df-struct 16857 df-sets 16874 df-slot 16892 df-ndx 16904 df-base 16922 df-ress 16951 df-plusg 16984 df-mulr 16985 df-starv 16986 df-sca 16987 df-vsca 16988 df-ip 16989 df-tset 16990 df-ple 16991 df-ds 16993 df-unif 16994 df-hom 16995 df-cco 16996 df-rest 17142 df-topn 17143 df-0g 17161 df-gsum 17162 df-topgen 17163 df-pt 17164 df-prds 17167 df-xrs 17222 df-qtop 17227 df-imas 17228 df-xps 17230 df-mre 17304 df-mrc 17305 df-acs 17307 df-mgm 18335 df-sgrp 18384 df-mnd 18395 df-submnd 18440 df-mulg 18710 df-cntz 18932 df-cmn 19397 df-psmet 20598 df-xmet 20599 df-met 20600 df-bl 20601 df-mopn 20602 df-cnfld 20607 df-top 22052 df-topon 22069 df-topsp 22091 df-bases 22105 df-cn 22387 df-cnp 22388 df-tx 22722 df-hmeo 22915 df-xms 23482 df-ms 23483 df-tms 23484 df-cncf 24050

This theorem is referenced by: sinccvg 33640

W3C validator