resqrexlemoverl - Intuitionistic Logic Explorer

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

Theorem resqrexlemoverl 11553

Description: Lemma for resqrex 11558. 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 6018	. . . . . . . . 9 ⊢ (𝑒 = (𝐿 − (𝐹‘𝐾)) → (𝐿 + 𝑒) = (𝐿 + (𝐿 − (𝐹‘𝐾))))
2	1	breq2d 4095	. . . . . . . 8 ⊢ (𝑒 = (𝐿 − (𝐹‘𝐾)) → ((𝐹‘𝑖) < (𝐿 + 𝑒) ↔ (𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾)))))
3		oveq2 6018	. . . . . . . . 9 ⊢ (𝑒 = (𝐿 − (𝐹‘𝐾)) → ((𝐹‘𝑖) + 𝑒) = ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))))
4	3	breq2d 4095	. . . . . . . 8 ⊢ (𝑒 = (𝐿 − (𝐹‘𝐾)) → (𝐿 < ((𝐹‘𝑖) + 𝑒) ↔ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
5	2, 4	anbi12d 473	. . . . . . 7 ⊢ (𝑒 = (𝐿 − (𝐹‘𝐾)) → (((𝐹‘𝑖) < (𝐿 + 𝑒) ∧ 𝐿 < ((𝐹‘𝑖) + 𝑒)) ↔ ((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))))))
6	5	rexralbidv 2556	. . . . . 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 11539	. . . . . . . . . 10 ⊢ (𝜑 → 𝐹:ℕ⟶ℝ⁺)
13		resqrexlemoverl.k	. . . . . . . . . 10 ⊢ (𝜑 → 𝐾 ∈ ℕ)
14	12, 13	ffvelcdmd 5776	. . . . . . . . 9 ⊢ (𝜑 → (𝐹‘𝐾) ∈ ℝ⁺)
15	14	rpred 9909	. . . . . . . 8 ⊢ (𝜑 → (𝐹‘𝐾) ∈ ℝ)
16		resqrexlemgt0.rr	. . . . . . . 8 ⊢ (𝜑 → 𝐿 ∈ ℝ)
17		difrp 9905	. . . . . . . 8 ⊢ (((𝐹‘𝐾) ∈ ℝ ∧ 𝐿 ∈ ℝ) → ((𝐹‘𝐾) < 𝐿 ↔ (𝐿 − (𝐹‘𝐾)) ∈ ℝ⁺))
18	15, 16, 17	syl2anc 411	. . . . . . 7 ⊢ (𝜑 → ((𝐹‘𝐾) < 𝐿 ↔ (𝐿 − (𝐹‘𝐾)) ∈ ℝ⁺))
19	18	biimpa 296	. . . . . 6 ⊢ ((𝜑 ∧ (𝐹‘𝐾) < 𝐿) → (𝐿 − (𝐹‘𝐾)) ∈ ℝ⁺)
20	6, 8, 19	rspcdva 2912	. . . . 5 ⊢ ((𝜑 ∧ (𝐹‘𝐾) < 𝐿) → ∃𝑗 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑗)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
21		fveq2 5632	. . . . . . 7 ⊢ (𝑗 = 𝑏 → (ℤ_≥‘𝑗) = (ℤ_≥‘𝑏))
22	21	raleqdv 2734	. . . . . 6 ⊢ (𝑗 = 𝑏 → (∀𝑖 ∈ (ℤ_≥‘𝑗)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))) ↔ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))))))
23	22	cbvrexv 2766	. . . . 5 ⊢ (∃𝑗 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑗)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))) ↔ ∃𝑏 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
24	20, 23	sylib 122	. . . 4 ⊢ ((𝜑 ∧ (𝐹‘𝐾) < 𝐿) → ∃𝑏 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
25		fveq2 5632	. . . . . . . . . . 11 ⊢ (𝑖 = 𝐾 → (𝐹‘𝑖) = (𝐹‘𝐾))
26	25	breq1d 4093	. . . . . . . . . 10 ⊢ (𝑖 = 𝐾 → ((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ↔ (𝐹‘𝐾) < (𝐿 + (𝐿 − (𝐹‘𝐾)))))
27	25	oveq1d 6025	. . . . . . . . . . 11 ⊢ (𝑖 = 𝐾 → ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))) = ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾))))
28	27	breq2d 4095	. . . . . . . . . 10 ⊢ (𝑖 = 𝐾 → (𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))) ↔ 𝐿 < ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾)))))
29	26, 28	anbi12d 473	. . . . . . . . 9 ⊢ (𝑖 = 𝐾 → (((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))) ↔ ((𝐹‘𝐾) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾))))))
30		simprr 531	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
31	30	adantr 276	. . . . . . . . 9 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
32		simprl 529	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝑏 ∈ ℕ)
33	32	nnzd 9584	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝑏 ∈ ℤ)
34	33	adantr 276	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝑏 ∈ ℤ)
35	13	ad2antrr 488	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐾 ∈ ℕ)
36	35	nnzd 9584	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐾 ∈ ℤ)
37	36	adantr 276	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐾 ∈ ℤ)
38		simpr 110	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝑏 ≤ 𝐾)
39		eluz2 9744	. . . . . . . . . 10 ⊢ (𝐾 ∈ (ℤ_≥‘𝑏) ↔ (𝑏 ∈ ℤ ∧ 𝐾 ∈ ℤ ∧ 𝑏 ≤ 𝐾))
40	34, 37, 38, 39	syl3anbrc 1205	. . . . . . . . 9 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐾 ∈ (ℤ_≥‘𝑏))
41	29, 31, 40	rspcdva 2912	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → ((𝐹‘𝐾) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾)))))
42	41	simprd 114	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐿 < ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾))))
43	14	ad2antrr 488	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝐾) ∈ ℝ⁺)
44	43	rpcnd 9911	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝐾) ∈ ℂ)
45	44	adantr 276	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → (𝐹‘𝐾) ∈ ℂ)
46	16	ad2antrr 488	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐿 ∈ ℝ)
47	46	recnd 8191	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐿 ∈ ℂ)
48	47	adantr 276	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐿 ∈ ℂ)
49	45, 48	pncan3d 8476	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾))) = 𝐿)
50	42, 49	breqtrd 4109	. . . . . 6 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐿 < 𝐿)
51	16	ad3antrrr 492	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐿 ∈ ℝ)
52	51	ltnrd 8274	. . . . . 6 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → ¬ 𝐿 < 𝐿)
53	50, 52	pm2.21fal 1415	. . . . 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 11544	. . . . . 6 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → (𝐹‘𝑏) < (𝐹‘𝐾))
60	15	ad3antrrr 492	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → (𝐹‘𝐾) ∈ ℝ)
61	12	ad2antrr 488	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐹:ℕ⟶ℝ⁺)
62	61, 32	ffvelcdmd 5776	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝑏) ∈ ℝ⁺)
63	62	rpred 9909	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝑏) ∈ ℝ)
64	63	adantr 276	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → (𝐹‘𝑏) ∈ ℝ)
65		fveq2 5632	. . . . . . . . . . . . . . 15 ⊢ (𝑖 = 𝑏 → (𝐹‘𝑖) = (𝐹‘𝑏))
66	65	breq1d 4093	. . . . . . . . . . . . . 14 ⊢ (𝑖 = 𝑏 → ((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ↔ (𝐹‘𝑏) < (𝐿 + (𝐿 − (𝐹‘𝐾)))))
67	65	oveq1d 6025	. . . . . . . . . . . . . . 15 ⊢ (𝑖 = 𝑏 → ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))) = ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾))))
68	67	breq2d 4095	. . . . . . . . . . . . . 14 ⊢ (𝑖 = 𝑏 → (𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))) ↔ 𝐿 < ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾)))))
69	66, 68	anbi12d 473	. . . . . . . . . . . . 13 ⊢ (𝑖 = 𝑏 → (((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))) ↔ ((𝐹‘𝑏) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾))))))
70		uzid 9753	. . . . . . . . . . . . . 14 ⊢ (𝑏 ∈ ℤ → 𝑏 ∈ (ℤ_≥‘𝑏))
71	33, 70	syl 14	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝑏 ∈ (ℤ_≥‘𝑏))
72	69, 30, 71	rspcdva 2912	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ((𝐹‘𝑏) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾)))))
73	72	simprd 114	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐿 < ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾))))
74	62	rpcnd 9911	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝑏) ∈ ℂ)
75	74, 47, 44	addsubassd 8493	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (((𝐹‘𝑏) + 𝐿) − (𝐹‘𝐾)) = ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾))))
76	73, 75	breqtrrd 4111	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐿 < (((𝐹‘𝑏) + 𝐿) − (𝐹‘𝐾)))
77	15	ad2antrr 488	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝐾) ∈ ℝ)
78	63, 46	readdcld 8192	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ((𝐹‘𝑏) + 𝐿) ∈ ℝ)
79	77, 46, 78	ltaddsub2d 8709	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (((𝐹‘𝐾) + 𝐿) < ((𝐹‘𝑏) + 𝐿) ↔ 𝐿 < (((𝐹‘𝑏) + 𝐿) − (𝐹‘𝐾))))
80	76, 79	mpbird 167	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ((𝐹‘𝐾) + 𝐿) < ((𝐹‘𝑏) + 𝐿))
81	77, 63, 46	ltadd1d 8701	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ((𝐹‘𝐾) < (𝐹‘𝑏) ↔ ((𝐹‘𝐾) + 𝐿) < ((𝐹‘𝑏) + 𝐿)))
82	80, 81	mpbird 167	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝐾) < (𝐹‘𝑏))
83	82	adantr 276	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → (𝐹‘𝐾) < (𝐹‘𝑏))
84	60, 64, 83	ltnsymd 8282	. . . . . 6 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → ¬ (𝐹‘𝑏) < (𝐹‘𝐾))
85	59, 84	pm2.21fal 1415	. . . . 5 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → ⊥)
86		zlelttric 9507	. . . . . 6 ⊢ ((𝑏 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑏 ≤ 𝐾 ∨ 𝐾 < 𝑏))
87	33, 36, 86	syl2anc 411	. . . . 5 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝑏 ≤ 𝐾 ∨ 𝐾 < 𝑏))
88	53, 85, 87	mpjaodan 803	. . . 4 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ⊥)
89	24, 88	rexlimddv 2653	. . 3 ⊢ ((𝜑 ∧ (𝐹‘𝐾) < 𝐿) → ⊥)
90	89	inegd 1414	. 2 ⊢ (𝜑 → ¬ (𝐹‘𝐾) < 𝐿)
91	16, 15	lenltd 8280	. 2 ⊢ (𝜑 → (𝐿 ≤ (𝐹‘𝐾) ↔ ¬ (𝐹‘𝐾) < 𝐿))
92	90, 91	mpbird 167	1 ⊢ (𝜑 → 𝐿 ≤ (𝐹‘𝐾))

