resqrexlemoverl - Intuitionistic Logic Explorer

	Intuitionistic Logic Explorer		< Previous Next > Nearby theorems
Mirrors > Home > ILE Home > Th. List > resqrexlemoverl		GIF version

Theorem resqrexlemoverl 11699

Description: Lemma for resqrex 11704. Every term in the sequence is an overestimate compared with the limit 𝐿. Although this theorem is stated in terms of a particular sequence the proof could be adapted for any decreasing convergent sequence. (Contributed by Jim Kingdon, 9-Aug-2021.)

**Hypotheses**
Ref	Expression
resqrexlemex.seq	⊢ 𝐹 = seq1((𝑦 ∈ ℝ⁺, 𝑧 ∈ ℝ⁺ ↦ ((𝑦 + (𝐴 / 𝑦)) / 2)), (ℕ × {(1 + 𝐴)}))
resqrexlemex.a	⊢ (𝜑 → 𝐴 ∈ ℝ)
resqrexlemex.agt0	⊢ (𝜑 → 0 ≤ 𝐴)
resqrexlemgt0.rr	⊢ (𝜑 → 𝐿 ∈ ℝ)
resqrexlemgt0.lim	⊢ (𝜑 → ∀𝑒 ∈ ℝ⁺ ∃𝑗 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑗)((𝐹‘𝑖) < (𝐿 + 𝑒) ∧ 𝐿 < ((𝐹‘𝑖) + 𝑒)))
resqrexlemoverl.k	⊢ (𝜑 → 𝐾 ∈ ℕ)

**Assertion**
Ref	Expression
resqrexlemoverl	⊢ (𝜑 → 𝐿 ≤ (𝐹‘𝐾))

Distinct variable groups: 𝑦,𝐴,𝑧 𝑒,𝐹,𝑖,𝑗 𝑦,𝐹,𝑧,𝑖,𝑗 𝑒,𝐾,𝑖,𝑗 𝑦,𝐾,𝑧 𝑒,𝐿,𝑖,𝑗 𝑦,𝐿,𝑧 𝜑,𝑦,𝑧 Allowed substitution hints: 𝜑(𝑒,𝑖,𝑗) 𝐴(𝑒,𝑖,𝑗)

