Users' Mathboxes Mathbox for metakunt < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  sticksstones11 Structured version   Visualization version   GIF version

Theorem sticksstones11 42847
Description: Establish bijective mapping between strictly monotone functions and functions that sum to a fixed non-negative integer. (Contributed by metakunt, 6-Oct-2024.)
Hypotheses
Ref Expression
sticksstones11.1 (𝜑𝑁 ∈ ℕ0)
sticksstones11.2 (𝜑𝐾 = 0)
sticksstones11.3 𝐹 = (𝑎𝐴 ↦ (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))))
sticksstones11.4 𝐺 = (𝑏𝐵 ↦ if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))))
sticksstones11.5 𝐴 = {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)}
sticksstones11.6 𝐵 = {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))}
Assertion
Ref Expression
sticksstones11 (𝜑𝐹:𝐴1-1-onto𝐵)
Distinct variable groups:   𝐴,𝑎,𝑗,𝑙   𝐴,𝑏,𝑗,𝑙   𝑥,𝐴,𝑦,𝑎,𝑗,𝑙   𝐵,𝑎   𝐵,𝑏   𝐾,𝑎,𝑓,𝑗,𝑙,𝑥,𝑦   𝐾,𝑏   𝑔,𝐾,𝑖,𝑎   𝑁,𝑏,𝑗   𝑓,𝑁   𝑔,𝑁,𝑖   𝜑,𝑎,𝑗,𝑙   𝜑,𝑏   𝜑,𝑥,𝑦   𝑖,𝑙
Allowed substitution hints:   𝜑(𝑓,𝑔,𝑖,𝑘)   𝐴(𝑓,𝑔,𝑖,𝑘)   𝐵(𝑥,𝑦,𝑓,𝑔,𝑖,𝑗,𝑘,𝑙)   𝐹(𝑥,𝑦,𝑓,𝑔,𝑖,𝑗,𝑘,𝑎,𝑏,𝑙)   𝐺(𝑥,𝑦,𝑓,𝑔,𝑖,𝑗,𝑘,𝑎,𝑏,𝑙)   𝐾(𝑘)   𝑁(𝑥,𝑦,𝑘,𝑎,𝑙)

