seqf1olem1 - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > seqf1olem1		Structured version Visualization version GIF version

Theorem seqf1olem1 14184

Description: Lemma for seqf1o 14186. (Contributed by Mario Carneiro, 26-Feb-2014.) (Revised by Mario Carneiro, 27-May-2014.)

**Hypotheses**
Ref	Expression
seqf1o.1	⊢ ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆)) → (𝑥 + 𝑦) ∈ 𝑆)
seqf1o.2	⊢ ((𝜑 ∧ (𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐶)) → (𝑥 + 𝑦) = (𝑦 + 𝑥))
seqf1o.3	⊢ ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆)) → ((𝑥 + 𝑦) + 𝑧) = (𝑥 + (𝑦 + 𝑧)))
seqf1o.4	⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘𝑀))
seqf1o.5	⊢ (𝜑 → 𝐶 ⊆ 𝑆)
seqf1olem.5	⊢ (𝜑 → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
seqf1olem.6	⊢ (𝜑 → 𝐺:(𝑀...(𝑁 + 1))⟶𝐶)
seqf1olem.7	⊢ 𝐽 = (𝑘 ∈ (𝑀...𝑁) ↦ (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))
seqf1olem.8	⊢ 𝐾 = (^◡𝐹‘(𝑁 + 1))

**Assertion**
Ref	Expression
seqf1olem1	⊢ (𝜑 → 𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁))

Distinct variable groups: 𝑥,𝑘,𝑦,𝑧,𝐹 𝑘,𝐺,𝑥,𝑦,𝑧 𝑘,𝑀,𝑥,𝑦,𝑧 + ,𝑘,𝑥,𝑦,𝑧 𝑥,𝐽,𝑦,𝑧 𝑘,𝑁,𝑥,𝑦,𝑧 𝑘,𝐾,𝑥,𝑦,𝑧 𝜑,𝑘,𝑥,𝑦,𝑧 𝑆,𝑘,𝑥,𝑦,𝑧 𝐶,𝑘,𝑥,𝑦,𝑧 Allowed substitution hint: 𝐽(𝑘)