Proof of Theorem resqrexlemoverl Dummy variable 𝑏 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		oveq2 6057	. . . . . . . . 9 ⊢ (𝑒 = (𝐿 − (𝐹‘𝐾)) → (𝐿 + 𝑒) = (𝐿 + (𝐿 − (𝐹‘𝐾))))
2	1	breq2d 4120	. . . . . . . 8 ⊢ (𝑒 = (𝐿 − (𝐹‘𝐾)) → ((𝐹‘𝑖) < (𝐿 + 𝑒) ↔ (𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾)))))
3		oveq2 6057	. . . . . . . . 9 ⊢ (𝑒 = (𝐿 − (𝐹‘𝐾)) → ((𝐹‘𝑖) + 𝑒) = ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))))
4	3	breq2d 4120	. . . . . . . 8 ⊢ (𝑒 = (𝐿 − (𝐹‘𝐾)) → (𝐿 < ((𝐹‘𝑖) + 𝑒) ↔ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
5	2, 4	anbi12d 473	. . . . . . 7 ⊢ (𝑒 = (𝐿 − (𝐹‘𝐾)) → (((𝐹‘𝑖) < (𝐿 + 𝑒) ∧ 𝐿 < ((𝐹‘𝑖) + 𝑒)) ↔ ((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))))))
6	5	rexralbidv 2568	. . . . . 6 ⊢ (𝑒 = (𝐿 − (𝐹‘𝐾)) → (∃𝑗 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑗)((𝐹‘𝑖) < (𝐿 + 𝑒) ∧ 𝐿 < ((𝐹‘𝑖) + 𝑒)) ↔ ∃𝑗 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑗)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))))))
7		resqrexlemgt0.lim	. . . . . . 7 ⊢ (𝜑 → ∀𝑒 ∈ ℝ⁺ ∃𝑗 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑗)((𝐹‘𝑖) < (𝐿 + 𝑒) ∧ 𝐿 < ((𝐹‘𝑖) + 𝑒)))
8	7	adantr 276	. . . . . 6 ⊢ ((𝜑 ∧ (𝐹‘𝐾) < 𝐿) → ∀𝑒 ∈ ℝ⁺ ∃𝑗 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑗)((𝐹‘𝑖) < (𝐿 + 𝑒) ∧ 𝐿 < ((𝐹‘𝑖) + 𝑒)))
9		resqrexlemex.seq	. . . . . . . . . . 11 ⊢ 𝐹 = seq1((𝑦 ∈ ℝ⁺, 𝑧 ∈ ℝ⁺ ↦ ((𝑦 + (𝐴 / 𝑦)) / 2)), (ℕ × {(1 + 𝐴)}))
10		resqrexlemex.a	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴 ∈ ℝ)
11		resqrexlemex.agt0	. . . . . . . . . . 11 ⊢ (𝜑 → 0 ≤ 𝐴)
12	9, 10, 11	resqrexlemf 11685	. . . . . . . . . 10 ⊢ (𝜑 → 𝐹:ℕ⟶ℝ⁺)
13		resqrexlemoverl.k	. . . . . . . . . 10 ⊢ (𝜑 → 𝐾 ∈ ℕ)
14	12, 13	ffvelcdmd 5812	. . . . . . . . 9 ⊢ (𝜑 → (𝐹‘𝐾) ∈ ℝ⁺)
15	14	rpred 10025	. . . . . . . 8 ⊢ (𝜑 → (𝐹‘𝐾) ∈ ℝ)
16		resqrexlemgt0.rr	. . . . . . . 8 ⊢ (𝜑 → 𝐿 ∈ ℝ)
17		difrp 10021	. . . . . . . 8 ⊢ (((𝐹‘𝐾) ∈ ℝ ∧ 𝐿 ∈ ℝ) → ((𝐹‘𝐾) < 𝐿 ↔ (𝐿 − (𝐹‘𝐾)) ∈ ℝ⁺))
18	15, 16, 17	syl2anc 411	. . . . . . 7 ⊢ (𝜑 → ((𝐹‘𝐾) < 𝐿 ↔ (𝐿 − (𝐹‘𝐾)) ∈ ℝ⁺))
19	18	biimpa 296	. . . . . 6 ⊢ ((𝜑 ∧ (𝐹‘𝐾) < 𝐿) → (𝐿 − (𝐹‘𝐾)) ∈ ℝ⁺)
20	6, 8, 19	rspcdva 2925	. . . . 5 ⊢ ((𝜑 ∧ (𝐹‘𝐾) < 𝐿) → ∃𝑗 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑗)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
21		fveq2 5669	. . . . . . 7 ⊢ (𝑗 = 𝑏 → (ℤ_≥‘𝑗) = (ℤ_≥‘𝑏))
22	21	raleqdv 2746	. . . . . 6 ⊢ (𝑗 = 𝑏 → (∀𝑖 ∈ (ℤ_≥‘𝑗)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))) ↔ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))))))
23	22	cbvrexv 2778	. . . . 5 ⊢ (∃𝑗 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑗)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))) ↔ ∃𝑏 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
24	20, 23	sylib 122	. . . 4 ⊢ ((𝜑 ∧ (𝐹‘𝐾) < 𝐿) → ∃𝑏 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
25		fveq2 5669	. . . . . . . . . . 11 ⊢ (𝑖 = 𝐾 → (𝐹‘𝑖) = (𝐹‘𝐾))
26	25	breq1d 4118	. . . . . . . . . 10 ⊢ (𝑖 = 𝐾 → ((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ↔ (𝐹‘𝐾) < (𝐿 + (𝐿 − (𝐹‘𝐾)))))
27	25	oveq1d 6064	. . . . . . . . . . 11 ⊢ (𝑖 = 𝐾 → ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))) = ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾))))
28	27	breq2d 4120	. . . . . . . . . 10 ⊢ (𝑖 = 𝐾 → (𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))) ↔ 𝐿 < ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾)))))
29	26, 28	anbi12d 473	. . . . . . . . 9 ⊢ (𝑖 = 𝐾 → (((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))) ↔ ((𝐹‘𝐾) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾))))))
30		simprr 533	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
31	30	adantr 276	. . . . . . . . 9 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
32		simprl 531	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝑏 ∈ ℕ)
33	32	nnzd 9695	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝑏 ∈ ℤ)
34	33	adantr 276	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝑏 ∈ ℤ)
35	13	ad2antrr 488	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐾 ∈ ℕ)
36	35	nnzd 9695	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐾 ∈ ℤ)
37	36	adantr 276	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐾 ∈ ℤ)
38		simpr 110	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝑏 ≤ 𝐾)
39		eluz2 9855	. . . . . . . . . 10 ⊢ (𝐾 ∈ (ℤ_≥‘𝑏) ↔ (𝑏 ∈ ℤ ∧ 𝐾 ∈ ℤ ∧ 𝑏 ≤ 𝐾))
40	34, 37, 38, 39	syl3anbrc 1208	. . . . . . . . 9 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐾 ∈ (ℤ_≥‘𝑏))
41	29, 31, 40	rspcdva 2925	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → ((𝐹‘𝐾) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾)))))
42	41	simprd 114	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐿 < ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾))))
43	14	ad2antrr 488	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝐾) ∈ ℝ⁺)
44	43	rpcnd 10027	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝐾) ∈ ℂ)
45	44	adantr 276	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → (𝐹‘𝐾) ∈ ℂ)
46	16	ad2antrr 488	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐿 ∈ ℝ)
47	46	recnd 8298	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐿 ∈ ℂ)
48	47	adantr 276	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐿 ∈ ℂ)
49	45, 48	pncan3d 8583	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾))) = 𝐿)
50	42, 49	breqtrd 4134	. . . . . 6 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐿 < 𝐿)
51	16	ad3antrrr 492	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐿 ∈ ℝ)
52	51	ltnrd 8381	. . . . . 6 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → ¬ 𝐿 < 𝐿)
53	50, 52	pm2.21fal 1418	. . . . 5 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → ⊥)
54	10	ad3antrrr 492	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → 𝐴 ∈ ℝ)
55	11	ad3antrrr 492	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → 0 ≤ 𝐴)
56	13	ad3antrrr 492	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → 𝐾 ∈ ℕ)
57	32	adantr 276	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → 𝑏 ∈ ℕ)
58		simpr 110	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → 𝐾 < 𝑏)
59	9, 54, 55, 56, 57, 58	resqrexlemdecn 11690	. . . . . 6 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → (𝐹‘𝑏) < (𝐹‘𝐾))
60	15	ad3antrrr 492	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → (𝐹‘𝐾) ∈ ℝ)
61	12	ad2antrr 488	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐹:ℕ⟶ℝ⁺)
62	61, 32	ffvelcdmd 5812	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝑏) ∈ ℝ⁺)
63	62	rpred 10025	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝑏) ∈ ℝ)
64	63	adantr 276	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → (𝐹‘𝑏) ∈ ℝ)
65		fveq2 5669	. . . . . . . . . . . . . . 15 ⊢ (𝑖 = 𝑏 → (𝐹‘𝑖) = (𝐹‘𝑏))
66	65	breq1d 4118	. . . . . . . . . . . . . 14 ⊢ (𝑖 = 𝑏 → ((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ↔ (𝐹‘𝑏) < (𝐿 + (𝐿 − (𝐹‘𝐾)))))
67	65	oveq1d 6064	. . . . . . . . . . . . . . 15 ⊢ (𝑖 = 𝑏 → ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))) = ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾))))
68	67	breq2d 4120	. . . . . . . . . . . . . 14 ⊢ (𝑖 = 𝑏 → (𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))) ↔ 𝐿 < ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾)))))
69	66, 68	anbi12d 473	. . . . . . . . . . . . 13 ⊢ (𝑖 = 𝑏 → (((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))) ↔ ((𝐹‘𝑏) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾))))))
70		uzid 9864	. . . . . . . . . . . . . 14 ⊢ (𝑏 ∈ ℤ → 𝑏 ∈ (ℤ_≥‘𝑏))
71	33, 70	syl 14	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝑏 ∈ (ℤ_≥‘𝑏))
72	69, 30, 71	rspcdva 2925	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ((𝐹‘𝑏) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾)))))
73	72	simprd 114	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐿 < ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾))))
74	62	rpcnd 10027	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝑏) ∈ ℂ)
75	74, 47, 44	addsubassd 8600	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (((𝐹‘𝑏) + 𝐿) − (𝐹‘𝐾)) = ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾))))
76	73, 75	breqtrrd 4136	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐿 < (((𝐹‘𝑏) + 𝐿) − (𝐹‘𝐾)))
77	15	ad2antrr 488	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝐾) ∈ ℝ)
78	63, 46	readdcld 8299	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ((𝐹‘𝑏) + 𝐿) ∈ ℝ)
79	77, 46, 78	ltaddsub2d 8816	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (((𝐹‘𝐾) + 𝐿) < ((𝐹‘𝑏) + 𝐿) ↔ 𝐿 < (((𝐹‘𝑏) + 𝐿) − (𝐹‘𝐾))))
80	76, 79	mpbird 167	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ((𝐹‘𝐾) + 𝐿) < ((𝐹‘𝑏) + 𝐿))
81	77, 63, 46	ltadd1d 8808	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ((𝐹‘𝐾) < (𝐹‘𝑏) ↔ ((𝐹‘𝐾) + 𝐿) < ((𝐹‘𝑏) + 𝐿)))
82	80, 81	mpbird 167	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝐾) < (𝐹‘𝑏))
83	82	adantr 276	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → (𝐹‘𝐾) < (𝐹‘𝑏))
84	60, 64, 83	ltnsymd 8389	. . . . . 6 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → ¬ (𝐹‘𝑏) < (𝐹‘𝐾))
85	59, 84	pm2.21fal 1418	. . . . 5 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → ⊥)
86		zlelttric 9618	. . . . . 6 ⊢ ((𝑏 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑏 ≤ 𝐾 ∨ 𝐾 < 𝑏))
87	33, 36, 86	syl2anc 411	. . . . 5 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝑏 ≤ 𝐾 ∨ 𝐾 < 𝑏))
88	53, 85, 87	mpjaodan 806	. . . 4 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ⊥)
89	24, 88	rexlimddv 2665	. . 3 ⊢ ((𝜑 ∧ (𝐹‘𝐾) < 𝐿) → ⊥)
90	89	inegd 1417	. 2 ⊢ (𝜑 → ¬ (𝐹‘𝐾) < 𝐿)
91	16, 15	lenltd 8387	. 2 ⊢ (𝜑 → (𝐿 ≤ (𝐹‘𝐾) ↔ ¬ (𝐹‘𝐾) < 𝐿))
92	90, 91	mpbird 167	1 ⊢ (𝜑 → 𝐿 ≤ (𝐹‘𝐾))

