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

Theorem poimirlem27 37607
Description: Lemma for poimir 37613 showing that the difference between admissible faces in the whole cube and admissible faces on the back face is even. Equation (7) of [Kulpa] p. 548. (Contributed by Brendan Leahy, 21-Aug-2020.)
Hypotheses
Ref Expression
poimir.0 (𝜑𝑁 ∈ ℕ)
poimirlem28.1 (𝑝 = ((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) → 𝐵 = 𝐶)
poimirlem28.2 ((𝜑𝑝:(1...𝑁)⟶(0...𝐾)) → 𝐵 ∈ (0...𝑁))
poimirlem28.3 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0)) → 𝐵 < 𝑛)
poimirlem28.4 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 𝐾)) → 𝐵 ≠ (𝑛 − 1))
Assertion
Ref Expression
poimirlem27 (𝜑 → 2 ∥ ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)})))
Distinct variable groups:   𝑓,𝑖,𝑗,𝑛,𝑝,𝑠,𝑡   𝜑,𝑗,𝑛   𝑗,𝑁,𝑛   𝜑,𝑖,𝑝,𝑠,𝑡   𝐵,𝑓,𝑖,𝑗,𝑛,𝑠,𝑡   𝑓,𝐾,𝑖,𝑗,𝑛,𝑝,𝑠,𝑡   𝑓,𝑁,𝑖,𝑝,𝑠,𝑡   𝐶,𝑖,𝑛,𝑝,𝑡
Allowed substitution hints:   𝜑(𝑓)   𝐵(𝑝)   𝐶(𝑓,𝑗,𝑠)