Proof of Theorem sticksstones11
Dummy variables 𝑐 𝑑 𝑢 𝑝 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 sticksstones11.1 . . 3 (𝜑𝑁 ∈ ℕ0)
2 sticksstones11.2 . . . 4 (𝜑𝐾 = 0)
3 0nn0 12519 . . . . 5 0 ∈ ℕ0
43a1i 11 . . . 4 (𝜑 → 0 ∈ ℕ0)
52, 4eqeltrd 2869 . . 3 (𝜑𝐾 ∈ ℕ0)
6 sticksstones11.3 . . 3 𝐹 = (𝑎𝐴 ↦ (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))))
7 sticksstones11.5 . . 3 𝐴 = {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)}
8 sticksstones11.6 . . 3 𝐵 = {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))}
91, 5, 6, 7, 8sticksstones8 42844 . 2 (𝜑𝐹:𝐴𝐵)
10 sticksstones11.4 . . 3 𝐺 = (𝑏𝐵 ↦ if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))))
111, 2, 10, 7, 8sticksstones9 42845 . 2 (𝜑𝐺:𝐵𝐴)
127a1i 11 . . . . . . . . 9 (𝜑𝐴 = {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)})
13 nfv 1941 . . . . . . . . . . 11 𝑢𝜑
14 nfcv 2931 . . . . . . . . . . 11 𝑢{𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)}
15 nfcv 2931 . . . . . . . . . . 11 𝑢{{⟨1, 𝑁⟩}}
16 ffn 6706 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑢:{1}⟶ℕ0𝑢 Fn {1})
1716ad2antrl 740 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢 Fn {1})
18 1nn 12244 . . . . . . . . . . . . . . . . . . . . . . . 24 1 ∈ ℕ
1918a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 1 ∈ ℕ)
201adantr 485 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑁 ∈ ℕ0)
21 fnsng 6589 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 ∈ ℕ ∧ 𝑁 ∈ ℕ0) → {⟨1, 𝑁⟩} Fn {1})
2219, 20, 21syl2anc 595 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → {⟨1, 𝑁⟩} Fn {1})
23 elsni 4611 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑝 ∈ {1} → 𝑝 = 1)
2423adantl 486 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → 𝑝 = 1)
25 simpr 489 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) ∧ 𝑝 = 1) → 𝑝 = 1)
2625fveq2d 6886 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) ∧ 𝑝 = 1) → (𝑢𝑝) = (𝑢‘1))
27 simprl 782 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢:{1}⟶ℕ0)
28 1ex 11203 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 1 ∈ V
2928snid 4633 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 1 ∈ {1}
3029a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 1 ∈ {1})
3127, 30ffvelcdmd 7081 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → (𝑢‘1) ∈ ℕ0)
3231nn0cnd 12567 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → (𝑢‘1) ∈ ℂ)
33 fveq2 6882 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑖 = 1 → (𝑢𝑖) = (𝑢‘1))
3433sumsn 15797 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((1 ∈ ℕ ∧ (𝑢‘1) ∈ ℂ) → Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1))
3519, 32, 34syl2anc 595 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1))
3635adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1)) → Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1))
3736eqcomd 2775 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1)) → (𝑢‘1) = Σ𝑖 ∈ {1} (𝑢𝑖))
38 simplrr 789 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1)) → Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)
3937, 38eqtrd 2804 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1)) → (𝑢‘1) = 𝑁)
4039ex 417 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → (Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1) → (𝑢‘1) = 𝑁))
4135, 40mpd 16 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → (𝑢‘1) = 𝑁)
4241adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → (𝑢‘1) = 𝑁)
4318a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → 1 ∈ ℕ)
4420adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → 𝑁 ∈ ℕ0)
45 fvsng 7179 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((1 ∈ ℕ ∧ 𝑁 ∈ ℕ0) → ({⟨1, 𝑁⟩}‘1) = 𝑁)
4643, 44, 45syl2anc 595 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → ({⟨1, 𝑁⟩}‘1) = 𝑁)
4746eqcomd 2775 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → 𝑁 = ({⟨1, 𝑁⟩}‘1))
4842, 47eqtrd 2804 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → (𝑢‘1) = ({⟨1, 𝑁⟩}‘1))
4948adantr 485 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) ∧ 𝑝 = 1) → (𝑢‘1) = ({⟨1, 𝑁⟩}‘1))
5025eqcomd 2775 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) ∧ 𝑝 = 1) → 1 = 𝑝)
5150fveq2d 6886 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) ∧ 𝑝 = 1) → ({⟨1, 𝑁⟩}‘1) = ({⟨1, 𝑁⟩}‘𝑝))
5226, 49, 513eqtrd 2808 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) ∧ 𝑝 = 1) → (𝑢𝑝) = ({⟨1, 𝑁⟩}‘𝑝))
5324, 52mpdan 699 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → (𝑢𝑝) = ({⟨1, 𝑁⟩}‘𝑝))
5417, 22, 53eqfnfvd 7029 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢 = {⟨1, 𝑁⟩})
55 fsng 7134 . . . . . . . . . . . . . . . . . . . . . 22 ((1 ∈ ℕ ∧ 𝑁 ∈ ℕ0) → (𝑢:{1}⟶{𝑁} ↔ 𝑢 = {⟨1, 𝑁⟩}))
5619, 20, 55syl2anc 595 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → (𝑢:{1}⟶{𝑁} ↔ 𝑢 = {⟨1, 𝑁⟩}))
5754, 56mpbird 260 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢:{1}⟶{𝑁})
58 ssidd 3968 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → {𝑁} ⊆ {𝑁})
59 fss 6723 . . . . . . . . . . . . . . . . . . . 20 ((𝑢:{1}⟶{𝑁} ∧ {𝑁} ⊆ {𝑁}) → 𝑢:{1}⟶{𝑁})
6057, 58, 59syl2anc 595 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢:{1}⟶{𝑁})
6160, 58, 59syl2anc 595 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢:{1}⟶{𝑁})
6261, 56mpbid 235 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢 = {⟨1, 𝑁⟩})
63 vex 3467 . . . . . . . . . . . . . . . . . 18 𝑢 ∈ V
6463elsn 4609 . . . . . . . . . . . . . . . . 17 (𝑢 ∈ {{⟨1, 𝑁⟩}} ↔ 𝑢 = {⟨1, 𝑁⟩})
6562, 64sylibr 237 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢 ∈ {{⟨1, 𝑁⟩}})
6665ex 417 . . . . . . . . . . . . . . 15 (𝜑 → ((𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁) → 𝑢 ∈ {{⟨1, 𝑁⟩}}))
67 1zzd 12625 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → 1 ∈ ℤ)
68 fzsn 13594 . . . . . . . . . . . . . . . . . . . . . 22 (1 ∈ ℤ → (1...1) = {1})
6967, 68syl 18 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (1...1) = {1})
7069eqcomd 2775 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → {1} = (1...1))
71 1e0p1 12758 . . . . . . . . . . . . . . . . . . . . . 22 1 = (0 + 1)
7271a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 1 = (0 + 1))
7372oveq2d 7427 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (1...1) = (1...(0 + 1)))
7470, 73eqtrd 2804 . . . . . . . . . . . . . . . . . . 19 (𝜑 → {1} = (1...(0 + 1)))
752eqcomd 2775 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 0 = 𝐾)
7675oveq1d 7426 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (0 + 1) = (𝐾 + 1))
7776oveq2d 7427 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (1...(0 + 1)) = (1...(𝐾 + 1)))
7874, 77eqtrd 2804 . . . . . . . . . . . . . . . . . 18 (𝜑 → {1} = (1...(𝐾 + 1)))
7978feq2d 6690 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑢:{1}⟶ℕ0𝑢:(1...(𝐾 + 1))⟶ℕ0))
8078sumeq1d 15751 . . . . . . . . . . . . . . . . . 18 (𝜑 → Σ𝑖 ∈ {1} (𝑢𝑖) = Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖))
8180eqeq1d 2771 . . . . . . . . . . . . . . . . 17 (𝜑 → (Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁 ↔ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁))
8279, 81anbi12d 643 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁) ↔ (𝑢:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁)))
8382imbi1d 344 . . . . . . . . . . . . . . 15 (𝜑 → (((𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁) → 𝑢 ∈ {{⟨1, 𝑁⟩}}) ↔ ((𝑢:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁) → 𝑢 ∈ {{⟨1, 𝑁⟩}})))
8466, 83mpbid 235 . . . . . . . . . . . . . 14 (𝜑 → ((𝑢:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁) → 𝑢 ∈ {{⟨1, 𝑁⟩}}))
85 feq1 6684 . . . . . . . . . . . . . . . . . 18 (𝑔 = 𝑢 → (𝑔:(1...(𝐾 + 1))⟶ℕ0𝑢:(1...(𝐾 + 1))⟶ℕ0))
86 simpl 487 . . . . . . . . . . . . . . . . . . . . 21 ((𝑔 = 𝑢𝑖 ∈ (1...(𝐾 + 1))) → 𝑔 = 𝑢)
8786fveq1d 6884 . . . . . . . . . . . . . . . . . . . 20 ((𝑔 = 𝑢𝑖 ∈ (1...(𝐾 + 1))) → (𝑔𝑖) = (𝑢𝑖))
8887sumeq2dv 15753 . . . . . . . . . . . . . . . . . . 19 (𝑔 = 𝑢 → Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖))
8988eqeq1d 2771 . . . . . . . . . . . . . . . . . 18 (𝑔 = 𝑢 → (Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁 ↔ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁))
9085, 89anbi12d 643 . . . . . . . . . . . . . . . . 17 (𝑔 = 𝑢 → ((𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁) ↔ (𝑢:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁)))
9163, 90elab 3647 . . . . . . . . . . . . . . . 16 (𝑢 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)} ↔ (𝑢:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁))
9291a1i 11 . . . . . . . . . . . . . . 15 (𝜑 → (𝑢 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)} ↔ (𝑢:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁)))
9392imbi1d 344 . . . . . . . . . . . . . 14 (𝜑 → ((𝑢 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)} → 𝑢 ∈ {{⟨1, 𝑁⟩}}) ↔ ((𝑢:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁) → 𝑢 ∈ {{⟨1, 𝑁⟩}})))
9484, 93mpbird 260 . . . . . . . . . . . . 13 (𝜑 → (𝑢 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)} → 𝑢 ∈ {{⟨1, 𝑁⟩}}))
9594imp 411 . . . . . . . . . . . 12 ((𝜑𝑢 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)}) → 𝑢 ∈ {{⟨1, 𝑁⟩}})
9695ex 417 . . . . . . . . . . 11 (𝜑 → (𝑢 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)} → 𝑢 ∈ {{⟨1, 𝑁⟩}}))
9713, 14, 15, 96ssrd 3950 . . . . . . . . . 10 (𝜑 → {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)} ⊆ {{⟨1, 𝑁⟩}})
9818a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 1 ∈ ℕ)
9998, 1, 55syl2anc 595 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑢:{1}⟶{𝑁} ↔ 𝑢 = {⟨1, 𝑁⟩}))
10099bicomd 226 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑢 = {⟨1, 𝑁⟩} ↔ 𝑢:{1}⟶{𝑁}))
101100biimpd 232 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑢 = {⟨1, 𝑁⟩} → 𝑢:{1}⟶{𝑁}))
102 elsni 4611 . . . . . . . . . . . . . . . . 17 (𝑢 ∈ {{⟨1, 𝑁⟩}} → 𝑢 = {⟨1, 𝑁⟩})
103101, 102impel 514 . . . . . . . . . . . . . . . 16 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → 𝑢:{1}⟶{𝑁})
1041snssd 4757 . . . . . . . . . . . . . . . . 17 (𝜑 → {𝑁} ⊆ ℕ0)
105104adantr 485 . . . . . . . . . . . . . . . 16 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → {𝑁} ⊆ ℕ0)
106 fss 6723 . . . . . . . . . . . . . . . 16 ((𝑢:{1}⟶{𝑁} ∧ {𝑁} ⊆ ℕ0) → 𝑢:{1}⟶ℕ0)
107103, 105, 106syl2anc 595 . . . . . . . . . . . . . . 15 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → 𝑢:{1}⟶ℕ0)
10879adantr 485 . . . . . . . . . . . . . . 15 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → (𝑢:{1}⟶ℕ0𝑢:(1...(𝐾 + 1))⟶ℕ0))
109107, 108mpbid 235 . . . . . . . . . . . . . 14 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → 𝑢:(1...(𝐾 + 1))⟶ℕ0)
110102adantl 486 . . . . . . . . . . . . . . 15 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → 𝑢 = {⟨1, 𝑁⟩})
111783ad2ant1 1149 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → {1} = (1...(𝐾 + 1)))
112111eqcomd 2775 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → (1...(𝐾 + 1)) = {1})
113112sumeq1d 15751 . . . . . . . . . . . . . . . . 17 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = Σ𝑖 ∈ {1} (𝑢𝑖))
11418a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → 1 ∈ ℕ)
11513ad2ant1 1149 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → 𝑁 ∈ ℕ0)
116115nn0cnd 12567 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → 𝑁 ∈ ℂ)
117114, 115, 45syl2anc 595 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → ({⟨1, 𝑁⟩}‘1) = 𝑁)
118117eqcomd 2775 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → 𝑁 = ({⟨1, 𝑁⟩}‘1))
1191103adant3 1148 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → 𝑢 = {⟨1, 𝑁⟩})
120119fveq1d 6884 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → (𝑢‘1) = ({⟨1, 𝑁⟩}‘1))
121118, 120eqtr4d 2807 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → 𝑁 = (𝑢‘1))
122121eleq1d 2854 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → (𝑁 ∈ ℂ ↔ (𝑢‘1) ∈ ℂ))
123116, 122mpbid 235 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → (𝑢‘1) ∈ ℂ)
124114, 123, 34syl2anc 595 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1))
125120, 117eqtrd 2804 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → (𝑢‘1) = 𝑁)
126124, 125eqtrd 2804 . . . . . . . . . . . . . . . . 17 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)
127113, 126eqtrd 2804 . . . . . . . . . . . . . . . 16 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁)
1281273expa 1134 . . . . . . . . . . . . . . 15 (((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) ∧ 𝑢 = {⟨1, 𝑁⟩}) → Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁)
129110, 128mpdan 699 . . . . . . . . . . . . . 14 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁)
130109, 129jca 520 . . . . . . . . . . . . 13 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → (𝑢:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁))
131130, 91sylibr 237 . . . . . . . . . . . 12 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → 𝑢 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)})
132131ex 417 . . . . . . . . . . 11 (𝜑 → (𝑢 ∈ {{⟨1, 𝑁⟩}} → 𝑢 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)}))
13313, 15, 14, 132ssrd 3950 . . . . . . . . . 10 (𝜑 → {{⟨1, 𝑁⟩}} ⊆ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)})
13497, 133eqssd 3962 . . . . . . . . 9 (𝜑 → {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)} = {{⟨1, 𝑁⟩}})
13512, 134eqtrd 2804 . . . . . . . 8 (𝜑𝐴 = {{⟨1, 𝑁⟩}})
136 eqss 3960 . . . . . . . . . 10 (𝐴 = {{⟨1, 𝑁⟩}} ↔ (𝐴 ⊆ {{⟨1, 𝑁⟩}} ∧ {{⟨1, 𝑁⟩}} ⊆ 𝐴))
137136biimpi 219 . . . . . . . . 9 (𝐴 = {{⟨1, 𝑁⟩}} → (𝐴 ⊆ {{⟨1, 𝑁⟩}} ∧ {{⟨1, 𝑁⟩}} ⊆ 𝐴))
138137simpld 499 . . . . . . . 8 (𝐴 = {{⟨1, 𝑁⟩}} → 𝐴 ⊆ {{⟨1, 𝑁⟩}})
139135, 138syl 18 . . . . . . 7 (𝜑𝐴 ⊆ {{⟨1, 𝑁⟩}})
140 fss 6723 . . . . . . 7 ((𝐺:𝐵𝐴𝐴 ⊆ {{⟨1, 𝑁⟩}}) → 𝐺:𝐵⟶{{⟨1, 𝑁⟩}})
14111, 139, 140syl2anc 595 . . . . . 6 (𝜑𝐺:𝐵⟶{{⟨1, 𝑁⟩}})
142141adantr 485 . . . . 5 ((𝜑𝑐𝐴) → 𝐺:𝐵⟶{{⟨1, 𝑁⟩}})
1439ffvelcdmda 7080 . . . . 5 ((𝜑𝑐𝐴) → (𝐹𝑐) ∈ 𝐵)
144 fvconst 7161 . . . . 5 ((𝐺:𝐵⟶{{⟨1, 𝑁⟩}} ∧ (𝐹𝑐) ∈ 𝐵) → (𝐺‘(𝐹𝑐)) = {⟨1, 𝑁⟩})
145142, 143, 144syl2anc 595 . . . 4 ((𝜑𝑐𝐴) → (𝐺‘(𝐹𝑐)) = {⟨1, 𝑁⟩})
146135eleq2d 2855 . . . . . . . 8 (𝜑 → (𝑐𝐴𝑐 ∈ {{⟨1, 𝑁⟩}}))
147146biimpd 232 . . . . . . 7 (𝜑 → (𝑐𝐴𝑐 ∈ {{⟨1, 𝑁⟩}}))
148147imp 411 . . . . . 6 ((𝜑𝑐𝐴) → 𝑐 ∈ {{⟨1, 𝑁⟩}})
149 vex 3467 . . . . . . 7 𝑐 ∈ V
150149elsn 4609 . . . . . 6 (𝑐 ∈ {{⟨1, 𝑁⟩}} ↔ 𝑐 = {⟨1, 𝑁⟩})
151148, 150sylib 221 . . . . 5 ((𝜑𝑐𝐴) → 𝑐 = {⟨1, 𝑁⟩})
152151eqcomd 2775 . . . 4 ((𝜑𝑐𝐴) → {⟨1, 𝑁⟩} = 𝑐)
153145, 152eqtrd 2804 . . 3 ((𝜑𝑐𝐴) → (𝐺‘(𝐹𝑐)) = 𝑐)
154153ralrimiva 3163 . 2 (𝜑 → ∀𝑐𝐴 (𝐺‘(𝐹𝑐)) = 𝑐)
155 simpr 489 . . . . . . . . 9 ((𝜑𝑑𝐵) → 𝑑𝐵)
156 nfv 1941 . . . . . . . . . . 11 𝑑𝜑
157 nfcv 2931 . . . . . . . . . . 11 𝑑𝐵
158 nfcv 2931 . . . . . . . . . . 11 𝑑{∅}
1598a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑑𝐵) → 𝐵 = {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))})
160159eleq2d 2855 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑑𝐵) → (𝑑𝐵𝑑 ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))}))
161160biimpd 232 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑𝐵) → (𝑑𝐵𝑑 ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))}))
162161syldbl2 854 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑𝐵) → 𝑑 ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))})
163 vex 3467 . . . . . . . . . . . . . . . . . . 19 𝑑 ∈ V
164 feq1 6684 . . . . . . . . . . . . . . . . . . . 20 (𝑓 = 𝑑 → (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ↔ 𝑑:(1...𝐾)⟶(1...(𝑁 + 𝐾))))
165 fveq1 6881 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = 𝑑 → (𝑓𝑥) = (𝑑𝑥))
166 fveq1 6881 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = 𝑑 → (𝑓𝑦) = (𝑑𝑦))
167165, 166breq12d 5126 . . . . . . . . . . . . . . . . . . . . . 22 (𝑓 = 𝑑 → ((𝑓𝑥) < (𝑓𝑦) ↔ (𝑑𝑥) < (𝑑𝑦)))
168167imbi2d 343 . . . . . . . . . . . . . . . . . . . . 21 (𝑓 = 𝑑 → ((𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ (𝑥 < 𝑦 → (𝑑𝑥) < (𝑑𝑦))))
1691682ralbidv 3235 . . . . . . . . . . . . . . . . . . . 20 (𝑓 = 𝑑 → (∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑑𝑥) < (𝑑𝑦))))
170164, 169anbi12d 643 . . . . . . . . . . . . . . . . . . 19 (𝑓 = 𝑑 → ((𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦))) ↔ (𝑑:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑑𝑥) < (𝑑𝑦)))))
171163, 170elab 3647 . . . . . . . . . . . . . . . . . 18 (𝑑 ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))} ↔ (𝑑:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑑𝑥) < (𝑑𝑦))))
172162, 171sylib 221 . . . . . . . . . . . . . . . . 17 ((𝜑𝑑𝐵) → (𝑑:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑑𝑥) < (𝑑𝑦))))
173172simpld 499 . . . . . . . . . . . . . . . 16 ((𝜑𝑑𝐵) → 𝑑:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
174 0lt1 11736 . . . . . . . . . . . . . . . . . . . . 21 0 < 1
175174a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 0 < 1)
1762, 175eqbrtrd 5137 . . . . . . . . . . . . . . . . . . 19 (𝜑𝐾 < 1)
1775nn0zd 12616 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝐾 ∈ ℤ)
178 fzn 13568 . . . . . . . . . . . . . . . . . . . 20 ((1 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝐾 < 1 ↔ (1...𝐾) = ∅))
17967, 177, 178syl2anc 595 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝐾 < 1 ↔ (1...𝐾) = ∅))
180176, 179mpbid 235 . . . . . . . . . . . . . . . . . 18 (𝜑 → (1...𝐾) = ∅)
181180feq2d 6690 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑑:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ↔ 𝑑:∅⟶(1...(𝑁 + 𝐾))))
182181adantr 485 . . . . . . . . . . . . . . . 16 ((𝜑𝑑𝐵) → (𝑑:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ↔ 𝑑:∅⟶(1...(𝑁 + 𝐾))))
183173, 182mpbid 235 . . . . . . . . . . . . . . 15 ((𝜑𝑑𝐵) → 𝑑:∅⟶(1...(𝑁 + 𝐾)))
184 f0bi 6762 . . . . . . . . . . . . . . 15 (𝑑:∅⟶(1...(𝑁 + 𝐾)) ↔ 𝑑 = ∅)
185183, 184sylib 221 . . . . . . . . . . . . . 14 ((𝜑𝑑𝐵) → 𝑑 = ∅)
186 velsn 4610 . . . . . . . . . . . . . 14 (𝑑 ∈ {∅} ↔ 𝑑 = ∅)
187185, 186sylibr 237 . . . . . . . . . . . . 13 ((𝜑𝑑𝐵) → 𝑑 ∈ {∅})
188187ex 417 . . . . . . . . . . . 12 (𝜑 → (𝑑𝐵𝑑 ∈ {∅}))
189 f0 6760 . . . . . . . . . . . . . . . . . . . 20 ∅:∅⟶(1...(𝑁 + 𝐾))
190189a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ∅:∅⟶(1...(𝑁 + 𝐾)))
191180feq2d 6690 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (∅:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ↔ ∅:∅⟶(1...(𝑁 + 𝐾))))
192190, 191mpbird 260 . . . . . . . . . . . . . . . . . 18 (𝜑 → ∅:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
193 ral0 4464 . . . . . . . . . . . . . . . . . . . 20 𝑥 ∈ ∅ ∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦))
194193a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ∀𝑥 ∈ ∅ ∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦)))
195194, 180raleqtrrdv 3333 . . . . . . . . . . . . . . . . . 18 (𝜑 → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦)))
196192, 195jca 520 . . . . . . . . . . . . . . . . 17 (𝜑 → (∅:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦))))
197 0ex 5272 . . . . . . . . . . . . . . . . . 18 ∅ ∈ V
198 feq1 6684 . . . . . . . . . . . . . . . . . . . 20 (𝑓 = ∅ → (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ↔ ∅:(1...𝐾)⟶(1...(𝑁 + 𝐾))))
199 fveq1 6881 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = ∅ → (𝑓𝑥) = (∅‘𝑥))
200 fveq1 6881 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = ∅ → (𝑓𝑦) = (∅‘𝑦))
201199, 200breq12d 5126 . . . . . . . . . . . . . . . . . . . . . 22 (𝑓 = ∅ → ((𝑓𝑥) < (𝑓𝑦) ↔ (∅‘𝑥) < (∅‘𝑦)))
202201imbi2d 343 . . . . . . . . . . . . . . . . . . . . 21 (𝑓 = ∅ → ((𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ (𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦))))
2032022ralbidv 3235 . . . . . . . . . . . . . . . . . . . 20 (𝑓 = ∅ → (∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦))))
204198, 203anbi12d 643 . . . . . . . . . . . . . . . . . . 19 (𝑓 = ∅ → ((𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦))) ↔ (∅:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦)))))
205204elabg 3644 . . . . . . . . . . . . . . . . . 18 (∅ ∈ V → (∅ ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))} ↔ (∅:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦)))))
206197, 205ax-mp 5 . . . . . . . . . . . . . . . . 17 (∅ ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))} ↔ (∅:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦))))
207196, 206sylibr 237 . . . . . . . . . . . . . . . 16 (𝜑 → ∅ ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))})
2088a1i 11 . . . . . . . . . . . . . . . 16 (𝜑𝐵 = {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))})
209207, 208eleqtrrd 2872 . . . . . . . . . . . . . . 15 (𝜑 → ∅ ∈ 𝐵)
210209adantr 485 . . . . . . . . . . . . . 14 ((𝜑𝑑 ∈ {∅}) → ∅ ∈ 𝐵)
211 elsni 4611 . . . . . . . . . . . . . . . 16 (𝑑 ∈ {∅} → 𝑑 = ∅)
212211adantl 486 . . . . . . . . . . . . . . 15 ((𝜑𝑑 ∈ {∅}) → 𝑑 = ∅)
213212eleq1d 2854 . . . . . . . . . . . . . 14 ((𝜑𝑑 ∈ {∅}) → (𝑑𝐵 ↔ ∅ ∈ 𝐵))
214210, 213mpbird 260 . . . . . . . . . . . . 13 ((𝜑𝑑 ∈ {∅}) → 𝑑𝐵)
215214ex 417 . . . . . . . . . . . 12 (𝜑 → (𝑑 ∈ {∅} → 𝑑𝐵))
216188, 215impbid 215 . . . . . . . . . . 11 (𝜑 → (𝑑𝐵𝑑 ∈ {∅}))
217156, 157, 158, 216eqrd 3964 . . . . . . . . . 10 (𝜑𝐵 = {∅})
218217adantr 485 . . . . . . . . 9 ((𝜑𝑑𝐵) → 𝐵 = {∅})
219155, 218eleqtrd 2871 . . . . . . . 8 ((𝜑𝑑𝐵) → 𝑑 ∈ {∅})
220163elsn 4609 . . . . . . . 8 (𝑑 ∈ {∅} ↔ 𝑑 = ∅)
221219, 220sylib 221 . . . . . . 7 ((𝜑𝑑𝐵) → 𝑑 = ∅)
222221fveq2d 6886 . . . . . 6 ((𝜑𝑑𝐵) → (𝐺𝑑) = (𝐺‘∅))
223222fveq2d 6886 . . . . 5 ((𝜑𝑑𝐵) → (𝐹‘(𝐺𝑑)) = (𝐹‘(𝐺‘∅)))
224180adantr 485 . . . . . . . . . . 11 ((𝜑𝑎𝐴) → (1...𝐾) = ∅)
225224mpteq1d 5205 . . . . . . . . . 10 ((𝜑𝑎𝐴) → (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) = (𝑗 ∈ ∅ ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))))
226 mpt0 6678 . . . . . . . . . . 11 (𝑗 ∈ ∅ ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) = ∅
227226a1i 11 . . . . . . . . . 10 ((𝜑𝑎𝐴) → (𝑗 ∈ ∅ ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) = ∅)
228225, 227eqtrd 2804 . . . . . . . . 9 ((𝜑𝑎𝐴) → (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) = ∅)
229 fzfid 14009 . . . . . . . . . . . 12 (𝜑 → (1...𝐾) ∈ Fin)
230229mptexd 7223 . . . . . . . . . . 11 (𝜑 → (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) ∈ V)
231 elsng 4608 . . . . . . . . . . 11 ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) ∈ V → ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) ∈ {∅} ↔ (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) = ∅))
232230, 231syl 18 . . . . . . . . . 10 (𝜑 → ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) ∈ {∅} ↔ (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) = ∅))
233232adantr 485 . . . . . . . . 9 ((𝜑𝑎𝐴) → ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) ∈ {∅} ↔ (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) = ∅))
234228, 233mpbird 260 . . . . . . . 8 ((𝜑𝑎𝐴) → (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) ∈ {∅})
235234, 6fmptd 7110 . . . . . . 7 (𝜑𝐹:𝐴⟶{∅})
236235adantr 485 . . . . . 6 ((𝜑𝑑𝐵) → 𝐹:𝐴⟶{∅})
237 ffvelcdm 7077 . . . . . . . 8 ((𝐺:𝐵𝐴 ∧ ∅ ∈ 𝐵) → (𝐺‘∅) ∈ 𝐴)
23811, 209, 237syl2anc 595 . . . . . . 7 (𝜑 → (𝐺‘∅) ∈ 𝐴)
239238adantr 485 . . . . . 6 ((𝜑𝑑𝐵) → (𝐺‘∅) ∈ 𝐴)
240 fvconst 7161 . . . . . 6 ((𝐹:𝐴⟶{∅} ∧ (𝐺‘∅) ∈ 𝐴) → (𝐹‘(𝐺‘∅)) = ∅)
241236, 239, 240syl2anc 595 . . . . 5 ((𝜑𝑑𝐵) → (𝐹‘(𝐺‘∅)) = ∅)
242223, 241eqtrd 2804 . . . 4 ((𝜑𝑑𝐵) → (𝐹‘(𝐺𝑑)) = ∅)
243221eqcomd 2775 . . . 4 ((𝜑𝑑𝐵) → ∅ = 𝑑)
244242, 243eqtrd 2804 . . 3 ((𝜑𝑑𝐵) → (𝐹‘(𝐺𝑑)) = 𝑑)
245244ralrimiva 3163 . 2 (𝜑 → ∀𝑑𝐵 (𝐹‘(𝐺𝑑)) = 𝑑)
2469, 11, 154, 2452fvidf1od 7297 1 (𝜑𝐹:𝐴1-1-onto𝐵)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 400  w3a 1101   = wceq 1567  wcel 2149  {cab 2747  wral 3085  Vcvv 3463  wss 3913  c0 4294  ifcif 4492  {csn 4594  cop 4600   class class class wbr 5113  cmpt 5196   Fn wfn 6532  wf 6533  1-1-ontowf1o 6536  cfv 6537  (class class class)co 7411  Fincfn 8943  cc 11098  0cc0 11100  1c1 11101   + caddc 11103   < clt 11243  cmin 11441  cn 12233  0cn0 12504  cz 12591  ...cfz 13535  Σcsu 15737
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5242  ax-sep 5261  ax-nul 5271  ax-pow 5337  ax-pr 5405  ax-un 7733  ax-inf2 9610  ax-cnex 11156  ax-resscn 11157  ax-1cn 11158  ax-icn 11159  ax-addcl 11160  ax-addrcl 11161  ax-mulcl 11162  ax-mulrcl 11163  ax-mulcom 11164  ax-addass 11165  ax-mulass 11166  ax-distr 11167  ax-i2m1 11168  ax-1ne0 11169  ax-1rid 11170  ax-rnegex 11171  ax-rrecex 11172  ax-cnre 11173  ax-pre-lttri 11174  ax-pre-lttrn 11175  ax-pre-ltadd 11176  ax-pre-mulgt0 11177  ax-pre-sup 11178
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-nel 3071  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4877  df-int 4917  df-iun 4962  df-br 5114  df-opab 5178  df-mpt 5197  df-tr 5223  df-id 5557  df-eprel 5562  df-po 5570  df-so 5571  df-fr 5615  df-se 5616  df-we 5617  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-isom 6546  df-riota 7368  df-ov 7414  df-oprab 7415  df-mpo 7416  df-om 7863  df-1st 7986  df-2nd 7987  df-frecs 8278  df-wrecs 8309  df-recs 8358  df-rdg 8397  df-1o 8453  df-er 8694  df-en 8944  df-dom 8945  df-sdom 8946  df-fin 8947  df-sup 9402  df-oi 9472  df-card 9925  df-pnf 11245  df-mnf 11246  df-xr 11247  df-ltxr 11248  df-le 11249  df-sub 11443  df-neg 11444  df-div 11872  df-nn 12234  df-2 12303  df-3 12304  df-n0 12505  df-z 12592  df-uz 12863  df-rp 13017  df-ico 13378  df-fz 13536  df-fzo 13683  df-seq 14038  df-exp 14098  df-hash 14367  df-cj 15150  df-re 15151  df-im 15152  df-sqrt 15286  df-abs 15287  df-clim 15539  df-sum 15738
This theorem is referenced by:  sticksstones13  42850
  Copyright terms: Public domain W3C validator