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 35986

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 2761	. 2 ⊢ (ℤ_≥‘𝑀) = (ℤ_≥‘𝑀)
2		sinccvg.5	. . 3 ⊢ (𝜑 → 𝑀 ∈ ℕ)
3	2	nnzd 12591	. 2 ⊢ (𝜑 → 𝑀 ∈ ℤ)
4		sinccvg.2	. . . 4 ⊢ (𝜑 → 𝐹 ⇝ 0)
5		sinccvg.4	. . . . . 6 ⊢ 𝐻 = (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3)))
6	5	funmpt2 6556	. . . . 5 ⊢ Fun 𝐻
7		sinccvg.1	. . . . . 6 ⊢ (𝜑 → 𝐹:ℕ⟶(ℝ ∖ {0}))
8		nnex 12213	. . . . . 6 ⊢ ℕ ∈ V
9		fex 7206	. . . . . 6 ⊢ ((𝐹:ℕ⟶(ℝ ∖ {0}) ∧ ℕ ∈ V) → 𝐹 ∈ V)
10	7, 8, 9	sylancl 595	. . . . 5 ⊢ (𝜑 → 𝐹 ∈ V)
11		cofunexg 7926	. . . . 5 ⊢ ((Fun 𝐻 ∧ 𝐹 ∈ V) → (𝐻 ∘ 𝐹) ∈ V)
12	6, 10, 11	sylancr 596	. . . 4 ⊢ (𝜑 → (𝐻 ∘ 𝐹) ∈ V)
13	7	adantr 484	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 𝐹:ℕ⟶(ℝ ∖ {0}))
14		eluznn 12916	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℕ ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 𝑘 ∈ ℕ)
15	2, 14	sylan 589	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 𝑘 ∈ ℕ)
16	13, 15	ffvelcdmd 7062	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ∈ (ℝ ∖ {0}))
17		eldifsn 4745	. . . . . . 7 ⊢ ((𝐹‘𝑘) ∈ (ℝ ∖ {0}) ↔ ((𝐹‘𝑘) ∈ ℝ ∧ (𝐹‘𝑘) ≠ 0))
18	16, 17	sylib 220	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐹‘𝑘) ∈ ℝ ∧ (𝐹‘𝑘) ≠ 0))
19	18	simpld 498	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ∈ ℝ)
20	19	recnd 11207	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ∈ ℂ)
21		ax-1cn 11128	. . . . . 6 ⊢ 1 ∈ ℂ
22		sqcl 14128	. . . . . . 7 ⊢ (𝑥 ∈ ℂ → (𝑥↑2) ∈ ℂ)
23		3cn 12296	. . . . . . . 8 ⊢ 3 ∈ ℂ
24		3ne0 12324	. . . . . . . 8 ⊢ 3 ≠ 0
25		divcl 11848	. . . . . . . 8 ⊢ (((𝑥↑2) ∈ ℂ ∧ 3 ∈ ℂ ∧ 3 ≠ 0) → ((𝑥↑2) / 3) ∈ ℂ)
26	23, 24, 25	mp3an23 1473	. . . . . . 7 ⊢ ((𝑥↑2) ∈ ℂ → ((𝑥↑2) / 3) ∈ ℂ)
27	22, 26	syl 17	. . . . . 6 ⊢ (𝑥 ∈ ℂ → ((𝑥↑2) / 3) ∈ ℂ)
28		subcl 11426	. . . . . 6 ⊢ ((1 ∈ ℂ ∧ ((𝑥↑2) / 3) ∈ ℂ) → (1 − ((𝑥↑2) / 3)) ∈ ℂ)
29	21, 27, 28	sylancr 596	. . . . 5 ⊢ (𝑥 ∈ ℂ → (1 − ((𝑥↑2) / 3)) ∈ ℂ)
30	5, 29	fmpti 7089	. . . 4 ⊢ 𝐻:ℂ⟶ℂ
31		eqid 2761	. . . . . . . . . 10 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
32	31	cnfldtopon 24822	. . . . . . . . 9 ⊢ (TopOpen‘ℂ_fld) ∈ (TopOn‘ℂ)
33	32	a1i 11	. . . . . . . 8 ⊢ (⊤ → (TopOpen‘ℂ_fld) ∈ (TopOn‘ℂ))
34		1cnd 11172	. . . . . . . . 9 ⊢ (⊤ → 1 ∈ ℂ)
35	33, 33, 34	cnmptc 23702	. . . . . . . 8 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ 1) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
36	31	sqcn 24916	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ (𝑥↑2)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
37	36	a1i 11	. . . . . . . . 9 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ (𝑥↑2)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
38	31	divccn 24915	. . . . . . . . . . 11 ⊢ ((3 ∈ ℂ ∧ 3 ≠ 0) → (𝑦 ∈ ℂ ↦ (𝑦 / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
39	23, 24, 38	mp2an 702	. . . . . . . . . 10 ⊢ (𝑦 ∈ ℂ ↦ (𝑦 / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
40	39	a1i 11	. . . . . . . . 9 ⊢ (⊤ → (𝑦 ∈ ℂ ↦ (𝑦 / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
41		oveq1 7399	. . . . . . . . 9 ⊢ (𝑦 = (𝑥↑2) → (𝑦 / 3) = ((𝑥↑2) / 3))
42	33, 37, 33, 40, 41	cnmpt11 23703	. . . . . . . 8 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ ((𝑥↑2) / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
43	31	subcn 24907	. . . . . . . . 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 23706	. . . . . . 7 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3))) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
46	45	mptru 1566	. . . . . 6 ⊢ (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3))) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
47	31	cncfcn1 24953	. . . . . 6 ⊢ (ℂ–cn→ℂ) = ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
48	46, 5, 47	3eltr4i 2874	. . . . 5 ⊢ 𝐻 ∈ (ℂ–cn→ℂ)
49		cncfi 24936	. . . . 5 ⊢ ((𝐻 ∈ (ℂ–cn→ℂ) ∧ 0 ∈ ℂ ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ ℝ⁺ ∀𝑤 ∈ ℂ ((abs‘(𝑤 − 0)) < 𝑧 → (abs‘((𝐻‘𝑤) − (𝐻‘0))) < 𝑦))
50	48, 49	mp3an1 1468	. . . 4 ⊢ ((0 ∈ ℂ ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ ℝ⁺ ∀𝑤 ∈ ℂ ((abs‘(𝑤 − 0)) < 𝑧 → (abs‘((𝐻‘𝑤) − (𝐻‘0))) < 𝑦))
51		fvco3 6963	. . . . . 6 ⊢ ((𝐹:ℕ⟶(ℝ ∖ {0}) ∧ 𝑘 ∈ ℕ) → ((𝐻 ∘ 𝐹)‘𝑘) = (𝐻‘(𝐹‘𝑘)))
52	7, 51	sylan 589	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐻 ∘ 𝐹)‘𝑘) = (𝐻‘(𝐹‘𝑘)))
53	15, 52	syldan 600	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) = (𝐻‘(𝐹‘𝑘)))
54	1, 4, 12, 3, 20, 30, 50, 53	climcn1lem 15613	. . 3 ⊢ (𝜑 → (𝐻 ∘ 𝐹) ⇝ (𝐻‘0))
55		0cn 11168	. . . 4 ⊢ 0 ∈ ℂ
56		sq0i 14203	. . . . . . . . 9 ⊢ (𝑥 = 0 → (𝑥↑2) = 0)
57	56	oveq1d 7407	. . . . . . . 8 ⊢ (𝑥 = 0 → ((𝑥↑2) / 3) = (0 / 3))
58	23, 24	div0i 11922	. . . . . . . 8 ⊢ (0 / 3) = 0
59	57, 58	eqtrdi 2812	. . . . . . 7 ⊢ (𝑥 = 0 → ((𝑥↑2) / 3) = 0)
60	59	oveq2d 7408	. . . . . 6 ⊢ (𝑥 = 0 → (1 − ((𝑥↑2) / 3)) = (1 − 0))
61		1m0e1 12334	. . . . . 6 ⊢ (1 − 0) = 1
62	60, 61	eqtrdi 2812	. . . . 5 ⊢ (𝑥 = 0 → (1 − ((𝑥↑2) / 3)) = 1)
63		1ex 11173	. . . . 5 ⊢ 1 ∈ V
64	62, 5, 63	fvmpt 6971	. . . 4 ⊢ (0 ∈ ℂ → (𝐻‘0) = 1)
65	55, 64	ax-mp 5	. . 3 ⊢ (𝐻‘0) = 1
66	54, 65	breqtrdi 5140	. 2 ⊢ (𝜑 → (𝐻 ∘ 𝐹) ⇝ 1)
67		sinccvg.3	. . . 4 ⊢ 𝐺 = (𝑥 ∈ (ℝ ∖ {0}) ↦ ((sin‘𝑥) / 𝑥))
68	67	funmpt2 6556	. . 3 ⊢ Fun 𝐺
69		cofunexg 7926	. . 3 ⊢ ((Fun 𝐺 ∧ 𝐹 ∈ V) → (𝐺 ∘ 𝐹) ∈ V)
70	68, 10, 69	sylancr 596	. 2 ⊢ (𝜑 → (𝐺 ∘ 𝐹) ∈ V)
71		oveq1 7399	. . . . . . . 8 ⊢ (𝑥 = (𝐹‘𝑘) → (𝑥↑2) = ((𝐹‘𝑘)↑2))
72	71	oveq1d 7407	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑘) → ((𝑥↑2) / 3) = (((𝐹‘𝑘)↑2) / 3))
73	72	oveq2d 7408	. . . . . 6 ⊢ (𝑥 = (𝐹‘𝑘) → (1 − ((𝑥↑2) / 3)) = (1 − (((𝐹‘𝑘)↑2) / 3)))
74		ovex 7425	. . . . . 6 ⊢ (1 − (((𝐹‘𝑘)↑2) / 3)) ∈ V
75	73, 5, 74	fvmpt 6971	. . . . 5 ⊢ ((𝐹‘𝑘) ∈ ℂ → (𝐻‘(𝐹‘𝑘)) = (1 − (((𝐹‘𝑘)↑2) / 3)))
76	20, 75	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐻‘(𝐹‘𝑘)) = (1 − (((𝐹‘𝑘)↑2) / 3)))
77	53, 76	eqtrd 2796	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) = (1 − (((𝐹‘𝑘)↑2) / 3)))
78		1re 11178	. . . 4 ⊢ 1 ∈ ℝ
79	19	resqcld 14135	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐹‘𝑘)↑2) ∈ ℝ)
80		3nn 12294	. . . . 5 ⊢ 3 ∈ ℕ
81		nndivre 12251	. . . . 5 ⊢ ((((𝐹‘𝑘)↑2) ∈ ℝ ∧ 3 ∈ ℕ) → (((𝐹‘𝑘)↑2) / 3) ∈ ℝ)
82	79, 80, 81	sylancl 595	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((𝐹‘𝑘)↑2) / 3) ∈ ℝ)
83		resubcl 11492	. . . 4 ⊢ ((1 ∈ ℝ ∧ (((𝐹‘𝑘)↑2) / 3) ∈ ℝ) → (1 − (((𝐹‘𝑘)↑2) / 3)) ∈ ℝ)
84	78, 82, 83	sylancr 596	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) ∈ ℝ)
85	77, 84	eqeltrd 2861	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) ∈ ℝ)
86		fvco3 6963	. . . . . 6 ⊢ ((𝐹:ℕ⟶(ℝ ∖ {0}) ∧ 𝑘 ∈ ℕ) → ((𝐺 ∘ 𝐹)‘𝑘) = (𝐺‘(𝐹‘𝑘)))
87	7, 86	sylan 589	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐺 ∘ 𝐹)‘𝑘) = (𝐺‘(𝐹‘𝑘)))
88	15, 87	syldan 600	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) = (𝐺‘(𝐹‘𝑘)))
89		fveq2 6863	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑘) → (sin‘𝑥) = (sin‘(𝐹‘𝑘)))
90		id 22	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑘) → 𝑥 = (𝐹‘𝑘))
91	89, 90	oveq12d 7410	. . . . . 6 ⊢ (𝑥 = (𝐹‘𝑘) → ((sin‘𝑥) / 𝑥) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
92		ovex 7425	. . . . . 6 ⊢ ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ∈ V
93	91, 67, 92	fvmpt 6971	. . . . 5 ⊢ ((𝐹‘𝑘) ∈ (ℝ ∖ {0}) → (𝐺‘(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
94	16, 93	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐺‘(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
95	88, 94	eqtrd 2796	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
96	19	resincld 16158	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(𝐹‘𝑘)) ∈ ℝ)
97	18	simprd 499	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ≠ 0)
98	96, 19, 97	redivcld 12016	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ∈ ℝ)
99	95, 98	eqeltrd 2861	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) ∈ ℝ)
100		1cnd 11172	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 1 ∈ ℂ)
101	82	recnd 11207	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((𝐹‘𝑘)↑2) / 3) ∈ ℂ)
102	20	abscld 15449	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ ℝ)
103	102	recnd 11207	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ ℂ)
104	100, 101, 103	subdird 11641	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) = ((1 · (abs‘(𝐹‘𝑘))) − ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘)))))
105	103	mullidd 11197	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 · (abs‘(𝐹‘𝑘))) = (abs‘(𝐹‘𝑘)))
106		df-3 12278	. . . . . . . . . . . . 13 ⊢ 3 = (2 + 1)
107	106	oveq2i 7403	. . . . . . . . . . . 12 ⊢ ((abs‘(𝐹‘𝑘))↑3) = ((abs‘(𝐹‘𝑘))↑(2 + 1))
108		2nn0 12495	. . . . . . . . . . . . . 14 ⊢ 2 ∈ ℕ₀
109		expp1 14078	. . . . . . . . . . . . . 14 ⊢ (((abs‘(𝐹‘𝑘)) ∈ ℂ ∧ 2 ∈ ℕ₀) → ((abs‘(𝐹‘𝑘))↑(2 + 1)) = (((abs‘(𝐹‘𝑘))↑2) · (abs‘(𝐹‘𝑘))))
110	103, 108, 109	sylancl 595	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑(2 + 1)) = (((abs‘(𝐹‘𝑘))↑2) · (abs‘(𝐹‘𝑘))))
111		absresq 15312	. . . . . . . . . . . . . . 15 ⊢ ((𝐹‘𝑘) ∈ ℝ → ((abs‘(𝐹‘𝑘))↑2) = ((𝐹‘𝑘)↑2))
112	19, 111	syl 17	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑2) = ((𝐹‘𝑘)↑2))
113	112	oveq1d 7407	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((abs‘(𝐹‘𝑘))↑2) · (abs‘(𝐹‘𝑘))) = (((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))))
114	110, 113	eqtrd 2796	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑(2 + 1)) = (((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))))
115	107, 114	eqtrid 2808	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑3) = (((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))))
116	115	oveq1d 7407	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((abs‘(𝐹‘𝑘))↑3) / 3) = ((((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))) / 3))
117	79	recnd 11207	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐹‘𝑘)↑2) ∈ ℂ)
118	23	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 3 ∈ ℂ)
119	24	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 3 ≠ 0)
120	117, 103, 118, 119	div23d 12001	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))) / 3) = ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘))))
121	116, 120	eqtr2d 2797	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘))) = (((abs‘(𝐹‘𝑘))↑3) / 3))
122	105, 121	oveq12d 7410	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 · (abs‘(𝐹‘𝑘))) − ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘)))) = ((abs‘(𝐹‘𝑘)) − (((abs‘(𝐹‘𝑘))↑3) / 3)))
123	104, 122	eqtrd 2796	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) = ((abs‘(𝐹‘𝑘)) − (((abs‘(𝐹‘𝑘))↑3) / 3)))
124	20, 97	absrpcld 15461	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ ℝ⁺)
125	124	rpgt0d 13037	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 0 < (abs‘(𝐹‘𝑘)))
126		sinccvg.6	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) < 1)
127		ltle 11268	. . . . . . . . . . . 12 ⊢ (((abs‘(𝐹‘𝑘)) ∈ ℝ ∧ 1 ∈ ℝ) → ((abs‘(𝐹‘𝑘)) < 1 → (abs‘(𝐹‘𝑘)) ≤ 1))
128	102, 78, 127	sylancl 595	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) < 1 → (abs‘(𝐹‘𝑘)) ≤ 1))
129	126, 128	mpd 15	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ≤ 1)
130		0xr 11226	. . . . . . . . . . 11 ⊢ 0 ∈ ℝ^*
131		elioc2 13410	. . . . . . . . . . 11 ⊢ ((0 ∈ ℝ^* ∧ 1 ∈ ℝ) → ((abs‘(𝐹‘𝑘)) ∈ (0(,]1) ↔ ((abs‘(𝐹‘𝑘)) ∈ ℝ ∧ 0 < (abs‘(𝐹‘𝑘)) ∧ (abs‘(𝐹‘𝑘)) ≤ 1)))
132	130, 78, 131	mp2an 702	. . . . . . . . . 10 ⊢ ((abs‘(𝐹‘𝑘)) ∈ (0(,]1) ↔ ((abs‘(𝐹‘𝑘)) ∈ ℝ ∧ 0 < (abs‘(𝐹‘𝑘)) ∧ (abs‘(𝐹‘𝑘)) ≤ 1))
133	102, 125, 129, 132	syl3anbrc 1356	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ (0(,]1))
134		sin01bnd 16200	. . . . . . . . 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 498	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) − (((abs‘(𝐹‘𝑘))↑3) / 3)) < (sin‘(abs‘(𝐹‘𝑘))))
137	123, 136	eqbrtrd 5121	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) < (sin‘(abs‘(𝐹‘𝑘))))
138	102	resincld 16158	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(abs‘(𝐹‘𝑘))) ∈ ℝ)
139	84, 138, 124	ltmuldivd 13081	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) < (sin‘(abs‘(𝐹‘𝑘))) ↔ (1 − (((𝐹‘𝑘)↑2) / 3)) < ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘)))))
140	137, 139	mpbid 234	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) < ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))))
141		fveq2 6863	. . . . . . . 8 ⊢ ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → (sin‘(abs‘(𝐹‘𝑘))) = (sin‘(𝐹‘𝑘)))
142		id 22	. . . . . . . 8 ⊢ ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → (abs‘(𝐹‘𝑘)) = (𝐹‘𝑘))
143	141, 142	oveq12d 7410	. . . . . . 7 ⊢ ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
144	143	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘))))
145		sinneg 16161	. . . . . . . . . 10 ⊢ ((𝐹‘𝑘) ∈ ℂ → (sin‘-(𝐹‘𝑘)) = -(sin‘(𝐹‘𝑘)))
146	20, 145	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘-(𝐹‘𝑘)) = -(sin‘(𝐹‘𝑘)))
147	146	oveq1d 7407	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)) = (-(sin‘(𝐹‘𝑘)) / -(𝐹‘𝑘)))
148	96	recnd 11207	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(𝐹‘𝑘)) ∈ ℂ)
149	148, 20, 97	div2negd 11979	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (-(sin‘(𝐹‘𝑘)) / -(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
150	147, 149	eqtrd 2796	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
151		fveq2 6863	. . . . . . . . 9 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → (sin‘(abs‘(𝐹‘𝑘))) = (sin‘-(𝐹‘𝑘)))
152		id 22	. . . . . . . . 9 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → (abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘))
153	151, 152	oveq12d 7410	. . . . . . . 8 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)))
154	153	eqeq1d 2763	. . . . . . 7 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → (((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ↔ ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘))))
155	150, 154	syl5ibrcom 249	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘))))
156	19	absord 15426	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) ∨ (abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘)))
157	144, 155, 156	mpjaod 871	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
158	140, 157	breqtrd 5125	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) < ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
159	84, 98, 158	ltled 11328	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) ≤ ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
160	159, 77, 95	3brtr4d 5131	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) ≤ ((𝐺 ∘ 𝐹)‘𝑘))
161	78	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 1 ∈ ℝ)
162	135	simprd 499	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(abs‘(𝐹‘𝑘))) < (abs‘(𝐹‘𝑘)))
163	103	mulridd 11196	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) · 1) = (abs‘(𝐹‘𝑘)))
164	162, 163	breqtrrd 5127	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(abs‘(𝐹‘𝑘))) < ((abs‘(𝐹‘𝑘)) · 1))
165	138, 161, 124	ltdivmuld 13085	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) < 1 ↔ (sin‘(abs‘(𝐹‘𝑘))) < ((abs‘(𝐹‘𝑘)) · 1)))
166	164, 165	mpbird 259	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) < 1)
167	157, 166	eqbrtrrd 5123	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) < 1)
168	98, 161, 167	ltled 11328	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ≤ 1)
169	95, 168	eqbrtrd 5121	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) ≤ 1)
170	1, 3, 66, 70, 85, 99, 160, 169	climsqz 15651	1 ⊢ (𝜑 → (𝐺 ∘ 𝐹) ⇝ 1)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 208 ∧ wa 399 ∧ w3a 1097 = wceq 1559 ⊤wtru 1560 ∈ wcel 2141 ≠ wne 2956 ∀wral 3075 ∃wrex 3085 Vcvv 3453 ∖ cdif 3901 {csn 4581 class class class wbr 5099 ↦ cmpt 5180 ∘ ccom 5649 Fun wfun 6511 ⟶wf 6513 ‘cfv 6517 (class class class)co 7392 ℂcc 11068 ℝcr 11069 0cc0 11070 1c1 11071 + caddc 11073 · cmul 11075 ℝ^*cxr 11212 < clt 11213 ≤ cle 11214 − cmin 11411 -cneg 11412 / cdiv 11841 ℕcn 12207 2c2 12269 3c3 12270 ℕ₀cn0 12478 ℤ_≥cuz 12836 ℝ⁺crp 12990 (,]cioc 13347 ↑cexp 14071 abscabs 15244 ⇝ cli 15494 sincsin 16076 TopOpenctopn 17433 ℂ_fldccnfld 21404 TopOnctopon 22950 Cn ccn 23264 ×_t ctx 23600 –cn→ccncf 24918

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1814 ax-4 1828 ax-5 1929 ax-6 1986 ax-7 2027 ax-8 2143 ax-9 2151 ax-10 2174 ax-11 2190 ax-12 2211 ax-ext 2733 ax-rep 5226 ax-sep 5245 ax-nul 5255 ax-pow 5321 ax-pr 5389 ax-un 7714 ax-inf2 9593 ax-cnex 11126 ax-resscn 11127 ax-1cn 11128 ax-icn 11129 ax-addcl 11130 ax-addrcl 11131 ax-mulcl 11132 ax-mulrcl 11133 ax-mulcom 11134 ax-addass 11135 ax-mulass 11136 ax-distr 11137 ax-i2m1 11138 ax-1ne0 11139 ax-1rid 11140 ax-rnegex 11141 ax-rrecex 11142 ax-cnre 11143 ax-pre-lttri 11144 ax-pre-lttrn 11145 ax-pre-ltadd 11146 ax-pre-mulgt0 11147 ax-pre-sup 11148

This theorem depends on definitions: df-bi 209 df-an 400 df-or 859 df-3or 1098 df-3an 1099 df-tru 1562 df-fal 1572 df-ex 1799 df-nf 1803 df-sb 2090 df-mo 2565 df-eu 2595 df-clab 2740 df-cleq 2753 df-clel 2836 df-nfc 2910 df-ne 2957 df-nel 3061 df-ral 3076 df-rex 3086 df-rmo 3366 df-reu 3367 df-rab 3414 df-v 3455 df-sbc 3745 df-csb 3853 df-dif 3907 df-un 3909 df-in 3911 df-ss 3921 df-pss 3924 df-nul 4286 df-if 4480 df-pw 4556 df-sn 4582 df-pr 4584 df-tp 4586 df-op 4588 df-uni 4865 df-int 4905 df-iun 4950 df-iin 4951 df-br 5100 df-opab 5162 df-mpt 5181 df-tr 5207 df-id 5540 df-eprel 5545 df-po 5553 df-so 5554 df-fr 5598 df-se 5599 df-we 5600 df-xp 5651 df-rel 5652 df-cnv 5653 df-co 5654 df-dm 5655 df-rn 5656 df-res 5657 df-ima 5658 df-pred 6284 df-ord 6345 df-on 6346 df-lim 6347 df-suc 6348 df-iota 6473 df-fun 6519 df-fn 6520 df-f 6521 df-f1 6522 df-fo 6523 df-f1o 6524 df-fv 6525 df-isom 6526 df-riota 7349 df-ov 7395 df-oprab 7396 df-mpo 7397 df-of 7656 df-om 7843 df-1st 7966 df-2nd 7967 df-supp 8136 df-frecs 8257 df-wrecs 8288 df-recs 8337 df-rdg 8376 df-1o 8432 df-2o 8433 df-er 8673 df-map 8805 df-pm 8806 df-ixp 8876 df-en 8924 df-dom 8925 df-sdom 8926 df-fin 8927 df-fsupp 9305 df-fi 9354 df-sup 9385 df-inf 9386 df-oi 9455 df-card 9894 df-pnf 11215 df-mnf 11216 df-xr 11217 df-ltxr 11218 df-le 11219 df-sub 11413 df-neg 11414 df-div 11842 df-nn 12208 df-2 12277 df-3 12278 df-4 12279 df-5 12280 df-6 12281 df-7 12282 df-8 12283 df-9 12284 df-n0 12479 df-z 12566 df-dec 12686 df-uz 12837 df-q 12947 df-rp 12991 df-xneg 13111 df-xadd 13112 df-xmul 13113 df-ioc 13351 df-ico 13352 df-icc 13353 df-fz 13510 df-fzo 13657 df-fl 13799 df-seq 14012 df-exp 14072 df-fac 14284 df-hash 14341 df-shft 15077 df-cj 15109 df-re 15110 df-im 15111 df-sqrt 15245 df-abs 15246 df-limsup 15481 df-clim 15498 df-rlim 15499 df-sum 15697 df-ef 16080 df-sin 16082 df-struct 17166 df-sets 17183 df-slot 17201 df-ndx 17213 df-base 17229 df-ress 17250 df-plusg 17282 df-mulr 17283 df-starv 17284 df-sca 17285 df-vsca 17286 df-ip 17287 df-tset 17288 df-ple 17289 df-ds 17291 df-unif 17292 df-hom 17293 df-cco 17294 df-rest 17434 df-topn 17435 df-0g 17453 df-gsum 17454 df-topgen 17455 df-pt 17456 df-prds 17459 df-xrs 17515 df-qtop 17520 df-imas 17521 df-xps 17523 df-mre 17597 df-mrc 17598 df-acs 17600 df-mgm 18657 df-sgrp 18736 df-mnd 18752 df-submnd 18801 df-mulg 19093 df-cntz 19340 df-cmn 19805 df-psmet 21396 df-xmet 21397 df-met 21398 df-bl 21399 df-mopn 21400 df-cnfld 21405 df-top 22934 df-topon 22951 df-topsp 22973 df-bases 22986 df-cn 23267 df-cnp 23268 df-tx 23602 df-hmeo 23795 df-xms 24360 df-ms 24361 df-tms 24362 df-cncf 24920

This theorem is referenced by: sinccvg 35987

W3C validator