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 12840

Description: Lemma for seqf1o 12842. (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 6203	. 2 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) → (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) ∈ V)
3		fvex 6201	. . . 4 ⊢ (^◡𝐹‘𝑥) ∈ V
4		ovex 6678	. . . 4 ⊢ ((^◡𝐹‘𝑥) − 1) ∈ V
5	3, 4	ifex 4156	. . 3 ⊢ if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) ∈ V
6	5	a1i 11	. 2 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) ∈ V)
7		iftrue 4092	. . . . . . . . 9 ⊢ (𝑘 < 𝐾 → if(𝑘 < 𝐾, 𝑘, (𝑘 + 1)) = 𝑘)
8	7	fveq2d 6195	. . . . . . . 8 ⊢ (𝑘 < 𝐾 → (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) = (𝐹‘𝑘))
9	8	eqeq2d 2632	. . . . . . 7 ⊢ (𝑘 < 𝐾 → (𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) ↔ 𝑥 = (𝐹‘𝑘)))
10	9	adantl 482	. . . . . 6 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ 𝑘 < 𝐾) → (𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) ↔ 𝑥 = (𝐹‘𝑘)))
11		simprr 796	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝑥 = (𝐹‘𝑘))
12		elfzelz 12342	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ (𝑀...𝑁) → 𝑘 ∈ ℤ)
13	12	zred 11482	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ (𝑀...𝑁) → 𝑘 ∈ ℝ)
14	13	ad2antlr 763	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝑘 ∈ ℝ)
15		simprl 794	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝑘 < 𝐾)
16	14, 15	gtned 10172	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝐾 ≠ 𝑘)
17		seqf1olem.5	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
18		f1of 6137	. . . . . . . . . . . . . . . . 17 ⊢ (𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
19	17, 18	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
20	19	ad2antrr 762	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
21		fzssp1 12384	. . . . . . . . . . . . . . . 16 ⊢ (𝑀...𝑁) ⊆ (𝑀...(𝑁 + 1))
22		simplr 792	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝑘 ∈ (𝑀...𝑁))
23	21, 22	sseldi 3601	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝑘 ∈ (𝑀...(𝑁 + 1)))
24	20, 23	ffvelrnd 6360	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (𝐹‘𝑘) ∈ (𝑀...(𝑁 + 1)))
25		seqf1o.4	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘𝑀))
26		elfzp1 12391	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → ((𝐹‘𝑘) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹‘𝑘) ∈ (𝑀...𝑁) ∨ (𝐹‘𝑘) = (𝑁 + 1))))
27	25, 26	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((𝐹‘𝑘) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹‘𝑘) ∈ (𝑀...𝑁) ∨ (𝐹‘𝑘) = (𝑁 + 1))))
28	27	ad2antrr 762	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → ((𝐹‘𝑘) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹‘𝑘) ∈ (𝑀...𝑁) ∨ (𝐹‘𝑘) = (𝑁 + 1))))
29	24, 28	mpbid 222	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → ((𝐹‘𝑘) ∈ (𝑀...𝑁) ∨ (𝐹‘𝑘) = (𝑁 + 1)))
30	29	ord 392	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (¬ (𝐹‘𝑘) ∈ (𝑀...𝑁) → (𝐹‘𝑘) = (𝑁 + 1)))
31	17	ad2antrr 762	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
32		f1ocnvfv 6534	. . . . . . . . . . . . . 14 ⊢ ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ 𝑘 ∈ (𝑀...(𝑁 + 1))) → ((𝐹‘𝑘) = (𝑁 + 1) → (^◡𝐹‘(𝑁 + 1)) = 𝑘))
33	31, 23, 32	syl2anc 693	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → ((𝐹‘𝑘) = (𝑁 + 1) → (^◡𝐹‘(𝑁 + 1)) = 𝑘))
34		seqf1olem.8	. . . . . . . . . . . . . 14 ⊢ 𝐾 = (^◡𝐹‘(𝑁 + 1))
35	34	eqeq1i 2627	. . . . . . . . . . . . 13 ⊢ (𝐾 = 𝑘 ↔ (^◡𝐹‘(𝑁 + 1)) = 𝑘)
36	33, 35	syl6ibr 242	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → ((𝐹‘𝑘) = (𝑁 + 1) → 𝐾 = 𝑘))
37	30, 36	syld 47	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (¬ (𝐹‘𝑘) ∈ (𝑀...𝑁) → 𝐾 = 𝑘))
38	37	necon1ad 2811	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (𝐾 ≠ 𝑘 → (𝐹‘𝑘) ∈ (𝑀...𝑁)))
39	16, 38	mpd 15	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (𝐹‘𝑘) ∈ (𝑀...𝑁))
40	11, 39	eqeltrd 2701	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝑥 ∈ (𝑀...𝑁))
41	11	eqcomd 2628	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (𝐹‘𝑘) = 𝑥)
42		f1ocnvfv 6534	. . . . . . . . . . . . 13 ⊢ ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ 𝑘 ∈ (𝑀...(𝑁 + 1))) → ((𝐹‘𝑘) = 𝑥 → (^◡𝐹‘𝑥) = 𝑘))
43	31, 23, 42	syl2anc 693	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → ((𝐹‘𝑘) = 𝑥 → (^◡𝐹‘𝑥) = 𝑘))
44	41, 43	mpd 15	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (^◡𝐹‘𝑥) = 𝑘)
45	44, 15	eqbrtrd 4675	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (^◡𝐹‘𝑥) < 𝐾)
46		iftrue 4092	. . . . . . . . . 10 ⊢ ((^◡𝐹‘𝑥) < 𝐾 → if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) = (^◡𝐹‘𝑥))
47	45, 46	syl 17	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) = (^◡𝐹‘𝑥))
48	47, 44	eqtr2d 2657	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))
49	40, 48	jca 554	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘𝑘))) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1))))
50	49	expr 643	. . . . . 6 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ 𝑘 < 𝐾) → (𝑥 = (𝐹‘𝑘) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))))
51	10, 50	sylbid 230	. . . . 5 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ 𝑘 < 𝐾) → (𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))))
52		iffalse 4095	. . . . . . . . 9 ⊢ (¬ 𝑘 < 𝐾 → if(𝑘 < 𝐾, 𝑘, (𝑘 + 1)) = (𝑘 + 1))
53	52	fveq2d 6195	. . . . . . . 8 ⊢ (¬ 𝑘 < 𝐾 → (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) = (𝐹‘(𝑘 + 1)))
54	53	eqeq2d 2632	. . . . . . 7 ⊢ (¬ 𝑘 < 𝐾 → (𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) ↔ 𝑥 = (𝐹‘(𝑘 + 1))))
55	54	adantl 482	. . . . . 6 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ ¬ 𝑘 < 𝐾) → (𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) ↔ 𝑥 = (𝐹‘(𝑘 + 1))))
56		simprr 796	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝑥 = (𝐹‘(𝑘 + 1)))
57		f1ocnv 6149	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) → ^◡𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
58	17, 57	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ^◡𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
59		f1of1 6136	. . . . . . . . . . . . . . . . . 18 ⊢ (^◡𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) → ^◡𝐹:(𝑀...(𝑁 + 1))–1-1→(𝑀...(𝑁 + 1)))
60	58, 59	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ^◡𝐹:(𝑀...(𝑁 + 1))–1-1→(𝑀...(𝑁 + 1)))
61		f1f 6101	. . . . . . . . . . . . . . . . 17 ⊢ (^◡𝐹:(𝑀...(𝑁 + 1))–1-1→(𝑀...(𝑁 + 1)) → ^◡𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
62	60, 61	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ^◡𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
63		peano2uz 11741	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → (𝑁 + 1) ∈ (ℤ_≥‘𝑀))
64	25, 63	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝑁 + 1) ∈ (ℤ_≥‘𝑀))
65		eluzfz2 12349	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 + 1) ∈ (ℤ_≥‘𝑀) → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
66	64, 65	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
67	62, 66	ffvelrnd 6360	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (^◡𝐹‘(𝑁 + 1)) ∈ (𝑀...(𝑁 + 1)))
68	34, 67	syl5eqel 2705	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐾 ∈ (𝑀...(𝑁 + 1)))
69		elfzelz 12342	. . . . . . . . . . . . . 14 ⊢ (𝐾 ∈ (𝑀...(𝑁 + 1)) → 𝐾 ∈ ℤ)
70	68, 69	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐾 ∈ ℤ)
71	70	zred 11482	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐾 ∈ ℝ)
72	71	ad2antrr 762	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝐾 ∈ ℝ)
73	13	ad2antlr 763	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝑘 ∈ ℝ)
74		peano2re 10209	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℝ → (𝑘 + 1) ∈ ℝ)
75	73, 74	syl 17	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (𝑘 + 1) ∈ ℝ)
76		simprl 794	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ¬ 𝑘 < 𝐾)
77	72, 73	lenltd 10183	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (𝐾 ≤ 𝑘 ↔ ¬ 𝑘 < 𝐾))
78	76, 77	mpbird 247	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝐾 ≤ 𝑘)
79	73	ltp1d 10954	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝑘 < (𝑘 + 1))
80	72, 73, 75, 78, 79	lelttrd 10195	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝐾 < (𝑘 + 1))
81	72, 80	ltned 10173	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝐾 ≠ (𝑘 + 1))
82	19	ad2antrr 762	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
83		fzp1elp1 12394	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ (𝑀...𝑁) → (𝑘 + 1) ∈ (𝑀...(𝑁 + 1)))
84	83	ad2antlr 763	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (𝑘 + 1) ∈ (𝑀...(𝑁 + 1)))
85	82, 84	ffvelrnd 6360	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (𝐹‘(𝑘 + 1)) ∈ (𝑀...(𝑁 + 1)))
86		elfzp1 12391	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → ((𝐹‘(𝑘 + 1)) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁) ∨ (𝐹‘(𝑘 + 1)) = (𝑁 + 1))))
87	25, 86	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((𝐹‘(𝑘 + 1)) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁) ∨ (𝐹‘(𝑘 + 1)) = (𝑁 + 1))))
88	87	ad2antrr 762	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝐹‘(𝑘 + 1)) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁) ∨ (𝐹‘(𝑘 + 1)) = (𝑁 + 1))))
89	85, 88	mpbid 222	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁) ∨ (𝐹‘(𝑘 + 1)) = (𝑁 + 1)))
90	89	ord 392	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (¬ (𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁) → (𝐹‘(𝑘 + 1)) = (𝑁 + 1)))
91	17	ad2antrr 762	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
92		f1ocnvfv 6534	. . . . . . . . . . . . . 14 ⊢ ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ (𝑘 + 1) ∈ (𝑀...(𝑁 + 1))) → ((𝐹‘(𝑘 + 1)) = (𝑁 + 1) → (^◡𝐹‘(𝑁 + 1)) = (𝑘 + 1)))
93	91, 84, 92	syl2anc 693	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝐹‘(𝑘 + 1)) = (𝑁 + 1) → (^◡𝐹‘(𝑁 + 1)) = (𝑘 + 1)))
94	34	eqeq1i 2627	. . . . . . . . . . . . 13 ⊢ (𝐾 = (𝑘 + 1) ↔ (^◡𝐹‘(𝑁 + 1)) = (𝑘 + 1))
95	93, 94	syl6ibr 242	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝐹‘(𝑘 + 1)) = (𝑁 + 1) → 𝐾 = (𝑘 + 1)))
96	90, 95	syld 47	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (¬ (𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁) → 𝐾 = (𝑘 + 1)))
97	96	necon1ad 2811	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (𝐾 ≠ (𝑘 + 1) → (𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁)))
98	81, 97	mpd 15	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (𝐹‘(𝑘 + 1)) ∈ (𝑀...𝑁))
99	56, 98	eqeltrd 2701	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝑥 ∈ (𝑀...𝑁))
100	56	eqcomd 2628	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (𝐹‘(𝑘 + 1)) = 𝑥)
101		f1ocnvfv 6534	. . . . . . . . . . . . . . 15 ⊢ ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ (𝑘 + 1) ∈ (𝑀...(𝑁 + 1))) → ((𝐹‘(𝑘 + 1)) = 𝑥 → (^◡𝐹‘𝑥) = (𝑘 + 1)))
102	91, 84, 101	syl2anc 693	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝐹‘(𝑘 + 1)) = 𝑥 → (^◡𝐹‘𝑥) = (𝑘 + 1)))
103	100, 102	mpd 15	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (^◡𝐹‘𝑥) = (𝑘 + 1))
104	103	breq1d 4663	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((^◡𝐹‘𝑥) < 𝐾 ↔ (𝑘 + 1) < 𝐾))
105		lttr 10114	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℝ ∧ (𝑘 + 1) ∈ ℝ ∧ 𝐾 ∈ ℝ) → ((𝑘 < (𝑘 + 1) ∧ (𝑘 + 1) < 𝐾) → 𝑘 < 𝐾))
106	73, 75, 72, 105	syl3anc 1326	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝑘 < (𝑘 + 1) ∧ (𝑘 + 1) < 𝐾) → 𝑘 < 𝐾))
107	79, 106	mpand 711	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝑘 + 1) < 𝐾 → 𝑘 < 𝐾))
108	104, 107	sylbid 230	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((^◡𝐹‘𝑥) < 𝐾 → 𝑘 < 𝐾))
109	76, 108	mtod 189	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ¬ (^◡𝐹‘𝑥) < 𝐾)
110		iffalse 4095	. . . . . . . . . 10 ⊢ (¬ (^◡𝐹‘𝑥) < 𝐾 → if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) = ((^◡𝐹‘𝑥) − 1))
111	109, 110	syl 17	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) = ((^◡𝐹‘𝑥) − 1))
112	103	oveq1d 6665	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((^◡𝐹‘𝑥) − 1) = ((𝑘 + 1) − 1))
113	73	recnd 10068	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝑘 ∈ ℂ)
114		ax-1cn 9994	. . . . . . . . . 10 ⊢ 1 ∈ ℂ
115		pncan 10287	. . . . . . . . . 10 ⊢ ((𝑘 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑘 + 1) − 1) = 𝑘)
116	113, 114, 115	sylancl 694	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → ((𝑘 + 1) − 1) = 𝑘)
117	111, 112, 116	3eqtrrd 2661	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))
118	99, 117	jca 554	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ (¬ 𝑘 < 𝐾 ∧ 𝑥 = (𝐹‘(𝑘 + 1)))) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1))))
119	118	expr 643	. . . . . 6 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ ¬ 𝑘 < 𝐾) → (𝑥 = (𝐹‘(𝑘 + 1)) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))))
120	55, 119	sylbid 230	. . . . 5 ⊢ (((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) ∧ ¬ 𝑘 < 𝐾) → (𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))))
121	51, 120	pm2.61dan 832	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) → (𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))))
122	121	expimpd 629	. . 3 ⊢ (𝜑 → ((𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1)))) → (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))))
123	46	eqeq2d 2632	. . . . . . 7 ⊢ ((^◡𝐹‘𝑥) < 𝐾 → (𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) ↔ 𝑘 = (^◡𝐹‘𝑥)))
124	123	adantl 482	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (^◡𝐹‘𝑥) < 𝐾) → (𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) ↔ 𝑘 = (^◡𝐹‘𝑥)))
125		simprr 796	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 = (^◡𝐹‘𝑥))
126	62	ad2antrr 762	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → ^◡𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
127		simplr 792	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑥 ∈ (𝑀...𝑁))
128	21, 127	sseldi 3601	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
129	126, 128	ffvelrnd 6360	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (^◡𝐹‘𝑥) ∈ (𝑀...(𝑁 + 1)))
130	125, 129	eqeltrd 2701	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 ∈ (𝑀...(𝑁 + 1)))
131		elfzle1 12344	. . . . . . . . . 10 ⊢ (𝑘 ∈ (𝑀...(𝑁 + 1)) → 𝑀 ≤ 𝑘)
132	130, 131	syl 17	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑀 ≤ 𝑘)
133		elfzelz 12342	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ (𝑀...(𝑁 + 1)) → 𝑘 ∈ ℤ)
134	130, 133	syl 17	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 ∈ ℤ)
135	134	zred 11482	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 ∈ ℝ)
136	71	ad2antrr 762	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝐾 ∈ ℝ)
137		eluzelz 11697	. . . . . . . . . . . . . . 15 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → 𝑁 ∈ ℤ)
138	25, 137	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑁 ∈ ℤ)
139	138	peano2zd 11485	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑁 + 1) ∈ ℤ)
140	139	zred 11482	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑁 + 1) ∈ ℝ)
141	140	ad2antrr 762	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (𝑁 + 1) ∈ ℝ)
142		simprl 794	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (^◡𝐹‘𝑥) < 𝐾)
143	125, 142	eqbrtrd 4675	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 < 𝐾)
144		elfzle2 12345	. . . . . . . . . . . . 13 ⊢ (𝐾 ∈ (𝑀...(𝑁 + 1)) → 𝐾 ≤ (𝑁 + 1))
145	68, 144	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐾 ≤ (𝑁 + 1))
146	145	ad2antrr 762	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝐾 ≤ (𝑁 + 1))
147	135, 136, 141, 143, 146	ltletrd 10197	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 < (𝑁 + 1))
148	138	ad2antrr 762	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑁 ∈ ℤ)
149		zleltp1 11428	. . . . . . . . . . 11 ⊢ ((𝑘 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑘 ≤ 𝑁 ↔ 𝑘 < (𝑁 + 1)))
150	134, 148, 149	syl2anc 693	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (𝑘 ≤ 𝑁 ↔ 𝑘 < (𝑁 + 1)))
151	147, 150	mpbird 247	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 ≤ 𝑁)
152		eluzel2 11692	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → 𝑀 ∈ ℤ)
153	25, 152	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑀 ∈ ℤ)
154	153	ad2antrr 762	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑀 ∈ ℤ)
155		elfz 12332	. . . . . . . . . 10 ⊢ ((𝑘 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑘 ∈ (𝑀...𝑁) ↔ (𝑀 ≤ 𝑘 ∧ 𝑘 ≤ 𝑁)))
156	134, 154, 148, 155	syl3anc 1326	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (𝑘 ∈ (𝑀...𝑁) ↔ (𝑀 ≤ 𝑘 ∧ 𝑘 ≤ 𝑁)))
157	132, 151, 156	mpbir2and 957	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑘 ∈ (𝑀...𝑁))
158	143, 8	syl 17	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) = (𝐹‘𝑘))
159	125	fveq2d 6195	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (𝐹‘𝑘) = (𝐹‘(^◡𝐹‘𝑥)))
160	17	ad2antrr 762	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
161		f1ocnvfv2 6533	. . . . . . . . . 10 ⊢ ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...(𝑁 + 1))) → (𝐹‘(^◡𝐹‘𝑥)) = 𝑥)
162	160, 128, 161	syl2anc 693	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (𝐹‘(^◡𝐹‘𝑥)) = 𝑥)
163	158, 159, 162	3eqtrrd 2661	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))
164	157, 163	jca 554	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ((^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = (^◡𝐹‘𝑥))) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1)))))
165	164	expr 643	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (^◡𝐹‘𝑥) < 𝐾) → (𝑘 = (^◡𝐹‘𝑥) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))))
166	124, 165	sylbid 230	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (^◡𝐹‘𝑥) < 𝐾) → (𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))))
167	110	eqeq2d 2632	. . . . . . 7 ⊢ (¬ (^◡𝐹‘𝑥) < 𝐾 → (𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) ↔ 𝑘 = ((^◡𝐹‘𝑥) − 1)))
168	167	adantl 482	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ¬ (^◡𝐹‘𝑥) < 𝐾) → (𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) ↔ 𝑘 = ((^◡𝐹‘𝑥) − 1)))
169	153	zred 11482	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑀 ∈ ℝ)
170	169	ad2antrr 762	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑀 ∈ ℝ)
171	71	ad2antrr 762	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐾 ∈ ℝ)
172		simprr 796	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑘 = ((^◡𝐹‘𝑥) − 1))
173	62	ad2antrr 762	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ^◡𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
174		simplr 792	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑥 ∈ (𝑀...𝑁))
175	21, 174	sseldi 3601	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
176	173, 175	ffvelrnd 6360	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (^◡𝐹‘𝑥) ∈ (𝑀...(𝑁 + 1)))
177		elfzelz 12342	. . . . . . . . . . . . . 14 ⊢ ((^◡𝐹‘𝑥) ∈ (𝑀...(𝑁 + 1)) → (^◡𝐹‘𝑥) ∈ ℤ)
178	176, 177	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (^◡𝐹‘𝑥) ∈ ℤ)
179		peano2zm 11420	. . . . . . . . . . . . 13 ⊢ ((^◡𝐹‘𝑥) ∈ ℤ → ((^◡𝐹‘𝑥) − 1) ∈ ℤ)
180	178, 179	syl 17	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ((^◡𝐹‘𝑥) − 1) ∈ ℤ)
181	172, 180	eqeltrd 2701	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑘 ∈ ℤ)
182	181	zred 11482	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑘 ∈ ℝ)
183		elfzle1 12344	. . . . . . . . . . . 12 ⊢ (𝐾 ∈ (𝑀...(𝑁 + 1)) → 𝑀 ≤ 𝐾)
184	68, 183	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑀 ≤ 𝐾)
185	184	ad2antrr 762	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑀 ≤ 𝐾)
186		simprl 794	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ¬ (^◡𝐹‘𝑥) < 𝐾)
187	178	zred 11482	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (^◡𝐹‘𝑥) ∈ ℝ)
188	171, 187	lenltd 10183	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝐾 ≤ (^◡𝐹‘𝑥) ↔ ¬ (^◡𝐹‘𝑥) < 𝐾))
189	186, 188	mpbird 247	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐾 ≤ (^◡𝐹‘𝑥))
190		elfzelz 12342	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 ∈ (𝑀...𝑁) → 𝑥 ∈ ℤ)
191	190	adantl 482	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 ∈ ℤ)
192	191	zred 11482	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 ∈ ℝ)
193	138	zred 11482	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → 𝑁 ∈ ℝ)
194	193	adantr 481	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑁 ∈ ℝ)
195	140	adantr 481	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝑁 + 1) ∈ ℝ)
196		elfzle2 12345	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 ∈ (𝑀...𝑁) → 𝑥 ≤ 𝑁)
197	196	adantl 482	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 ≤ 𝑁)
198	194	ltp1d 10954	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑁 < (𝑁 + 1))
199	192, 194, 195, 197, 198	lelttrd 10195	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 < (𝑁 + 1))
200	192, 199	gtned 10172	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝑁 + 1) ≠ 𝑥)
201	200	adantr 481	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝑁 + 1) ≠ 𝑥)
202	60	ad2antrr 762	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ^◡𝐹:(𝑀...(𝑁 + 1))–1-1→(𝑀...(𝑁 + 1)))
203	66	ad2antrr 762	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
204		f1fveq 6519	. . . . . . . . . . . . . . . . . 18 ⊢ ((^◡𝐹:(𝑀...(𝑁 + 1))–1-1→(𝑀...(𝑁 + 1)) ∧ ((𝑁 + 1) ∈ (𝑀...(𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...(𝑁 + 1)))) → ((^◡𝐹‘(𝑁 + 1)) = (^◡𝐹‘𝑥) ↔ (𝑁 + 1) = 𝑥))
205	202, 203, 175, 204	syl12anc 1324	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ((^◡𝐹‘(𝑁 + 1)) = (^◡𝐹‘𝑥) ↔ (𝑁 + 1) = 𝑥))
206	205	necon3bid 2838	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ((^◡𝐹‘(𝑁 + 1)) ≠ (^◡𝐹‘𝑥) ↔ (𝑁 + 1) ≠ 𝑥))
207	201, 206	mpbird 247	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (^◡𝐹‘(𝑁 + 1)) ≠ (^◡𝐹‘𝑥))
208	34	neeq1i 2858	. . . . . . . . . . . . . . 15 ⊢ (𝐾 ≠ (^◡𝐹‘𝑥) ↔ (^◡𝐹‘(𝑁 + 1)) ≠ (^◡𝐹‘𝑥))
209	207, 208	sylibr 224	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐾 ≠ (^◡𝐹‘𝑥))
210	209	necomd 2849	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (^◡𝐹‘𝑥) ≠ 𝐾)
211	171, 187	ltlend 10182	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝐾 < (^◡𝐹‘𝑥) ↔ (𝐾 ≤ (^◡𝐹‘𝑥) ∧ (^◡𝐹‘𝑥) ≠ 𝐾)))
212	189, 210, 211	mpbir2and 957	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐾 < (^◡𝐹‘𝑥))
213	70	ad2antrr 762	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐾 ∈ ℤ)
214		zltlem1 11430	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℤ ∧ (^◡𝐹‘𝑥) ∈ ℤ) → (𝐾 < (^◡𝐹‘𝑥) ↔ 𝐾 ≤ ((^◡𝐹‘𝑥) − 1)))
215	213, 178, 214	syl2anc 693	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝐾 < (^◡𝐹‘𝑥) ↔ 𝐾 ≤ ((^◡𝐹‘𝑥) − 1)))
216	212, 215	mpbid 222	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐾 ≤ ((^◡𝐹‘𝑥) − 1))
217	216, 172	breqtrrd 4681	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐾 ≤ 𝑘)
218	170, 171, 182, 185, 217	letrd 10194	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑀 ≤ 𝑘)
219		elfzle2 12345	. . . . . . . . . . . 12 ⊢ ((^◡𝐹‘𝑥) ∈ (𝑀...(𝑁 + 1)) → (^◡𝐹‘𝑥) ≤ (𝑁 + 1))
220	176, 219	syl 17	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (^◡𝐹‘𝑥) ≤ (𝑁 + 1))
221	193	ad2antrr 762	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑁 ∈ ℝ)
222		1re 10039	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℝ
223		lesubadd 10500	. . . . . . . . . . . . 13 ⊢ (((^◡𝐹‘𝑥) ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (((^◡𝐹‘𝑥) − 1) ≤ 𝑁 ↔ (^◡𝐹‘𝑥) ≤ (𝑁 + 1)))
224	222, 223	mp3an2 1412	. . . . . . . . . . . 12 ⊢ (((^◡𝐹‘𝑥) ∈ ℝ ∧ 𝑁 ∈ ℝ) → (((^◡𝐹‘𝑥) − 1) ≤ 𝑁 ↔ (^◡𝐹‘𝑥) ≤ (𝑁 + 1)))
225	187, 221, 224	syl2anc 693	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (((^◡𝐹‘𝑥) − 1) ≤ 𝑁 ↔ (^◡𝐹‘𝑥) ≤ (𝑁 + 1)))
226	220, 225	mpbird 247	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ((^◡𝐹‘𝑥) − 1) ≤ 𝑁)
227	172, 226	eqbrtrd 4675	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑘 ≤ 𝑁)
228	153	ad2antrr 762	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑀 ∈ ℤ)
229	138	ad2antrr 762	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑁 ∈ ℤ)
230	181, 228, 229, 155	syl3anc 1326	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝑘 ∈ (𝑀...𝑁) ↔ (𝑀 ≤ 𝑘 ∧ 𝑘 ≤ 𝑁)))
231	218, 227, 230	mpbir2and 957	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑘 ∈ (𝑀...𝑁))
232	171, 182	lenltd 10183	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝐾 ≤ 𝑘 ↔ ¬ 𝑘 < 𝐾))
233	217, 232	mpbid 222	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → ¬ 𝑘 < 𝐾)
234	233, 53	syl 17	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) = (𝐹‘(𝑘 + 1)))
235	172	oveq1d 6665	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝑘 + 1) = (((^◡𝐹‘𝑥) − 1) + 1))
236	178	zcnd 11483	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (^◡𝐹‘𝑥) ∈ ℂ)
237		npcan 10290	. . . . . . . . . . . 12 ⊢ (((^◡𝐹‘𝑥) ∈ ℂ ∧ 1 ∈ ℂ) → (((^◡𝐹‘𝑥) − 1) + 1) = (^◡𝐹‘𝑥))
238	236, 114, 237	sylancl 694	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (((^◡𝐹‘𝑥) − 1) + 1) = (^◡𝐹‘𝑥))
239	235, 238	eqtrd 2656	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝑘 + 1) = (^◡𝐹‘𝑥))
240	239	fveq2d 6195	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝐹‘(𝑘 + 1)) = (𝐹‘(^◡𝐹‘𝑥)))
241	17	ad2antrr 762	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
242	241, 175, 161	syl2anc 693	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝐹‘(^◡𝐹‘𝑥)) = 𝑥)
243	234, 240, 242	3eqtrrd 2661	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))
244	231, 243	jca 554	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ (¬ (^◡𝐹‘𝑥) < 𝐾 ∧ 𝑘 = ((^◡𝐹‘𝑥) − 1))) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1)))))
245	244	expr 643	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ¬ (^◡𝐹‘𝑥) < 𝐾) → (𝑘 = ((^◡𝐹‘𝑥) − 1) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))))
246	168, 245	sylbid 230	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) ∧ ¬ (^◡𝐹‘𝑥) < 𝐾) → (𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))))
247	166, 246	pm2.61dan 832	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))))
248	247	expimpd 629	. . 3 ⊢ (𝜑 → ((𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1))) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))))
249	122, 248	impbid 202	. 2 ⊢ (𝜑 → ((𝑘 ∈ (𝑀...𝑁) ∧ 𝑥 = (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1)))) ↔ (𝑥 ∈ (𝑀...𝑁) ∧ 𝑘 = if((^◡𝐹‘𝑥) < 𝐾, (^◡𝐹‘𝑥), ((^◡𝐹‘𝑥) − 1)))))
250	1, 2, 6, 249	f1od 6885	1 ⊢ (𝜑 → 𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 196 ∨ wo 383 ∧ wa 384 ∧ w3a 1037 = wceq 1483 ∈ wcel 1990 ≠ wne 2794 Vcvv 3200 ⊆ wss 3574 ifcif 4086 class class class wbr 4653 ↦ cmpt 4729 ^◡ccnv 5113 ⟶wf 5884 –1-1→wf1 5885 –1-1-onto→wf1o 5887 ‘cfv 5888 (class class class)co 6650 ℂcc 9934 ℝcr 9935 1c1 9937 + caddc 9939 < clt 10074 ≤ cle 10075 − cmin 10266 ℤcz 11377 ℤ_≥cuz 11687 ...cfz 12326

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1722 ax-4 1737 ax-5 1839 ax-6 1888 ax-7 1935 ax-8 1992 ax-9 1999 ax-10 2019 ax-11 2034 ax-12 2047 ax-13 2246 ax-ext 2602 ax-sep 4781 ax-nul 4789 ax-pow 4843 ax-pr 4906 ax-un 6949 ax-cnex 9992 ax-resscn 9993 ax-1cn 9994 ax-icn 9995 ax-addcl 9996 ax-addrcl 9997 ax-mulcl 9998 ax-mulrcl 9999 ax-mulcom 10000 ax-addass 10001 ax-mulass 10002 ax-distr 10003 ax-i2m1 10004 ax-1ne0 10005 ax-1rid 10006 ax-rnegex 10007 ax-rrecex 10008 ax-cnre 10009 ax-pre-lttri 10010 ax-pre-lttrn 10011 ax-pre-ltadd 10012 ax-pre-mulgt0 10013

This theorem depends on definitions: df-bi 197 df-or 385 df-an 386 df-3or 1038 df-3an 1039 df-tru 1486 df-ex 1705 df-nf 1710 df-sb 1881 df-eu 2474 df-mo 2475 df-clab 2609 df-cleq 2615 df-clel 2618 df-nfc 2753 df-ne 2795 df-nel 2898 df-ral 2917 df-rex 2918 df-reu 2919 df-rab 2921 df-v 3202 df-sbc 3436 df-csb 3534 df-dif 3577 df-un 3579 df-in 3581 df-ss 3588 df-pss 3590 df-nul 3916 df-if 4087 df-pw 4160 df-sn 4178 df-pr 4180 df-tp 4182 df-op 4184 df-uni 4437 df-iun 4522 df-br 4654 df-opab 4713 df-mpt 4730 df-tr 4753 df-id 5024 df-eprel 5029 df-po 5035 df-so 5036 df-fr 5073 df-we 5075 df-xp 5120 df-rel 5121 df-cnv 5122 df-co 5123 df-dm 5124 df-rn 5125 df-res 5126 df-ima 5127 df-pred 5680 df-ord 5726 df-on 5727 df-lim 5728 df-suc 5729 df-iota 5851 df-fun 5890 df-fn 5891 df-f 5892 df-f1 5893 df-fo 5894 df-f1o 5895 df-fv 5896 df-riota 6611 df-ov 6653 df-oprab 6654 df-mpt2 6655 df-om 7066 df-1st 7168 df-2nd 7169 df-wrecs 7407 df-recs 7468 df-rdg 7506 df-er 7742 df-en 7956 df-dom 7957 df-sdom 7958 df-pnf 10076 df-mnf 10077 df-xr 10078 df-ltxr 10079 df-le 10080 df-sub 10268 df-neg 10269 df-nn 11021 df-n0 11293 df-z 11378 df-uz 11688 df-fz 12327

This theorem is referenced by: seqf1olem2 12841

W3C validator