**Proof of Theorem seqf1olem1**
Step	Hyp	Ref	Expression
1		seqf1olem.7	. 2 ⊢ 𝐽 = (𝑘 ∈ (𝑀...𝑁) ↦ (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))
2		fvexd 6900	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) → (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) ∈ V)
3		fvex 6898	. . . 4 ⊢ (^◡𝐹‘𝑥) ∈ V
4		ovex 7453	. . . 4 ⊢ ((^◡𝐹‘𝑥) − 1) ∈ V
5	3, 4	ifex 4533	. . 3 ⊢ if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) ∈ V
6	5	a1i 11	. 2 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) ∈ V)
7		iftrue 4488	. . . . . . . . 9 ⊢ (𝑘 < 𝐾 → if(𝑘 < 𝐾, 𝑘, (𝑘 + 1)) = 𝑘)
8	7	fveq2d 6889	. . . . . . . 8 ⊢ (𝑘 < 𝐾 → (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) = (𝐹‘𝑘))
9	8	eqeq2d 2772	. . . . . . 7 ⊢ (𝑘 < 𝐾 → (𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) ↔ 𝑥 = (𝐹‘𝑘)))
10	9	adantl 487	. . . . . 6 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ 𝑘 < 𝐾) → (𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) ↔ 𝑥 = (𝐹‘𝑘)))
11		simprr 785	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝑥 = (𝐹‘𝑘))
12		elfzelz 13656	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ (𝑀...𝑁) → 𝑘 ∈ ℤ)
13	12	zred 12803	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ (𝑀...𝑁) → 𝑘 ∈ ℝ)
14	13	ad2antlr 740	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝑘 ∈ ℝ)
15		simprl 783	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝑘 < 𝐾)
16	14, 15	gtned 11445	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝐾 ≠ 𝑘)
17		seqf1olem.5	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
18		f1of 6824	. . . . . . . . . . . . . . . . 17 ⊢ (𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
19	17, 18	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
20	19	ad2antrr 739	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
21		fzssp1 13701	. . . . . . . . . . . . . . . 16 ⊢ (𝑀...𝑁) ⊆ (𝑀...(𝑁 + 1))
22		simplr 781	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝑘 ∈ (𝑀...𝑁))
23	21, 22	sselid 3929	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝑘 ∈ (𝑀...(𝑁 + 1)))
24	20, 23	ffvelcdmd 7085	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (𝐹‘𝑘) ∈ (𝑀...(𝑁 + 1)))
25		seqf1o.4	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘𝑀))
26		elfzp1 13708	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → ((𝐹‘𝑘) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹‘𝑘) ∈ (𝑀...𝑁) ∨ (𝐹‘𝑘) = (𝑁 + 1))))
27	25, 26	syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((𝐹‘𝑘) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹‘𝑘) ∈ (𝑀...𝑁) ∨ (𝐹‘𝑘) = (𝑁 + 1))))
28	27	ad2antrr 739	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → ((𝐹‘𝑘) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹‘𝑘) ∈ (𝑀...𝑁) ∨ (𝐹‘𝑘) = (𝑁 + 1))))
29	24, 28	mpbid 235	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → ((𝐹‘𝑘) ∈ (𝑀...𝑁) ∨ (𝐹‘𝑘) = (𝑁 + 1)))
30	29	ord 878	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (¬ (𝐹‘𝑘) ∈ (𝑀...𝑁) → (𝐹‘𝑘) = (𝑁 + 1)))
31	17	ad2antrr 739	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
32		f1ocnvfv 7286	. . . . . . . . . . . . . 14 ⊢ ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ 𝑘 ∈ (𝑀...(𝑁 + 1))) → ((𝐹‘𝑘) = (𝑁 + 1) → (^◡𝐹‘(𝑁 + 1)) = 𝑘))
33	31, 23, 32	syl2anc 596	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → ((𝐹‘𝑘) = (𝑁 + 1) → (^◡𝐹‘(𝑁 + 1)) = 𝑘))
34		seqf1olem.8	. . . . . . . . . . . . . 14 ⊢ 𝐾 = (^◡𝐹‘(𝑁 + 1))
35	34	eqeq1i 2766	. . . . . . . . . . . . 13 ⊢ (𝐾 = 𝑘 ↔ (^◡𝐹‘(𝑁 + 1)) = 𝑘)
36	33, 35	imbitrrdi 255	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → ((𝐹‘𝑘) = (𝑁 + 1) → 𝐾 = 𝑘))
37	30, 36	syld 48	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (¬ (𝐹‘𝑘) ∈ (𝑀...𝑁) → 𝐾 = 𝑘))
38	37	necon1ad 2973	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (𝐾 ≠ 𝑘 → (𝐹‘𝑘) ∈ (𝑀...𝑁)))
39	16, 38	mpd 16	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (𝐹‘𝑘) ∈ (𝑀...𝑁))
40	11, 39	eqeltrd 2861	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝑥 ∈ (𝑀...𝑁))
41	11	eqcomd 2767	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (𝐹‘𝑘) = 𝑥)
42		f1ocnvfv 7286	. . . . . . . . . . . . 13 ⊢ ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ 𝑘 ∈ (𝑀...(𝑁 + 1))) → ((𝐹‘𝑘) = 𝑥 → (^◡𝐹‘𝑥) = 𝑘))
43	31, 23, 42	syl2anc 596	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → ((𝐹‘𝑘) = 𝑥 → (^◡𝐹‘𝑥) = 𝑘))
44	41, 43	mpd 16	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (^◡𝐹‘𝑥) = 𝑘)
45	44, 15	eqbrtrd 5127	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (^◡𝐹‘𝑥) < 𝐾)
46		iftrue 4488	. . . . . . . . . 10 ⊢ ((^◡𝐹‘𝑥) < 𝐾 → if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) = (^◡𝐹‘𝑥))
47	45, 46	syl 18	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) = (^◡𝐹‘𝑥))
48	47, 44	eqtr2d 2797	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))
49	40, 48	jca 521	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1))))
50	49	expr 462	. . . . . 6 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ 𝑘 < 𝐾) → (𝑥 = (𝐹‘𝑘) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))))
51	10, 50	sylbid 243	. . . . 5 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ 𝑘 < 𝐾) → (𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))))
52		iffalse 4491	. . . . . . . . 9 ⊢ (¬ 𝑘 < 𝐾 → if(𝑘 < 𝐾, 𝑘, (𝑘 + 1)) = (𝑘 + 1))
53	52	fveq2d 6889	. . . . . . . 8 ⊢ (¬ 𝑘 < 𝐾 → (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) = (𝐹‘(𝑘 + 1)))
54	53	eqeq2d 2772	. . . . . . 7 ⊢ (¬ 𝑘 < 𝐾 → (𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) ↔ 𝑥 = (𝐹‘(𝑘 + 1))))
55	54	adantl 487	. . . . . 6 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ ¬ 𝑘 < 𝐾) → (𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) ↔ 𝑥 = (𝐹‘(𝑘 + 1))))
56		simprr 785	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝑥 = (𝐹‘(𝑘 + 1)))
57		f1ocnv 6837	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) → ^◡𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
58	17, 57	syl 18	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ^◡𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
59		f1of1 6823	. . . . . . . . . . . . . . . . . 18 ⊢ (^◡𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) → ^◡𝐹:(𝑀...(𝑁 + 1))–1-1→(𝑀...(𝑁 + 1)))
60	58, 59	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ^◡𝐹:(𝑀...(𝑁 + 1))–1-1→(𝑀...(𝑁 + 1)))
61		f1f 6778	. . . . . . . . . . . . . . . . 17 ⊢ (^◡𝐹:(𝑀...(𝑁 + 1))–1-1→(𝑀...(𝑁 + 1)) → ^◡𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
62	60, 61	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ^◡𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
63		peano2uz 13028	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → (𝑁 + 1) ∈ (ℤ_≥‘𝑀))
64	25, 63	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝑁 + 1) ∈ (ℤ_≥‘𝑀))
65		eluzfz2 13665	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 + 1) ∈ (ℤ_≥‘𝑀) → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
66	64, 65	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
67	62, 66	ffvelcdmd 7085	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (^◡𝐹‘(𝑁 + 1)) ∈ (𝑀...(𝑁 + 1)))
68	34, 67	eqeltrid 2865	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐾 ∈ (𝑀...(𝑁 + 1)))
69	68	elfzelzd 13657	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐾 ∈ ℤ)
70	69	zred 12803	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐾 ∈ ℝ)
71	70	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝐾 ∈ ℝ)
72	13	ad2antlr 740	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝑘 ∈ ℝ)
73		peano2re 11483	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℝ → (𝑘 + 1) ∈ ℝ)
74	72, 73	syl 18	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (𝑘 + 1) ∈ ℝ)
75		simprl 783	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ¬ 𝑘 < 𝐾)
76	71, 72, 75	nltled 11460	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝐾 ≤ 𝑘)
77	72	ltp1d 12247	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝑘 < (𝑘 + 1))
78	71, 72, 74, 76, 77	lelttrd 11468	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝐾 < (𝑘 + 1))
79	71, 78	ltned 11446	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝐾 ≠ (𝑘 + 1))
80	19	ad2antrr 739	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
81		fzp1elp1 13711	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ (𝑀...𝑁) → (𝑘 + 1) ∈ (𝑀...(𝑁 + 1)))
82	81	ad2antlr 740	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (𝑘 + 1) ∈ (𝑀...(𝑁 + 1)))
83	80, 82	ffvelcdmd 7085	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (𝐹‘(𝑘 + 1)) ∈ (𝑀...(𝑁 + 1)))
84		elfzp1 13708	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → ((𝐹‘(𝑘 + 1)) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁) ∨ (𝐹‘(𝑘 + 1)) = (𝑁 + 1))))
85	25, 84	syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((𝐹‘(𝑘 + 1)) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁) ∨ (𝐹‘(𝑘 + 1)) = (𝑁 + 1))))
86	85	ad2antrr 739	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝐹‘(𝑘 + 1)) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁) ∨ (𝐹‘(𝑘 + 1)) = (𝑁 + 1))))
87	83, 86	mpbid 235	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁) ∨ (𝐹‘(𝑘 + 1)) = (𝑁 + 1)))
88	87	ord 878	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (¬ (𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁) → (𝐹‘(𝑘 + 1)) = (𝑁 + 1)))
89	17	ad2antrr 739	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
90		f1ocnvfv 7286	. . . . . . . . . . . . . 14 ⊢ ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ (𝑘 + 1) ∈ (𝑀...(𝑁 + 1))) → ((𝐹‘(𝑘 + 1)) = (𝑁 + 1) → (^◡𝐹‘(𝑁 + 1)) = (𝑘 + 1)))
91	89, 82, 90	syl2anc 596	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝐹‘(𝑘 + 1)) = (𝑁 + 1) → (^◡𝐹‘(𝑁 + 1)) = (𝑘 + 1)))
92	34	eqeq1i 2766	. . . . . . . . . . . . 13 ⊢ (𝐾 = (𝑘 + 1) ↔ (^◡𝐹‘(𝑁 + 1)) = (𝑘 + 1))
93	91, 92	imbitrrdi 255	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝐹‘(𝑘 + 1)) = (𝑁 + 1) → 𝐾 = (𝑘 + 1)))
94	88, 93	syld 48	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (¬ (𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁) → 𝐾 = (𝑘 + 1)))
95	94	necon1ad 2973	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (𝐾 ≠ (𝑘 + 1) → (𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁)))
96	79, 95	mpd 16	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁))
97	56, 96	eqeltrd 2861	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝑥 ∈ (𝑀...𝑁))
98	56	eqcomd 2767	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (𝐹‘(𝑘 + 1)) = 𝑥)
99		f1ocnvfv 7286	. . . . . . . . . . . . . . 15 ⊢ ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ (𝑘 + 1) ∈ (𝑀...(𝑁 + 1))) → ((𝐹‘(𝑘 + 1)) = 𝑥 → (^◡𝐹‘𝑥) = (𝑘 + 1)))
100	89, 82, 99	syl2anc 596	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝐹‘(𝑘 + 1)) = 𝑥 → (^◡𝐹‘𝑥) = (𝑘 + 1)))
101	98, 100	mpd 16	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (^◡𝐹‘𝑥) = (𝑘 + 1))
102	101	breq1d 5113	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((^◡𝐹‘𝑥) < 𝐾 ↔ (𝑘 + 1) < 𝐾))
103		lttr 11386	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℝ ∧ (𝑘 + 1) ∈ ℝ ∧ 𝐾 ∈ ℝ) → ((𝑘 < (𝑘 + 1) ∧ (𝑘 + 1) < 𝐾) → 𝑘 < 𝐾))
104	72, 74, 71, 103	syl3anc 1398	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝑘 < (𝑘 + 1) ∧ (𝑘 + 1) < 𝐾) → 𝑘 < 𝐾))
105	77, 104	mpand 708	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝑘 + 1) < 𝐾 → 𝑘 < 𝐾))
106	102, 105	sylbid 243	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((^◡𝐹‘𝑥) < 𝐾 → 𝑘 < 𝐾))
107	75, 106	mtod 201	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ¬ (^◡𝐹‘𝑥) < 𝐾)
108		iffalse 4491	. . . . . . . . . 10 ⊢ (¬ (^◡𝐹‘𝑥) < 𝐾 → if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) = ((^◡𝐹‘𝑥) − 1))
109	107, 108	syl 18	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) = ((^◡𝐹‘𝑥) − 1))
110	101	oveq1d 7435	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((^◡𝐹‘𝑥) − 1) = ((𝑘 + 1) − 1))
111	72	recnd 11337	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝑘 ∈ ℂ)
112		ax-1cn 11258	. . . . . . . . . 10 ⊢ 1 ∈ ℂ
113		pncan 11563	. . . . . . . . . 10 ⊢ ((𝑘 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑘 + 1) − 1) = 𝑘)
114	111, 112, 113	sylancl 598	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝑘 + 1) − 1) = 𝑘)
115	109, 110, 114	3eqtrrd 2801	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))
116	97, 115	jca 521	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1))))
117	116	expr 462	. . . . . 6 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ ¬ 𝑘 < 𝐾) → (𝑥 = (𝐹‘(𝑘 + 1)) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))))
118	55, 117	sylbid 243	. . . . 5 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ ¬ 𝑘 < 𝐾) → (𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))))
119	51, 118	pm2.61dan 825	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) → (𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))))
120	119	expimpd 459	. . 3 ⊢ (𝜑 → ((𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1)))) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))))
121	46	eqeq2d 2772	. . . . . . 7 ⊢ ((^◡𝐹‘𝑥) < 𝐾 → (𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) ↔ 𝑘 = (^◡𝐹‘𝑥)))
122	121	adantl 487	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (^◡𝐹‘𝑥) < 𝐾) → (𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) ↔ 𝑘 = (^◡𝐹‘𝑥)))
123		eluzel2 12970	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → 𝑀 ∈ ℤ)
124	25, 123	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → 𝑀 ∈ ℤ)
125	124	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑀 ∈ ℤ)
126		eluzelz 12975	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → 𝑁 ∈ ℤ)
127	25, 126	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ ℤ)
128	127	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑁 ∈ ℤ)
129		simprr 785	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 = (^◡𝐹‘𝑥))
130	62	ad2antrr 739	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → ^◡𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
131		simplr 781	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑥 ∈ (𝑀...𝑁))
132	21, 131	sselid 3929	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
133	130, 132	ffvelcdmd 7085	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (^◡𝐹‘𝑥) ∈ (𝑀...(𝑁 + 1)))
134	129, 133	eqeltrd 2861	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 ∈ (𝑀...(𝑁 + 1)))
135	134	elfzelzd 13657	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 ∈ ℤ)
136		elfzle1 13660	. . . . . . . . . 10 ⊢ (𝑘 ∈ (𝑀...(𝑁 + 1)) → 𝑀 ≤ 𝑘)
137	134, 136	syl 18	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑀 ≤ 𝑘)
138	135	zred 12803	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 ∈ ℝ)
139	70	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝐾 ∈ ℝ)
140	127	peano2zd 12806	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑁 + 1) ∈ ℤ)
141	140	zred 12803	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑁 + 1) ∈ ℝ)
142	141	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (𝑁 + 1) ∈ ℝ)
143		simprl 783	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (^◡𝐹‘𝑥) < 𝐾)
144	129, 143	eqbrtrd 5127	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 < 𝐾)
145		elfzle2 13661	. . . . . . . . . . . . 13 ⊢ (𝐾 ∈ (𝑀...(𝑁 + 1)) → 𝐾 ≤ (𝑁 + 1))
146	68, 145	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐾 ≤ (𝑁 + 1))
147	146	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝐾 ≤ (𝑁 + 1))
148	138, 139, 142, 144, 147	ltletrd 11470	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 < (𝑁 + 1))
149		zleltp1 12747	. . . . . . . . . . 11 ⊢ ((𝑘 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑘 ≤ 𝑁 ↔ 𝑘 < (𝑁 + 1)))
150	135, 128, 149	syl2anc 596	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (𝑘 ≤ 𝑁 ↔ 𝑘 < (𝑁 + 1)))
151	148, 150	mpbird 260	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 ≤ 𝑁)
152	125, 128, 135, 137, 151	elfzd 13647	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 ∈ (𝑀...𝑁))
153	144, 8	syl 18	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) = (𝐹‘𝑘))
154	129	fveq2d 6889	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (𝐹‘𝑘) = (𝐹‘(^◡𝐹‘𝑥)))
155	17	ad2antrr 739	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
156		f1ocnvfv2 7285	. . . . . . . . . 10 ⊢ ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...(𝑁 + 1))) → (𝐹‘(^◡𝐹‘𝑥)) = 𝑥)
157	155, 132, 156	syl2anc 596	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (𝐹‘(^◡𝐹‘𝑥)) = 𝑥)
158	153, 154, 157	3eqtrrd 2801	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))
159	152, 158	jca 521	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1)))))
160	159	expr 462	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (^◡𝐹‘𝑥) < 𝐾) → (𝑘 = (^◡𝐹‘𝑥) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))))
161	122, 160	sylbid 243	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (^◡𝐹‘𝑥) < 𝐾) → (𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))))
162	108	eqeq2d 2772	. . . . . . 7 ⊢ (¬ (^◡𝐹‘𝑥) < 𝐾 → (𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) ↔ 𝑘 = ((^◡𝐹‘𝑥) − 1)))
163	162	adantl 487	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ¬ (^◡𝐹‘𝑥) < 𝐾) → (𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) ↔ 𝑘 = ((^◡𝐹‘𝑥) − 1)))
164	124	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑀 ∈ ℤ)
165	127	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑁 ∈ ℤ)
166		simprr 785	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑘 = ((^◡𝐹‘𝑥) − 1))
167	62	ad2antrr 739	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ^◡𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
168		simplr 781	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑥 ∈ (𝑀...𝑁))
169	21, 168	sselid 3929	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
170	167, 169	ffvelcdmd 7085	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (^◡𝐹‘𝑥) ∈ (𝑀...(𝑁 + 1)))
171	170	elfzelzd 13657	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (^◡𝐹‘𝑥) ∈ ℤ)
172		peano2zm 12739	. . . . . . . . . . 11 ⊢ ((^◡𝐹‘𝑥) ∈ ℤ → ((^◡𝐹‘𝑥) − 1) ∈ ℤ)
173	171, 172	syl 18	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ((^◡𝐹‘𝑥) − 1) ∈ ℤ)
174	166, 173	eqeltrd 2861	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑘 ∈ ℤ)
175	124	zred 12803	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑀 ∈ ℝ)
176	175	ad2antrr 739	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑀 ∈ ℝ)
177	70	ad2antrr 739	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐾 ∈ ℝ)
178	174	zred 12803	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑘 ∈ ℝ)
179		elfzle1 13660	. . . . . . . . . . . 12 ⊢ (𝐾 ∈ (𝑀...(𝑁 + 1)) → 𝑀 ≤ 𝐾)
180	68, 179	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑀 ≤ 𝐾)
181	180	ad2antrr 739	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑀 ≤ 𝐾)
182	171	zred 12803	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (^◡𝐹‘𝑥) ∈ ℝ)
183		simprl 783	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ¬ (^◡𝐹‘𝑥) < 𝐾)
184	177, 182, 183	nltled 11460	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐾 ≤ (^◡𝐹‘𝑥))
185		elfzelz 13656	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 ∈ (𝑀...𝑁) → 𝑥 ∈ ℤ)
186	185	adantl 487	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 ∈ ℤ)
187	186	zred 12803	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 ∈ ℝ)
188	127	zred 12803	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → 𝑁 ∈ ℝ)
189	188	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑁 ∈ ℝ)
190	141	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝑁 + 1) ∈ ℝ)
191		elfzle2 13661	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 ∈ (𝑀...𝑁) → 𝑥 ≤ 𝑁)
192	191	adantl 487	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 ≤ 𝑁)
193	189	ltp1d 12247	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑁 < (𝑁 + 1))
194	187, 189, 190, 192, 193	lelttrd 11468	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 < (𝑁 + 1))
195	187, 194	gtned 11445	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝑁 + 1) ≠ 𝑥)
196	195	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝑁 + 1) ≠ 𝑥)
197	60	ad2antrr 739	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ^◡𝐹:(𝑀...(𝑁 + 1))–1-1→(𝑀...(𝑁 + 1)))
198	66	ad2antrr 739	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
199		f1fveq 7266	. . . . . . . . . . . . . . . . . 18 ⊢ ((^◡𝐹:(𝑀...(𝑁 + 1))–1-1→(𝑀...(𝑁 + 1)) ∧ ((𝑁 + 1) ∈ (𝑀...(𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...(𝑁 + 1)))) → ((^◡𝐹‘(𝑁 + 1)) = (^◡𝐹‘𝑥) ↔ (𝑁 + 1) = 𝑥))
200	197, 198, 169, 199	syl12anc 850	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ((^◡𝐹‘(𝑁 + 1)) = (^◡𝐹‘𝑥) ↔ (𝑁 + 1) = 𝑥))
201	200	necon3bid 3000	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ((^◡𝐹‘(𝑁 + 1)) ≠ (^◡𝐹‘𝑥) ↔ (𝑁 + 1) ≠ 𝑥))
202	196, 201	mpbird 260	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (^◡𝐹‘(𝑁 + 1)) ≠ (^◡𝐹‘𝑥))
203	34	neeq1i 3020	. . . . . . . . . . . . . . 15 ⊢ (𝐾 ≠ (^◡𝐹‘𝑥) ↔ (^◡𝐹‘(𝑁 + 1)) ≠ (^◡𝐹‘𝑥))
204	202, 203	sylibr 237	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐾 ≠ (^◡𝐹‘𝑥))
205	204	necomd 3011	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (^◡𝐹‘𝑥) ≠ 𝐾)
206	177, 182, 184, 205	leneltd 11464	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐾 < (^◡𝐹‘𝑥))
207	69	ad2antrr 739	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐾 ∈ ℤ)
208		zltlem1 12749	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℤ ∧ (^◡𝐹‘𝑥) ∈ ℤ) → (𝐾 < (^◡𝐹‘𝑥) ↔ 𝐾 ≤ ((^◡𝐹‘𝑥) − 1)))
209	207, 171, 208	syl2anc 596	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝐾 < (^◡𝐹‘𝑥) ↔ 𝐾 ≤ ((^◡𝐹‘𝑥) − 1)))
210	206, 209	mpbid 235	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐾 ≤ ((^◡𝐹‘𝑥) − 1))
211	210, 166	breqtrrd 5133	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐾 ≤ 𝑘)
212	176, 177, 178, 181, 211	letrd 11467	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑀 ≤ 𝑘)
213		elfzle2 13661	. . . . . . . . . . . 12 ⊢ ((^◡𝐹‘𝑥) ∈ (𝑀...(𝑁 + 1)) → (^◡𝐹‘𝑥) ≤ (𝑁 + 1))
214	170, 213	syl 18	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (^◡𝐹‘𝑥) ≤ (𝑁 + 1))
215	188	ad2antrr 739	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑁 ∈ ℝ)
216		1re 11308	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℝ
217		lesubadd 11788	. . . . . . . . . . . . 13 ⊢ (((^◡𝐹‘𝑥) ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (((^◡𝐹‘𝑥) − 1) ≤ 𝑁 ↔ (^◡𝐹‘𝑥) ≤ (𝑁 + 1)))
218	216, 217	mp3an2 1478	. . . . . . . . . . . 12 ⊢ (((^◡𝐹‘𝑥) ∈ ℝ ∧ 𝑁 ∈ ℝ) → (((^◡𝐹‘𝑥) − 1) ≤ 𝑁 ↔ (^◡𝐹‘𝑥) ≤ (𝑁 + 1)))
219	182, 215, 218	syl2anc 596	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (((^◡𝐹‘𝑥) − 1) ≤ 𝑁 ↔ (^◡𝐹‘𝑥) ≤ (𝑁 + 1)))
220	214, 219	mpbird 260	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ((^◡𝐹‘𝑥) − 1) ≤ 𝑁)
221	166, 220	eqbrtrd 5127	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑘 ≤ 𝑁)
222	164, 165, 174, 212, 221	elfzd 13647	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑘 ∈ (𝑀...𝑁))
223	177, 178, 211	lensymd 11461	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ¬ 𝑘 < 𝐾)
224	223, 53	syl 18	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) = (𝐹‘(𝑘 + 1)))
225	166	oveq1d 7435	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝑘 + 1) = (((^◡𝐹‘𝑥) − 1) + 1))
226	171	zcnd 12804	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (^◡𝐹‘𝑥) ∈ ℂ)
227		npcan 11566	. . . . . . . . . . . 12 ⊢ (((^◡𝐹‘𝑥) ∈ ℂ ∧ 1 ∈ ℂ) → (((^◡𝐹‘𝑥) − 1) + 1) = (^◡𝐹‘𝑥))
228	226, 112, 227	sylancl 598	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (((^◡𝐹‘𝑥) − 1) + 1) = (^◡𝐹‘𝑥))
229	225, 228	eqtrd 2796	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝑘 + 1) = (^◡𝐹‘𝑥))
230	229	fveq2d 6889	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝐹‘(𝑘 + 1)) = (𝐹‘(^◡𝐹‘𝑥)))
231	17	ad2antrr 739	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
232	231, 169, 156	syl2anc 596	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝐹‘(^◡𝐹‘𝑥)) = 𝑥)
233	224, 230, 232	3eqtrrd 2801	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))
234	222, 233	jca 521	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1)))))
235	234	expr 462	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ¬ (^◡𝐹‘𝑥) < 𝐾) → (𝑘 = ((^◡𝐹‘𝑥) − 1) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))))
236	163, 235	sylbid 243	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ¬ (^◡𝐹‘𝑥) < 𝐾) → (𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))))
237	161, 236	pm2.61dan 825	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))))
238	237	expimpd 459	. . 3 ⊢ (𝜑 → ((𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1))) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))))
239	120, 238	impbid 215	. 2 ⊢ (𝜑 → ((𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1)))) ↔ (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))))
240	1, 2, 6, 239	f1od 7673	1 ⊢ (𝜑 → 𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁))

