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 39781
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 12070 . . . . 5 0 ∈ ℕ0
43a1i 11 . . . 4 (𝜑 → 0 ∈ ℕ0)
52, 4eqeltrd 2831 . . 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 39778 . 2 (𝜑𝐹:𝐴𝐵)
10 sticksstones11.4 . . 3 𝐺 = (𝑏𝐵 ↦ if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))))
111, 2, 10, 7, 8sticksstones9 39779 . 2 (𝜑𝐺:𝐵𝐴)
127a1i 11 . . . . . . . . 9 (𝜑𝐴 = {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)})
13 nfv 1922 . . . . . . . . . . 11 𝑢𝜑
14 nfcv 2897 . . . . . . . . . . 11 𝑢{𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)}
15 nfcv 2897 . . . . . . . . . . 11 𝑢{{⟨1, 𝑁⟩}}
16 ffn 6523 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑢:{1}⟶ℕ0𝑢 Fn {1})
1716ad2antrl 728 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢 Fn {1})
18 1nn 11806 . . . . . . . . . . . . . . . . . . . . . . . 24 1 ∈ ℕ
1918a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 1 ∈ ℕ)
201adantr 484 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑁 ∈ ℕ0)
21 fnsng 6410 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 ∈ ℕ ∧ 𝑁 ∈ ℕ0) → {⟨1, 𝑁⟩} Fn {1})
2219, 20, 21syl2anc 587 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → {⟨1, 𝑁⟩} Fn {1})
23 elsni 4544 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑝 ∈ {1} → 𝑝 = 1)
2423adantl 485 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → 𝑝 = 1)
25 simpr 488 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) ∧ 𝑝 = 1) → 𝑝 = 1)
2625fveq2d 6699 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) ∧ 𝑝 = 1) → (𝑢𝑝) = (𝑢‘1))
27 simprl 771 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢:{1}⟶ℕ0)
28 1ex 10794 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 1 ∈ V
2928snid 4563 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 1 ∈ {1}
3029a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 1 ∈ {1})
3127, 30ffvelrnd 6883 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → (𝑢‘1) ∈ ℕ0)
3231nn0cnd 12117 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → (𝑢‘1) ∈ ℂ)
33 fveq2 6695 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑖 = 1 → (𝑢𝑖) = (𝑢‘1))
3433sumsn 15273 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((1 ∈ ℕ ∧ (𝑢‘1) ∈ ℂ) → Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1))
3519, 32, 34syl2anc 587 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1))
3635adantr 484 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1)) → Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1))
3736eqcomd 2742 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1)) → (𝑢‘1) = Σ𝑖 ∈ {1} (𝑢𝑖))
38 simplrr 778 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1)) → Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)
3937, 38eqtrd 2771 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1)) → (𝑢‘1) = 𝑁)
4039ex 416 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → (Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1) → (𝑢‘1) = 𝑁))
4135, 40mpd 15 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → (𝑢‘1) = 𝑁)
4241adantr 484 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → (𝑢‘1) = 𝑁)
4318a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → 1 ∈ ℕ)
4420adantr 484 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → 𝑁 ∈ ℕ0)
45 fvsng 6973 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((1 ∈ ℕ ∧ 𝑁 ∈ ℕ0) → ({⟨1, 𝑁⟩}‘1) = 𝑁)
4643, 44, 45syl2anc 587 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → ({⟨1, 𝑁⟩}‘1) = 𝑁)
4746eqcomd 2742 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → 𝑁 = ({⟨1, 𝑁⟩}‘1))
4842, 47eqtrd 2771 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → (𝑢‘1) = ({⟨1, 𝑁⟩}‘1))
4948adantr 484 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) ∧ 𝑝 = 1) → (𝑢‘1) = ({⟨1, 𝑁⟩}‘1))
5025eqcomd 2742 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) ∧ 𝑝 = 1) → 1 = 𝑝)
5150fveq2d 6699 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) ∧ 𝑝 = 1) → ({⟨1, 𝑁⟩}‘1) = ({⟨1, 𝑁⟩}‘𝑝))
5226, 49, 513eqtrd 2775 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) ∧ 𝑝 = 1) → (𝑢𝑝) = ({⟨1, 𝑁⟩}‘𝑝))
5324, 52mpdan 687 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) ∧ 𝑝 ∈ {1}) → (𝑢𝑝) = ({⟨1, 𝑁⟩}‘𝑝))
5417, 22, 53eqfnfvd 6833 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢 = {⟨1, 𝑁⟩})
55 fsng 6930 . . . . . . . . . . . . . . . . . . . . . 22 ((1 ∈ ℕ ∧ 𝑁 ∈ ℕ0) → (𝑢:{1}⟶{𝑁} ↔ 𝑢 = {⟨1, 𝑁⟩}))
5619, 20, 55syl2anc 587 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → (𝑢:{1}⟶{𝑁} ↔ 𝑢 = {⟨1, 𝑁⟩}))
5754, 56mpbird 260 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢:{1}⟶{𝑁})
58 ssidd 3910 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → {𝑁} ⊆ {𝑁})
59 fss 6540 . . . . . . . . . . . . . . . . . . . 20 ((𝑢:{1}⟶{𝑁} ∧ {𝑁} ⊆ {𝑁}) → 𝑢:{1}⟶{𝑁})
6057, 58, 59syl2anc 587 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢:{1}⟶{𝑁})
6160, 58, 59syl2anc 587 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢:{1}⟶{𝑁})
6261, 56mpbid 235 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢 = {⟨1, 𝑁⟩})
63 vex 3402 . . . . . . . . . . . . . . . . . 18 𝑢 ∈ V
6463elsn 4542 . . . . . . . . . . . . . . . . 17 (𝑢 ∈ {{⟨1, 𝑁⟩}} ↔ 𝑢 = {⟨1, 𝑁⟩})
6562, 64sylibr 237 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)) → 𝑢 ∈ {{⟨1, 𝑁⟩}})
6665ex 416 . . . . . . . . . . . . . . 15 (𝜑 → ((𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁) → 𝑢 ∈ {{⟨1, 𝑁⟩}}))
67 1zzd 12173 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → 1 ∈ ℤ)
68 fzsn 13119 . . . . . . . . . . . . . . . . . . . . . 22 (1 ∈ ℤ → (1...1) = {1})
6967, 68syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (1...1) = {1})
7069eqcomd 2742 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → {1} = (1...1))
71 1e0p1 12300 . . . . . . . . . . . . . . . . . . . . . 22 1 = (0 + 1)
7271a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 1 = (0 + 1))
7372oveq2d 7207 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (1...1) = (1...(0 + 1)))
7470, 73eqtrd 2771 . . . . . . . . . . . . . . . . . . 19 (𝜑 → {1} = (1...(0 + 1)))
752eqcomd 2742 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 0 = 𝐾)
7675oveq1d 7206 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (0 + 1) = (𝐾 + 1))
7776oveq2d 7207 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (1...(0 + 1)) = (1...(𝐾 + 1)))
7874, 77eqtrd 2771 . . . . . . . . . . . . . . . . . 18 (𝜑 → {1} = (1...(𝐾 + 1)))
7978feq2d 6509 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑢:{1}⟶ℕ0𝑢:(1...(𝐾 + 1))⟶ℕ0))
8078sumeq1d 15230 . . . . . . . . . . . . . . . . . 18 (𝜑 → Σ𝑖 ∈ {1} (𝑢𝑖) = Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖))
8180eqeq1d 2738 . . . . . . . . . . . . . . . . 17 (𝜑 → (Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁 ↔ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁))
8279, 81anbi12d 634 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁) ↔ (𝑢:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁)))
8382imbi1d 345 . . . . . . . . . . . . . . 15 (𝜑 → (((𝑢:{1}⟶ℕ0 ∧ Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁) → 𝑢 ∈ {{⟨1, 𝑁⟩}}) ↔ ((𝑢:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁) → 𝑢 ∈ {{⟨1, 𝑁⟩}})))
8466, 83mpbid 235 . . . . . . . . . . . . . 14 (𝜑 → ((𝑢:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁) → 𝑢 ∈ {{⟨1, 𝑁⟩}}))
85 feq1 6504 . . . . . . . . . . . . . . . . . 18 (𝑔 = 𝑢 → (𝑔:(1...(𝐾 + 1))⟶ℕ0𝑢:(1...(𝐾 + 1))⟶ℕ0))
86 simpl 486 . . . . . . . . . . . . . . . . . . . . 21 ((𝑔 = 𝑢𝑖 ∈ (1...(𝐾 + 1))) → 𝑔 = 𝑢)
8786fveq1d 6697 . . . . . . . . . . . . . . . . . . . 20 ((𝑔 = 𝑢𝑖 ∈ (1...(𝐾 + 1))) → (𝑔𝑖) = (𝑢𝑖))
8887sumeq2dv 15232 . . . . . . . . . . . . . . . . . . 19 (𝑔 = 𝑢 → Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖))
8988eqeq1d 2738 . . . . . . . . . . . . . . . . . 18 (𝑔 = 𝑢 → (Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁 ↔ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁))
9085, 89anbi12d 634 . . . . . . . . . . . . . . . . 17 (𝑔 = 𝑢 → ((𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁) ↔ (𝑢:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁)))
9163, 90elab 3576 . . . . . . . . . . . . . . . 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 345 . . . . . . . . . . . . . 14 (𝜑 → ((𝑢 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)} → 𝑢 ∈ {{⟨1, 𝑁⟩}}) ↔ ((𝑢:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁) → 𝑢 ∈ {{⟨1, 𝑁⟩}})))
9484, 93mpbird 260 . . . . . . . . . . . . 13 (𝜑 → (𝑢 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)} → 𝑢 ∈ {{⟨1, 𝑁⟩}}))
9594imp 410 . . . . . . . . . . . 12 ((𝜑𝑢 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)}) → 𝑢 ∈ {{⟨1, 𝑁⟩}})
9695ex 416 . . . . . . . . . . 11 (𝜑 → (𝑢 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)} → 𝑢 ∈ {{⟨1, 𝑁⟩}}))
9713, 14, 15, 96ssrd 3892 . . . . . . . . . 10 (𝜑 → {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)} ⊆ {{⟨1, 𝑁⟩}})
9818a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 1 ∈ ℕ)
9998, 1, 55syl2anc 587 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑢:{1}⟶{𝑁} ↔ 𝑢 = {⟨1, 𝑁⟩}))
10099bicomd 226 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑢 = {⟨1, 𝑁⟩} ↔ 𝑢:{1}⟶{𝑁}))
101100biimpd 232 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑢 = {⟨1, 𝑁⟩} → 𝑢:{1}⟶{𝑁}))
102 elsni 4544 . . . . . . . . . . . . . . . . 17 (𝑢 ∈ {{⟨1, 𝑁⟩}} → 𝑢 = {⟨1, 𝑁⟩})
103101, 102impel 509 . . . . . . . . . . . . . . . 16 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → 𝑢:{1}⟶{𝑁})
1041snssd 4708 . . . . . . . . . . . . . . . . 17 (𝜑 → {𝑁} ⊆ ℕ0)
105104adantr 484 . . . . . . . . . . . . . . . 16 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → {𝑁} ⊆ ℕ0)
106 fss 6540 . . . . . . . . . . . . . . . 16 ((𝑢:{1}⟶{𝑁} ∧ {𝑁} ⊆ ℕ0) → 𝑢:{1}⟶ℕ0)
107103, 105, 106syl2anc 587 . . . . . . . . . . . . . . 15 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → 𝑢:{1}⟶ℕ0)
10879adantr 484 . . . . . . . . . . . . . . 15 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → (𝑢:{1}⟶ℕ0𝑢:(1...(𝐾 + 1))⟶ℕ0))
109107, 108mpbid 235 . . . . . . . . . . . . . 14 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → 𝑢:(1...(𝐾 + 1))⟶ℕ0)
110102adantl 485 . . . . . . . . . . . . . . 15 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → 𝑢 = {⟨1, 𝑁⟩})
111783ad2ant1 1135 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → {1} = (1...(𝐾 + 1)))
112111eqcomd 2742 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → (1...(𝐾 + 1)) = {1})
113112sumeq1d 15230 . . . . . . . . . . . . . . . . 17 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = Σ𝑖 ∈ {1} (𝑢𝑖))
11418a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → 1 ∈ ℕ)
11513ad2ant1 1135 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → 𝑁 ∈ ℕ0)
116115nn0cnd 12117 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → 𝑁 ∈ ℂ)
117114, 115, 45syl2anc 587 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → ({⟨1, 𝑁⟩}‘1) = 𝑁)
118117eqcomd 2742 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → 𝑁 = ({⟨1, 𝑁⟩}‘1))
1191103adant3 1134 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → 𝑢 = {⟨1, 𝑁⟩})
120119fveq1d 6697 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → (𝑢‘1) = ({⟨1, 𝑁⟩}‘1))
121118, 120eqtr4d 2774 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → 𝑁 = (𝑢‘1))
122121eleq1d 2815 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → (𝑁 ∈ ℂ ↔ (𝑢‘1) ∈ ℂ))
123116, 122mpbid 235 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → (𝑢‘1) ∈ ℂ)
124114, 123, 34syl2anc 587 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → Σ𝑖 ∈ {1} (𝑢𝑖) = (𝑢‘1))
125120, 117eqtrd 2771 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → (𝑢‘1) = 𝑁)
126124, 125eqtrd 2771 . . . . . . . . . . . . . . . . 17 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → Σ𝑖 ∈ {1} (𝑢𝑖) = 𝑁)
127113, 126eqtrd 2771 . . . . . . . . . . . . . . . 16 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}} ∧ 𝑢 = {⟨1, 𝑁⟩}) → Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁)
1281273expa 1120 . . . . . . . . . . . . . . 15 (((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) ∧ 𝑢 = {⟨1, 𝑁⟩}) → Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁)
129110, 128mpdan 687 . . . . . . . . . . . . . 14 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁)
130109, 129jca 515 . . . . . . . . . . . . 13 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → (𝑢:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑢𝑖) = 𝑁))
131130, 91sylibr 237 . . . . . . . . . . . 12 ((𝜑𝑢 ∈ {{⟨1, 𝑁⟩}}) → 𝑢 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)})
132131ex 416 . . . . . . . . . . 11 (𝜑 → (𝑢 ∈ {{⟨1, 𝑁⟩}} → 𝑢 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)}))
13313, 15, 14, 132ssrd 3892 . . . . . . . . . 10 (𝜑 → {{⟨1, 𝑁⟩}} ⊆ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)})
13497, 133eqssd 3904 . . . . . . . . 9 (𝜑 → {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)} = {{⟨1, 𝑁⟩}})
13512, 134eqtrd 2771 . . . . . . . 8 (𝜑𝐴 = {{⟨1, 𝑁⟩}})
136 eqss 3902 . . . . . . . . . 10 (𝐴 = {{⟨1, 𝑁⟩}} ↔ (𝐴 ⊆ {{⟨1, 𝑁⟩}} ∧ {{⟨1, 𝑁⟩}} ⊆ 𝐴))
137136biimpi 219 . . . . . . . . 9 (𝐴 = {{⟨1, 𝑁⟩}} → (𝐴 ⊆ {{⟨1, 𝑁⟩}} ∧ {{⟨1, 𝑁⟩}} ⊆ 𝐴))
138137simpld 498 . . . . . . . 8 (𝐴 = {{⟨1, 𝑁⟩}} → 𝐴 ⊆ {{⟨1, 𝑁⟩}})
139135, 138syl 17 . . . . . . 7 (𝜑𝐴 ⊆ {{⟨1, 𝑁⟩}})
140 fss 6540 . . . . . . 7 ((𝐺:𝐵𝐴𝐴 ⊆ {{⟨1, 𝑁⟩}}) → 𝐺:𝐵⟶{{⟨1, 𝑁⟩}})
14111, 139, 140syl2anc 587 . . . . . 6 (𝜑𝐺:𝐵⟶{{⟨1, 𝑁⟩}})
142141adantr 484 . . . . 5 ((𝜑𝑐𝐴) → 𝐺:𝐵⟶{{⟨1, 𝑁⟩}})
1439ffvelrnda 6882 . . . . 5 ((𝜑𝑐𝐴) → (𝐹𝑐) ∈ 𝐵)
144 fvconst 6957 . . . . 5 ((𝐺:𝐵⟶{{⟨1, 𝑁⟩}} ∧ (𝐹𝑐) ∈ 𝐵) → (𝐺‘(𝐹𝑐)) = {⟨1, 𝑁⟩})
145142, 143, 144syl2anc 587 . . . 4 ((𝜑𝑐𝐴) → (𝐺‘(𝐹𝑐)) = {⟨1, 𝑁⟩})
146135eleq2d 2816 . . . . . . . 8 (𝜑 → (𝑐𝐴𝑐 ∈ {{⟨1, 𝑁⟩}}))
147146biimpd 232 . . . . . . 7 (𝜑 → (𝑐𝐴𝑐 ∈ {{⟨1, 𝑁⟩}}))
148147imp 410 . . . . . 6 ((𝜑𝑐𝐴) → 𝑐 ∈ {{⟨1, 𝑁⟩}})
149 vex 3402 . . . . . . 7 𝑐 ∈ V
150149elsn 4542 . . . . . 6 (𝑐 ∈ {{⟨1, 𝑁⟩}} ↔ 𝑐 = {⟨1, 𝑁⟩})
151148, 150sylib 221 . . . . 5 ((𝜑𝑐𝐴) → 𝑐 = {⟨1, 𝑁⟩})
152151eqcomd 2742 . . . 4 ((𝜑𝑐𝐴) → {⟨1, 𝑁⟩} = 𝑐)
153145, 152eqtrd 2771 . . 3 ((𝜑𝑐𝐴) → (𝐺‘(𝐹𝑐)) = 𝑐)
154153ralrimiva 3095 . 2 (𝜑 → ∀𝑐𝐴 (𝐺‘(𝐹𝑐)) = 𝑐)
155 simpr 488 . . . . . . . . 9 ((𝜑𝑑𝐵) → 𝑑𝐵)
156 nfv 1922 . . . . . . . . . . 11 𝑑𝜑
157 nfcv 2897 . . . . . . . . . . 11 𝑑𝐵
158 nfcv 2897 . . . . . . . . . . 11 𝑑{∅}
1598a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑑𝐵) → 𝐵 = {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))})
160159eleq2d 2816 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑑𝐵) → (𝑑𝐵𝑑 ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))}))
161160biimpd 232 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑𝐵) → (𝑑𝐵𝑑 ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))}))
162161syldbl2 841 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑𝐵) → 𝑑 ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))})
163 vex 3402 . . . . . . . . . . . . . . . . . . 19 𝑑 ∈ V
164 feq1 6504 . . . . . . . . . . . . . . . . . . . 20 (𝑓 = 𝑑 → (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ↔ 𝑑:(1...𝐾)⟶(1...(𝑁 + 𝐾))))
165 fveq1 6694 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = 𝑑 → (𝑓𝑥) = (𝑑𝑥))
166 fveq1 6694 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = 𝑑 → (𝑓𝑦) = (𝑑𝑦))
167165, 166breq12d 5052 . . . . . . . . . . . . . . . . . . . . . 22 (𝑓 = 𝑑 → ((𝑓𝑥) < (𝑓𝑦) ↔ (𝑑𝑥) < (𝑑𝑦)))
168167imbi2d 344 . . . . . . . . . . . . . . . . . . . . 21 (𝑓 = 𝑑 → ((𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ (𝑥 < 𝑦 → (𝑑𝑥) < (𝑑𝑦))))
1691682ralbidv 3110 . . . . . . . . . . . . . . . . . . . 20 (𝑓 = 𝑑 → (∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑑𝑥) < (𝑑𝑦))))
170164, 169anbi12d 634 . . . . . . . . . . . . . . . . . . 19 (𝑓 = 𝑑 → ((𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦))) ↔ (𝑑:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑑𝑥) < (𝑑𝑦)))))
171163, 170elab 3576 . . . . . . . . . . . . . . . . . 18 (𝑑 ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))} ↔ (𝑑:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑑𝑥) < (𝑑𝑦))))
172162, 171sylib 221 . . . . . . . . . . . . . . . . 17 ((𝜑𝑑𝐵) → (𝑑:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑑𝑥) < (𝑑𝑦))))
173172simpld 498 . . . . . . . . . . . . . . . 16 ((𝜑𝑑𝐵) → 𝑑:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
174 0lt1 11319 . . . . . . . . . . . . . . . . . . . . 21 0 < 1
175174a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 0 < 1)
1762, 175eqbrtrd 5061 . . . . . . . . . . . . . . . . . . 19 (𝜑𝐾 < 1)
1775nn0zd 12245 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝐾 ∈ ℤ)
178 fzn 13093 . . . . . . . . . . . . . . . . . . . 20 ((1 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝐾 < 1 ↔ (1...𝐾) = ∅))
17967, 177, 178syl2anc 587 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝐾 < 1 ↔ (1...𝐾) = ∅))
180176, 179mpbid 235 . . . . . . . . . . . . . . . . . 18 (𝜑 → (1...𝐾) = ∅)
181180feq2d 6509 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑑:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ↔ 𝑑:∅⟶(1...(𝑁 + 𝐾))))
182181adantr 484 . . . . . . . . . . . . . . . 16 ((𝜑𝑑𝐵) → (𝑑:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ↔ 𝑑:∅⟶(1...(𝑁 + 𝐾))))
183173, 182mpbid 235 . . . . . . . . . . . . . . 15 ((𝜑𝑑𝐵) → 𝑑:∅⟶(1...(𝑁 + 𝐾)))
184 f0bi 6580 . . . . . . . . . . . . . . 15 (𝑑:∅⟶(1...(𝑁 + 𝐾)) ↔ 𝑑 = ∅)
185183, 184sylib 221 . . . . . . . . . . . . . 14 ((𝜑𝑑𝐵) → 𝑑 = ∅)
186 velsn 4543 . . . . . . . . . . . . . 14 (𝑑 ∈ {∅} ↔ 𝑑 = ∅)
187185, 186sylibr 237 . . . . . . . . . . . . 13 ((𝜑𝑑𝐵) → 𝑑 ∈ {∅})
188187ex 416 . . . . . . . . . . . 12 (𝜑 → (𝑑𝐵𝑑 ∈ {∅}))
189 f0 6578 . . . . . . . . . . . . . . . . . . . 20 ∅:∅⟶(1...(𝑁 + 𝐾))
190189a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ∅:∅⟶(1...(𝑁 + 𝐾)))
191180feq2d 6509 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (∅:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ↔ ∅:∅⟶(1...(𝑁 + 𝐾))))
192190, 191mpbird 260 . . . . . . . . . . . . . . . . . 18 (𝜑 → ∅:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
193 ral0 4410 . . . . . . . . . . . . . . . . . . . 20 𝑥 ∈ ∅ ∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦))
194193a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ∀𝑥 ∈ ∅ ∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦)))
195 biidd 265 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑥 ∈ (1...𝐾)) → (∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦)) ↔ ∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦))))
196180, 195raleqbidva 3321 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦)) ↔ ∀𝑥 ∈ ∅ ∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦))))
197194, 196mpbird 260 . . . . . . . . . . . . . . . . . 18 (𝜑 → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦)))
198192, 197jca 515 . . . . . . . . . . . . . . . . 17 (𝜑 → (∅:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦))))
199 0ex 5185 . . . . . . . . . . . . . . . . . 18 ∅ ∈ V
200 feq1 6504 . . . . . . . . . . . . . . . . . . . 20 (𝑓 = ∅ → (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ↔ ∅:(1...𝐾)⟶(1...(𝑁 + 𝐾))))
201 fveq1 6694 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = ∅ → (𝑓𝑥) = (∅‘𝑥))
202 fveq1 6694 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = ∅ → (𝑓𝑦) = (∅‘𝑦))
203201, 202breq12d 5052 . . . . . . . . . . . . . . . . . . . . . 22 (𝑓 = ∅ → ((𝑓𝑥) < (𝑓𝑦) ↔ (∅‘𝑥) < (∅‘𝑦)))
204203imbi2d 344 . . . . . . . . . . . . . . . . . . . . 21 (𝑓 = ∅ → ((𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ (𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦))))
2052042ralbidv 3110 . . . . . . . . . . . . . . . . . . . 20 (𝑓 = ∅ → (∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦))))
206200, 205anbi12d 634 . . . . . . . . . . . . . . . . . . 19 (𝑓 = ∅ → ((𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦))) ↔ (∅:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦)))))
207206elabg 3574 . . . . . . . . . . . . . . . . . 18 (∅ ∈ V → (∅ ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))} ↔ (∅:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦)))))
208199, 207ax-mp 5 . . . . . . . . . . . . . . . . 17 (∅ ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))} ↔ (∅:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (∅‘𝑥) < (∅‘𝑦))))
209198, 208sylibr 237 . . . . . . . . . . . . . . . 16 (𝜑 → ∅ ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))})
2108a1i 11 . . . . . . . . . . . . . . . 16 (𝜑𝐵 = {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))})
211209, 210eleqtrrd 2834 . . . . . . . . . . . . . . 15 (𝜑 → ∅ ∈ 𝐵)
212211adantr 484 . . . . . . . . . . . . . 14 ((𝜑𝑑 ∈ {∅}) → ∅ ∈ 𝐵)
213 elsni 4544 . . . . . . . . . . . . . . . 16 (𝑑 ∈ {∅} → 𝑑 = ∅)
214213adantl 485 . . . . . . . . . . . . . . 15 ((𝜑𝑑 ∈ {∅}) → 𝑑 = ∅)
215214eleq1d 2815 . . . . . . . . . . . . . 14 ((𝜑𝑑 ∈ {∅}) → (𝑑𝐵 ↔ ∅ ∈ 𝐵))
216212, 215mpbird 260 . . . . . . . . . . . . 13 ((𝜑𝑑 ∈ {∅}) → 𝑑𝐵)
217216ex 416 . . . . . . . . . . . 12 (𝜑 → (𝑑 ∈ {∅} → 𝑑𝐵))
218188, 217impbid 215 . . . . . . . . . . 11 (𝜑 → (𝑑𝐵𝑑 ∈ {∅}))
219156, 157, 158, 218eqrd 3906 . . . . . . . . . 10 (𝜑𝐵 = {∅})
220219adantr 484 . . . . . . . . 9 ((𝜑𝑑𝐵) → 𝐵 = {∅})
221155, 220eleqtrd 2833 . . . . . . . 8 ((𝜑𝑑𝐵) → 𝑑 ∈ {∅})
222163elsn 4542 . . . . . . . 8 (𝑑 ∈ {∅} ↔ 𝑑 = ∅)
223221, 222sylib 221 . . . . . . 7 ((𝜑𝑑𝐵) → 𝑑 = ∅)
224223fveq2d 6699 . . . . . 6 ((𝜑𝑑𝐵) → (𝐺𝑑) = (𝐺‘∅))
225224fveq2d 6699 . . . . 5 ((𝜑𝑑𝐵) → (𝐹‘(𝐺𝑑)) = (𝐹‘(𝐺‘∅)))
226180adantr 484 . . . . . . . . . . 11 ((𝜑𝑎𝐴) → (1...𝐾) = ∅)
227226mpteq1d 5129 . . . . . . . . . 10 ((𝜑𝑎𝐴) → (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) = (𝑗 ∈ ∅ ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))))
228 mpt0 6498 . . . . . . . . . . 11 (𝑗 ∈ ∅ ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) = ∅
229228a1i 11 . . . . . . . . . 10 ((𝜑𝑎𝐴) → (𝑗 ∈ ∅ ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) = ∅)
230227, 229eqtrd 2771 . . . . . . . . 9 ((𝜑𝑎𝐴) → (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) = ∅)
231 fzfid 13511 . . . . . . . . . . . 12 (𝜑 → (1...𝐾) ∈ Fin)
232231mptexd 7018 . . . . . . . . . . 11 (𝜑 → (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) ∈ V)
233 elsng 4541 . . . . . . . . . . 11 ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) ∈ V → ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) ∈ {∅} ↔ (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) = ∅))
234232, 233syl 17 . . . . . . . . . 10 (𝜑 → ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) ∈ {∅} ↔ (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) = ∅))
235234adantr 484 . . . . . . . . 9 ((𝜑𝑎𝐴) → ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) ∈ {∅} ↔ (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) = ∅))
236230, 235mpbird 260 . . . . . . . 8 ((𝜑𝑎𝐴) → (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎𝑙))) ∈ {∅})
237236, 6fmptd 6909 . . . . . . 7 (𝜑𝐹:𝐴⟶{∅})
238237adantr 484 . . . . . 6 ((𝜑𝑑𝐵) → 𝐹:𝐴⟶{∅})
239 ffvelrn 6880 . . . . . . . 8 ((𝐺:𝐵𝐴 ∧ ∅ ∈ 𝐵) → (𝐺‘∅) ∈ 𝐴)
24011, 211, 239syl2anc 587 . . . . . . 7 (𝜑 → (𝐺‘∅) ∈ 𝐴)
241240adantr 484 . . . . . 6 ((𝜑𝑑𝐵) → (𝐺‘∅) ∈ 𝐴)
242 fvconst 6957 . . . . . 6 ((𝐹:𝐴⟶{∅} ∧ (𝐺‘∅) ∈ 𝐴) → (𝐹‘(𝐺‘∅)) = ∅)
243238, 241, 242syl2anc 587 . . . . 5 ((𝜑𝑑𝐵) → (𝐹‘(𝐺‘∅)) = ∅)
244225, 243eqtrd 2771 . . . 4 ((𝜑𝑑𝐵) → (𝐹‘(𝐺𝑑)) = ∅)
245223eqcomd 2742 . . . 4 ((𝜑𝑑𝐵) → ∅ = 𝑑)
246244, 245eqtrd 2771 . . 3 ((𝜑𝑑𝐵) → (𝐹‘(𝐺𝑑)) = 𝑑)
247246ralrimiva 3095 . 2 (𝜑 → ∀𝑑𝐵 (𝐹‘(𝐺𝑑)) = 𝑑)
2489, 11, 154, 2472fvidf1od 7086 1 (𝜑𝐹:𝐴1-1-onto𝐵)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 399  w3a 1089   = wceq 1543  wcel 2112  {cab 2714  wral 3051  Vcvv 3398  wss 3853  c0 4223  ifcif 4425  {csn 4527  cop 4533   class class class wbr 5039  cmpt 5120   Fn wfn 6353  wf 6354  1-1-ontowf1o 6357  cfv 6358  (class class class)co 7191  Fincfn 8604  cc 10692  0cc0 10694  1c1 10695   + caddc 10697   < clt 10832  cmin 11027  cn 11795  0cn0 12055  cz 12141  ...cfz 13060  Σcsu 15214
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2018  ax-8 2114  ax-9 2122  ax-10 2143  ax-11 2160  ax-12 2177  ax-ext 2708  ax-rep 5164  ax-sep 5177  ax-nul 5184  ax-pow 5243  ax-pr 5307  ax-un 7501  ax-inf2 9234  ax-cnex 10750  ax-resscn 10751  ax-1cn 10752  ax-icn 10753  ax-addcl 10754  ax-addrcl 10755  ax-mulcl 10756  ax-mulrcl 10757  ax-mulcom 10758  ax-addass 10759  ax-mulass 10760  ax-distr 10761  ax-i2m1 10762  ax-1ne0 10763  ax-1rid 10764  ax-rnegex 10765  ax-rrecex 10766  ax-cnre 10767  ax-pre-lttri 10768  ax-pre-lttrn 10769  ax-pre-ltadd 10770  ax-pre-mulgt0 10771  ax-pre-sup 10772
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3or 1090  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2073  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2728  df-clel 2809  df-nfc 2879  df-ne 2933  df-nel 3037  df-ral 3056  df-rex 3057  df-reu 3058  df-rmo 3059  df-rab 3060  df-v 3400  df-sbc 3684  df-csb 3799  df-dif 3856  df-un 3858  df-in 3860  df-ss 3870  df-pss 3872  df-nul 4224  df-if 4426  df-pw 4501  df-sn 4528  df-pr 4530  df-tp 4532  df-op 4534  df-uni 4806  df-int 4846  df-iun 4892  df-br 5040  df-opab 5102  df-mpt 5121  df-tr 5147  df-id 5440  df-eprel 5445  df-po 5453  df-so 5454  df-fr 5494  df-se 5495  df-we 5496  df-xp 5542  df-rel 5543  df-cnv 5544  df-co 5545  df-dm 5546  df-rn 5547  df-res 5548  df-ima 5549  df-pred 6140  df-ord 6194  df-on 6195  df-lim 6196  df-suc 6197  df-iota 6316  df-fun 6360  df-fn 6361  df-f 6362  df-f1 6363  df-fo 6364  df-f1o 6365  df-fv 6366  df-isom 6367  df-riota 7148  df-ov 7194  df-oprab 7195  df-mpo 7196  df-om 7623  df-1st 7739  df-2nd 7740  df-wrecs 8025  df-recs 8086  df-rdg 8124  df-1o 8180  df-er 8369  df-en 8605  df-dom 8606  df-sdom 8607  df-fin 8608  df-sup 9036  df-oi 9104  df-card 9520  df-pnf 10834  df-mnf 10835  df-xr 10836  df-ltxr 10837  df-le 10838  df-sub 11029  df-neg 11030  df-div 11455  df-nn 11796  df-2 11858  df-3 11859  df-n0 12056  df-z 12142  df-uz 12404  df-rp 12552  df-ico 12906  df-fz 13061  df-fzo 13204  df-seq 13540  df-exp 13601  df-hash 13862  df-cj 14627  df-re 14628  df-im 14629  df-sqrt 14763  df-abs 14764  df-clim 15014  df-sum 15215
This theorem is referenced by:  sticksstones13  39784
  Copyright terms: Public domain W3C validator