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 35659

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 2729	. 2 ⊢ (ℤ_≥‘𝑀) = (ℤ_≥‘𝑀)
2		sinccvg.5	. . 3 ⊢ (𝜑 → 𝑀 ∈ ℕ)
3	2	nnzd 12556	. 2 ⊢ (𝜑 → 𝑀 ∈ ℤ)
4		sinccvg.2	. . . 4 ⊢ (𝜑 → 𝐹 ⇝ 0)
5		sinccvg.4	. . . . . 6 ⊢ 𝐻 = (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3)))
6	5	funmpt2 6555	. . . . 5 ⊢ Fun 𝐻
7		sinccvg.1	. . . . . 6 ⊢ (𝜑 → 𝐹:ℕ⟶(ℝ ∖ {0}))
8		nnex 12192	. . . . . 6 ⊢ ℕ ∈ V
9		fex 7200	. . . . . 6 ⊢ ((𝐹:ℕ⟶(ℝ ∖ {0}) ∧ ℕ ∈ V) → 𝐹 ∈ V)
10	7, 8, 9	sylancl 586	. . . . 5 ⊢ (𝜑 → 𝐹 ∈ V)
11		cofunexg 7927	. . . . 5 ⊢ ((Fun 𝐻 ∧ 𝐹 ∈ V) → (𝐻 ∘ 𝐹) ∈ V)
12	6, 10, 11	sylancr 587	. . . 4 ⊢ (𝜑 → (𝐻 ∘ 𝐹) ∈ V)
13	7	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 𝐹:ℕ⟶(ℝ ∖ {0}))
14		eluznn 12877	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℕ ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 𝑘 ∈ ℕ)
15	2, 14	sylan 580	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 𝑘 ∈ ℕ)
16	13, 15	ffvelcdmd 7057	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ∈ (ℝ ∖ {0}))
17		eldifsn 4750	. . . . . . 7 ⊢ ((𝐹‘𝑘) ∈ (ℝ ∖ {0}) ↔ ((𝐹‘𝑘) ∈ ℝ ∧ (𝐹‘𝑘) ≠ 0))
18	16, 17	sylib 218	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐹‘𝑘) ∈ ℝ ∧ (𝐹‘𝑘) ≠ 0))
19	18	simpld 494	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ∈ ℝ)
20	19	recnd 11202	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ∈ ℂ)
21		ax-1cn 11126	. . . . . 6 ⊢ 1 ∈ ℂ
22		sqcl 14083	. . . . . . 7 ⊢ (𝑥 ∈ ℂ → (𝑥↑2) ∈ ℂ)
23		3cn 12267	. . . . . . . 8 ⊢ 3 ∈ ℂ
24		3ne0 12292	. . . . . . . 8 ⊢ 3 ≠ 0
25		divcl 11843	. . . . . . . 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 11420	. . . . . 6 ⊢ ((1 ∈ ℂ ∧ ((𝑥↑2) / 3) ∈ ℂ) → (1 − ((𝑥↑2) / 3)) ∈ ℂ)
29	21, 27, 28	sylancr 587	. . . . 5 ⊢ (𝑥 ∈ ℂ → (1 − ((𝑥↑2) / 3)) ∈ ℂ)
30	5, 29	fmpti 7084	. . . 4 ⊢ 𝐻:ℂ⟶ℂ
31		eqid 2729	. . . . . . . . . 10 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
32	31	cnfldtopon 24670	. . . . . . . . 9 ⊢ (TopOpen‘ℂ_fld) ∈ (TopOn‘ℂ)
33	32	a1i 11	. . . . . . . 8 ⊢ (⊤ → (TopOpen‘ℂ_fld) ∈ (TopOn‘ℂ))
34		1cnd 11169	. . . . . . . . 9 ⊢ (⊤ → 1 ∈ ℂ)
35	33, 33, 34	cnmptc 23549	. . . . . . . 8 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ 1) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
36	31	sqcn 24767	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ (𝑥↑2)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
37	36	a1i 11	. . . . . . . . 9 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ (𝑥↑2)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
38	31	divccn 24764	. . . . . . . . . . 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 7394	. . . . . . . . 9 ⊢ (𝑦 = (𝑥↑2) → (𝑦 / 3) = ((𝑥↑2) / 3))
42	33, 37, 33, 40, 41	cnmpt11 23550	. . . . . . . 8 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ ((𝑥↑2) / 3)) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
43	31	subcn 24755	. . . . . . . . 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 23553	. . . . . . 7 ⊢ (⊤ → (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3))) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld)))
46	45	mptru 1547	. . . . . 6 ⊢ (𝑥 ∈ ℂ ↦ (1 − ((𝑥↑2) / 3))) ∈ ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
47	31	cncfcn1 24804	. . . . . 6 ⊢ (ℂ–cn→ℂ) = ((TopOpen‘ℂ_fld) Cn (TopOpen‘ℂ_fld))
48	46, 5, 47	3eltr4i 2841	. . . . 5 ⊢ 𝐻 ∈ (ℂ–cn→ℂ)
49		cncfi 24787	. . . . 5 ⊢ ((𝐻 ∈ (ℂ–cn→ℂ) ∧ 0 ∈ ℂ ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ ℝ⁺ ∀𝑤 ∈ ℂ ((abs‘(𝑤 − 0)) < 𝑧 → (abs‘((𝐻‘𝑤) − (𝐻‘0))) < 𝑦))
50	48, 49	mp3an1 1450	. . . 4 ⊢ ((0 ∈ ℂ ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ ℝ⁺ ∀𝑤 ∈ ℂ ((abs‘(𝑤 − 0)) < 𝑧 → (abs‘((𝐻‘𝑤) − (𝐻‘0))) < 𝑦))
51		fvco3 6960	. . . . . 6 ⊢ ((𝐹:ℕ⟶(ℝ ∖ {0}) ∧ 𝑘 ∈ ℕ) → ((𝐻 ∘ 𝐹)‘𝑘) = (𝐻‘(𝐹‘𝑘)))
52	7, 51	sylan 580	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐻 ∘ 𝐹)‘𝑘) = (𝐻‘(𝐹‘𝑘)))
53	15, 52	syldan 591	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) = (𝐻‘(𝐹‘𝑘)))
54	1, 4, 12, 3, 20, 30, 50, 53	climcn1lem 15569	. . 3 ⊢ (𝜑 → (𝐻 ∘ 𝐹) ⇝ (𝐻‘0))
55		0cn 11166	. . . 4 ⊢ 0 ∈ ℂ
56		sq0i 14158	. . . . . . . . 9 ⊢ (𝑥 = 0 → (𝑥↑2) = 0)
57	56	oveq1d 7402	. . . . . . . 8 ⊢ (𝑥 = 0 → ((𝑥↑2) / 3) = (0 / 3))
58	23, 24	div0i 11916	. . . . . . . 8 ⊢ (0 / 3) = 0
59	57, 58	eqtrdi 2780	. . . . . . 7 ⊢ (𝑥 = 0 → ((𝑥↑2) / 3) = 0)
60	59	oveq2d 7403	. . . . . 6 ⊢ (𝑥 = 0 → (1 − ((𝑥↑2) / 3)) = (1 − 0))
61		1m0e1 12302	. . . . . 6 ⊢ (1 − 0) = 1
62	60, 61	eqtrdi 2780	. . . . 5 ⊢ (𝑥 = 0 → (1 − ((𝑥↑2) / 3)) = 1)
63		1ex 11170	. . . . 5 ⊢ 1 ∈ V
64	62, 5, 63	fvmpt 6968	. . . 4 ⊢ (0 ∈ ℂ → (𝐻‘0) = 1)
65	55, 64	ax-mp 5	. . 3 ⊢ (𝐻‘0) = 1
66	54, 65	breqtrdi 5148	. 2 ⊢ (𝜑 → (𝐻 ∘ 𝐹) ⇝ 1)
67		sinccvg.3	. . . 4 ⊢ 𝐺 = (𝑥 ∈ (ℝ ∖ {0}) ↦ ((sin‘𝑥) / 𝑥))
68	67	funmpt2 6555	. . 3 ⊢ Fun 𝐺
69		cofunexg 7927	. . 3 ⊢ ((Fun 𝐺 ∧ 𝐹 ∈ V) → (𝐺 ∘ 𝐹) ∈ V)
70	68, 10, 69	sylancr 587	. 2 ⊢ (𝜑 → (𝐺 ∘ 𝐹) ∈ V)
71		oveq1 7394	. . . . . . . 8 ⊢ (𝑥 = (𝐹‘𝑘) → (𝑥↑2) = ((𝐹‘𝑘)↑2))
72	71	oveq1d 7402	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑘) → ((𝑥↑2) / 3) = (((𝐹‘𝑘)↑2) / 3))
73	72	oveq2d 7403	. . . . . 6 ⊢ (𝑥 = (𝐹‘𝑘) → (1 − ((𝑥↑2) / 3)) = (1 − (((𝐹‘𝑘)↑2) / 3)))
74		ovex 7420	. . . . . 6 ⊢ (1 − (((𝐹‘𝑘)↑2) / 3)) ∈ V
75	73, 5, 74	fvmpt 6968	. . . . 5 ⊢ ((𝐹‘𝑘) ∈ ℂ → (𝐻‘(𝐹‘𝑘)) = (1 − (((𝐹‘𝑘)↑2) / 3)))
76	20, 75	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐻‘(𝐹‘𝑘)) = (1 − (((𝐹‘𝑘)↑2) / 3)))
77	53, 76	eqtrd 2764	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) = (1 − (((𝐹‘𝑘)↑2) / 3)))
78		1re 11174	. . . 4 ⊢ 1 ∈ ℝ
79	19	resqcld 14090	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐹‘𝑘)↑2) ∈ ℝ)
80		3nn 12265	. . . . 5 ⊢ 3 ∈ ℕ
81		nndivre 12227	. . . . 5 ⊢ ((((𝐹‘𝑘)↑2) ∈ ℝ ∧ 3 ∈ ℕ) → (((𝐹‘𝑘)↑2) / 3) ∈ ℝ)
82	79, 80, 81	sylancl 586	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((𝐹‘𝑘)↑2) / 3) ∈ ℝ)
83		resubcl 11486	. . . 4 ⊢ ((1 ∈ ℝ ∧ (((𝐹‘𝑘)↑2) / 3) ∈ ℝ) → (1 − (((𝐹‘𝑘)↑2) / 3)) ∈ ℝ)
84	78, 82, 83	sylancr 587	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) ∈ ℝ)
85	77, 84	eqeltrd 2828	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) ∈ ℝ)
86		fvco3 6960	. . . . . 6 ⊢ ((𝐹:ℕ⟶(ℝ ∖ {0}) ∧ 𝑘 ∈ ℕ) → ((𝐺 ∘ 𝐹)‘𝑘) = (𝐺‘(𝐹‘𝑘)))
87	7, 86	sylan 580	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐺 ∘ 𝐹)‘𝑘) = (𝐺‘(𝐹‘𝑘)))
88	15, 87	syldan 591	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) = (𝐺‘(𝐹‘𝑘)))
89		fveq2 6858	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑘) → (sin‘𝑥) = (sin‘(𝐹‘𝑘)))
90		id 22	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑘) → 𝑥 = (𝐹‘𝑘))
91	89, 90	oveq12d 7405	. . . . . 6 ⊢ (𝑥 = (𝐹‘𝑘) → ((sin‘𝑥) / 𝑥) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
92		ovex 7420	. . . . . 6 ⊢ ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ∈ V
93	91, 67, 92	fvmpt 6968	. . . . 5 ⊢ ((𝐹‘𝑘) ∈ (ℝ ∖ {0}) → (𝐺‘(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
94	16, 93	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐺‘(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
95	88, 94	eqtrd 2764	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
96	19	resincld 16111	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(𝐹‘𝑘)) ∈ ℝ)
97	18	simprd 495	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (𝐹‘𝑘) ≠ 0)
98	96, 19, 97	redivcld 12010	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ∈ ℝ)
99	95, 98	eqeltrd 2828	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) ∈ ℝ)
100		1cnd 11169	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 1 ∈ ℂ)
101	82	recnd 11202	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((𝐹‘𝑘)↑2) / 3) ∈ ℂ)
102	20	abscld 15405	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ ℝ)
103	102	recnd 11202	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ ℂ)
104	100, 101, 103	subdird 11635	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) = ((1 · (abs‘(𝐹‘𝑘))) − ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘)))))
105	103	mullidd 11192	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 · (abs‘(𝐹‘𝑘))) = (abs‘(𝐹‘𝑘)))
106		df-3 12250	. . . . . . . . . . . . 13 ⊢ 3 = (2 + 1)
107	106	oveq2i 7398	. . . . . . . . . . . 12 ⊢ ((abs‘(𝐹‘𝑘))↑3) = ((abs‘(𝐹‘𝑘))↑(2 + 1))
108		2nn0 12459	. . . . . . . . . . . . . 14 ⊢ 2 ∈ ℕ₀
109		expp1 14033	. . . . . . . . . . . . . 14 ⊢ (((abs‘(𝐹‘𝑘)) ∈ ℂ ∧ 2 ∈ ℕ₀) → ((abs‘(𝐹‘𝑘))↑(2 + 1)) = (((abs‘(𝐹‘𝑘))↑2) · (abs‘(𝐹‘𝑘))))
110	103, 108, 109	sylancl 586	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑(2 + 1)) = (((abs‘(𝐹‘𝑘))↑2) · (abs‘(𝐹‘𝑘))))
111		absresq 15268	. . . . . . . . . . . . . . 15 ⊢ ((𝐹‘𝑘) ∈ ℝ → ((abs‘(𝐹‘𝑘))↑2) = ((𝐹‘𝑘)↑2))
112	19, 111	syl 17	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑2) = ((𝐹‘𝑘)↑2))
113	112	oveq1d 7402	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((abs‘(𝐹‘𝑘))↑2) · (abs‘(𝐹‘𝑘))) = (((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))))
114	110, 113	eqtrd 2764	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑(2 + 1)) = (((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))))
115	107, 114	eqtrid 2776	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘))↑3) = (((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))))
116	115	oveq1d 7402	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((abs‘(𝐹‘𝑘))↑3) / 3) = ((((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))) / 3))
117	79	recnd 11202	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐹‘𝑘)↑2) ∈ ℂ)
118	23	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 3 ∈ ℂ)
119	24	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 3 ≠ 0)
120	117, 103, 118, 119	div23d 11995	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((((𝐹‘𝑘)↑2) · (abs‘(𝐹‘𝑘))) / 3) = ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘))))
121	116, 120	eqtr2d 2765	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘))) = (((abs‘(𝐹‘𝑘))↑3) / 3))
122	105, 121	oveq12d 7405	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 · (abs‘(𝐹‘𝑘))) − ((((𝐹‘𝑘)↑2) / 3) · (abs‘(𝐹‘𝑘)))) = ((abs‘(𝐹‘𝑘)) − (((abs‘(𝐹‘𝑘))↑3) / 3)))
123	104, 122	eqtrd 2764	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) = ((abs‘(𝐹‘𝑘)) − (((abs‘(𝐹‘𝑘))↑3) / 3)))
124	20, 97	absrpcld 15417	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) ∈ ℝ⁺)
125	124	rpgt0d 12998	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 0 < (abs‘(𝐹‘𝑘)))
126		sinccvg.6	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (abs‘(𝐹‘𝑘)) < 1)
127		ltle 11262	. . . . . . . . . . . 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 11221	. . . . . . . . . . 11 ⊢ 0 ∈ ℝ^*
131		elioc2 13370	. . . . . . . . . . 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 16153	. . . . . . . . 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 5129	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((1 − (((𝐹‘𝑘)↑2) / 3)) · (abs‘(𝐹‘𝑘))) < (sin‘(abs‘(𝐹‘𝑘))))
138	102	resincld 16111	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(abs‘(𝐹‘𝑘))) ∈ ℝ)
139	84, 138, 124	ltmuldivd 13042	. . . . . 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 6858	. . . . . . . 8 ⊢ ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → (sin‘(abs‘(𝐹‘𝑘))) = (sin‘(𝐹‘𝑘)))
142		id 22	. . . . . . . 8 ⊢ ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → (abs‘(𝐹‘𝑘)) = (𝐹‘𝑘))
143	141, 142	oveq12d 7405	. . . . . . 7 ⊢ ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
144	143	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘))))
145		sinneg 16114	. . . . . . . . . 10 ⊢ ((𝐹‘𝑘) ∈ ℂ → (sin‘-(𝐹‘𝑘)) = -(sin‘(𝐹‘𝑘)))
146	20, 145	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘-(𝐹‘𝑘)) = -(sin‘(𝐹‘𝑘)))
147	146	oveq1d 7402	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)) = (-(sin‘(𝐹‘𝑘)) / -(𝐹‘𝑘)))
148	96	recnd 11202	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(𝐹‘𝑘)) ∈ ℂ)
149	148, 20, 97	div2negd 11973	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (-(sin‘(𝐹‘𝑘)) / -(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
150	147, 149	eqtrd 2764	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
151		fveq2 6858	. . . . . . . . 9 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → (sin‘(abs‘(𝐹‘𝑘))) = (sin‘-(𝐹‘𝑘)))
152		id 22	. . . . . . . . 9 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → (abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘))
153	151, 152	oveq12d 7405	. . . . . . . 8 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)))
154	153	eqeq1d 2731	. . . . . . 7 ⊢ ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → (((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ↔ ((sin‘-(𝐹‘𝑘)) / -(𝐹‘𝑘)) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘))))
155	150, 154	syl5ibrcom 247	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘))))
156	19	absord 15382	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) = (𝐹‘𝑘) ∨ (abs‘(𝐹‘𝑘)) = -(𝐹‘𝑘)))
157	144, 155, 156	mpjaod 860	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) = ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
158	140, 157	breqtrd 5133	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) < ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
159	84, 98, 158	ltled 11322	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (1 − (((𝐹‘𝑘)↑2) / 3)) ≤ ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)))
160	159, 77, 95	3brtr4d 5139	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐻 ∘ 𝐹)‘𝑘) ≤ ((𝐺 ∘ 𝐹)‘𝑘))
161	78	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → 1 ∈ ℝ)
162	135	simprd 495	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(abs‘(𝐹‘𝑘))) < (abs‘(𝐹‘𝑘)))
163	103	mulridd 11191	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((abs‘(𝐹‘𝑘)) · 1) = (abs‘(𝐹‘𝑘)))
164	162, 163	breqtrrd 5135	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (sin‘(abs‘(𝐹‘𝑘))) < ((abs‘(𝐹‘𝑘)) · 1))
165	138, 161, 124	ltdivmuld 13046	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → (((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) < 1 ↔ (sin‘(abs‘(𝐹‘𝑘))) < ((abs‘(𝐹‘𝑘)) · 1)))
166	164, 165	mpbird 257	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(abs‘(𝐹‘𝑘))) / (abs‘(𝐹‘𝑘))) < 1)
167	157, 166	eqbrtrrd 5131	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) < 1)
168	98, 161, 167	ltled 11322	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((sin‘(𝐹‘𝑘)) / (𝐹‘𝑘)) ≤ 1)
169	95, 168	eqbrtrd 5129	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘𝑀)) → ((𝐺 ∘ 𝐹)‘𝑘) ≤ 1)
170	1, 3, 66, 70, 85, 99, 160, 169	climsqz 15607	1 ⊢ (𝜑 → (𝐺 ∘ 𝐹) ⇝ 1)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1086 = wceq 1540 ⊤wtru 1541 ∈ wcel 2109 ≠ wne 2925 ∀wral 3044 ∃wrex 3053 Vcvv 3447 ∖ cdif 3911 {csn 4589 class class class wbr 5107 ↦ cmpt 5188 ∘ ccom 5642 Fun wfun 6505 ⟶wf 6507 ‘cfv 6511 (class class class)co 7387 ℂcc 11066 ℝcr 11067 0cc0 11068 1c1 11069 + caddc 11071 · cmul 11073 ℝ^*cxr 11207 < clt 11208 ≤ cle 11209 − cmin 11405 -cneg 11406 / cdiv 11835 ℕcn 12186 2c2 12241 3c3 12242 ℕ₀cn0 12442 ℤ_≥cuz 12793 ℝ⁺crp 12951 (,]cioc 13307 ↑cexp 14026 abscabs 15200 ⇝ cli 15450 sincsin 16029 TopOpenctopn 17384 ℂ_fldccnfld 21264 TopOnctopon 22797 Cn ccn 23111 ×_t ctx 23447 –cn→ccncf 24769

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2701 ax-rep 5234 ax-sep 5251 ax-nul 5261 ax-pow 5320 ax-pr 5387 ax-un 7711 ax-inf2 9594 ax-cnex 11124 ax-resscn 11125 ax-1cn 11126 ax-icn 11127 ax-addcl 11128 ax-addrcl 11129 ax-mulcl 11130 ax-mulrcl 11131 ax-mulcom 11132 ax-addass 11133 ax-mulass 11134 ax-distr 11135 ax-i2m1 11136 ax-1ne0 11137 ax-1rid 11138 ax-rnegex 11139 ax-rrecex 11140 ax-cnre 11141 ax-pre-lttri 11142 ax-pre-lttrn 11143 ax-pre-ltadd 11144 ax-pre-mulgt0 11145 ax-pre-sup 11146

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2533 df-eu 2562 df-clab 2708 df-cleq 2721 df-clel 2803 df-nfc 2878 df-ne 2926 df-nel 3030 df-ral 3045 df-rex 3054 df-rmo 3354 df-reu 3355 df-rab 3406 df-v 3449 df-sbc 3754 df-csb 3863 df-dif 3917 df-un 3919 df-in 3921 df-ss 3931 df-pss 3934 df-nul 4297 df-if 4489 df-pw 4565 df-sn 4590 df-pr 4592 df-tp 4594 df-op 4596 df-uni 4872 df-int 4911 df-iun 4957 df-iin 4958 df-br 5108 df-opab 5170 df-mpt 5189 df-tr 5215 df-id 5533 df-eprel 5538 df-po 5546 df-so 5547 df-fr 5591 df-se 5592 df-we 5593 df-xp 5644 df-rel 5645 df-cnv 5646 df-co 5647 df-dm 5648 df-rn 5649 df-res 5650 df-ima 5651 df-pred 6274 df-ord 6335 df-on 6336 df-lim 6337 df-suc 6338 df-iota 6464 df-fun 6513 df-fn 6514 df-f 6515 df-f1 6516 df-fo 6517 df-f1o 6518 df-fv 6519 df-isom 6520 df-riota 7344 df-ov 7390 df-oprab 7391 df-mpo 7392 df-of 7653 df-om 7843 df-1st 7968 df-2nd 7969 df-supp 8140 df-frecs 8260 df-wrecs 8291 df-recs 8340 df-rdg 8378 df-1o 8434 df-2o 8435 df-er 8671 df-map 8801 df-pm 8802 df-ixp 8871 df-en 8919 df-dom 8920 df-sdom 8921 df-fin 8922 df-fsupp 9313 df-fi 9362 df-sup 9393 df-inf 9394 df-oi 9463 df-card 9892 df-pnf 11210 df-mnf 11211 df-xr 11212 df-ltxr 11213 df-le 11214 df-sub 11407 df-neg 11408 df-div 11836 df-nn 12187 df-2 12249 df-3 12250 df-4 12251 df-5 12252 df-6 12253 df-7 12254 df-8 12255 df-9 12256 df-n0 12443 df-z 12530 df-dec 12650 df-uz 12794 df-q 12908 df-rp 12952 df-xneg 13072 df-xadd 13073 df-xmul 13074 df-ioc 13311 df-ico 13312 df-icc 13313 df-fz 13469 df-fzo 13616 df-fl 13754 df-seq 13967 df-exp 14027 df-fac 14239 df-hash 14296 df-shft 15033 df-cj 15065 df-re 15066 df-im 15067 df-sqrt 15201 df-abs 15202 df-limsup 15437 df-clim 15454 df-rlim 15455 df-sum 15653 df-ef 16033 df-sin 16035 df-struct 17117 df-sets 17134 df-slot 17152 df-ndx 17164 df-base 17180 df-ress 17201 df-plusg 17233 df-mulr 17234 df-starv 17235 df-sca 17236 df-vsca 17237 df-ip 17238 df-tset 17239 df-ple 17240 df-ds 17242 df-unif 17243 df-hom 17244 df-cco 17245 df-rest 17385 df-topn 17386 df-0g 17404 df-gsum 17405 df-topgen 17406 df-pt 17407 df-prds 17410 df-xrs 17465 df-qtop 17470 df-imas 17471 df-xps 17473 df-mre 17547 df-mrc 17548 df-acs 17550 df-mgm 18567 df-sgrp 18646 df-mnd 18662 df-submnd 18711 df-mulg 19000 df-cntz 19249 df-cmn 19712 df-psmet 21256 df-xmet 21257 df-met 21258 df-bl 21259 df-mopn 21260 df-cnfld 21265 df-top 22781 df-topon 22798 df-topsp 22820 df-bases 22833 df-cn 23114 df-cnp 23115 df-tx 23449 df-hmeo 23642 df-xms 24208 df-ms 24209 df-tms 24210 df-cncf 24771

This theorem is referenced by: sinccvg 35660

W3C validator