Colors of variables: wff setvar class

This proof depends on syntax axioms: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 401 ∨ wo 861 ∧ w3a 1103 = wceq 1570 ∈ wcel 2145 ≠ wne 2956 Vcvv 3451 ⊆ wss 3899 ifcif 4482 class class class wbr 5103 ↦ cmpt 5186 ^◡ccnv 5650 ⟶wf 6534 –1-1→wf1 6535 –1-1-onto→wf1o 6537 ‘cfv 6538 (class class class)co 7420 ℂcc 11198 ℝcr 11199 1c1 11201 + caddc 11203 < clt 11343 ≤ cle 11344 − cmin 11541 ℤcz 12693 ℤ_≥cuz 12965 ...cfz 13639

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2213 ax-ext 2733 ax-sep 5249 ax-nul 5260 ax-pow 5327 ax-pr 5391 ax-un 7751 ax-cnex 11256 ax-resscn 11257 ax-1cn 11258 ax-icn 11259 ax-addcl 11260 ax-addrcl 11261 ax-mulcl 11262 ax-mulrcl 11263 ax-mulcom 11264 ax-addass 11265 ax-mulass 11266 ax-distr 11267 ax-i2m1 11268 ax-1ne0 11269 ax-1rid 11270 ax-rnegex 11271 ax-rrecex 11272 ax-cnre 11273 ax-pre-lttri 11274 ax-pre-lttrn 11275 ax-pre-ltadd 11276 ax-pre-mulgt0 11277

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2565 df-eu 2595 df-clab 2740 df-cleq 2753 df-clel 2836 df-nfc 2910 df-ne 2957 df-nel 3063 df-ral 3078 df-rex 3088 df-reu 3367 df-rab 3414 df-v 3453 df-sbc 3740 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4280 df-if 4483 df-pw 4559 df-sn 4585 df-pr 4587 df-op 4591 df-uni 4868 df-iun 4953 df-br 5104 df-opab 5168 df-mpt 5187 df-tr 5213 df-id 5546 df-eprel 5551 df-po 5559 df-so 5560 df-fr 5604 df-we 5606 df-xp 5657 df-rel 5658 df-cnv 5659 df-co 5660 df-dm 5661 df-rn 5662 df-res 5663 df-ima 5664 df-pred 6304 df-ord 6365 df-on 6366 df-lim 6367 df-suc 6368 df-iota 6494 df-fun 6540 df-fn 6541 df-f 6542 df-f1 6543 df-fo 6544 df-f1o 6545 df-fv 6546 df-riota 7377 df-ov 7423 df-oprab 7424 df-mpo 7425 df-om 7878 df-1st 8001 df-2nd 8002 df-frecs 8299 df-wrecs 8330 df-recs 8379 df-rdg 8418 df-er 8717 df-en 8974 df-dom 8975 df-sdom 8976 df-pnf 11345 df-mnf 11346 df-xr 11347 df-ltxr 11348 df-le 11349 df-sub 11543 df-neg 11544 df-nn 12336 df-n0 12607 df-z 12694 df-uz 12966 df-fz 13640

This theorem is used by: seqf1olem2 14185

W3C validator