Colors of variables: wff set class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 104 ↔ wb 105 ∨ wo 716 = wceq 1398 ⊥wfal 1403 ∈ wcel 2203 ∀wral 2520 ∃wrex 2521 {csn 3688 class class class wbr 4108 × cxp 4746 ⟶wf 5347 ‘cfv 5351 (class class class)co 6049 ∈ cmpo 6051 ℂcc 8121 ℝcr 8122 0cc0 8123 1c1 8124 + caddc 8126 < clt 8304 ≤ cle 8305 − cmin 8440 / cdiv 8942 ℕcn 9233 2c2 9284 ℤcz 9573 ℤ_≥cuz 9849 ℝ⁺crp 9982 seqcseq 10805

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-ia1 106 ax-ia2 107 ax-ia3 108 ax-in1 619 ax-in2 620 ax-io 717 ax-5 1496 ax-7 1497 ax-gen 1498 ax-ie1 1542 ax-ie2 1543 ax-8 1553 ax-10 1554 ax-11 1555 ax-i12 1556 ax-bndl 1558 ax-4 1559 ax-17 1575 ax-i9 1579 ax-ial 1583 ax-i5r 1584 ax-13 2205 ax-14 2206 ax-ext 2214 ax-coll 4224 ax-sep 4227 ax-nul 4235 ax-pow 4286 ax-pr 4321 ax-un 4553 ax-setind 4658 ax-iinf 4709 ax-cnex 8214 ax-resscn 8215 ax-1cn 8216 ax-1re 8217 ax-icn 8218 ax-addcl 8219 ax-addrcl 8220 ax-mulcl 8221 ax-mulrcl 8222 ax-addcom 8223 ax-mulcom 8224 ax-addass 8225 ax-mulass 8226 ax-distr 8227 ax-i2m1 8228 ax-0lt1 8229 ax-1rid 8230 ax-0id 8231 ax-rnegex 8232 ax-precex 8233 ax-cnre 8234 ax-pre-ltirr 8235 ax-pre-ltwlin 8236 ax-pre-lttrn 8237 ax-pre-apti 8238 ax-pre-ltadd 8239 ax-pre-mulgt0 8240 ax-pre-mulext 8241

This theorem depends on definitions: df-bi 117 df-dc 843 df-3or 1006 df-3an 1007 df-tru 1401 df-fal 1404 df-nf 1510 df-sb 1812 df-eu 2083 df-mo 2084 df-clab 2219 df-cleq 2225 df-clel 2228 df-nfc 2373 df-ne 2413 df-nel 2508 df-ral 2525 df-rex 2526 df-reu 2527 df-rmo 2528 df-rab 2529 df-v 2814 df-sbc 3042 df-csb 3138 df-dif 3212 df-un 3214 df-in 3216 df-ss 3223 df-nul 3508 df-if 3620 df-pw 3670 df-sn 3694 df-pr 3695 df-op 3697 df-uni 3914 df-int 3949 df-iun 3992 df-br 4109 df-opab 4171 df-mpt 4172 df-tr 4208 df-id 4413 df-po 4416 df-iso 4417 df-iord 4486 df-on 4488 df-ilim 4489 df-suc 4491 df-iom 4712 df-xp 4754 df-rel 4755 df-cnv 4756 df-co 4757 df-dm 4758 df-rn 4759 df-res 4760 df-ima 4761 df-iota 5311 df-fun 5353 df-fn 5354 df-f 5355 df-f1 5356 df-fo 5357 df-f1o 5358 df-fv 5359 df-riota 6002 df-ov 6052 df-oprab 6053 df-mpo 6054 df-1st 6333 df-2nd 6334 df-recs 6535 df-frec 6621 df-pnf 8306 df-mnf 8307 df-xr 8308 df-ltxr 8309 df-le 8310 df-sub 8442 df-neg 8443 df-reap 8845 df-ap 8852 df-div 8943 df-inn 9234 df-2 9292 df-3 9293 df-4 9294 df-n0 9493 df-z 9574 df-uz 9850 df-rp 9983 df-seqfrec 10806 df-exp 10897

This theorem is referenced by: resqrexlemglsq 11700

W3C validator