Colors of variables: wff set class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 104 ↔ wb 105 ∨ wo 713 = wceq 1395 ⊥wfal 1400 ∈ wcel 2200 ∀wral 2508 ∃wrex 2509 {csn 3666 class class class wbr 4083 × cxp 4718 ⟶wf 5317 ‘cfv 5321 (class class class)co 6010 ∈ cmpo 6012 ℂcc 8013 ℝcr 8014 0cc0 8015 1c1 8016 + caddc 8018 < clt 8197 ≤ cle 8198 − cmin 8333 / cdiv 8835 ℕcn 9126 2c2 9177 ℤcz 9462 ℤ_≥cuz 9738 ℝ⁺crp 9866 seqcseq 10686

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 617 ax-in2 618 ax-io 714 ax-5 1493 ax-7 1494 ax-gen 1495 ax-ie1 1539 ax-ie2 1540 ax-8 1550 ax-10 1551 ax-11 1552 ax-i12 1553 ax-bndl 1555 ax-4 1556 ax-17 1572 ax-i9 1576 ax-ial 1580 ax-i5r 1581 ax-13 2202 ax-14 2203 ax-ext 2211 ax-coll 4199 ax-sep 4202 ax-nul 4210 ax-pow 4259 ax-pr 4294 ax-un 4525 ax-setind 4630 ax-iinf 4681 ax-cnex 8106 ax-resscn 8107 ax-1cn 8108 ax-1re 8109 ax-icn 8110 ax-addcl 8111 ax-addrcl 8112 ax-mulcl 8113 ax-mulrcl 8114 ax-addcom 8115 ax-mulcom 8116 ax-addass 8117 ax-mulass 8118 ax-distr 8119 ax-i2m1 8120 ax-0lt1 8121 ax-1rid 8122 ax-0id 8123 ax-rnegex 8124 ax-precex 8125 ax-cnre 8126 ax-pre-ltirr 8127 ax-pre-ltwlin 8128 ax-pre-lttrn 8129 ax-pre-apti 8130 ax-pre-ltadd 8131 ax-pre-mulgt0 8132 ax-pre-mulext 8133

This theorem depends on definitions: df-bi 117 df-dc 840 df-3or 1003 df-3an 1004 df-tru 1398 df-fal 1401 df-nf 1507 df-sb 1809 df-eu 2080 df-mo 2081 df-clab 2216 df-cleq 2222 df-clel 2225 df-nfc 2361 df-ne 2401 df-nel 2496 df-ral 2513 df-rex 2514 df-reu 2515 df-rmo 2516 df-rab 2517 df-v 2801 df-sbc 3029 df-csb 3125 df-dif 3199 df-un 3201 df-in 3203 df-ss 3210 df-nul 3492 df-if 3603 df-pw 3651 df-sn 3672 df-pr 3673 df-op 3675 df-uni 3889 df-int 3924 df-iun 3967 df-br 4084 df-opab 4146 df-mpt 4147 df-tr 4183 df-id 4385 df-po 4388 df-iso 4389 df-iord 4458 df-on 4460 df-ilim 4461 df-suc 4463 df-iom 4684 df-xp 4726 df-rel 4727 df-cnv 4728 df-co 4729 df-dm 4730 df-rn 4731 df-res 4732 df-ima 4733 df-iota 5281 df-fun 5323 df-fn 5324 df-f 5325 df-f1 5326 df-fo 5327 df-f1o 5328 df-fv 5329 df-riota 5963 df-ov 6013 df-oprab 6014 df-mpo 6015 df-1st 6295 df-2nd 6296 df-recs 6462 df-frec 6548 df-pnf 8199 df-mnf 8200 df-xr 8201 df-ltxr 8202 df-le 8203 df-sub 8335 df-neg 8336 df-reap 8738 df-ap 8745 df-div 8836 df-inn 9127 df-2 9185 df-3 9186 df-4 9187 df-n0 9386 df-z 9463 df-uz 9739 df-rp 9867 df-seqfrec 10687 df-exp 10778

This theorem is referenced by: resqrexlemglsq 11554

W3C validator