Proof of Theorem poimirlem27
Dummy variables 𝑚 𝑞 𝑢 𝑤 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fzfi 14023 . . . . . 6 (0...𝐾) ∈ Fin
2 fzfi 14023 . . . . . 6 (1...𝑁) ∈ Fin
3 mapfi 9418 . . . . . 6 (((0...𝐾) ∈ Fin ∧ (1...𝑁) ∈ Fin) → ((0...𝐾) ↑m (1...𝑁)) ∈ Fin)
41, 2, 3mp2an 691 . . . . 5 ((0...𝐾) ↑m (1...𝑁)) ∈ Fin
5 fzfi 14023 . . . . 5 (0...(𝑁 − 1)) ∈ Fin
6 mapfi 9418 . . . . 5 ((((0...𝐾) ↑m (1...𝑁)) ∈ Fin ∧ (0...(𝑁 − 1)) ∈ Fin) → (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))) ∈ Fin)
74, 5, 6mp2an 691 . . . 4 (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))) ∈ Fin
87a1i 11 . . 3 (𝜑 → (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))) ∈ Fin)
9 2z 12675 . . . 4 2 ∈ ℤ
109a1i 11 . . 3 (𝜑 → 2 ∈ ℤ)
11 fzofi 14025 . . . . . . . 8 (0..^𝐾) ∈ Fin
12 mapfi 9418 . . . . . . . 8 (((0..^𝐾) ∈ Fin ∧ (1...𝑁) ∈ Fin) → ((0..^𝐾) ↑m (1...𝑁)) ∈ Fin)
1311, 2, 12mp2an 691 . . . . . . 7 ((0..^𝐾) ↑m (1...𝑁)) ∈ Fin
14 mapfi 9418 . . . . . . . . 9 (((1...𝑁) ∈ Fin ∧ (1...𝑁) ∈ Fin) → ((1...𝑁) ↑m (1...𝑁)) ∈ Fin)
152, 2, 14mp2an 691 . . . . . . . 8 ((1...𝑁) ↑m (1...𝑁)) ∈ Fin
16 f1of 6862 . . . . . . . . . 10 (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) → 𝑓:(1...𝑁)⟶(1...𝑁))
1716ss2abi 4090 . . . . . . . . 9 {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ⊆ {𝑓𝑓:(1...𝑁)⟶(1...𝑁)}
18 ovex 7481 . . . . . . . . . 10 (1...𝑁) ∈ V
1918, 18mapval 8896 . . . . . . . . 9 ((1...𝑁) ↑m (1...𝑁)) = {𝑓𝑓:(1...𝑁)⟶(1...𝑁)}
2017, 19sseqtrri 4046 . . . . . . . 8 {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ⊆ ((1...𝑁) ↑m (1...𝑁))
21 ssfi 9240 . . . . . . . 8 ((((1...𝑁) ↑m (1...𝑁)) ∈ Fin ∧ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ⊆ ((1...𝑁) ↑m (1...𝑁))) → {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ∈ Fin)
2215, 20, 21mp2an 691 . . . . . . 7 {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ∈ Fin
23 xpfi 9386 . . . . . . 7 ((((0..^𝐾) ↑m (1...𝑁)) ∈ Fin ∧ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ∈ Fin) → (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∈ Fin)
2413, 22, 23mp2an 691 . . . . . 6 (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∈ Fin
25 fzfi 14023 . . . . . 6 (0...𝑁) ∈ Fin
26 xpfi 9386 . . . . . 6 (((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∈ Fin ∧ (0...𝑁) ∈ Fin) → ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∈ Fin)
2724, 25, 26mp2an 691 . . . . 5 ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∈ Fin
28 rabfi 9331 . . . . 5 (((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∈ Fin → {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} ∈ Fin)
2927, 28ax-mp 5 . . . 4 {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} ∈ Fin
30 hashcl 14405 . . . . 5 ({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} ∈ Fin → (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}) ∈ ℕ0)
3130nn0zd 12665 . . . 4 ({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} ∈ Fin → (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}) ∈ ℤ)
3229, 31mp1i 13 . . 3 ((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) → (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}) ∈ ℤ)
33 dfrex2 3079 . . . . 5 (∃𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) ↔ ¬ ∀𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ¬ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))
34 nfv 1913 . . . . . 6 𝑡(𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))))
35 nfcv 2908 . . . . . . 7 𝑡2
36 nfcv 2908 . . . . . . 7 𝑡
37 nfcv 2908 . . . . . . . 8 𝑡
38 nfrab1 3464 . . . . . . . 8 𝑡{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}
3937, 38nffv 6930 . . . . . . 7 𝑡(♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))})
4035, 36, 39nfbr 5213 . . . . . 6 𝑡2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))})
41 neq0 4375 . . . . . . . . . . . 12 (¬ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} = ∅ ↔ ∃𝑠 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))})
42 iddvds 16318 . . . . . . . . . . . . . . . . 17 (2 ∈ ℤ → 2 ∥ 2)
439, 42ax-mp 5 . . . . . . . . . . . . . . . 16 2 ∥ 2
44 vex 3492 . . . . . . . . . . . . . . . . . . 19 𝑠 ∈ V
45 hashsng 14418 . . . . . . . . . . . . . . . . . . 19 (𝑠 ∈ V → (♯‘{𝑠}) = 1)
4644, 45ax-mp 5 . . . . . . . . . . . . . . . . . 18 (♯‘{𝑠}) = 1
4746oveq2i 7459 . . . . . . . . . . . . . . . . 17 (1 + (♯‘{𝑠})) = (1 + 1)
48 df-2 12356 . . . . . . . . . . . . . . . . 17 2 = (1 + 1)
4947, 48eqtr4i 2771 . . . . . . . . . . . . . . . 16 (1 + (♯‘{𝑠})) = 2
5043, 49breqtrri 5193 . . . . . . . . . . . . . . 15 2 ∥ (1 + (♯‘{𝑠}))
51 rabfi 9331 . . . . . . . . . . . . . . . . . . . 20 (((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∈ Fin → {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∈ Fin)
52 diffi 9242 . . . . . . . . . . . . . . . . . . . 20 ({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∈ Fin → ({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠}) ∈ Fin)
5327, 51, 52mp2b 10 . . . . . . . . . . . . . . . . . . 19 ({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠}) ∈ Fin
54 snfi 9109 . . . . . . . . . . . . . . . . . . 19 {𝑠} ∈ Fin
55 disjdifr 4496 . . . . . . . . . . . . . . . . . . 19 (({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠}) ∩ {𝑠}) = ∅
56 hashun 14431 . . . . . . . . . . . . . . . . . . 19 ((({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠}) ∈ Fin ∧ {𝑠} ∈ Fin ∧ (({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠}) ∩ {𝑠}) = ∅) → (♯‘(({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠}) ∪ {𝑠})) = ((♯‘({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠})) + (♯‘{𝑠})))
5753, 54, 55, 56mp3an 1461 . . . . . . . . . . . . . . . . . 18 (♯‘(({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠}) ∪ {𝑠})) = ((♯‘({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠})) + (♯‘{𝑠}))
58 difsnid 4835 . . . . . . . . . . . . . . . . . . 19 (𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} → (({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠}) ∪ {𝑠}) = {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))})
5958fveq2d 6924 . . . . . . . . . . . . . . . . . 18 (𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} → (♯‘(({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠}) ∪ {𝑠})) = (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}))
6057, 59eqtr3id 2794 . . . . . . . . . . . . . . . . 17 (𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} → ((♯‘({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠})) + (♯‘{𝑠})) = (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}))
6160adantl 481 . . . . . . . . . . . . . . . 16 ((((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) ∧ 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) → ((♯‘({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠})) + (♯‘{𝑠})) = (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}))
62 poimir.0 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝑁 ∈ ℕ)
6362ad3antrrr 729 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) ∧ 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) → 𝑁 ∈ ℕ)
64 fveq2 6920 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑡 = 𝑢 → (2nd𝑡) = (2nd𝑢))
6564breq2d 5178 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑡 = 𝑢 → (𝑦 < (2nd𝑡) ↔ 𝑦 < (2nd𝑢)))
6665ifbid 4571 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑡 = 𝑢 → if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) = if(𝑦 < (2nd𝑢), 𝑦, (𝑦 + 1)))
6766csbeq1d 3925 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑡 = 𝑢if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑢), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))
68 2fveq3 6925 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑡 = 𝑢 → (1st ‘(1st𝑡)) = (1st ‘(1st𝑢)))
69 2fveq3 6925 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑡 = 𝑢 → (2nd ‘(1st𝑡)) = (2nd ‘(1st𝑢)))
7069imaeq1d 6088 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑡 = 𝑢 → ((2nd ‘(1st𝑡)) “ (1...𝑗)) = ((2nd ‘(1st𝑢)) “ (1...𝑗)))
7170xpeq1d 5729 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑡 = 𝑢 → (((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) = (((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}))
7269imaeq1d 6088 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑡 = 𝑢 → ((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) = ((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)))
7372xpeq1d 5729 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑡 = 𝑢 → (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}) = (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0}))
7471, 73uneq12d 4192 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑡 = 𝑢 → ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})) = ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0})))
7568, 74oveq12d 7466 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑡 = 𝑢 → ((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0}))))
7675csbeq2dv 3928 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑡 = 𝑢if(𝑦 < (2nd𝑢), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑢), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0}))))
7767, 76eqtrd 2780 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑡 = 𝑢if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑢), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0}))))
7877mpteq2dv 5268 . . . . . . . . . . . . . . . . . . . . . 22 (𝑡 = 𝑢 → (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑢), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0})))))
79 breq1 5169 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦 = 𝑤 → (𝑦 < (2nd𝑢) ↔ 𝑤 < (2nd𝑢)))
80 id 22 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦 = 𝑤𝑦 = 𝑤)
81 oveq1 7455 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦 = 𝑤 → (𝑦 + 1) = (𝑤 + 1))
8279, 80, 81ifbieq12d 4576 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 = 𝑤 → if(𝑦 < (2nd𝑢), 𝑦, (𝑦 + 1)) = if(𝑤 < (2nd𝑢), 𝑤, (𝑤 + 1)))
8382csbeq1d 3925 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 = 𝑤if(𝑦 < (2nd𝑢), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑤 < (2nd𝑢), 𝑤, (𝑤 + 1)) / 𝑗((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0}))))
84 oveq2 7456 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑗 = 𝑖 → (1...𝑗) = (1...𝑖))
8584imaeq2d 6089 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 = 𝑖 → ((2nd ‘(1st𝑢)) “ (1...𝑗)) = ((2nd ‘(1st𝑢)) “ (1...𝑖)))
8685xpeq1d 5729 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 = 𝑖 → (((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) = (((2nd ‘(1st𝑢)) “ (1...𝑖)) × {1}))
87 oveq1 7455 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑗 = 𝑖 → (𝑗 + 1) = (𝑖 + 1))
8887oveq1d 7463 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑗 = 𝑖 → ((𝑗 + 1)...𝑁) = ((𝑖 + 1)...𝑁))
8988imaeq2d 6089 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 = 𝑖 → ((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) = ((2nd ‘(1st𝑢)) “ ((𝑖 + 1)...𝑁)))
9089xpeq1d 5729 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 = 𝑖 → (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0}) = (((2nd ‘(1st𝑢)) “ ((𝑖 + 1)...𝑁)) × {0}))
9186, 90uneq12d 4192 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 = 𝑖 → ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0})) = ((((2nd ‘(1st𝑢)) “ (1...𝑖)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑖 + 1)...𝑁)) × {0})))
9291oveq2d 7464 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 = 𝑖 → ((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑖)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑖 + 1)...𝑁)) × {0}))))
9392cbvcsbv 3933 . . . . . . . . . . . . . . . . . . . . . . . 24 if(𝑤 < (2nd𝑢), 𝑤, (𝑤 + 1)) / 𝑗((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑤 < (2nd𝑢), 𝑤, (𝑤 + 1)) / 𝑖((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑖)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑖 + 1)...𝑁)) × {0})))
9483, 93eqtrdi 2796 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 = 𝑤if(𝑦 < (2nd𝑢), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑤 < (2nd𝑢), 𝑤, (𝑤 + 1)) / 𝑖((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑖)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑖 + 1)...𝑁)) × {0}))))
9594cbvmptv 5279 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑢), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0})))) = (𝑤 ∈ (0...(𝑁 − 1)) ↦ if(𝑤 < (2nd𝑢), 𝑤, (𝑤 + 1)) / 𝑖((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑖)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑖 + 1)...𝑁)) × {0}))))
9678, 95eqtrdi 2796 . . . . . . . . . . . . . . . . . . . . 21 (𝑡 = 𝑢 → (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) = (𝑤 ∈ (0...(𝑁 − 1)) ↦ if(𝑤 < (2nd𝑢), 𝑤, (𝑤 + 1)) / 𝑖((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑖)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑖 + 1)...𝑁)) × {0})))))
9796eqeq2d 2751 . . . . . . . . . . . . . . . . . . . 20 (𝑡 = 𝑢 → (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ↔ 𝑥 = (𝑤 ∈ (0...(𝑁 − 1)) ↦ if(𝑤 < (2nd𝑢), 𝑤, (𝑤 + 1)) / 𝑖((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑖)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑖 + 1)...𝑁)) × {0}))))))
9897cbvrabv 3454 . . . . . . . . . . . . . . . . . . 19 {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} = {𝑢 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑤 ∈ (0...(𝑁 − 1)) ↦ if(𝑤 < (2nd𝑢), 𝑤, (𝑤 + 1)) / 𝑖((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑖)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑖 + 1)...𝑁)) × {0}))))}
99 elmapi 8907 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))) → 𝑥:(0...(𝑁 − 1))⟶((0...𝐾) ↑m (1...𝑁)))
10099ad3antlr 730 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) ∧ 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) → 𝑥:(0...(𝑁 − 1))⟶((0...𝐾) ↑m (1...𝑁)))
101 simpr 484 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) ∧ 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) → 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))})
102 simpl 482 . . . . . . . . . . . . . . . . . . . . . 22 ((∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾) → ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0)
103102ralimi 3089 . . . . . . . . . . . . . . . . . . . . 21 (∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾) → ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0)
104103ad2antlr 726 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) ∧ 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) → ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0)
105 fveq2 6920 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑛 = 𝑚 → (𝑝𝑛) = (𝑝𝑚))
106105neeq1d 3006 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 = 𝑚 → ((𝑝𝑛) ≠ 0 ↔ (𝑝𝑚) ≠ 0))
107106rexbidv 3185 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 = 𝑚 → (∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ ∃𝑝 ∈ ran 𝑥(𝑝𝑚) ≠ 0))
108 fveq1 6919 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑝 = 𝑞 → (𝑝𝑚) = (𝑞𝑚))
109108neeq1d 3006 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑝 = 𝑞 → ((𝑝𝑚) ≠ 0 ↔ (𝑞𝑚) ≠ 0))
110109cbvrexvw 3244 . . . . . . . . . . . . . . . . . . . . . 22 (∃𝑝 ∈ ran 𝑥(𝑝𝑚) ≠ 0 ↔ ∃𝑞 ∈ ran 𝑥(𝑞𝑚) ≠ 0)
111107, 110bitrdi 287 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 𝑚 → (∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ ∃𝑞 ∈ ran 𝑥(𝑞𝑚) ≠ 0))
112111rspccva 3634 . . . . . . . . . . . . . . . . . . . 20 ((∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ 𝑚 ∈ (1...𝑁)) → ∃𝑞 ∈ ran 𝑥(𝑞𝑚) ≠ 0)
113104, 112sylan 579 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) ∧ 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) ∧ 𝑚 ∈ (1...𝑁)) → ∃𝑞 ∈ ran 𝑥(𝑞𝑚) ≠ 0)
114 simpr 484 . . . . . . . . . . . . . . . . . . . . . 22 ((∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾) → ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)
115114ralimi 3089 . . . . . . . . . . . . . . . . . . . . 21 (∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾) → ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)
116115ad2antlr 726 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) ∧ 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) → ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)
117105neeq1d 3006 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 = 𝑚 → ((𝑝𝑛) ≠ 𝐾 ↔ (𝑝𝑚) ≠ 𝐾))
118117rexbidv 3185 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 = 𝑚 → (∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾 ↔ ∃𝑝 ∈ ran 𝑥(𝑝𝑚) ≠ 𝐾))
119108neeq1d 3006 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑝 = 𝑞 → ((𝑝𝑚) ≠ 𝐾 ↔ (𝑞𝑚) ≠ 𝐾))
120119cbvrexvw 3244 . . . . . . . . . . . . . . . . . . . . . 22 (∃𝑝 ∈ ran 𝑥(𝑝𝑚) ≠ 𝐾 ↔ ∃𝑞 ∈ ran 𝑥(𝑞𝑚) ≠ 𝐾)
121118, 120bitrdi 287 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 𝑚 → (∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾 ↔ ∃𝑞 ∈ ran 𝑥(𝑞𝑚) ≠ 𝐾))
122121rspccva 3634 . . . . . . . . . . . . . . . . . . . 20 ((∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾𝑚 ∈ (1...𝑁)) → ∃𝑞 ∈ ran 𝑥(𝑞𝑚) ≠ 𝐾)
123116, 122sylan 579 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) ∧ 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) ∧ 𝑚 ∈ (1...𝑁)) → ∃𝑞 ∈ ran 𝑥(𝑞𝑚) ≠ 𝐾)
12463, 98, 100, 101, 113, 123poimirlem22 37602 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) ∧ 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) → ∃!𝑧 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}𝑧𝑠)
125 eldifsn 4811 . . . . . . . . . . . . . . . . . . . 20 (𝑧 ∈ ({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠}) ↔ (𝑧 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∧ 𝑧𝑠))
126125eubii 2588 . . . . . . . . . . . . . . . . . . 19 (∃!𝑧 𝑧 ∈ ({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠}) ↔ ∃!𝑧(𝑧 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∧ 𝑧𝑠))
12753elexi 3511 . . . . . . . . . . . . . . . . . . . 20 ({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠}) ∈ V
128 euhash1 14469 . . . . . . . . . . . . . . . . . . . 20 (({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠}) ∈ V → ((♯‘({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠})) = 1 ↔ ∃!𝑧 𝑧 ∈ ({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠})))
129127, 128ax-mp 5 . . . . . . . . . . . . . . . . . . 19 ((♯‘({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠})) = 1 ↔ ∃!𝑧 𝑧 ∈ ({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠}))
130 df-reu 3389 . . . . . . . . . . . . . . . . . . 19 (∃!𝑧 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}𝑧𝑠 ↔ ∃!𝑧(𝑧 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∧ 𝑧𝑠))
131126, 129, 1303bitr4ri 304 . . . . . . . . . . . . . . . . . 18 (∃!𝑧 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}𝑧𝑠 ↔ (♯‘({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠})) = 1)
132124, 131sylib 218 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) ∧ 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) → (♯‘({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠})) = 1)
133132oveq1d 7463 . . . . . . . . . . . . . . . 16 ((((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) ∧ 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) → ((♯‘({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ∖ {𝑠})) + (♯‘{𝑠})) = (1 + (♯‘{𝑠})))
13461, 133eqtr3d 2782 . . . . . . . . . . . . . . 15 ((((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) ∧ 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) → (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) = (1 + (♯‘{𝑠})))
13550, 134breqtrrid 5204 . . . . . . . . . . . . . 14 ((((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) ∧ 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) → 2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}))
136135ex 412 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → (𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} → 2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))})))
137136exlimdv 1932 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → (∃𝑠 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} → 2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))})))
13841, 137biimtrid 242 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → (¬ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} = ∅ → 2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))})))
139 dvds0 16320 . . . . . . . . . . . . . 14 (2 ∈ ℤ → 2 ∥ 0)
1409, 139ax-mp 5 . . . . . . . . . . . . 13 2 ∥ 0
141 hash0 14416 . . . . . . . . . . . . 13 (♯‘∅) = 0
142140, 141breqtrri 5193 . . . . . . . . . . . 12 2 ∥ (♯‘∅)
143 fveq2 6920 . . . . . . . . . . . 12 ({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} = ∅ → (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) = (♯‘∅))
144142, 143breqtrrid 5204 . . . . . . . . . . 11 ({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} = ∅ → 2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}))
145138, 144pm2.61d2 181 . . . . . . . . . 10 (((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → 2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}))
146145ex 412 . . . . . . . . 9 ((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) → (∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾) → 2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))})))
147146adantld 490 . . . . . . . 8 ((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) → (((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → 2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))})))
148 iba 527 . . . . . . . . . . 11 (((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ↔ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))))
149148rabbidv 3451 . . . . . . . . . 10 (((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} = {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))})
150149fveq2d 6924 . . . . . . . . 9 (((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) = (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}))
151150breq2d 5178 . . . . . . . 8 (((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → (2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}) ↔ 2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))})))
152147, 151mpbidi 241 . . . . . . 7 ((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) → (((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → 2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))})))
153152a1d 25 . . . . . 6 ((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) → (𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → 2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}))))
15434, 40, 153rexlimd 3272 . . . . 5 ((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) → (∃𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → 2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))})))
15533, 154biimtrrid 243 . . . 4 ((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) → (¬ ∀𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ¬ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → 2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))})))
156 simpr 484 . . . . . . . . 9 ((𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾))) → ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))
157156con3i 154 . . . . . . . 8 (¬ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → ¬ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾))))
158157ralimi 3089 . . . . . . 7 (∀𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ¬ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → ∀𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ¬ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾))))
159 rabeq0 4411 . . . . . . 7 ({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} = ∅ ↔ ∀𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ¬ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾))))
160158, 159sylibr 234 . . . . . 6 (∀𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ¬ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} = ∅)
161160fveq2d 6924 . . . . 5 (∀𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ¬ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}) = (♯‘∅))
162142, 161breqtrrid 5204 . . . 4 (∀𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ¬ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)) → 2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}))
163155, 162pm2.61d2 181 . . 3 ((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) → 2 ∥ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}))
1648, 10, 32, 163fsumdvds 16356 . 2 (𝜑 → 2 ∥ Σ𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))(♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}))
165 rabfi 9331 . . . . 5 (((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∈ Fin → {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶} ∈ Fin)
16627, 165ax-mp 5 . . . 4 {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶} ∈ Fin
167 simp1 1136 . . . . . . 7 ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁) → ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶)
168 sneq 4658 . . . . . . . . . . . . 13 ((2nd𝑡) = 𝑁 → {(2nd𝑡)} = {𝑁})
169168difeq2d 4149 . . . . . . . . . . . 12 ((2nd𝑡) = 𝑁 → ((0...𝑁) ∖ {(2nd𝑡)}) = ((0...𝑁) ∖ {𝑁}))
170 difun2 4504 . . . . . . . . . . . . 13 (((0...(𝑁 − 1)) ∪ {𝑁}) ∖ {𝑁}) = ((0...(𝑁 − 1)) ∖ {𝑁})
17162nnnn0d 12613 . . . . . . . . . . . . . . . . . 18 (𝜑𝑁 ∈ ℕ0)
172 nn0uz 12945 . . . . . . . . . . . . . . . . . 18 0 = (ℤ‘0)
173171, 172eleqtrdi 2854 . . . . . . . . . . . . . . . . 17 (𝜑𝑁 ∈ (ℤ‘0))
174 fzm1 13664 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ (ℤ‘0) → (𝑛 ∈ (0...𝑁) ↔ (𝑛 ∈ (0...(𝑁 − 1)) ∨ 𝑛 = 𝑁)))
175173, 174syl 17 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑛 ∈ (0...𝑁) ↔ (𝑛 ∈ (0...(𝑁 − 1)) ∨ 𝑛 = 𝑁)))
176 elun 4176 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ((0...(𝑁 − 1)) ∪ {𝑁}) ↔ (𝑛 ∈ (0...(𝑁 − 1)) ∨ 𝑛 ∈ {𝑁}))
177 velsn 4664 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ {𝑁} ↔ 𝑛 = 𝑁)
178177orbi2i 911 . . . . . . . . . . . . . . . . 17 ((𝑛 ∈ (0...(𝑁 − 1)) ∨ 𝑛 ∈ {𝑁}) ↔ (𝑛 ∈ (0...(𝑁 − 1)) ∨ 𝑛 = 𝑁))
179176, 178bitri 275 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ((0...(𝑁 − 1)) ∪ {𝑁}) ↔ (𝑛 ∈ (0...(𝑁 − 1)) ∨ 𝑛 = 𝑁))
180175, 179bitr4di 289 . . . . . . . . . . . . . . 15 (𝜑 → (𝑛 ∈ (0...𝑁) ↔ 𝑛 ∈ ((0...(𝑁 − 1)) ∪ {𝑁})))
181180eqrdv 2738 . . . . . . . . . . . . . 14 (𝜑 → (0...𝑁) = ((0...(𝑁 − 1)) ∪ {𝑁}))
182181difeq1d 4148 . . . . . . . . . . . . 13 (𝜑 → ((0...𝑁) ∖ {𝑁}) = (((0...(𝑁 − 1)) ∪ {𝑁}) ∖ {𝑁}))
18362nnzd 12666 . . . . . . . . . . . . . . 15 (𝜑𝑁 ∈ ℤ)
184 uzid 12918 . . . . . . . . . . . . . . 15 (𝑁 ∈ ℤ → 𝑁 ∈ (ℤ𝑁))
185 uznfz 13667 . . . . . . . . . . . . . . 15 (𝑁 ∈ (ℤ𝑁) → ¬ 𝑁 ∈ (0...(𝑁 − 1)))
186183, 184, 1853syl 18 . . . . . . . . . . . . . 14 (𝜑 → ¬ 𝑁 ∈ (0...(𝑁 − 1)))
187 disjsn 4736 . . . . . . . . . . . . . . 15 (((0...(𝑁 − 1)) ∩ {𝑁}) = ∅ ↔ ¬ 𝑁 ∈ (0...(𝑁 − 1)))
188 disj3 4477 . . . . . . . . . . . . . . 15 (((0...(𝑁 − 1)) ∩ {𝑁}) = ∅ ↔ (0...(𝑁 − 1)) = ((0...(𝑁 − 1)) ∖ {𝑁}))
189187, 188bitr3i 277 . . . . . . . . . . . . . 14 𝑁 ∈ (0...(𝑁 − 1)) ↔ (0...(𝑁 − 1)) = ((0...(𝑁 − 1)) ∖ {𝑁}))
190186, 189sylib 218 . . . . . . . . . . . . 13 (𝜑 → (0...(𝑁 − 1)) = ((0...(𝑁 − 1)) ∖ {𝑁}))
191170, 182, 1903eqtr4a 2806 . . . . . . . . . . . 12 (𝜑 → ((0...𝑁) ∖ {𝑁}) = (0...(𝑁 − 1)))
192169, 191sylan9eqr 2802 . . . . . . . . . . 11 ((𝜑 ∧ (2nd𝑡) = 𝑁) → ((0...𝑁) ∖ {(2nd𝑡)}) = (0...(𝑁 − 1)))
193192rexeqdv 3335 . . . . . . . . . 10 ((𝜑 ∧ (2nd𝑡) = 𝑁) → (∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ↔ ∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶))
194193biimprd 248 . . . . . . . . 9 ((𝜑 ∧ (2nd𝑡) = 𝑁) → (∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 → ∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶))
195194ralimdv 3175 . . . . . . . 8 ((𝜑 ∧ (2nd𝑡) = 𝑁) → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 → ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶))
196195expimpd 453 . . . . . . 7 (𝜑 → (((2nd𝑡) = 𝑁 ∧ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶) → ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶))
197167, 196sylan2i 605 . . . . . 6 (𝜑 → (((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)) → ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶))
198197adantr 480 . . . . 5 ((𝜑𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) → (((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)) → ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶))
199198ss2rabdv 4099 . . . 4 (𝜑 → {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ⊆ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶})
200 hashssdif 14461 . . . 4 (({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶} ∈ Fin ∧ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ⊆ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶}) → (♯‘({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶} ∖ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})) = ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶}) − (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})))
201166, 199, 200sylancr 586 . . 3 (𝜑 → (♯‘({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶} ∖ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})) = ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶}) − (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})))
20262adantr 480 . . . . . . . . . 10 ((𝜑𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) → 𝑁 ∈ ℕ)
203 poimirlem28.1 . . . . . . . . . 10 (𝑝 = ((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) → 𝐵 = 𝐶)
204 poimirlem28.2 . . . . . . . . . . 11 ((𝜑𝑝:(1...𝑁)⟶(0...𝐾)) → 𝐵 ∈ (0...𝑁))
205204adantlr 714 . . . . . . . . . 10 (((𝜑𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → 𝐵 ∈ (0...𝑁))
206 xp1st 8062 . . . . . . . . . . . 12 (𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
207 xp1st 8062 . . . . . . . . . . . 12 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (1st ‘(1st𝑡)) ∈ ((0..^𝐾) ↑m (1...𝑁)))
208 elmapi 8907 . . . . . . . . . . . 12 ((1st ‘(1st𝑡)) ∈ ((0..^𝐾) ↑m (1...𝑁)) → (1st ‘(1st𝑡)):(1...𝑁)⟶(0..^𝐾))
209206, 207, 2083syl 18 . . . . . . . . . . 11 (𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1st ‘(1st𝑡)):(1...𝑁)⟶(0..^𝐾))
210209adantl 481 . . . . . . . . . 10 ((𝜑𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) → (1st ‘(1st𝑡)):(1...𝑁)⟶(0..^𝐾))
211 xp2nd 8063 . . . . . . . . . . . . 13 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (2nd ‘(1st𝑡)) ∈ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
212 fvex 6933 . . . . . . . . . . . . . 14 (2nd ‘(1st𝑡)) ∈ V
213 f1oeq1 6850 . . . . . . . . . . . . . 14 (𝑓 = (2nd ‘(1st𝑡)) → (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) ↔ (2nd ‘(1st𝑡)):(1...𝑁)–1-1-onto→(1...𝑁)))
214212, 213elab 3694 . . . . . . . . . . . . 13 ((2nd ‘(1st𝑡)) ∈ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ↔ (2nd ‘(1st𝑡)):(1...𝑁)–1-1-onto→(1...𝑁))
215211, 214sylib 218 . . . . . . . . . . . 12 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (2nd ‘(1st𝑡)):(1...𝑁)–1-1-onto→(1...𝑁))
216206, 215syl 17 . . . . . . . . . . 11 (𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (2nd ‘(1st𝑡)):(1...𝑁)–1-1-onto→(1...𝑁))
217216adantl 481 . . . . . . . . . 10 ((𝜑𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) → (2nd ‘(1st𝑡)):(1...𝑁)–1-1-onto→(1...𝑁))
218 xp2nd 8063 . . . . . . . . . . 11 (𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (2nd𝑡) ∈ (0...𝑁))
219218adantl 481 . . . . . . . . . 10 ((𝜑𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) → (2nd𝑡) ∈ (0...𝑁))
220202, 203, 205, 210, 217, 219poimirlem24 37604 . . . . . . . . 9 ((𝜑𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) → (∃𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))(𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0)) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = ⟨(1st ‘(1st𝑡)), (2nd ‘(1st𝑡))⟩ / 𝑠𝐶 ∧ ¬ ((2nd𝑡) = 𝑁 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)))))
221206adantl 481 . . . . . . . . . 10 ((𝜑𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) → (1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
222 1st2nd2 8069 . . . . . . . . . . . . . . 15 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (1st𝑡) = ⟨(1st ‘(1st𝑡)), (2nd ‘(1st𝑡))⟩)
223222csbeq1d 3925 . . . . . . . . . . . . . 14 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (1st𝑡) / 𝑠𝐶 = ⟨(1st ‘(1st𝑡)), (2nd ‘(1st𝑡))⟩ / 𝑠𝐶)
224223eqeq2d 2751 . . . . . . . . . . . . 13 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (𝑖 = (1st𝑡) / 𝑠𝐶𝑖 = ⟨(1st ‘(1st𝑡)), (2nd ‘(1st𝑡))⟩ / 𝑠𝐶))
225224rexbidv 3185 . . . . . . . . . . . 12 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ↔ ∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = ⟨(1st ‘(1st𝑡)), (2nd ‘(1st𝑡))⟩ / 𝑠𝐶))
226225ralbidv 3184 . . . . . . . . . . 11 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ↔ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = ⟨(1st ‘(1st𝑡)), (2nd ‘(1st𝑡))⟩ / 𝑠𝐶))
227226anbi1d 630 . . . . . . . . . 10 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ¬ ((2nd𝑡) = 𝑁 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = ⟨(1st ‘(1st𝑡)), (2nd ‘(1st𝑡))⟩ / 𝑠𝐶 ∧ ¬ ((2nd𝑡) = 𝑁 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)))))
228221, 227syl 17 . . . . . . . . 9 ((𝜑𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) → ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ¬ ((2nd𝑡) = 𝑁 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = ⟨(1st ‘(1st𝑡)), (2nd ‘(1st𝑡))⟩ / 𝑠𝐶 ∧ ¬ ((2nd𝑡) = 𝑁 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)))))
229220, 228bitr4d 282 . . . . . . . 8 ((𝜑𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) → (∃𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))(𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0)) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ¬ ((2nd𝑡) = 𝑁 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)))))
23099frnd 6755 . . . . . . . . . . . . . 14 (𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))) → ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁)))
231230anim2i 616 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) → (𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))))
232 dfss3 3997 . . . . . . . . . . . . . 14 ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ↔ ∀𝑛 ∈ (0...(𝑁 − 1))𝑛 ∈ ran (𝑝 ∈ ran 𝑥𝐵))
233 vex 3492 . . . . . . . . . . . . . . . 16 𝑛 ∈ V
234 eqid 2740 . . . . . . . . . . . . . . . . 17 (𝑝 ∈ ran 𝑥𝐵) = (𝑝 ∈ ran 𝑥𝐵)
235234elrnmpt 5981 . . . . . . . . . . . . . . . 16 (𝑛 ∈ V → (𝑛 ∈ ran (𝑝 ∈ ran 𝑥𝐵) ↔ ∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵))
236233, 235ax-mp 5 . . . . . . . . . . . . . . 15 (𝑛 ∈ ran (𝑝 ∈ ran 𝑥𝐵) ↔ ∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵)
237236ralbii 3099 . . . . . . . . . . . . . 14 (∀𝑛 ∈ (0...(𝑁 − 1))𝑛 ∈ ran (𝑝 ∈ ran 𝑥𝐵) ↔ ∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵)
238232, 237sylbb 219 . . . . . . . . . . . . 13 ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) → ∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵)
239 1eluzge0 12957 . . . . . . . . . . . . . . . . 17 1 ∈ (ℤ‘0)
240 fzss1 13623 . . . . . . . . . . . . . . . . 17 (1 ∈ (ℤ‘0) → (1...(𝑁 − 1)) ⊆ (0...(𝑁 − 1)))
241 ssralv 4077 . . . . . . . . . . . . . . . . 17 ((1...(𝑁 − 1)) ⊆ (0...(𝑁 − 1)) → (∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 → ∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵))
242239, 240, 241mp2b 10 . . . . . . . . . . . . . . . 16 (∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 → ∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵)
24362nncnd 12309 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑𝑁 ∈ ℂ)
244 npcan1 11715 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑁 ∈ ℂ → ((𝑁 − 1) + 1) = 𝑁)
245243, 244syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → ((𝑁 − 1) + 1) = 𝑁)
246 peano2zm 12686 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑁 ∈ ℤ → (𝑁 − 1) ∈ ℤ)
247 uzid 12918 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑁 − 1) ∈ ℤ → (𝑁 − 1) ∈ (ℤ‘(𝑁 − 1)))
248 peano2uz 12966 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑁 − 1) ∈ (ℤ‘(𝑁 − 1)) → ((𝑁 − 1) + 1) ∈ (ℤ‘(𝑁 − 1)))
249183, 246, 247, 2484syl 19 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → ((𝑁 − 1) + 1) ∈ (ℤ‘(𝑁 − 1)))
250245, 249eqeltrrd 2845 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑𝑁 ∈ (ℤ‘(𝑁 − 1)))
251 fzss2 13624 . . . . . . . . . . . . . . . . . . . . . 22 (𝑁 ∈ (ℤ‘(𝑁 − 1)) → (1...(𝑁 − 1)) ⊆ (1...𝑁))
252250, 251syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (1...(𝑁 − 1)) ⊆ (1...𝑁))
253252sselda 4008 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑛 ∈ (1...(𝑁 − 1))) → 𝑛 ∈ (1...𝑁))
254253adantlr 714 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...(𝑁 − 1))) → 𝑛 ∈ (1...𝑁))
255 simplr 768 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) → ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁)))
256 ssel2 4003 . . . . . . . . . . . . . . . . . . . . . . 23 ((ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁)) ∧ 𝑝 ∈ ran 𝑥) → 𝑝 ∈ ((0...𝐾) ↑m (1...𝑁)))
257 elmapi 8907 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑝 ∈ ((0...𝐾) ↑m (1...𝑁)) → 𝑝:(1...𝑁)⟶(0...𝐾))
258256, 257syl 17 . . . . . . . . . . . . . . . . . . . . . 22 ((ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁)) ∧ 𝑝 ∈ ran 𝑥) → 𝑝:(1...𝑁)⟶(0...𝐾))
259255, 258sylan 579 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) ∧ 𝑝 ∈ ran 𝑥) → 𝑝:(1...𝑁)⟶(0...𝐾))
260 poimirlem28.3 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0)) → 𝐵 < 𝑛)
261 elfzelz 13584 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑛 ∈ (1...𝑁) → 𝑛 ∈ ℤ)
262261zred 12747 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑛 ∈ (1...𝑁) → 𝑛 ∈ ℝ)
263262ltnrd 11424 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑛 ∈ (1...𝑁) → ¬ 𝑛 < 𝑛)
264 breq1 5169 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑛 = 𝐵 → (𝑛 < 𝑛𝐵 < 𝑛))
265264notbid 318 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑛 = 𝐵 → (¬ 𝑛 < 𝑛 ↔ ¬ 𝐵 < 𝑛))
266263, 265syl5ibcom 245 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑛 ∈ (1...𝑁) → (𝑛 = 𝐵 → ¬ 𝐵 < 𝑛))
267266necon2ad 2961 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑛 ∈ (1...𝑁) → (𝐵 < 𝑛𝑛𝐵))
2682673ad2ant1 1133 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0) → (𝐵 < 𝑛𝑛𝐵))
269268adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0)) → (𝐵 < 𝑛𝑛𝐵))
270260, 269mpd 15 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0)) → 𝑛𝐵)
2712703exp2 1354 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → (𝑛 ∈ (1...𝑁) → (𝑝:(1...𝑁)⟶(0...𝐾) → ((𝑝𝑛) = 0 → 𝑛𝐵))))
272271imp31 417 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → ((𝑝𝑛) = 0 → 𝑛𝐵))
273272necon2d 2969 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → (𝑛 = 𝐵 → (𝑝𝑛) ≠ 0))
274273adantllr 718 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → (𝑛 = 𝐵 → (𝑝𝑛) ≠ 0))
275259, 274syldan 590 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) ∧ 𝑝 ∈ ran 𝑥) → (𝑛 = 𝐵 → (𝑝𝑛) ≠ 0))
276275reximdva 3174 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) → (∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 → ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0))
277254, 276syldan 590 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...(𝑁 − 1))) → (∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 → ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0))
278277ralimdva 3173 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) → (∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 → ∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0))
279278imp 406 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ ∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵) → ∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0)
280242, 279sylan2 592 . . . . . . . . . . . . . . 15 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ ∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵) → ∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0)
281280biantrurd 532 . . . . . . . . . . . . . 14 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ ∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵) → (∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0 ↔ (∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0)))
282 nnuz 12946 . . . . . . . . . . . . . . . . . . . . . 22 ℕ = (ℤ‘1)
28362, 282eleqtrdi 2854 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑁 ∈ (ℤ‘1))
284 fzm1 13664 . . . . . . . . . . . . . . . . . . . . 21 (𝑁 ∈ (ℤ‘1) → (𝑛 ∈ (1...𝑁) ↔ (𝑛 ∈ (1...(𝑁 − 1)) ∨ 𝑛 = 𝑁)))
285283, 284syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑛 ∈ (1...𝑁) ↔ (𝑛 ∈ (1...(𝑁 − 1)) ∨ 𝑛 = 𝑁)))
286 elun 4176 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ ((1...(𝑁 − 1)) ∪ {𝑁}) ↔ (𝑛 ∈ (1...(𝑁 − 1)) ∨ 𝑛 ∈ {𝑁}))
287177orbi2i 911 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ (1...(𝑁 − 1)) ∨ 𝑛 ∈ {𝑁}) ↔ (𝑛 ∈ (1...(𝑁 − 1)) ∨ 𝑛 = 𝑁))
288286, 287bitri 275 . . . . . . . . . . . . . . . . . . . 20 (𝑛 ∈ ((1...(𝑁 − 1)) ∪ {𝑁}) ↔ (𝑛 ∈ (1...(𝑁 − 1)) ∨ 𝑛 = 𝑁))
289285, 288bitr4di 289 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑛 ∈ (1...𝑁) ↔ 𝑛 ∈ ((1...(𝑁 − 1)) ∪ {𝑁})))
290289eqrdv 2738 . . . . . . . . . . . . . . . . . 18 (𝜑 → (1...𝑁) = ((1...(𝑁 − 1)) ∪ {𝑁}))
291290raleqdv 3334 . . . . . . . . . . . . . . . . 17 (𝜑 → (∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ ∀𝑛 ∈ ((1...(𝑁 − 1)) ∪ {𝑁})∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0))
292 ralunb 4220 . . . . . . . . . . . . . . . . 17 (∀𝑛 ∈ ((1...(𝑁 − 1)) ∪ {𝑁})∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ (∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∀𝑛 ∈ {𝑁}∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0))
293291, 292bitrdi 287 . . . . . . . . . . . . . . . 16 (𝜑 → (∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ (∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∀𝑛 ∈ {𝑁}∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0)))
294 fveq2 6920 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 𝑁 → (𝑝𝑛) = (𝑝𝑁))
295294neeq1d 3006 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 𝑁 → ((𝑝𝑛) ≠ 0 ↔ (𝑝𝑁) ≠ 0))
296295rexbidv 3185 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑁 → (∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0))
297296ralsng 4697 . . . . . . . . . . . . . . . . . 18 (𝑁 ∈ ℕ → (∀𝑛 ∈ {𝑁}∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0))
29862, 297syl 17 . . . . . . . . . . . . . . . . 17 (𝜑 → (∀𝑛 ∈ {𝑁}∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0))
299298anbi2d 629 . . . . . . . . . . . . . . . 16 (𝜑 → ((∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∀𝑛 ∈ {𝑁}∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0) ↔ (∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0)))
300293, 299bitrd 279 . . . . . . . . . . . . . . 15 (𝜑 → (∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ (∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0)))
301300ad2antrr 725 . . . . . . . . . . . . . 14 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ ∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵) → (∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ (∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0)))
302 0z 12650 . . . . . . . . . . . . . . . . . . . . . . 23 0 ∈ ℤ
303 1z 12673 . . . . . . . . . . . . . . . . . . . . . . 23 1 ∈ ℤ
304 fzshftral 13672 . . . . . . . . . . . . . . . . . . . . . . 23 ((0 ∈ ℤ ∧ (𝑁 − 1) ∈ ℤ ∧ 1 ∈ ℤ) → (∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∀𝑚 ∈ ((0 + 1)...((𝑁 − 1) + 1))[(𝑚 − 1) / 𝑛]𝑝 ∈ ran 𝑥 𝑛 = 𝐵))
305302, 303, 304mp3an13 1452 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑁 − 1) ∈ ℤ → (∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∀𝑚 ∈ ((0 + 1)...((𝑁 − 1) + 1))[(𝑚 − 1) / 𝑛]𝑝 ∈ ran 𝑥 𝑛 = 𝐵))
306183, 246, 3053syl 18 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∀𝑚 ∈ ((0 + 1)...((𝑁 − 1) + 1))[(𝑚 − 1) / 𝑛]𝑝 ∈ ran 𝑥 𝑛 = 𝐵))
307 0p1e1 12415 . . . . . . . . . . . . . . . . . . . . . . . 24 (0 + 1) = 1
308307a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → (0 + 1) = 1)
309308, 245oveq12d 7466 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ((0 + 1)...((𝑁 − 1) + 1)) = (1...𝑁))
310309raleqdv 3334 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (∀𝑚 ∈ ((0 + 1)...((𝑁 − 1) + 1))[(𝑚 − 1) / 𝑛]𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∀𝑚 ∈ (1...𝑁)[(𝑚 − 1) / 𝑛]𝑝 ∈ ran 𝑥 𝑛 = 𝐵))
311306, 310bitrd 279 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∀𝑚 ∈ (1...𝑁)[(𝑚 − 1) / 𝑛]𝑝 ∈ ran 𝑥 𝑛 = 𝐵))
312 ovex 7481 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑚 − 1) ∈ V
313 eqeq1 2744 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑛 = (𝑚 − 1) → (𝑛 = 𝐵 ↔ (𝑚 − 1) = 𝐵))
314313rexbidv 3185 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 = (𝑚 − 1) → (∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∃𝑝 ∈ ran 𝑥(𝑚 − 1) = 𝐵))
315312, 314sbcie 3848 . . . . . . . . . . . . . . . . . . . . . 22 ([(𝑚 − 1) / 𝑛]𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∃𝑝 ∈ ran 𝑥(𝑚 − 1) = 𝐵)
316315ralbii 3099 . . . . . . . . . . . . . . . . . . . . 21 (∀𝑚 ∈ (1...𝑁)[(𝑚 − 1) / 𝑛]𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∀𝑚 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑚 − 1) = 𝐵)
317 oveq1 7455 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑚 = 𝑛 → (𝑚 − 1) = (𝑛 − 1))
318317eqeq1d 2742 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑚 = 𝑛 → ((𝑚 − 1) = 𝐵 ↔ (𝑛 − 1) = 𝐵))
319318rexbidv 3185 . . . . . . . . . . . . . . . . . . . . . 22 (𝑚 = 𝑛 → (∃𝑝 ∈ ran 𝑥(𝑚 − 1) = 𝐵 ↔ ∃𝑝 ∈ ran 𝑥(𝑛 − 1) = 𝐵))
320319cbvralvw 3243 . . . . . . . . . . . . . . . . . . . . 21 (∀𝑚 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑚 − 1) = 𝐵 ↔ ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑛 − 1) = 𝐵)
321316, 320bitri 275 . . . . . . . . . . . . . . . . . . . 20 (∀𝑚 ∈ (1...𝑁)[(𝑚 − 1) / 𝑛]𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑛 − 1) = 𝐵)
322311, 321bitrdi 287 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑛 − 1) = 𝐵))
323322biimpa 476 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ ∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵) → ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑛 − 1) = 𝐵)
324323adantlr 714 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ ∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵) → ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑛 − 1) = 𝐵)
325 poimirlem28.4 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 𝐾)) → 𝐵 ≠ (𝑛 − 1))
326325necomd 3002 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 𝐾)) → (𝑛 − 1) ≠ 𝐵)
3273263exp2 1354 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → (𝑛 ∈ (1...𝑁) → (𝑝:(1...𝑁)⟶(0...𝐾) → ((𝑝𝑛) = 𝐾 → (𝑛 − 1) ≠ 𝐵))))
328327imp31 417 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → ((𝑝𝑛) = 𝐾 → (𝑛 − 1) ≠ 𝐵))
329328necon2d 2969 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → ((𝑛 − 1) = 𝐵 → (𝑝𝑛) ≠ 𝐾))
330329adantllr 718 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → ((𝑛 − 1) = 𝐵 → (𝑝𝑛) ≠ 𝐾))
331259, 330syldan 590 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) ∧ 𝑝 ∈ ran 𝑥) → ((𝑛 − 1) = 𝐵 → (𝑝𝑛) ≠ 𝐾))
332331reximdva 3174 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) → (∃𝑝 ∈ ran 𝑥(𝑛 − 1) = 𝐵 → ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾))
333332ralimdva 3173 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) → (∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑛 − 1) = 𝐵 → ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾))
334333imp 406 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑛 − 1) = 𝐵) → ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)
335324, 334syldan 590 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ ∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵) → ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)
336335biantrud 531 . . . . . . . . . . . . . . 15 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ ∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵) → (∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ (∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))
337 r19.26 3117 . . . . . . . . . . . . . . 15 (∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾) ↔ (∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾))
338336, 337bitr4di 289 . . . . . . . . . . . . . 14 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ ∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵) → (∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))
339281, 301, 3383bitr2d 307 . . . . . . . . . . . . 13 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ ∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵) → (∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0 ↔ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))
340231, 238, 339syl2an 595 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ (0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵)) → (∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0 ↔ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))
341340pm5.32da 578 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) → (((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0) ↔ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾))))
342341anbi2d 629 . . . . . . . . . 10 ((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) → ((𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0)) ↔ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))))
343342rexbidva 3183 . . . . . . . . 9 (𝜑 → (∃𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))(𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0)) ↔ ∃𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))(𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))))
344343adantr 480 . . . . . . . 8 ((𝜑𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) → (∃𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))(𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0)) ↔ ∃𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))(𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))))
345191rexeqdv 3335 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (∃𝑗 ∈ ((0...𝑁) ∖ {𝑁})𝑖 = (1st𝑡) / 𝑠𝐶 ↔ ∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶))
346345biimpd 229 . . . . . . . . . . . . . . . . . 18 (𝜑 → (∃𝑗 ∈ ((0...𝑁) ∖ {𝑁})𝑖 = (1st𝑡) / 𝑠𝐶 → ∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶))
347346ralimdv 3175 . . . . . . . . . . . . . . . . 17 (𝜑 → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {𝑁})𝑖 = (1st𝑡) / 𝑠𝐶 → ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶))
348169rexeqdv 3335 . . . . . . . . . . . . . . . . . . 19 ((2nd𝑡) = 𝑁 → (∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ↔ ∃𝑗 ∈ ((0...𝑁) ∖ {𝑁})𝑖 = (1st𝑡) / 𝑠𝐶))
349348ralbidv 3184 . . . . . . . . . . . . . . . . . 18 ((2nd𝑡) = 𝑁 → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ↔ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {𝑁})𝑖 = (1st𝑡) / 𝑠𝐶))
350349imbi1d 341 . . . . . . . . . . . . . . . . 17 ((2nd𝑡) = 𝑁 → ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 → ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {𝑁})𝑖 = (1st𝑡) / 𝑠𝐶 → ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶)))
351347, 350syl5ibrcom 247 . . . . . . . . . . . . . . . 16 (𝜑 → ((2nd𝑡) = 𝑁 → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 → ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶)))
352351com23 86 . . . . . . . . . . . . . . 15 (𝜑 → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 → ((2nd𝑡) = 𝑁 → ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶)))
353352imp 406 . . . . . . . . . . . . . 14 ((𝜑 ∧ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶) → ((2nd𝑡) = 𝑁 → ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶))
354353adantrd 491 . . . . . . . . . . . . 13 ((𝜑 ∧ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶) → (((2nd𝑡) = 𝑁 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)) → ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶))
355354pm4.71rd 562 . . . . . . . . . . . 12 ((𝜑 ∧ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶) → (((2nd𝑡) = 𝑁 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((2nd𝑡) = 𝑁 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)))))
356 an12 644 . . . . . . . . . . . . 13 ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((2nd𝑡) = 𝑁 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))) ↔ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))))
357 3anass 1095 . . . . . . . . . . . . . 14 ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)))
358357anbi2i 622 . . . . . . . . . . . . 13 (((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)) ↔ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))))
359356, 358bitr4i 278 . . . . . . . . . . . 12 ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((2nd𝑡) = 𝑁 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))) ↔ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)))
360355, 359bitrdi 287 . . . . . . . . . . 11 ((𝜑 ∧ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶) → (((2nd𝑡) = 𝑁 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)) ↔ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))))
361360notbid 318 . . . . . . . . . 10 ((𝜑 ∧ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶) → (¬ ((2nd𝑡) = 𝑁 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)) ↔ ¬ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))))
362361pm5.32da 578 . . . . . . . . 9 (𝜑 → ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ¬ ((2nd𝑡) = 𝑁 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ¬ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)))))
363362adantr 480 . . . . . . . 8 ((𝜑𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) → ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ¬ ((2nd𝑡) = 𝑁 ∧ (((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ¬ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)))))
364229, 344, 3633bitr3d 309 . . . . . . 7 ((𝜑𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) → (∃𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))(𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾))) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ¬ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)))))
365364rabbidva 3450 . . . . . 6 (𝜑 → {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∃𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))(𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} = {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ¬ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)))})
366 iunrab 5075 . . . . . 6 𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))){𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} = {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∃𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))(𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}
367 difrab 4337 . . . . . 6 ({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶} ∖ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}) = {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ¬ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)))}
368365, 366, 3673eqtr4g 2805 . . . . 5 (𝜑 𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))){𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} = ({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶} ∖ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}))
369368fveq2d 6924 . . . 4 (𝜑 → (♯‘ 𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))){𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}) = (♯‘({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶} ∖ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})))
37027, 28mp1i 13 . . . . 5 ((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) → {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} ∈ Fin)
371 simpl 482 . . . . . . . . . . . 12 ((𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾))) → 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))))
372371a1i 11 . . . . . . . . . . 11 (𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → ((𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾))) → 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))))
373372ss2rabi 4100 . . . . . . . . . 10 {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} ⊆ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}
374373sseli 4004 . . . . . . . . 9 (𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} → 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))})
375 fveq2 6920 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑠 → (2nd𝑡) = (2nd𝑠))
376375breq2d 5178 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑠 → (𝑦 < (2nd𝑡) ↔ 𝑦 < (2nd𝑠)))
377376ifbid 4571 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑠 → if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) = if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)))
378377csbeq1d 3925 . . . . . . . . . . . . . . 15 (𝑡 = 𝑠if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))
379 2fveq3 6925 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑠 → (1st ‘(1st𝑡)) = (1st ‘(1st𝑠)))
380 2fveq3 6925 . . . . . . . . . . . . . . . . . . . 20 (𝑡 = 𝑠 → (2nd ‘(1st𝑡)) = (2nd ‘(1st𝑠)))
381380imaeq1d 6088 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑠 → ((2nd ‘(1st𝑡)) “ (1...𝑗)) = ((2nd ‘(1st𝑠)) “ (1...𝑗)))
382381xpeq1d 5729 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑠 → (((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) = (((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}))
383380imaeq1d 6088 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑠 → ((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) = ((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)))
384383xpeq1d 5729 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑠 → (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}) = (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0}))
385382, 384uneq12d 4192 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑠 → ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})) = ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0})))
386379, 385oveq12d 7466 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑠 → ((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑠)) ∘f + ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0}))))
387386csbeq2dv 3928 . . . . . . . . . . . . . . 15 (𝑡 = 𝑠if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑠)) ∘f + ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0}))))
388378, 387eqtrd 2780 . . . . . . . . . . . . . 14 (𝑡 = 𝑠if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑠)) ∘f + ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0}))))
389388mpteq2dv 5268 . . . . . . . . . . . . 13 (𝑡 = 𝑠 → (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑠)) ∘f + ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0})))))
390389eqeq2d 2751 . . . . . . . . . . . 12 (𝑡 = 𝑠 → (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ↔ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑠)) ∘f + ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0}))))))
391 eqcom 2747 . . . . . . . . . . . 12 (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑠)) ∘f + ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0})))) ↔ (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑠)) ∘f + ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0})))) = 𝑥)
392390, 391bitrdi 287 . . . . . . . . . . 11 (𝑡 = 𝑠 → (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ↔ (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑠)) ∘f + ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0})))) = 𝑥))
393392elrab 3708 . . . . . . . . . 10 (𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} ↔ (𝑠 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑠)) ∘f + ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0})))) = 𝑥))
394393simprbi 496 . . . . . . . . 9 (𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} → (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑠)) ∘f + ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0})))) = 𝑥)
395374, 394syl 17 . . . . . . . 8 (𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} → (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑠)) ∘f + ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0})))) = 𝑥)
396395rgen 3069 . . . . . . 7 𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑠)) ∘f + ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0})))) = 𝑥
397396rgenw 3071 . . . . . 6 𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))∀𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑠)) ∘f + ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0})))) = 𝑥
398 invdisj 5152 . . . . . 6 (∀𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))∀𝑠 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))} (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑠)) ∘f + ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0})))) = 𝑥Disj 𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))){𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))})
399397, 398mp1i 13 . . . . 5 (𝜑Disj 𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))){𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))})
4008, 370, 399hashiun 15870 . . . 4 (𝜑 → (♯‘ 𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))){𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}) = Σ𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))(♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}))
401369, 400eqtr3d 2782 . . 3 (𝜑 → (♯‘({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶} ∖ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})) = Σ𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))(♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}))
402 fo1st 8050 . . . . . . . . . . . . 13 1st :V–onto→V
403 fofun 6835 . . . . . . . . . . . . 13 (1st :V–onto→V → Fun 1st )
404402, 403ax-mp 5 . . . . . . . . . . . 12 Fun 1st
405 ssv 4033 . . . . . . . . . . . . 13 {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ⊆ V
406 fof 6834 . . . . . . . . . . . . . . 15 (1st :V–onto→V → 1st :V⟶V)
407402, 406ax-mp 5 . . . . . . . . . . . . . 14 1st :V⟶V
408407fdmi 6758 . . . . . . . . . . . . 13 dom 1st = V
409405, 408sseqtrri 4046 . . . . . . . . . . . 12 {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ⊆ dom 1st
410 fores 6844 . . . . . . . . . . . 12 ((Fun 1st ∧ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ⊆ dom 1st ) → (1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}–onto→(1st “ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}))
411404, 409, 410mp2an 691 . . . . . . . . . . 11 (1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}–onto→(1st “ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})
412 fveqeq2 6929 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑥 → ((2nd𝑡) = 𝑁 ↔ (2nd𝑥) = 𝑁))
413 fveq2 6920 . . . . . . . . . . . . . . . . . . . . . 22 (𝑡 = 𝑥 → (1st𝑡) = (1st𝑥))
414413csbeq1d 3925 . . . . . . . . . . . . . . . . . . . . 21 (𝑡 = 𝑥(1st𝑡) / 𝑠𝐶 = (1st𝑥) / 𝑠𝐶)
415414eqeq2d 2751 . . . . . . . . . . . . . . . . . . . 20 (𝑡 = 𝑥 → (𝑖 = (1st𝑡) / 𝑠𝐶𝑖 = (1st𝑥) / 𝑠𝐶))
416415rexbidv 3185 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑥 → (∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ↔ ∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶))
417416ralbidv 3184 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑥 → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ↔ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶))
418 2fveq3 6925 . . . . . . . . . . . . . . . . . . . 20 (𝑡 = 𝑥 → (1st ‘(1st𝑡)) = (1st ‘(1st𝑥)))
419418fveq1d 6922 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑥 → ((1st ‘(1st𝑡))‘𝑁) = ((1st ‘(1st𝑥))‘𝑁))
420419eqeq1d 2742 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑥 → (((1st ‘(1st𝑡))‘𝑁) = 0 ↔ ((1st ‘(1st𝑥))‘𝑁) = 0))
421 2fveq3 6925 . . . . . . . . . . . . . . . . . . . 20 (𝑡 = 𝑥 → (2nd ‘(1st𝑡)) = (2nd ‘(1st𝑥)))
422421fveq1d 6922 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑥 → ((2nd ‘(1st𝑡))‘𝑁) = ((2nd ‘(1st𝑥))‘𝑁))
423422eqeq1d 2742 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑥 → (((2nd ‘(1st𝑡))‘𝑁) = 𝑁 ↔ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁))
424417, 420, 4233anbi123d 1436 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑥 → ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)))
425412, 424anbi12d 631 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑥 → (((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)) ↔ ((2nd𝑥) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁))))
426425rexrab 3718 . . . . . . . . . . . . . . 15 (∃𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (1st𝑥) = 𝑠 ↔ ∃𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))(((2nd𝑥) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)) ∧ (1st𝑥) = 𝑠))
427 xp1st 8062 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1st𝑥) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
428427anim1i 614 . . . . . . . . . . . . . . . . . . . 20 ((𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)) → ((1st𝑥) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)))
429 eleq1 2832 . . . . . . . . . . . . . . . . . . . . 21 ((1st𝑥) = 𝑠 → ((1st𝑥) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ↔ 𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})))
430 csbeq1a 3935 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑠 = (1st𝑥) → 𝐶 = (1st𝑥) / 𝑠𝐶)
431430eqcoms 2748 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((1st𝑥) = 𝑠𝐶 = (1st𝑥) / 𝑠𝐶)
432431eqcomd 2746 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((1st𝑥) = 𝑠(1st𝑥) / 𝑠𝐶 = 𝐶)
433432eqeq2d 2751 . . . . . . . . . . . . . . . . . . . . . . . 24 ((1st𝑥) = 𝑠 → (𝑖 = (1st𝑥) / 𝑠𝐶𝑖 = 𝐶))
434433rexbidv 3185 . . . . . . . . . . . . . . . . . . . . . . 23 ((1st𝑥) = 𝑠 → (∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ↔ ∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶))
435434ralbidv 3184 . . . . . . . . . . . . . . . . . . . . . 22 ((1st𝑥) = 𝑠 → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ↔ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶))
436 fveq2 6920 . . . . . . . . . . . . . . . . . . . . . . . 24 ((1st𝑥) = 𝑠 → (1st ‘(1st𝑥)) = (1st𝑠))
437436fveq1d 6922 . . . . . . . . . . . . . . . . . . . . . . 23 ((1st𝑥) = 𝑠 → ((1st ‘(1st𝑥))‘𝑁) = ((1st𝑠)‘𝑁))
438437eqeq1d 2742 . . . . . . . . . . . . . . . . . . . . . 22 ((1st𝑥) = 𝑠 → (((1st ‘(1st𝑥))‘𝑁) = 0 ↔ ((1st𝑠)‘𝑁) = 0))
439 fveq2 6920 . . . . . . . . . . . . . . . . . . . . . . . 24 ((1st𝑥) = 𝑠 → (2nd ‘(1st𝑥)) = (2nd𝑠))
440439fveq1d 6922 . . . . . . . . . . . . . . . . . . . . . . 23 ((1st𝑥) = 𝑠 → ((2nd ‘(1st𝑥))‘𝑁) = ((2nd𝑠)‘𝑁))
441440eqeq1d 2742 . . . . . . . . . . . . . . . . . . . . . 22 ((1st𝑥) = 𝑠 → (((2nd ‘(1st𝑥))‘𝑁) = 𝑁 ↔ ((2nd𝑠)‘𝑁) = 𝑁))
442435, 438, 4413anbi123d 1436 . . . . . . . . . . . . . . . . . . . . 21 ((1st𝑥) = 𝑠 → ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)))
443429, 442anbi12d 631 . . . . . . . . . . . . . . . . . . . 20 ((1st𝑥) = 𝑠 → (((1st𝑥) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)) ↔ (𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁))))
444428, 443syl5ibcom 245 . . . . . . . . . . . . . . . . . . 19 ((𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)) → ((1st𝑥) = 𝑠 → (𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁))))
445444adantrl 715 . . . . . . . . . . . . . . . . . 18 ((𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ ((2nd𝑥) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁))) → ((1st𝑥) = 𝑠 → (𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁))))
446445expimpd 453 . . . . . . . . . . . . . . . . 17 (𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → ((((2nd𝑥) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)) ∧ (1st𝑥) = 𝑠) → (𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁))))
447446rexlimiv 3154 . . . . . . . . . . . . . . . 16 (∃𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))(((2nd𝑥) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)) ∧ (1st𝑥) = 𝑠) → (𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)))
448 nn0fz0 13682 . . . . . . . . . . . . . . . . . . . . 21 (𝑁 ∈ ℕ0𝑁 ∈ (0...𝑁))
449171, 448sylib 218 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝑁 ∈ (0...𝑁))
450 opelxpi 5737 . . . . . . . . . . . . . . . . . . . 20 ((𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∧ 𝑁 ∈ (0...𝑁)) → ⟨𝑠, 𝑁⟩ ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
451449, 450sylan2 592 . . . . . . . . . . . . . . . . . . 19 ((𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∧ 𝜑) → ⟨𝑠, 𝑁⟩ ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
452451ancoms 458 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})) → ⟨𝑠, 𝑁⟩ ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
453 opelxp2 5743 . . . . . . . . . . . . . . . . . . . . 21 (⟨𝑠, 𝑁⟩ ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → 𝑁 ∈ (0...𝑁))
454 op2ndg 8043 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (2nd ‘⟨𝑠, 𝑁⟩) = 𝑁)
455454biantrurd 532 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ∧ ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0 ∧ ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁) ↔ ((2nd ‘⟨𝑠, 𝑁⟩) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ∧ ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0 ∧ ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁))))
456 op1stg 8042 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (1st ‘⟨𝑠, 𝑁⟩) = 𝑠)
457 csbeq1a 3935 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑠 = (1st ‘⟨𝑠, 𝑁⟩) → 𝐶 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶)
458457eqcoms 2748 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((1st ‘⟨𝑠, 𝑁⟩) = 𝑠𝐶 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶)
459458eqcomd 2746 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((1st ‘⟨𝑠, 𝑁⟩) = 𝑠(1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 = 𝐶)
460456, 459syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 = 𝐶)
461460eqeq2d 2751 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶𝑖 = 𝐶))
462461rexbidv 3185 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ↔ ∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶))
463462ralbidv 3184 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ↔ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶))
464456fveq2d 6924 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (1st ‘(1st ‘⟨𝑠, 𝑁⟩)) = (1st𝑠))
465464fveq1d 6922 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = ((1st𝑠)‘𝑁))
466465eqeq1d 2742 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0 ↔ ((1st𝑠)‘𝑁) = 0))
467456fveq2d 6924 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (2nd ‘(1st ‘⟨𝑠, 𝑁⟩)) = (2nd𝑠))
468467fveq1d 6922 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = ((2nd𝑠)‘𝑁))
469468eqeq1d 2742 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁 ↔ ((2nd𝑠)‘𝑁) = 𝑁))
470463, 466, 4693anbi123d 1436 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ∧ ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0 ∧ ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)))
471456biantrud 531 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (((2nd ‘⟨𝑠, 𝑁⟩) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ∧ ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0 ∧ ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁)) ↔ (((2nd ‘⟨𝑠, 𝑁⟩) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ∧ ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0 ∧ ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁)) ∧ (1st ‘⟨𝑠, 𝑁⟩) = 𝑠)))
472455, 470, 4713bitr3d 309 . . . . . . . . . . . . . . . . . . . . 21 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁) ↔ (((2nd ‘⟨𝑠, 𝑁⟩) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ∧ ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0 ∧ ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁)) ∧ (1st ‘⟨𝑠, 𝑁⟩) = 𝑠)))
47344, 453, 472sylancr 586 . . . . . . . . . . . . . . . . . . . 20 (⟨𝑠, 𝑁⟩ ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁) ↔ (((2nd ‘⟨𝑠, 𝑁⟩) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ∧ ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0 ∧ ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁)) ∧ (1st ‘⟨𝑠, 𝑁⟩) = 𝑠)))
474473biimpa 476 . . . . . . . . . . . . . . . . . . 19 ((⟨𝑠, 𝑁⟩ ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)) → (((2nd ‘⟨𝑠, 𝑁⟩) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ∧ ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0 ∧ ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁)) ∧ (1st ‘⟨𝑠, 𝑁⟩) = 𝑠))
475 fveqeq2 6929 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = ⟨𝑠, 𝑁⟩ → ((2nd𝑥) = 𝑁 ↔ (2nd ‘⟨𝑠, 𝑁⟩) = 𝑁))
476 fveq2 6920 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑥 = ⟨𝑠, 𝑁⟩ → (1st𝑥) = (1st ‘⟨𝑠, 𝑁⟩))
477476csbeq1d 3925 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑥 = ⟨𝑠, 𝑁⟩ → (1st𝑥) / 𝑠𝐶 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶)
478477eqeq2d 2751 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 = ⟨𝑠, 𝑁⟩ → (𝑖 = (1st𝑥) / 𝑠𝐶𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶))
479478rexbidv 3185 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = ⟨𝑠, 𝑁⟩ → (∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ↔ ∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶))
480479ralbidv 3184 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = ⟨𝑠, 𝑁⟩ → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ↔ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶))
481 2fveq3 6925 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 = ⟨𝑠, 𝑁⟩ → (1st ‘(1st𝑥)) = (1st ‘(1st ‘⟨𝑠, 𝑁⟩)))
482481fveq1d 6922 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = ⟨𝑠, 𝑁⟩ → ((1st ‘(1st𝑥))‘𝑁) = ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁))
483482eqeq1d 2742 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = ⟨𝑠, 𝑁⟩ → (((1st ‘(1st𝑥))‘𝑁) = 0 ↔ ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0))
484 2fveq3 6925 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 = ⟨𝑠, 𝑁⟩ → (2nd ‘(1st𝑥)) = (2nd ‘(1st ‘⟨𝑠, 𝑁⟩)))
485484fveq1d 6922 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = ⟨𝑠, 𝑁⟩ → ((2nd ‘(1st𝑥))‘𝑁) = ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁))
486485eqeq1d 2742 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = ⟨𝑠, 𝑁⟩ → (((2nd ‘(1st𝑥))‘𝑁) = 𝑁 ↔ ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁))
487480, 483, 4863anbi123d 1436 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = ⟨𝑠, 𝑁⟩ → ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ∧ ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0 ∧ ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁)))
488475, 487anbi12d 631 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 = ⟨𝑠, 𝑁⟩ → (((2nd𝑥) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)) ↔ ((2nd ‘⟨𝑠, 𝑁⟩) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ∧ ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0 ∧ ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁))))
489 fveqeq2 6929 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 = ⟨𝑠, 𝑁⟩ → ((1st𝑥) = 𝑠 ↔ (1st ‘⟨𝑠, 𝑁⟩) = 𝑠))
490488, 489anbi12d 631 . . . . . . . . . . . . . . . . . . . 20 (𝑥 = ⟨𝑠, 𝑁⟩ → ((((2nd𝑥) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)) ∧ (1st𝑥) = 𝑠) ↔ (((2nd ‘⟨𝑠, 𝑁⟩) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ∧ ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0 ∧ ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁)) ∧ (1st ‘⟨𝑠, 𝑁⟩) = 𝑠)))
491490rspcev 3635 . . . . . . . . . . . . . . . . . . 19 ((⟨𝑠, 𝑁⟩ ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ (((2nd ‘⟨𝑠, 𝑁⟩) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ∧ ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0 ∧ ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁)) ∧ (1st ‘⟨𝑠, 𝑁⟩) = 𝑠)) → ∃𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))(((2nd𝑥) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)) ∧ (1st𝑥) = 𝑠))
492474, 491syldan 590 . . . . . . . . . . . . . . . . . 18 ((⟨𝑠, 𝑁⟩ ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)) → ∃𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))(((2nd𝑥) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)) ∧ (1st𝑥) = 𝑠))
493452, 492sylan 579 . . . . . . . . . . . . . . . . 17 (((𝜑𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)) → ∃𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))(((2nd𝑥) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)) ∧ (1st𝑥) = 𝑠))
494493expl 457 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)) → ∃𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))(((2nd𝑥) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)) ∧ (1st𝑥) = 𝑠)))
495447, 494impbid2 226 . . . . . . . . . . . . . . 15 (𝜑 → (∃𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))(((2nd𝑥) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)) ∧ (1st𝑥) = 𝑠) ↔ (𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁))))
496426, 495bitrid 283 . . . . . . . . . . . . . 14 (𝜑 → (∃𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (1st𝑥) = 𝑠 ↔ (𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁))))
497496abbidv 2811 . . . . . . . . . . . . 13 (𝜑 → {𝑠 ∣ ∃𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (1st𝑥) = 𝑠} = {𝑠 ∣ (𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁))})
498 dfimafn 6984 . . . . . . . . . . . . . . 15 ((Fun 1st ∧ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ⊆ dom 1st ) → (1st “ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}) = {𝑦 ∣ ∃𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (1st𝑥) = 𝑦})
499404, 409, 498mp2an 691 . . . . . . . . . . . . . 14 (1st “ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}) = {𝑦 ∣ ∃𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (1st𝑥) = 𝑦}
500 nfv 1913 . . . . . . . . . . . . . . . . . 18 𝑠(2nd𝑡) = 𝑁
501 nfcv 2908 . . . . . . . . . . . . . . . . . . . 20 𝑠(0...(𝑁 − 1))
502 nfcsb1v 3946 . . . . . . . . . . . . . . . . . . . . . 22 𝑠(1st𝑡) / 𝑠𝐶
503502nfeq2 2926 . . . . . . . . . . . . . . . . . . . . 21 𝑠 𝑖 = (1st𝑡) / 𝑠𝐶
504501, 503nfrexw 3319 . . . . . . . . . . . . . . . . . . . 20 𝑠𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶
505501, 504nfralw 3317 . . . . . . . . . . . . . . . . . . 19 𝑠𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶
506 nfv 1913 . . . . . . . . . . . . . . . . . . 19 𝑠((1st ‘(1st𝑡))‘𝑁) = 0
507 nfv 1913 . . . . . . . . . . . . . . . . . . 19 𝑠((2nd ‘(1st𝑡))‘𝑁) = 𝑁
508505, 506, 507nf3an 1900 . . . . . . . . . . . . . . . . . 18 𝑠(∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)
509500, 508nfan 1898 . . . . . . . . . . . . . . . . 17 𝑠((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))
510 nfcv 2908 . . . . . . . . . . . . . . . . 17 𝑠((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))
511509, 510nfrabw 3483 . . . . . . . . . . . . . . . 16 𝑠{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}
512 nfv 1913 . . . . . . . . . . . . . . . 16 𝑠(1st𝑥) = 𝑦
513511, 512nfrexw 3319 . . . . . . . . . . . . . . 15 𝑠𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (1st𝑥) = 𝑦
514 nfv 1913 . . . . . . . . . . . . . . 15 𝑦𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (1st𝑥) = 𝑠
515 eqeq2 2752 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑠 → ((1st𝑥) = 𝑦 ↔ (1st𝑥) = 𝑠))
516515rexbidv 3185 . . . . . . . . . . . . . . 15 (𝑦 = 𝑠 → (∃𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (1st𝑥) = 𝑦 ↔ ∃𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (1st𝑥) = 𝑠))
517513, 514, 516cbvabw 2816 . . . . . . . . . . . . . 14 {𝑦 ∣ ∃𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (1st𝑥) = 𝑦} = {𝑠 ∣ ∃𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (1st𝑥) = 𝑠}
518499, 517eqtri 2768 . . . . . . . . . . . . 13 (1st “ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}) = {𝑠 ∣ ∃𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (1st𝑥) = 𝑠}
519 df-rab 3444 . . . . . . . . . . . . 13 {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)} = {𝑠 ∣ (𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁))}
520497, 518, 5193eqtr4g 2805 . . . . . . . . . . . 12 (𝜑 → (1st “ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}) = {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)})
521 foeq3 6832 . . . . . . . . . . . 12 ((1st “ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}) = {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)} → ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}–onto→(1st “ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}) ↔ (1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}–onto→{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)}))
522520, 521syl 17 . . . . . . . . . . 11 (𝜑 → ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}–onto→(1st “ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}) ↔ (1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}–onto→{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)}))
523411, 522mpbii 233 . . . . . . . . . 10 (𝜑 → (1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}–onto→{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)})
524 fof 6834 . . . . . . . . . 10 ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}–onto→{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)} → (1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}⟶{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)})
525523, 524syl 17 . . . . . . . . 9 (𝜑 → (1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}⟶{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)})
526 fvres 6939 . . . . . . . . . . . 12 (𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} → ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})‘𝑥) = (1st𝑥))
527 fvres 6939 . . . . . . . . . . . 12 (𝑦 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} → ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})‘𝑦) = (1st𝑦))
528526, 527eqeqan12d 2754 . . . . . . . . . . 11 ((𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ∧ 𝑦 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}) → (((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})‘𝑥) = ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})‘𝑦) ↔ (1st𝑥) = (1st𝑦)))
529 simpl 482 . . . . . . . . . . . . . . . 16 (((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)) → (2nd𝑡) = 𝑁)
530529a1i 11 . . . . . . . . . . . . . . 15 (𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)) → (2nd𝑡) = 𝑁))
531530ss2rabi 4100 . . . . . . . . . . . . . 14 {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ⊆ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (2nd𝑡) = 𝑁}
532531sseli 4004 . . . . . . . . . . . . 13 (𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} → 𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (2nd𝑡) = 𝑁})
533412elrab 3708 . . . . . . . . . . . . 13 (𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (2nd𝑡) = 𝑁} ↔ (𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ (2nd𝑥) = 𝑁))
534532, 533sylib 218 . . . . . . . . . . . 12 (𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} → (𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ (2nd𝑥) = 𝑁))
535531sseli 4004 . . . . . . . . . . . . 13 (𝑦 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} → 𝑦 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (2nd𝑡) = 𝑁})
536 fveqeq2 6929 . . . . . . . . . . . . . 14 (𝑡 = 𝑦 → ((2nd𝑡) = 𝑁 ↔ (2nd𝑦) = 𝑁))
537536elrab 3708 . . . . . . . . . . . . 13 (𝑦 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (2nd𝑡) = 𝑁} ↔ (𝑦 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ (2nd𝑦) = 𝑁))
538535, 537sylib 218 . . . . . . . . . . . 12 (𝑦 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} → (𝑦 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ (2nd𝑦) = 𝑁))
539 eqtr3 2766 . . . . . . . . . . . . . 14 (((2nd𝑥) = 𝑁 ∧ (2nd𝑦) = 𝑁) → (2nd𝑥) = (2nd𝑦))
540 xpopth 8071 . . . . . . . . . . . . . . . . 17 ((𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ 𝑦 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) → (((1st𝑥) = (1st𝑦) ∧ (2nd𝑥) = (2nd𝑦)) ↔ 𝑥 = 𝑦))
541540biimpd 229 . . . . . . . . . . . . . . . 16 ((𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ 𝑦 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) → (((1st𝑥) = (1st𝑦) ∧ (2nd𝑥) = (2nd𝑦)) → 𝑥 = 𝑦))
542541ancomsd 465 . . . . . . . . . . . . . . 15 ((𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ 𝑦 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) → (((2nd𝑥) = (2nd𝑦) ∧ (1st𝑥) = (1st𝑦)) → 𝑥 = 𝑦))
543542expdimp 452 . . . . . . . . . . . . . 14 (((𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ 𝑦 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) ∧ (2nd𝑥) = (2nd𝑦)) → ((1st𝑥) = (1st𝑦) → 𝑥 = 𝑦))
544539, 543sylan2 592 . . . . . . . . . . . . 13 (((𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ 𝑦 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) ∧ ((2nd𝑥) = 𝑁 ∧ (2nd𝑦) = 𝑁)) → ((1st𝑥) = (1st𝑦) → 𝑥 = 𝑦))
545544an4s 659 . . . . . . . . . . . 12 (((𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ (2nd𝑥) = 𝑁) ∧ (𝑦 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ (2nd𝑦) = 𝑁)) → ((1st𝑥) = (1st𝑦) → 𝑥 = 𝑦))
546534, 538, 545syl2an 595 . . . . . . . . . . 11 ((𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ∧ 𝑦 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}) → ((1st𝑥) = (1st𝑦) → 𝑥 = 𝑦))
547528, 546sylbid 240 . . . . . . . . . 10 ((𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ∧ 𝑦 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}) → (((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})‘𝑥) = ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})‘𝑦) → 𝑥 = 𝑦))
548547rgen2 3205 . . . . . . . . 9 𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}∀𝑦 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})‘𝑥) = ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})‘𝑦) → 𝑥 = 𝑦)
549525, 548jctir 520 . . . . . . . 8 (𝜑 → ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}⟶{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)} ∧ ∀𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}∀𝑦 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})‘𝑥) = ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})‘𝑦) → 𝑥 = 𝑦)))
550 dff13 7292 . . . . . . . 8 ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}–1-1→{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)} ↔ ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}⟶{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)} ∧ ∀𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}∀𝑦 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})‘𝑥) = ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})‘𝑦) → 𝑥 = 𝑦)))
551549, 550sylibr 234 . . . . . . 7 (𝜑 → (1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}–1-1→{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)})
552 df-f1o 6580 . . . . . . 7 ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}–1-1-onto→{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)} ↔ ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}–1-1→{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)} ∧ (1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}–onto→{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)}))
553551, 523, 552sylanbrc 582 . . . . . 6 (𝜑 → (1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}–1-1-onto→{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)})
554 rabfi 9331 . . . . . . . . 9 (((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∈ Fin → {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ∈ Fin)
55527, 554ax-mp 5 . . . . . . . 8 {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ∈ Fin
556555elexi 3511 . . . . . . 7 {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ∈ V
557556f1oen 9033 . . . . . 6 ((1st ↾ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}):{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}–1-1-onto→{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)} → {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ≈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)})
558553, 557syl 17 . . . . 5 (𝜑 → {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ≈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)})
559 rabfi 9331 . . . . . . 7 ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∈ Fin → {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)} ∈ Fin)
56024, 559ax-mp 5 . . . . . 6 {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)} ∈ Fin
561 hashen 14396 . . . . . 6 (({𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ∈ Fin ∧ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)} ∈ Fin) → ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}) = (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)}) ↔ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ≈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)}))
562555, 560, 561mp2an 691 . . . . 5 ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}) = (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)}) ↔ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ≈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)})
563558, 562sylibr 234 . . . 4 (𝜑 → (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}) = (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)}))
564563oveq2d 7464 . . 3 (𝜑 → ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶}) − (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))})) = ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)})))
565201, 401, 5643eqtr3d 2788 . 2 (𝜑 → Σ𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))(♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ (𝑥 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ∧ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))}) = ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)})))
566164, 565breqtrd 5192 1 (𝜑 → 2 ∥ ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)})))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  wo 846  w3a 1087   = wceq 1537  wex 1777  wcel 2108  ∃!weu 2571  {cab 2717  wne 2946  wral 3067  wrex 3076  ∃!wreu 3386  {crab 3443  Vcvv 3488  [wsbc 3804  csb 3921  cdif 3973  cun 3974  cin 3975  wss 3976  c0 4352  ifcif 4548  {csn 4648  cop 4654   ciun 5015  Disj wdisj 5133   class class class wbr 5166  cmpt 5249   × cxp 5698  dom cdm 5700  ran crn 5701  cres 5702  cima 5703  Fun wfun 6567  wf 6569  1-1wf1 6570  ontowfo 6571  1-1-ontowf1o 6572  cfv 6573  (class class class)co 7448  f cof 7712  1st c1st 8028  2nd c2nd 8029  m cmap 8884  cen 9000  Fincfn 9003  cc 11182  0cc0 11184  1c1 11185   + caddc 11187   < clt 11324  cmin 11520  cn 12293  2c2 12348  0cn0 12553  cz 12639  cuz 12903  ...cfz 13567  ..^cfzo 13711  chash 14379  Σcsu 15734  cdvds 16302
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2158  ax-12 2178  ax-ext 2711  ax-rep 5303  ax-sep 5317  ax-nul 5324  ax-pow 5383  ax-pr 5447  ax-un 7770  ax-inf2 9710  ax-cnex 11240  ax-resscn 11241  ax-1cn 11242  ax-icn 11243  ax-addcl 11244  ax-addrcl 11245  ax-mulcl 11246  ax-mulrcl 11247  ax-mulcom 11248  ax-addass 11249  ax-mulass 11250  ax-distr 11251  ax-i2m1 11252  ax-1ne0 11253  ax-1rid 11254  ax-rnegex 11255  ax-rrecex 11256  ax-cnre 11257  ax-pre-lttri 11258  ax-pre-lttrn 11259  ax-pre-ltadd 11260  ax-pre-mulgt0 11261  ax-pre-sup 11262
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3or 1088  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2543  df-eu 2572  df-clab 2718  df-cleq 2732  df-clel 2819  df-nfc 2895  df-ne 2947  df-nel 3053  df-ral 3068  df-rex 3077  df-rmo 3388  df-reu 3389  df-rab 3444  df-v 3490  df-sbc 3805  df-csb 3922  df-dif 3979  df-un 3981  df-in 3983  df-ss 3993  df-pss 3996  df-nul 4353  df-if 4549  df-pw 4624  df-sn 4649  df-pr 4651  df-tp 4653  df-op 4655  df-uni 4932  df-int 4971  df-iun 5017  df-disj 5134  df-br 5167  df-opab 5229  df-mpt 5250  df-tr 5284  df-id 5593  df-eprel 5599  df-po 5607  df-so 5608  df-fr 5652  df-se 5653  df-we 5654  df-xp 5706  df-rel 5707  df-cnv 5708  df-co 5709  df-dm 5710  df-rn 5711  df-res 5712  df-ima 5713  df-pred 6332  df-ord 6398  df-on 6399  df-lim 6400  df-suc 6401  df-iota 6525  df-fun 6575  df-fn 6576  df-f 6577  df-f1 6578  df-fo 6579  df-f1o 6580  df-fv 6581  df-isom 6582  df-riota 7404  df-ov 7451  df-oprab 7452  df-mpo 7453  df-of 7714  df-om 7904  df-1st 8030  df-2nd 8031  df-frecs 8322  df-wrecs 8353  df-recs 8427  df-rdg 8466  df-1o 8522  df-2o 8523  df-oadd 8526  df-er 8763  df-map 8886  df-pm 8887  df-en 9004  df-dom 9005  df-sdom 9006  df-fin 9007  df-sup 9511  df-oi 9579  df-dju 9970  df-card 10008  df-pnf 11326  df-mnf 11327  df-xr 11328  df-ltxr 11329  df-le 11330  df-sub 11522  df-neg 11523  df-div 11948  df-nn 12294  df-2 12356  df-3 12357  df-n0 12554  df-xnn0 12626  df-z 12640  df-uz 12904  df-rp 13058  df-fz 13568  df-fzo 13712  df-seq 14053  df-exp 14113  df-fac 14323  df-bc 14352  df-hash 14380  df-cj 15148  df-re 15149  df-im 15150  df-sqrt 15284  df-abs 15285  df-clim 15534  df-sum 15735  df-dvds 16303
This theorem is referenced by:  poimirlem28  37608
  Copyright terms: Public domain W3C validator