resqrexlemoverl - Intuitionistic Logic Explorer

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

Theorem resqrexlemoverl 11575

Description: Lemma for resqrex 11580. 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 6021	. . . . . . . . 9 ⊢ (𝑒 = (𝐿 − (𝐹‘𝐾)) → (𝐿 + 𝑒) = (𝐿 + (𝐿 − (𝐹‘𝐾))))
2	1	breq2d 4098	. . . . . . . 8 ⊢ (𝑒 = (𝐿 − (𝐹‘𝐾)) → ((𝐹‘𝑖) < (𝐿 + 𝑒) ↔ (𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾)))))
3		oveq2 6021	. . . . . . . . 9 ⊢ (𝑒 = (𝐿 − (𝐹‘𝐾)) → ((𝐹‘𝑖) + 𝑒) = ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))))
4	3	breq2d 4098	. . . . . . . 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 11561	. . . . . . . . . 10 ⊢ (𝜑 → 𝐹:ℕ⟶ℝ⁺)
13		resqrexlemoverl.k	. . . . . . . . . 10 ⊢ (𝜑 → 𝐾 ∈ ℕ)
14	12, 13	ffvelcdmd 5779	. . . . . . . . 9 ⊢ (𝜑 → (𝐹‘𝐾) ∈ ℝ⁺)
15	14	rpred 9924	. . . . . . . 8 ⊢ (𝜑 → (𝐹‘𝐾) ∈ ℝ)
16		resqrexlemgt0.rr	. . . . . . . 8 ⊢ (𝜑 → 𝐿 ∈ ℝ)
17		difrp 9920	. . . . . . . 8 ⊢ (((𝐹‘𝐾) ∈ ℝ ∧ 𝐿 ∈ ℝ) → ((𝐹‘𝐾) < 𝐿 ↔ (𝐿 − (𝐹‘𝐾)) ∈ ℝ⁺))
18	15, 16, 17	syl2anc 411	. . . . . . 7 ⊢ (𝜑 → ((𝐹‘𝐾) < 𝐿 ↔ (𝐿 − (𝐹‘𝐾)) ∈ ℝ⁺))
19	18	biimpa 296	. . . . . 6 ⊢ ((𝜑 ∧ (𝐹‘𝐾) < 𝐿) → (𝐿 − (𝐹‘𝐾)) ∈ ℝ⁺)
20	6, 8, 19	rspcdva 2913	. . . . 5 ⊢ ((𝜑 ∧ (𝐹‘𝐾) < 𝐿) → ∃𝑗 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑗)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
21		fveq2 5635	. . . . . . 7 ⊢ (𝑗 = 𝑏 → (ℤ_≥‘𝑗) = (ℤ_≥‘𝑏))
22	21	raleqdv 2734	. . . . . 6 ⊢ (𝑗 = 𝑏 → (∀𝑖 ∈ (ℤ_≥‘𝑗)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))) ↔ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))))))
23	22	cbvrexv 2766	. . . . 5 ⊢ (∃𝑗 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑗)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))) ↔ ∃𝑏 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
24	20, 23	sylib 122	. . . 4 ⊢ ((𝜑 ∧ (𝐹‘𝐾) < 𝐿) → ∃𝑏 ∈ ℕ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
25		fveq2 5635	. . . . . . . . . . 11 ⊢ (𝑖 = 𝐾 → (𝐹‘𝑖) = (𝐹‘𝐾))
26	25	breq1d 4096	. . . . . . . . . 10 ⊢ (𝑖 = 𝐾 → ((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ↔ (𝐹‘𝐾) < (𝐿 + (𝐿 − (𝐹‘𝐾)))))
27	25	oveq1d 6028	. . . . . . . . . . 11 ⊢ (𝑖 = 𝐾 → ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))) = ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾))))
28	27	breq2d 4098	. . . . . . . . . 10 ⊢ (𝑖 = 𝐾 → (𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))) ↔ 𝐿 < ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾)))))
29	26, 28	anbi12d 473	. . . . . . . . 9 ⊢ (𝑖 = 𝐾 → (((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))) ↔ ((𝐹‘𝐾) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾))))))
30		simprr 531	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
31	30	adantr 276	. . . . . . . . 9 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))
32		simprl 529	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝑏 ∈ ℕ)
33	32	nnzd 9594	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝑏 ∈ ℤ)
34	33	adantr 276	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝑏 ∈ ℤ)
35	13	ad2antrr 488	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐾 ∈ ℕ)
36	35	nnzd 9594	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐾 ∈ ℤ)
37	36	adantr 276	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐾 ∈ ℤ)
38		simpr 110	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝑏 ≤ 𝐾)
39		eluz2 9754	. . . . . . . . . 10 ⊢ (𝐾 ∈ (ℤ_≥‘𝑏) ↔ (𝑏 ∈ ℤ ∧ 𝐾 ∈ ℤ ∧ 𝑏 ≤ 𝐾))
40	34, 37, 38, 39	syl3anbrc 1205	. . . . . . . . 9 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐾 ∈ (ℤ_≥‘𝑏))
41	29, 31, 40	rspcdva 2913	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → ((𝐹‘𝐾) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾)))))
42	41	simprd 114	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐿 < ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾))))
43	14	ad2antrr 488	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝐾) ∈ ℝ⁺)
44	43	rpcnd 9926	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝐾) ∈ ℂ)
45	44	adantr 276	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → (𝐹‘𝐾) ∈ ℂ)
46	16	ad2antrr 488	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐿 ∈ ℝ)
47	46	recnd 8201	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐿 ∈ ℂ)
48	47	adantr 276	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐿 ∈ ℂ)
49	45, 48	pncan3d 8486	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → ((𝐹‘𝐾) + (𝐿 − (𝐹‘𝐾))) = 𝐿)
50	42, 49	breqtrd 4112	. . . . . 6 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐿 < 𝐿)
51	16	ad3antrrr 492	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝑏 ≤ 𝐾) → 𝐿 ∈ ℝ)
52	51	ltnrd 8284	. . . . . 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 11566	. . . . . 6 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → (𝐹‘𝑏) < (𝐹‘𝐾))
60	15	ad3antrrr 492	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → (𝐹‘𝐾) ∈ ℝ)
61	12	ad2antrr 488	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐹:ℕ⟶ℝ⁺)
62	61, 32	ffvelcdmd 5779	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝑏) ∈ ℝ⁺)
63	62	rpred 9924	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝑏) ∈ ℝ)
64	63	adantr 276	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → (𝐹‘𝑏) ∈ ℝ)
65		fveq2 5635	. . . . . . . . . . . . . . 15 ⊢ (𝑖 = 𝑏 → (𝐹‘𝑖) = (𝐹‘𝑏))
66	65	breq1d 4096	. . . . . . . . . . . . . 14 ⊢ (𝑖 = 𝑏 → ((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ↔ (𝐹‘𝑏) < (𝐿 + (𝐿 − (𝐹‘𝐾)))))
67	65	oveq1d 6028	. . . . . . . . . . . . . . 15 ⊢ (𝑖 = 𝑏 → ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))) = ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾))))
68	67	breq2d 4098	. . . . . . . . . . . . . 14 ⊢ (𝑖 = 𝑏 → (𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾))) ↔ 𝐿 < ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾)))))
69	66, 68	anbi12d 473	. . . . . . . . . . . . 13 ⊢ (𝑖 = 𝑏 → (((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))) ↔ ((𝐹‘𝑏) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾))))))
70		uzid 9763	. . . . . . . . . . . . . 14 ⊢ (𝑏 ∈ ℤ → 𝑏 ∈ (ℤ_≥‘𝑏))
71	33, 70	syl 14	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝑏 ∈ (ℤ_≥‘𝑏))
72	69, 30, 71	rspcdva 2913	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ((𝐹‘𝑏) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾)))))
73	72	simprd 114	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐿 < ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾))))
74	62	rpcnd 9926	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝑏) ∈ ℂ)
75	74, 47, 44	addsubassd 8503	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (((𝐹‘𝑏) + 𝐿) − (𝐹‘𝐾)) = ((𝐹‘𝑏) + (𝐿 − (𝐹‘𝐾))))
76	73, 75	breqtrrd 4114	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → 𝐿 < (((𝐹‘𝑏) + 𝐿) − (𝐹‘𝐾)))
77	15	ad2antrr 488	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝐾) ∈ ℝ)
78	63, 46	readdcld 8202	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ((𝐹‘𝑏) + 𝐿) ∈ ℝ)
79	77, 46, 78	ltaddsub2d 8719	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (((𝐹‘𝐾) + 𝐿) < ((𝐹‘𝑏) + 𝐿) ↔ 𝐿 < (((𝐹‘𝑏) + 𝐿) − (𝐹‘𝐾))))
80	76, 79	mpbird 167	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ((𝐹‘𝐾) + 𝐿) < ((𝐹‘𝑏) + 𝐿))
81	77, 63, 46	ltadd1d 8711	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → ((𝐹‘𝐾) < (𝐹‘𝑏) ↔ ((𝐹‘𝐾) + 𝐿) < ((𝐹‘𝑏) + 𝐿)))
82	80, 81	mpbird 167	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) → (𝐹‘𝐾) < (𝐹‘𝑏))
83	82	adantr 276	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → (𝐹‘𝐾) < (𝐹‘𝑏))
84	60, 64, 83	ltnsymd 8292	. . . . . 6 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → ¬ (𝐹‘𝑏) < (𝐹‘𝐾))
85	59, 84	pm2.21fal 1415	. . . . 5 ⊢ ((((𝜑 ∧ (𝐹‘𝐾) < 𝐿) ∧ (𝑏 ∈ ℕ ∧ ∀𝑖 ∈ (ℤ_≥‘𝑏)((𝐹‘𝑖) < (𝐿 + (𝐿 − (𝐹‘𝐾))) ∧ 𝐿 < ((𝐹‘𝑖) + (𝐿 − (𝐹‘𝐾)))))) ∧ 𝐾 < 𝑏) → ⊥)
86		zlelttric 9517	. . . . . 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 8290	. 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 3667 class class class wbr 4086 × cxp 4721 ⟶wf 5320 ‘cfv 5324 (class class class)co 6013 ∈ cmpo 6015 ℂcc 8023 ℝcr 8024 0cc0 8025 1c1 8026 + caddc 8028 < clt 8207 ≤ cle 8208 − cmin 8343 / cdiv 8845 ℕcn 9136 2c2 9187 ℤcz 9472 ℤ_≥cuz 9748 ℝ⁺crp 9881 seqcseq 10702

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 4202 ax-sep 4205 ax-nul 4213 ax-pow 4262 ax-pr 4297 ax-un 4528 ax-setind 4633 ax-iinf 4684 ax-cnex 8116 ax-resscn 8117 ax-1cn 8118 ax-1re 8119 ax-icn 8120 ax-addcl 8121 ax-addrcl 8122 ax-mulcl 8123 ax-mulrcl 8124 ax-addcom 8125 ax-mulcom 8126 ax-addass 8127 ax-mulass 8128 ax-distr 8129 ax-i2m1 8130 ax-0lt1 8131 ax-1rid 8132 ax-0id 8133 ax-rnegex 8134 ax-precex 8135 ax-cnre 8136 ax-pre-ltirr 8137 ax-pre-ltwlin 8138 ax-pre-lttrn 8139 ax-pre-apti 8140 ax-pre-ltadd 8141 ax-pre-mulgt0 8142 ax-pre-mulext 8143

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 2802 df-sbc 3030 df-csb 3126 df-dif 3200 df-un 3202 df-in 3204 df-ss 3211 df-nul 3493 df-if 3604 df-pw 3652 df-sn 3673 df-pr 3674 df-op 3676 df-uni 3892 df-int 3927 df-iun 3970 df-br 4087 df-opab 4149 df-mpt 4150 df-tr 4186 df-id 4388 df-po 4391 df-iso 4392 df-iord 4461 df-on 4463 df-ilim 4464 df-suc 4466 df-iom 4687 df-xp 4729 df-rel 4730 df-cnv 4731 df-co 4732 df-dm 4733 df-rn 4734 df-res 4735 df-ima 4736 df-iota 5284 df-fun 5326 df-fn 5327 df-f 5328 df-f1 5329 df-fo 5330 df-f1o 5331 df-fv 5332 df-riota 5966 df-ov 6016 df-oprab 6017 df-mpo 6018 df-1st 6298 df-2nd 6299 df-recs 6466 df-frec 6552 df-pnf 8209 df-mnf 8210 df-xr 8211 df-ltxr 8212 df-le 8213 df-sub 8345 df-neg 8346 df-reap 8748 df-ap 8755 df-div 8846 df-inn 9137 df-2 9195 df-3 9196 df-4 9197 df-n0 9396 df-z 9473 df-uz 9749 df-rp 9882 df-seqfrec 10703 df-exp 10794

This theorem is referenced by: resqrexlemglsq 11576

W3C validator