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 37817
Description: Lemma for poimir 37823 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 13897 . . . . . 6 (0...𝐾) ∈ Fin
2 fzfi 13897 . . . . . 6 (1...𝑁) ∈ Fin
3 mapfi 9250 . . . . . 6 (((0...𝐾) ∈ Fin ∧ (1...𝑁) ∈ Fin) → ((0...𝐾) ↑m (1...𝑁)) ∈ Fin)
41, 2, 3mp2an 693 . . . . 5 ((0...𝐾) ↑m (1...𝑁)) ∈ Fin
5 fzfi 13897 . . . . 5 (0...(𝑁 − 1)) ∈ Fin
6 mapfi 9250 . . . . 5 ((((0...𝐾) ↑m (1...𝑁)) ∈ Fin ∧ (0...(𝑁 − 1)) ∈ Fin) → (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))) ∈ Fin)
74, 5, 6mp2an 693 . . . 4 (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))) ∈ Fin
87a1i 11 . . 3 (𝜑 → (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))) ∈ Fin)
9 2z 12525 . . . 4 2 ∈ ℤ
109a1i 11 . . 3 (𝜑 → 2 ∈ ℤ)
11 fzofi 13899 . . . . . . . 8 (0..^𝐾) ∈ Fin
12 mapfi 9250 . . . . . . . 8 (((0..^𝐾) ∈ Fin ∧ (1...𝑁) ∈ Fin) → ((0..^𝐾) ↑m (1...𝑁)) ∈ Fin)
1311, 2, 12mp2an 693 . . . . . . 7 ((0..^𝐾) ↑m (1...𝑁)) ∈ Fin
14 mapfi 9250 . . . . . . . . 9 (((1...𝑁) ∈ Fin ∧ (1...𝑁) ∈ Fin) → ((1...𝑁) ↑m (1...𝑁)) ∈ Fin)
152, 2, 14mp2an 693 . . . . . . . 8 ((1...𝑁) ↑m (1...𝑁)) ∈ Fin
16 f1of 6773 . . . . . . . . . 10 (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) → 𝑓:(1...𝑁)⟶(1...𝑁))
1716ss2abi 4017 . . . . . . . . 9 {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ⊆ {𝑓𝑓:(1...𝑁)⟶(1...𝑁)}
18 ovex 7391 . . . . . . . . . 10 (1...𝑁) ∈ V
1918, 18mapval 8777 . . . . . . . . 9 ((1...𝑁) ↑m (1...𝑁)) = {𝑓𝑓:(1...𝑁)⟶(1...𝑁)}
2017, 19sseqtrri 3982 . . . . . . . 8 {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ⊆ ((1...𝑁) ↑m (1...𝑁))
21 ssfi 9099 . . . . . . . 8 ((((1...𝑁) ↑m (1...𝑁)) ∈ Fin ∧ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ⊆ ((1...𝑁) ↑m (1...𝑁))) → {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ∈ Fin)
2215, 20, 21mp2an 693 . . . . . . 7 {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ∈ Fin
23 xpfi 9222 . . . . . . 7 ((((0..^𝐾) ↑m (1...𝑁)) ∈ Fin ∧ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ∈ Fin) → (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∈ Fin)
2413, 22, 23mp2an 693 . . . . . 6 (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∈ Fin
25 fzfi 13897 . . . . . 6 (0...𝑁) ∈ Fin
26 xpfi 9222 . . . . . 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 693 . . . . 5 ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∈ Fin
28 rabfi 9173 . . . . 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 14281 . . . . 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 12515 . . . 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 3062 . . . . 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 1916 . . . . . 6 𝑡(𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))))
35 nfcv 2897 . . . . . . 7 𝑡2
36 nfcv 2897 . . . . . . 7 𝑡
37 nfcv 2897 . . . . . . . 8 𝑡
38 nfrab1 3418 . . . . . . . 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 6843 . . . . . . 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 5144 . . . . . 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 4303 . . . . . . . . . . . 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 16198 . . . . . . . . . . . . . . . . 17 (2 ∈ ℤ → 2 ∥ 2)
439, 42ax-mp 5 . . . . . . . . . . . . . . . 16 2 ∥ 2
44 vex 3443 . . . . . . . . . . . . . . . . . . 19 𝑠 ∈ V
45 hashsng 14294 . . . . . . . . . . . . . . . . . . 19 (𝑠 ∈ V → (♯‘{𝑠}) = 1)
4644, 45ax-mp 5 . . . . . . . . . . . . . . . . . 18 (♯‘{𝑠}) = 1
4746oveq2i 7369 . . . . . . . . . . . . . . . . 17 (1 + (♯‘{𝑠})) = (1 + 1)
48 df-2 12210 . . . . . . . . . . . . . . . . 17 2 = (1 + 1)
4947, 48eqtr4i 2761 . . . . . . . . . . . . . . . 16 (1 + (♯‘{𝑠})) = 2
5043, 49breqtrri 5124 . . . . . . . . . . . . . . 15 2 ∥ (1 + (♯‘{𝑠}))
51 rabfi 9173 . . . . . . . . . . . . . . . . . . . 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 9101 . . . . . . . . . . . . . . . . . . . 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 8982 . . . . . . . . . . . . . . . . . . 19 {𝑠} ∈ Fin
55 disjdifr 4424 . . . . . . . . . . . . . . . . . . 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 14307 . . . . . . . . . . . . . . . . . . 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 1464 . . . . . . . . . . . . . . . . . 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 4765 . . . . . . . . . . . . . . . . . . 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 6837 . . . . . . . . . . . . . . . . . 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 2784 . . . . . . . . . . . . . . . . 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 731 . . . . . . . . . . . . . . . . . . 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 6833 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑡 = 𝑢 → (2nd𝑡) = (2nd𝑢))
6564breq2d 5109 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑡 = 𝑢 → (𝑦 < (2nd𝑡) ↔ 𝑦 < (2nd𝑢)))
6665ifbid 4502 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑡 = 𝑢 → if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) = if(𝑦 < (2nd𝑢), 𝑦, (𝑦 + 1)))
6766csbeq1d 3852 . . . . . . . . . . . . . . . . . . . . . . . 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 6838 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑡 = 𝑢 → (1st ‘(1st𝑡)) = (1st ‘(1st𝑢)))
69 2fveq3 6838 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑡 = 𝑢 → (2nd ‘(1st𝑡)) = (2nd ‘(1st𝑢)))
7069imaeq1d 6017 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑡 = 𝑢 → ((2nd ‘(1st𝑡)) “ (1...𝑗)) = ((2nd ‘(1st𝑢)) “ (1...𝑗)))
7170xpeq1d 5652 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑡 = 𝑢 → (((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) = (((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}))
7269imaeq1d 6017 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑡 = 𝑢 → ((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) = ((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)))
7372xpeq1d 5652 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑡 = 𝑢 → (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}) = (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0}))
7471, 73uneq12d 4120 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑡 = 𝑢 → ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})) = ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0})))
7568, 74oveq12d 7376 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑡 = 𝑢 → ((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0}))))
7675csbeq2dv 3855 . . . . . . . . . . . . . . . . . . . . . . . 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 2770 . . . . . . . . . . . . . . . . . . . . . . 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 5191 . . . . . . . . . . . . . . . . . . . . . 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 5100 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦 = 𝑤 → (𝑦 < (2nd𝑢) ↔ 𝑤 < (2nd𝑢)))
80 id 22 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦 = 𝑤𝑦 = 𝑤)
81 oveq1 7365 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦 = 𝑤 → (𝑦 + 1) = (𝑤 + 1))
8279, 80, 81ifbieq12d 4507 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 = 𝑤 → if(𝑦 < (2nd𝑢), 𝑦, (𝑦 + 1)) = if(𝑤 < (2nd𝑢), 𝑤, (𝑤 + 1)))
8382csbeq1d 3852 . . . . . . . . . . . . . . . . . . . . . . . 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 7366 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑗 = 𝑖 → (1...𝑗) = (1...𝑖))
8584imaeq2d 6018 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 = 𝑖 → ((2nd ‘(1st𝑢)) “ (1...𝑗)) = ((2nd ‘(1st𝑢)) “ (1...𝑖)))
8685xpeq1d 5652 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 = 𝑖 → (((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) = (((2nd ‘(1st𝑢)) “ (1...𝑖)) × {1}))
87 oveq1 7365 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑗 = 𝑖 → (𝑗 + 1) = (𝑖 + 1))
8887oveq1d 7373 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑗 = 𝑖 → ((𝑗 + 1)...𝑁) = ((𝑖 + 1)...𝑁))
8988imaeq2d 6018 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 = 𝑖 → ((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) = ((2nd ‘(1st𝑢)) “ ((𝑖 + 1)...𝑁)))
9089xpeq1d 5652 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 = 𝑖 → (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0}) = (((2nd ‘(1st𝑢)) “ ((𝑖 + 1)...𝑁)) × {0}))
9186, 90uneq12d 4120 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 = 𝑖 → ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0})) = ((((2nd ‘(1st𝑢)) “ (1...𝑖)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑖 + 1)...𝑁)) × {0})))
9291oveq2d 7374 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 = 𝑖 → ((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑢)) ∘f + ((((2nd ‘(1st𝑢)) “ (1...𝑖)) × {1}) ∪ (((2nd ‘(1st𝑢)) “ ((𝑖 + 1)...𝑁)) × {0}))))
9392cbvcsbv 3860 . . . . . . . . . . . . . . . . . . . . . . . 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 2786 . . . . . . . . . . . . . . . . . . . . . . 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 5201 . . . . . . . . . . . . . . . . . . . . . 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 2786 . . . . . . . . . . . . . . . . . . . . 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 2746 . . . . . . . . . . . . . . . . . . . 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 3408 . . . . . . . . . . . . . . . . . . 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 8788 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))) → 𝑥:(0...(𝑁 − 1))⟶((0...𝐾) ↑m (1...𝑁)))
10099ad3antlr 732 . . . . . . . . . . . . . . . . . . 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 3072 . . . . . . . . . . . . . . . . . . . . 21 (∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾) → ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0)
104103ad2antlr 728 . . . . . . . . . . . . . . . . . . . 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 6833 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑛 = 𝑚 → (𝑝𝑛) = (𝑝𝑚))
106105neeq1d 2990 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 = 𝑚 → ((𝑝𝑛) ≠ 0 ↔ (𝑝𝑚) ≠ 0))
107106rexbidv 3159 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 = 𝑚 → (∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ ∃𝑝 ∈ ran 𝑥(𝑝𝑚) ≠ 0))
108 fveq1 6832 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑝 = 𝑞 → (𝑝𝑚) = (𝑞𝑚))
109108neeq1d 2990 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑝 = 𝑞 → ((𝑝𝑚) ≠ 0 ↔ (𝑞𝑚) ≠ 0))
110109cbvrexvw 3214 . . . . . . . . . . . . . . . . . . . . . 22 (∃𝑝 ∈ ran 𝑥(𝑝𝑚) ≠ 0 ↔ ∃𝑞 ∈ ran 𝑥(𝑞𝑚) ≠ 0)
111107, 110bitrdi 287 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 𝑚 → (∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ ∃𝑞 ∈ ran 𝑥(𝑞𝑚) ≠ 0))
112111rspccva 3574 . . . . . . . . . . . . . . . . . . . 20 ((∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ 𝑚 ∈ (1...𝑁)) → ∃𝑞 ∈ ran 𝑥(𝑞𝑚) ≠ 0)
113104, 112sylan 581 . . . . . . . . . . . . . . . . . . 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 3072 . . . . . . . . . . . . . . . . . . . . 21 (∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾) → ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)
116115ad2antlr 728 . . . . . . . . . . . . . . . . . . . 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 2990 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 = 𝑚 → ((𝑝𝑛) ≠ 𝐾 ↔ (𝑝𝑚) ≠ 𝐾))
118117rexbidv 3159 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 = 𝑚 → (∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾 ↔ ∃𝑝 ∈ ran 𝑥(𝑝𝑚) ≠ 𝐾))
119108neeq1d 2990 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑝 = 𝑞 → ((𝑝𝑚) ≠ 𝐾 ↔ (𝑞𝑚) ≠ 𝐾))
120119cbvrexvw 3214 . . . . . . . . . . . . . . . . . . . . . 22 (∃𝑝 ∈ ran 𝑥(𝑝𝑚) ≠ 𝐾 ↔ ∃𝑞 ∈ ran 𝑥(𝑞𝑚) ≠ 𝐾)
121118, 120bitrdi 287 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 𝑚 → (∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾 ↔ ∃𝑞 ∈ ran 𝑥(𝑞𝑚) ≠ 𝐾))
122121rspccva 3574 . . . . . . . . . . . . . . . . . . . 20 ((∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾𝑚 ∈ (1...𝑁)) → ∃𝑞 ∈ ran 𝑥(𝑞𝑚) ≠ 𝐾)
123116, 122sylan 581 . . . . . . . . . . . . . . . . . . 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 37812 . . . . . . . . . . . . . . . . . 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 4741 . . . . . . . . . . . . . . . . . . . 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 2584 . . . . . . . . . . . . . . . . . . 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 3462 . . . . . . . . . . . . . . . . . . . 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 14345 . . . . . . . . . . . . . . . . . . . 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 3350 . . . . . . . . . . . . . . . . . . 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 7373 . . . . . . . . . . . . . . . 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 2772 . . . . . . . . . . . . . . 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 5135 . . . . . . . . . . . . . 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 1935 . . . . . . . . . . . 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 16200 . . . . . . . . . . . . . 14 (2 ∈ ℤ → 2 ∥ 0)
1409, 139ax-mp 5 . . . . . . . . . . . . 13 2 ∥ 0
141 hash0 14292 . . . . . . . . . . . . 13 (♯‘∅) = 0
142140, 141breqtrri 5124 . . . . . . . . . . . 12 2 ∥ (♯‘∅)
143 fveq2 6833 . . . . . . . . . . . 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 5135 . . . . . . . . . . 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 3405 . . . . . . . . . 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 6837 . . . . . . . . 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 5109 . . . . . . . 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 3242 . . . . 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 3072 . . . . . . 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 4339 . . . . . . 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 6837 . . . . 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 5135 . . . 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 16237 . 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 9173 . . . . 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 1137 . . . . . . 7 ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁) → ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶)
168 sneq 4589 . . . . . . . . . . . . 13 ((2nd𝑡) = 𝑁 → {(2nd𝑡)} = {𝑁})
169168difeq2d 4077 . . . . . . . . . . . 12 ((2nd𝑡) = 𝑁 → ((0...𝑁) ∖ {(2nd𝑡)}) = ((0...𝑁) ∖ {𝑁}))
170 difun2 4432 . . . . . . . . . . . . 13 (((0...(𝑁 − 1)) ∪ {𝑁}) ∖ {𝑁}) = ((0...(𝑁 − 1)) ∖ {𝑁})
17162nnnn0d 12464 . . . . . . . . . . . . . . . . . 18 (𝜑𝑁 ∈ ℕ0)
172 nn0uz 12791 . . . . . . . . . . . . . . . . . 18 0 = (ℤ‘0)
173171, 172eleqtrdi 2845 . . . . . . . . . . . . . . . . 17 (𝜑𝑁 ∈ (ℤ‘0))
174 fzm1 13525 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ (ℤ‘0) → (𝑛 ∈ (0...𝑁) ↔ (𝑛 ∈ (0...(𝑁 − 1)) ∨ 𝑛 = 𝑁)))
175173, 174syl 17 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑛 ∈ (0...𝑁) ↔ (𝑛 ∈ (0...(𝑁 − 1)) ∨ 𝑛 = 𝑁)))
176 elun 4104 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ((0...(𝑁 − 1)) ∪ {𝑁}) ↔ (𝑛 ∈ (0...(𝑁 − 1)) ∨ 𝑛 ∈ {𝑁}))
177 velsn 4595 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ {𝑁} ↔ 𝑛 = 𝑁)
178177orbi2i 913 . . . . . . . . . . . . . . . . 17 ((𝑛 ∈ (0...(𝑁 − 1)) ∨ 𝑛 ∈ {𝑁}) ↔ (𝑛 ∈ (0...(𝑁 − 1)) ∨ 𝑛 = 𝑁))
179176, 178bitri 275 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ((0...(𝑁 − 1)) ∪ {𝑁}) ↔ (𝑛 ∈ (0...(𝑁 − 1)) ∨ 𝑛 = 𝑁))
180175, 179bitr4di 289 . . . . . . . . . . . . . . 15 (𝜑 → (𝑛 ∈ (0...𝑁) ↔ 𝑛 ∈ ((0...(𝑁 − 1)) ∪ {𝑁})))
181180eqrdv 2733 . . . . . . . . . . . . . 14 (𝜑 → (0...𝑁) = ((0...(𝑁 − 1)) ∪ {𝑁}))
182181difeq1d 4076 . . . . . . . . . . . . 13 (𝜑 → ((0...𝑁) ∖ {𝑁}) = (((0...(𝑁 − 1)) ∪ {𝑁}) ∖ {𝑁}))
18362nnzd 12516 . . . . . . . . . . . . . . 15 (𝜑𝑁 ∈ ℤ)
184 uzid 12768 . . . . . . . . . . . . . . 15 (𝑁 ∈ ℤ → 𝑁 ∈ (ℤ𝑁))
185 uznfz 13528 . . . . . . . . . . . . . . 15 (𝑁 ∈ (ℤ𝑁) → ¬ 𝑁 ∈ (0...(𝑁 − 1)))
186183, 184, 1853syl 18 . . . . . . . . . . . . . 14 (𝜑 → ¬ 𝑁 ∈ (0...(𝑁 − 1)))
187 disjsn 4667 . . . . . . . . . . . . . . 15 (((0...(𝑁 − 1)) ∩ {𝑁}) = ∅ ↔ ¬ 𝑁 ∈ (0...(𝑁 − 1)))
188 disj3 4405 . . . . . . . . . . . . . . 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 2796 . . . . . . . . . . . 12 (𝜑 → ((0...𝑁) ∖ {𝑁}) = (0...(𝑁 − 1)))
192169, 191sylan9eqr 2792 . . . . . . . . . . 11 ((𝜑 ∧ (2nd𝑡) = 𝑁) → ((0...𝑁) ∖ {(2nd𝑡)}) = (0...(𝑁 − 1)))
193192rexeqdv 3296 . . . . . . . . . 10 ((𝜑 ∧ (2nd𝑡) = 𝑁) → (∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ↔ ∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶))
194193biimprd 248 . . . . . . . . 9 ((𝜑 ∧ (2nd𝑡) = 𝑁) → (∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 → ∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶))
195194ralimdv 3149 . . . . . . . 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 607 . . . . . 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 4026 . . . 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 14337 . . . 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 588 . . 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 716 . . . . . . . . . 10 (((𝜑𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → 𝐵 ∈ (0...𝑁))
206 xp1st 7965 . . . . . . . . . . . 12 (𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
207 xp1st 7965 . . . . . . . . . . . 12 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (1st ‘(1st𝑡)) ∈ ((0..^𝐾) ↑m (1...𝑁)))
208 elmapi 8788 . . . . . . . . . . . 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 7966 . . . . . . . . . . . . 13 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (2nd ‘(1st𝑡)) ∈ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
212 fvex 6846 . . . . . . . . . . . . . 14 (2nd ‘(1st𝑡)) ∈ V
213 f1oeq1 6761 . . . . . . . . . . . . . 14 (𝑓 = (2nd ‘(1st𝑡)) → (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) ↔ (2nd ‘(1st𝑡)):(1...𝑁)–1-1-onto→(1...𝑁)))
214212, 213elab 3633 . . . . . . . . . . . . 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 7966 . . . . . . . . . . 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 37814 . . . . . . . . 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 7972 . . . . . . . . . . . . . . 15 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (1st𝑡) = ⟨(1st ‘(1st𝑡)), (2nd ‘(1st𝑡))⟩)
223222csbeq1d 3852 . . . . . . . . . . . . . 14 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (1st𝑡) / 𝑠𝐶 = ⟨(1st ‘(1st𝑡)), (2nd ‘(1st𝑡))⟩ / 𝑠𝐶)
224223eqeq2d 2746 . . . . . . . . . . . . 13 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (𝑖 = (1st𝑡) / 𝑠𝐶𝑖 = ⟨(1st ‘(1st𝑡)), (2nd ‘(1st𝑡))⟩ / 𝑠𝐶))
225224rexbidv 3159 . . . . . . . . . . . 12 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ↔ ∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = ⟨(1st ‘(1st𝑡)), (2nd ‘(1st𝑡))⟩ / 𝑠𝐶))
226225ralbidv 3158 . . . . . . . . . . 11 ((1st𝑡) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ↔ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = ⟨(1st ‘(1st𝑡)), (2nd ‘(1st𝑡))⟩ / 𝑠𝐶))
227226anbi1d 632 . . . . . . . . . 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 6669 . . . . . . . . . . . . . 14 (𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1))) → ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁)))
231230anim2i 618 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) → (𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))))
232 dfss3 3921 . . . . . . . . . . . . . 14 ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ↔ ∀𝑛 ∈ (0...(𝑁 − 1))𝑛 ∈ ran (𝑝 ∈ ran 𝑥𝐵))
233 vex 3443 . . . . . . . . . . . . . . . 16 𝑛 ∈ V
234 eqid 2735 . . . . . . . . . . . . . . . . 17 (𝑝 ∈ ran 𝑥𝐵) = (𝑝 ∈ ran 𝑥𝐵)
235234elrnmpt 5906 . . . . . . . . . . . . . . . 16 (𝑛 ∈ V → (𝑛 ∈ ran (𝑝 ∈ ran 𝑥𝐵) ↔ ∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵))
236233, 235ax-mp 5 . . . . . . . . . . . . . . 15 (𝑛 ∈ ran (𝑝 ∈ ran 𝑥𝐵) ↔ ∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵)
237236ralbii 3081 . . . . . . . . . . . . . 14 (∀𝑛 ∈ (0...(𝑁 − 1))𝑛 ∈ ran (𝑝 ∈ ran 𝑥𝐵) ↔ ∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵)
238232, 237sylbb 219 . . . . . . . . . . . . 13 ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) → ∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵)
239 1eluzge0 12795 . . . . . . . . . . . . . . . . 17 1 ∈ (ℤ‘0)
240 fzss1 13481 . . . . . . . . . . . . . . . . 17 (1 ∈ (ℤ‘0) → (1...(𝑁 − 1)) ⊆ (0...(𝑁 − 1)))
241 ssralv 4001 . . . . . . . . . . . . . . . . 17 ((1...(𝑁 − 1)) ⊆ (0...(𝑁 − 1)) → (∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 → ∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵))
242239, 240, 241mp2b 10 . . . . . . . . . . . . . . . 16 (∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 → ∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵)
24362nncnd 12163 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑𝑁 ∈ ℂ)
244 npcan1 11564 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑁 ∈ ℂ → ((𝑁 − 1) + 1) = 𝑁)
245243, 244syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → ((𝑁 − 1) + 1) = 𝑁)
246 peano2zm 12536 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑁 ∈ ℤ → (𝑁 − 1) ∈ ℤ)
247 uzid 12768 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑁 − 1) ∈ ℤ → (𝑁 − 1) ∈ (ℤ‘(𝑁 − 1)))
248 peano2uz 12816 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑁 − 1) ∈ (ℤ‘(𝑁 − 1)) → ((𝑁 − 1) + 1) ∈ (ℤ‘(𝑁 − 1)))
249183, 246, 247, 2484syl 19 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → ((𝑁 − 1) + 1) ∈ (ℤ‘(𝑁 − 1)))
250245, 249eqeltrrd 2836 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑𝑁 ∈ (ℤ‘(𝑁 − 1)))
251 fzss2 13482 . . . . . . . . . . . . . . . . . . . . . 22 (𝑁 ∈ (ℤ‘(𝑁 − 1)) → (1...(𝑁 − 1)) ⊆ (1...𝑁))
252250, 251syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (1...(𝑁 − 1)) ⊆ (1...𝑁))
253252sselda 3932 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑛 ∈ (1...(𝑁 − 1))) → 𝑛 ∈ (1...𝑁))
254253adantlr 716 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...(𝑁 − 1))) → 𝑛 ∈ (1...𝑁))
255 simplr 769 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) → ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁)))
256 ssel2 3927 . . . . . . . . . . . . . . . . . . . . . . 23 ((ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁)) ∧ 𝑝 ∈ ran 𝑥) → 𝑝 ∈ ((0...𝐾) ↑m (1...𝑁)))
257 elmapi 8788 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑝 ∈ ((0...𝐾) ↑m (1...𝑁)) → 𝑝:(1...𝑁)⟶(0...𝐾))
258256, 257syl 17 . . . . . . . . . . . . . . . . . . . . . 22 ((ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁)) ∧ 𝑝 ∈ ran 𝑥) → 𝑝:(1...𝑁)⟶(0...𝐾))
259255, 258sylan 581 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) ∧ 𝑝 ∈ ran 𝑥) → 𝑝:(1...𝑁)⟶(0...𝐾))
260 poimirlem28.3 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0)) → 𝐵 < 𝑛)
261 elfzelz 13442 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑛 ∈ (1...𝑁) → 𝑛 ∈ ℤ)
262261zred 12598 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑛 ∈ (1...𝑁) → 𝑛 ∈ ℝ)
263262ltnrd 11269 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑛 ∈ (1...𝑁) → ¬ 𝑛 < 𝑛)
264 breq1 5100 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑛 = 𝐵 → (𝑛 < 𝑛𝐵 < 𝑛))
265264notbid 318 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑛 = 𝐵 → (¬ 𝑛 < 𝑛 ↔ ¬ 𝐵 < 𝑛))
266263, 265syl5ibcom 245 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑛 ∈ (1...𝑁) → (𝑛 = 𝐵 → ¬ 𝐵 < 𝑛))
267266necon2ad 2946 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑛 ∈ (1...𝑁) → (𝐵 < 𝑛𝑛𝐵))
2682673ad2ant1 1134 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0) → (𝐵 < 𝑛𝑛𝐵))
269268adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0)) → (𝐵 < 𝑛𝑛𝐵))
270260, 269mpd 15 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0)) → 𝑛𝐵)
2712703exp2 1356 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → (𝑛 ∈ (1...𝑁) → (𝑝:(1...𝑁)⟶(0...𝐾) → ((𝑝𝑛) = 0 → 𝑛𝐵))))
272271imp31 417 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → ((𝑝𝑛) = 0 → 𝑛𝐵))
273272necon2d 2954 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → (𝑛 = 𝐵 → (𝑝𝑛) ≠ 0))
274273adantllr 720 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → (𝑛 = 𝐵 → (𝑝𝑛) ≠ 0))
275259, 274syldan 592 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) ∧ 𝑝 ∈ ran 𝑥) → (𝑛 = 𝐵 → (𝑝𝑛) ≠ 0))
276275reximdva 3148 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) → (∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 → ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0))
277254, 276syldan 592 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...(𝑁 − 1))) → (∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 → ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0))
278277ralimdva 3147 . . . . . . . . . . . . . . . . 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 594 . . . . . . . . . . . . . . 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 12792 . . . . . . . . . . . . . . . . . . . . . 22 ℕ = (ℤ‘1)
28362, 282eleqtrdi 2845 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑁 ∈ (ℤ‘1))
284 fzm1 13525 . . . . . . . . . . . . . . . . . . . . 21 (𝑁 ∈ (ℤ‘1) → (𝑛 ∈ (1...𝑁) ↔ (𝑛 ∈ (1...(𝑁 − 1)) ∨ 𝑛 = 𝑁)))
285283, 284syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑛 ∈ (1...𝑁) ↔ (𝑛 ∈ (1...(𝑁 − 1)) ∨ 𝑛 = 𝑁)))
286 elun 4104 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ ((1...(𝑁 − 1)) ∪ {𝑁}) ↔ (𝑛 ∈ (1...(𝑁 − 1)) ∨ 𝑛 ∈ {𝑁}))
287177orbi2i 913 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ (1...(𝑁 − 1)) ∨ 𝑛 ∈ {𝑁}) ↔ (𝑛 ∈ (1...(𝑁 − 1)) ∨ 𝑛 = 𝑁))
288286, 287bitri 275 . . . . . . . . . . . . . . . . . . . 20 (𝑛 ∈ ((1...(𝑁 − 1)) ∪ {𝑁}) ↔ (𝑛 ∈ (1...(𝑁 − 1)) ∨ 𝑛 = 𝑁))
289285, 288bitr4di 289 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑛 ∈ (1...𝑁) ↔ 𝑛 ∈ ((1...(𝑁 − 1)) ∪ {𝑁})))
290289eqrdv 2733 . . . . . . . . . . . . . . . . . 18 (𝜑 → (1...𝑁) = ((1...(𝑁 − 1)) ∪ {𝑁}))
291290raleqdv 3295 . . . . . . . . . . . . . . . . 17 (𝜑 → (∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ ∀𝑛 ∈ ((1...(𝑁 − 1)) ∪ {𝑁})∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0))
292 ralunb 4148 . . . . . . . . . . . . . . . . 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 6833 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 𝑁 → (𝑝𝑛) = (𝑝𝑁))
295294neeq1d 2990 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 𝑁 → ((𝑝𝑛) ≠ 0 ↔ (𝑝𝑁) ≠ 0))
296295rexbidv 3159 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑁 → (∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0))
297296ralsng 4631 . . . . . . . . . . . . . . . . . 18 (𝑁 ∈ ℕ → (∀𝑛 ∈ {𝑁}∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0))
29862, 297syl 17 . . . . . . . . . . . . . . . . 17 (𝜑 → (∀𝑛 ∈ {𝑁}∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0))
299298anbi2d 631 . . . . . . . . . . . . . . . 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 727 . . . . . . . . . . . . . 14 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ ∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵) → (∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ↔ (∀𝑛 ∈ (1...(𝑁 − 1))∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0)))
302 0z 12501 . . . . . . . . . . . . . . . . . . . . . . 23 0 ∈ ℤ
303 1z 12523 . . . . . . . . . . . . . . . . . . . . . . 23 1 ∈ ℤ
304 fzshftral 13533 . . . . . . . . . . . . . . . . . . . . . . 23 ((0 ∈ ℤ ∧ (𝑁 − 1) ∈ ℤ ∧ 1 ∈ ℤ) → (∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∀𝑚 ∈ ((0 + 1)...((𝑁 − 1) + 1))[(𝑚 − 1) / 𝑛]𝑝 ∈ ran 𝑥 𝑛 = 𝐵))
305302, 303, 304mp3an13 1455 . . . . . . . . . . . . . . . . . . . . . 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 12264 . . . . . . . . . . . . . . . . . . . . . . . 24 (0 + 1) = 1
308307a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → (0 + 1) = 1)
309308, 245oveq12d 7376 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ((0 + 1)...((𝑁 − 1) + 1)) = (1...𝑁))
310309raleqdv 3295 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (∀𝑚 ∈ ((0 + 1)...((𝑁 − 1) + 1))[(𝑚 − 1) / 𝑛]𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∀𝑚 ∈ (1...𝑁)[(𝑚 − 1) / 𝑛]𝑝 ∈ ran 𝑥 𝑛 = 𝐵))
311306, 310bitrd 279 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∀𝑚 ∈ (1...𝑁)[(𝑚 − 1) / 𝑛]𝑝 ∈ ran 𝑥 𝑛 = 𝐵))
312 ovex 7391 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑚 − 1) ∈ V
313 eqeq1 2739 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑛 = (𝑚 − 1) → (𝑛 = 𝐵 ↔ (𝑚 − 1) = 𝐵))
314313rexbidv 3159 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 = (𝑚 − 1) → (∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∃𝑝 ∈ ran 𝑥(𝑚 − 1) = 𝐵))
315312, 314sbcie 3781 . . . . . . . . . . . . . . . . . . . . . 22 ([(𝑚 − 1) / 𝑛]𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∃𝑝 ∈ ran 𝑥(𝑚 − 1) = 𝐵)
316315ralbii 3081 . . . . . . . . . . . . . . . . . . . . 21 (∀𝑚 ∈ (1...𝑁)[(𝑚 − 1) / 𝑛]𝑝 ∈ ran 𝑥 𝑛 = 𝐵 ↔ ∀𝑚 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑚 − 1) = 𝐵)
317 oveq1 7365 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑚 = 𝑛 → (𝑚 − 1) = (𝑛 − 1))
318317eqeq1d 2737 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑚 = 𝑛 → ((𝑚 − 1) = 𝐵 ↔ (𝑛 − 1) = 𝐵))
319318rexbidv 3159 . . . . . . . . . . . . . . . . . . . . . 22 (𝑚 = 𝑛 → (∃𝑝 ∈ ran 𝑥(𝑚 − 1) = 𝐵 ↔ ∃𝑝 ∈ ran 𝑥(𝑛 − 1) = 𝐵))
320319cbvralvw 3213 . . . . . . . . . . . . . . . . . . . . 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 716 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ ∀𝑛 ∈ (0...(𝑁 − 1))∃𝑝 ∈ ran 𝑥 𝑛 = 𝐵) → ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑛 − 1) = 𝐵)
325 poimirlem28.4 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 𝐾)) → 𝐵 ≠ (𝑛 − 1))
326325necomd 2986 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 𝐾)) → (𝑛 − 1) ≠ 𝐵)
3273263exp2 1356 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → (𝑛 ∈ (1...𝑁) → (𝑝:(1...𝑁)⟶(0...𝐾) → ((𝑝𝑛) = 𝐾 → (𝑛 − 1) ≠ 𝐵))))
328327imp31 417 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → ((𝑝𝑛) = 𝐾 → (𝑛 − 1) ≠ 𝐵))
329328necon2d 2954 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → ((𝑛 − 1) = 𝐵 → (𝑝𝑛) ≠ 𝐾))
330329adantllr 720 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → ((𝑛 − 1) = 𝐵 → (𝑝𝑛) ≠ 𝐾))
331259, 330syldan 592 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) ∧ 𝑝 ∈ ran 𝑥) → ((𝑛 − 1) = 𝐵 → (𝑝𝑛) ≠ 𝐾))
332331reximdva 3148 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ 𝑛 ∈ (1...𝑁)) → (∃𝑝 ∈ ran 𝑥(𝑛 − 1) = 𝐵 → ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾))
333332ralimdva 3147 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) → (∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑛 − 1) = 𝐵 → ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾))
334333imp 406 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ ran 𝑥 ⊆ ((0...𝐾) ↑m (1...𝑁))) ∧ ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑛 − 1) = 𝐵) → ∀𝑛 ∈ (1...𝑁)∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)
335324, 334syldan 592 . . . . . . . . . . . . . . . 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 3095 . . . . . . . . . . . . . . 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 597 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) ∧ (0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵)) → (∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0 ↔ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾)))
341340pm5.32da 579 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (((0...𝐾) ↑m (1...𝑁)) ↑m (0...(𝑁 − 1)))) → (((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑁) ≠ 0) ↔ ((0...(𝑁 − 1)) ⊆ ran (𝑝 ∈ ran 𝑥𝐵) ∧ ∀𝑛 ∈ (1...𝑁)(∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 0 ∧ ∃𝑝 ∈ ran 𝑥(𝑝𝑛) ≠ 𝐾))))
342341anbi2d 631 . . . . . . . . . 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 3157 . . . . . . . . 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 3296 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (∃𝑗 ∈ ((0...𝑁) ∖ {𝑁})𝑖 = (1st𝑡) / 𝑠𝐶 ↔ ∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶))
346345biimpd 229 . . . . . . . . . . . . . . . . . 18 (𝜑 → (∃𝑗 ∈ ((0...𝑁) ∖ {𝑁})𝑖 = (1st𝑡) / 𝑠𝐶 → ∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶))
347346ralimdv 3149 . . . . . . . . . . . . . . . . 17 (𝜑 → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ ((0...𝑁) ∖ {𝑁})𝑖 = (1st𝑡) / 𝑠𝐶 → ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶))
348169rexeqdv 3296 . . . . . . . . . . . . . . . . . . 19 ((2nd𝑡) = 𝑁 → (∃𝑗 ∈ ((0...𝑁) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠𝐶 ↔ ∃𝑗 ∈ ((0...𝑁) ∖ {𝑁})𝑖 = (1st𝑡) / 𝑠𝐶))
349348ralbidv 3158 . . . . . . . . . . . . . . . . . 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 646 . . . . . . . . . . . . 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 624 . . . . . . . . . . . . 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 579 . . . . . . . . 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 3404 . . . . . 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 5007 . . . . . 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 4269 . . . . . 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 2795 . . . . 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 6837 . . . 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 4027 . . . . . . . . . 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 3928 . . . . . . . . 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 6833 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑠 → (2nd𝑡) = (2nd𝑠))
376375breq2d 5109 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑠 → (𝑦 < (2nd𝑡) ↔ 𝑦 < (2nd𝑠)))
377376ifbid 4502 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑠 → if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) = if(𝑦 < (2nd𝑠), 𝑦, (𝑦 + 1)))
378377csbeq1d 3852 . . . . . . . . . . . . . . 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 6838 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑠 → (1st ‘(1st𝑡)) = (1st ‘(1st𝑠)))
380 2fveq3 6838 . . . . . . . . . . . . . . . . . . . 20 (𝑡 = 𝑠 → (2nd ‘(1st𝑡)) = (2nd ‘(1st𝑠)))
381380imaeq1d 6017 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑠 → ((2nd ‘(1st𝑡)) “ (1...𝑗)) = ((2nd ‘(1st𝑠)) “ (1...𝑗)))
382381xpeq1d 5652 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑠 → (((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) = (((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}))
383380imaeq1d 6017 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑠 → ((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) = ((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)))
384383xpeq1d 5652 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑠 → (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}) = (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0}))
385382, 384uneq12d 4120 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑠 → ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})) = ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0})))
386379, 385oveq12d 7376 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑠 → ((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑠)) ∘f + ((((2nd ‘(1st𝑠)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑠)) “ ((𝑗 + 1)...𝑁)) × {0}))))
387386csbeq2dv 3855 . . . . . . . . . . . . . . 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 2770 . . . . . . . . . . . . . 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 5191 . . . . . . . . . . . . 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 2746 . . . . . . . . . . . 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 2742 . . . . . . . . . . . 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 3645 . . . . . . . . . 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 3052 . . . . . . 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 3054 . . . . . 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 5083 . . . . . 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 15747 . . . 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 2772 . . 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 7953 . . . . . . . . . . . . 13 1st :V–onto→V
403 fofun 6746 . . . . . . . . . . . . 13 (1st :V–onto→V → Fun 1st )
404402, 403ax-mp 5 . . . . . . . . . . . 12 Fun 1st
405 ssv 3957 . . . . . . . . . . . . 13 {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ⊆ V
406 fof 6745 . . . . . . . . . . . . . . 15 (1st :V–onto→V → 1st :V⟶V)
407402, 406ax-mp 5 . . . . . . . . . . . . . 14 1st :V⟶V
408407fdmi 6672 . . . . . . . . . . . . 13 dom 1st = V
409405, 408sseqtrri 3982 . . . . . . . . . . . 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 6755 . . . . . . . . . . . 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 693 . . . . . . . . . . 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 6842 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑥 → ((2nd𝑡) = 𝑁 ↔ (2nd𝑥) = 𝑁))
413 fveq2 6833 . . . . . . . . . . . . . . . . . . . . . 22 (𝑡 = 𝑥 → (1st𝑡) = (1st𝑥))
414413csbeq1d 3852 . . . . . . . . . . . . . . . . . . . . 21 (𝑡 = 𝑥(1st𝑡) / 𝑠𝐶 = (1st𝑥) / 𝑠𝐶)
415414eqeq2d 2746 . . . . . . . . . . . . . . . . . . . 20 (𝑡 = 𝑥 → (𝑖 = (1st𝑡) / 𝑠𝐶𝑖 = (1st𝑥) / 𝑠𝐶))
416415rexbidv 3159 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑥 → (∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ↔ ∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶))
417416ralbidv 3158 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑥 → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ↔ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶))
418 2fveq3 6838 . . . . . . . . . . . . . . . . . . . 20 (𝑡 = 𝑥 → (1st ‘(1st𝑡)) = (1st ‘(1st𝑥)))
419418fveq1d 6835 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑥 → ((1st ‘(1st𝑡))‘𝑁) = ((1st ‘(1st𝑥))‘𝑁))
420419eqeq1d 2737 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑥 → (((1st ‘(1st𝑡))‘𝑁) = 0 ↔ ((1st ‘(1st𝑥))‘𝑁) = 0))
421 2fveq3 6838 . . . . . . . . . . . . . . . . . . . 20 (𝑡 = 𝑥 → (2nd ‘(1st𝑡)) = (2nd ‘(1st𝑥)))
422421fveq1d 6835 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑥 → ((2nd ‘(1st𝑡))‘𝑁) = ((2nd ‘(1st𝑥))‘𝑁))
423422eqeq1d 2737 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑥 → (((2nd ‘(1st𝑡))‘𝑁) = 𝑁 ↔ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁))
424417, 420, 4233anbi123d 1439 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑥 → ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁)))
425412, 424anbi12d 633 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑥 → (((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)) ↔ ((2nd𝑥) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁))))
426425rexrab 3653 . . . . . . . . . . . . . . 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 7965 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1st𝑥) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
428427anim1i 616 . . . . . . . . . . . . . . . . . . . 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 2823 . . . . . . . . . . . . . . . . . . . . 21 ((1st𝑥) = 𝑠 → ((1st𝑥) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ↔ 𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})))
430 csbeq1a 3862 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑠 = (1st𝑥) → 𝐶 = (1st𝑥) / 𝑠𝐶)
431430eqcoms 2743 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((1st𝑥) = 𝑠𝐶 = (1st𝑥) / 𝑠𝐶)
432431eqcomd 2741 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((1st𝑥) = 𝑠(1st𝑥) / 𝑠𝐶 = 𝐶)
433432eqeq2d 2746 . . . . . . . . . . . . . . . . . . . . . . . 24 ((1st𝑥) = 𝑠 → (𝑖 = (1st𝑥) / 𝑠𝐶𝑖 = 𝐶))
434433rexbidv 3159 . . . . . . . . . . . . . . . . . . . . . . 23 ((1st𝑥) = 𝑠 → (∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ↔ ∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶))
435434ralbidv 3158 . . . . . . . . . . . . . . . . . . . . . 22 ((1st𝑥) = 𝑠 → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ↔ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶))
436 fveq2 6833 . . . . . . . . . . . . . . . . . . . . . . . 24 ((1st𝑥) = 𝑠 → (1st ‘(1st𝑥)) = (1st𝑠))
437436fveq1d 6835 . . . . . . . . . . . . . . . . . . . . . . 23 ((1st𝑥) = 𝑠 → ((1st ‘(1st𝑥))‘𝑁) = ((1st𝑠)‘𝑁))
438437eqeq1d 2737 . . . . . . . . . . . . . . . . . . . . . 22 ((1st𝑥) = 𝑠 → (((1st ‘(1st𝑥))‘𝑁) = 0 ↔ ((1st𝑠)‘𝑁) = 0))
439 fveq2 6833 . . . . . . . . . . . . . . . . . . . . . . . 24 ((1st𝑥) = 𝑠 → (2nd ‘(1st𝑥)) = (2nd𝑠))
440439fveq1d 6835 . . . . . . . . . . . . . . . . . . . . . . 23 ((1st𝑥) = 𝑠 → ((2nd ‘(1st𝑥))‘𝑁) = ((2nd𝑠)‘𝑁))
441440eqeq1d 2737 . . . . . . . . . . . . . . . . . . . . . 22 ((1st𝑥) = 𝑠 → (((2nd ‘(1st𝑥))‘𝑁) = 𝑁 ↔ ((2nd𝑠)‘𝑁) = 𝑁))
442435, 438, 4413anbi123d 1439 . . . . . . . . . . . . . . . . . . . . 21 ((1st𝑥) = 𝑠 → ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶 ∧ ((1st𝑠)‘𝑁) = 0 ∧ ((2nd𝑠)‘𝑁) = 𝑁)))
443429, 442anbi12d 633 . . . . . . . . . . . . . . . . . . . 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 717 . . . . . . . . . . . . . . . . . 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 3129 . . . . . . . . . . . . . . . 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 13543 . . . . . . . . . . . . . . . . . . . . 21 (𝑁 ∈ ℕ0𝑁 ∈ (0...𝑁))
449171, 448sylib 218 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝑁 ∈ (0...𝑁))
450 opelxpi 5660 . . . . . . . . . . . . . . . . . . . 20 ((𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∧ 𝑁 ∈ (0...𝑁)) → ⟨𝑠, 𝑁⟩ ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
451449, 450sylan2 594 . . . . . . . . . . . . . . . . . . 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 5666 . . . . . . . . . . . . . . . . . . . . 21 (⟨𝑠, 𝑁⟩ ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → 𝑁 ∈ (0...𝑁))
454 op2ndg 7946 . . . . . . . . . . . . . . . . . . . . . . 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 7945 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (1st ‘⟨𝑠, 𝑁⟩) = 𝑠)
457 csbeq1a 3862 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑠 = (1st ‘⟨𝑠, 𝑁⟩) → 𝐶 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶)
458457eqcoms 2743 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((1st ‘⟨𝑠, 𝑁⟩) = 𝑠𝐶 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶)
459458eqcomd 2741 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((1st ‘⟨𝑠, 𝑁⟩) = 𝑠(1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 = 𝐶)
460456, 459syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 = 𝐶)
461460eqeq2d 2746 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶𝑖 = 𝐶))
462461rexbidv 3159 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ↔ ∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶))
463462ralbidv 3158 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ↔ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = 𝐶))
464456fveq2d 6837 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (1st ‘(1st ‘⟨𝑠, 𝑁⟩)) = (1st𝑠))
465464fveq1d 6835 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = ((1st𝑠)‘𝑁))
466465eqeq1d 2737 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0 ↔ ((1st𝑠)‘𝑁) = 0))
467456fveq2d 6837 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (2nd ‘(1st ‘⟨𝑠, 𝑁⟩)) = (2nd𝑠))
468467fveq1d 6835 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = ((2nd𝑠)‘𝑁))
469468eqeq1d 2737 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑠 ∈ V ∧ 𝑁 ∈ (0...𝑁)) → (((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁 ↔ ((2nd𝑠)‘𝑁) = 𝑁))
470463, 466, 4693anbi123d 1439 . . . . . . . . . . . . . . . . . . . . . 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 588 . . . . . . . . . . . . . . . . . . . 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 6842 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = ⟨𝑠, 𝑁⟩ → ((2nd𝑥) = 𝑁 ↔ (2nd ‘⟨𝑠, 𝑁⟩) = 𝑁))
476 fveq2 6833 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑥 = ⟨𝑠, 𝑁⟩ → (1st𝑥) = (1st ‘⟨𝑠, 𝑁⟩))
477476csbeq1d 3852 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑥 = ⟨𝑠, 𝑁⟩ → (1st𝑥) / 𝑠𝐶 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶)
478477eqeq2d 2746 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 = ⟨𝑠, 𝑁⟩ → (𝑖 = (1st𝑥) / 𝑠𝐶𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶))
479478rexbidv 3159 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = ⟨𝑠, 𝑁⟩ → (∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ↔ ∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶))
480479ralbidv 3158 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = ⟨𝑠, 𝑁⟩ → (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ↔ ∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶))
481 2fveq3 6838 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 = ⟨𝑠, 𝑁⟩ → (1st ‘(1st𝑥)) = (1st ‘(1st ‘⟨𝑠, 𝑁⟩)))
482481fveq1d 6835 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = ⟨𝑠, 𝑁⟩ → ((1st ‘(1st𝑥))‘𝑁) = ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁))
483482eqeq1d 2737 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = ⟨𝑠, 𝑁⟩ → (((1st ‘(1st𝑥))‘𝑁) = 0 ↔ ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0))
484 2fveq3 6838 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 = ⟨𝑠, 𝑁⟩ → (2nd ‘(1st𝑥)) = (2nd ‘(1st ‘⟨𝑠, 𝑁⟩)))
485484fveq1d 6835 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = ⟨𝑠, 𝑁⟩ → ((2nd ‘(1st𝑥))‘𝑁) = ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁))
486485eqeq1d 2737 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = ⟨𝑠, 𝑁⟩ → (((2nd ‘(1st𝑥))‘𝑁) = 𝑁 ↔ ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁))
487480, 483, 4863anbi123d 1439 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = ⟨𝑠, 𝑁⟩ → ((∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑥) / 𝑠𝐶 ∧ ((1st ‘(1st𝑥))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑥))‘𝑁) = 𝑁) ↔ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st ‘⟨𝑠, 𝑁⟩) / 𝑠𝐶 ∧ ((1st ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 0 ∧ ((2nd ‘(1st ‘⟨𝑠, 𝑁⟩))‘𝑁) = 𝑁)))
488475, 487anbi12d 633 . . . . . . . . . . . . . . . . . . . . 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 6842 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 = ⟨𝑠, 𝑁⟩ → ((1st𝑥) = 𝑠 ↔ (1st ‘⟨𝑠, 𝑁⟩) = 𝑠))
490488, 489anbi12d 633 . . . . . . . . . . . . . . . . . . . 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 3575 . . . . . . . . . . . . . . . . . . 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 592 . . . . . . . . . . . . . . . . . 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 581 . . . . . . . . . . . . . . . . 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 2801 . . . . . . . . . . . . 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 6895 . . . . . . . . . . . . . . 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 693 . . . . . . . . . . . . . 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 1916 . . . . . . . . . . . . . . . . . 18 𝑠(2nd𝑡) = 𝑁
501 nfcv 2897 . . . . . . . . . . . . . . . . . . . 20 𝑠(0...(𝑁 − 1))
502 nfcsb1v 3872 . . . . . . . . . . . . . . . . . . . . . 22 𝑠(1st𝑡) / 𝑠𝐶
503502nfeq2 2915 . . . . . . . . . . . . . . . . . . . . 21 𝑠 𝑖 = (1st𝑡) / 𝑠𝐶
504501, 503nfrexw 3283 . . . . . . . . . . . . . . . . . . . 20 𝑠𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶
505501, 504nfralw 3282 . . . . . . . . . . . . . . . . . . 19 𝑠𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶
506 nfv 1916 . . . . . . . . . . . . . . . . . . 19 𝑠((1st ‘(1st𝑡))‘𝑁) = 0
507 nfv 1916 . . . . . . . . . . . . . . . . . . 19 𝑠((2nd ‘(1st𝑡))‘𝑁) = 𝑁
508505, 506, 507nf3an 1903 . . . . . . . . . . . . . . . . . 18 𝑠(∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁)
509500, 508nfan 1901 . . . . . . . . . . . . . . . . 17 𝑠((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))
510 nfcv 2897 . . . . . . . . . . . . . . . . 17 𝑠((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))
511509, 510nfrabw 3435 . . . . . . . . . . . . . . . 16 𝑠{𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))}
512 nfv 1916 . . . . . . . . . . . . . . . 16 𝑠(1st𝑥) = 𝑦
513511, 512nfrexw 3283 . . . . . . . . . . . . . . 15 𝑠𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (1st𝑥) = 𝑦
514 nfv 1916 . . . . . . . . . . . . . . 15 𝑦𝑥 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} (1st𝑥) = 𝑠
515 eqeq2 2747 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑠 → ((1st𝑥) = 𝑦 ↔ (1st𝑥) = 𝑠))
516515rexbidv 3159 . . . . . . . . . . . . . . 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 2806 . . . . . . . . . . . . . 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 2758 . . . . . . . . . . . . 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 3399 . . . . . . . . . . . . 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 2795 . . . . . . . . . . . 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 6743 . . . . . . . . . . . 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 6745 . . . . . . . . . 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 6852 . . . . . . . . . . . 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 6852 . . . . . . . . . . . 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 2749 . . . . . . . . . . 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 4027 . . . . . . . . . . . . . 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 3928 . . . . . . . . . . . . 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 3645 . . . . . . . . . . . . 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 3928 . . . . . . . . . . . . 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 6842 . . . . . . . . . . . . . 14 (𝑡 = 𝑦 → ((2nd𝑡) = 𝑁 ↔ (2nd𝑦) = 𝑁))
537536elrab 3645 . . . . . . . . . . . . 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 2757 . . . . . . . . . . . . . 14 (((2nd𝑥) = 𝑁 ∧ (2nd𝑦) = 𝑁) → (2nd𝑥) = (2nd𝑦))
540 xpopth 7974 . . . . . . . . . . . . . . . . 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 594 . . . . . . . . . . . . 13 (((𝑥 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ 𝑦 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) ∧ ((2nd𝑥) = 𝑁 ∧ (2nd𝑦) = 𝑁)) → ((1st𝑥) = (1st𝑦) → 𝑥 = 𝑦))
545544an4s 661 . . . . . . . . . . . 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 597 . . . . . . . . . . 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 3175 . . . . . . . . 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 7200 . . . . . . . 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 6498 . . . . . . 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 584 . . . . . 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 9173 . . . . . . . . 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 3462 . . . . . . 7 {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ ((2nd𝑡) = 𝑁 ∧ (∀𝑖 ∈ (0...(𝑁 − 1))∃𝑗 ∈ (0...(𝑁 − 1))𝑖 = (1st𝑡) / 𝑠𝐶 ∧ ((1st ‘(1st𝑡))‘𝑁) = 0 ∧ ((2nd ‘(1st𝑡))‘𝑁) = 𝑁))} ∈ V
557556f1oen 8911 . . . . . 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 9173 . . . . . . 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 14272 . . . . . 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 693 . . . . 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 7374 . . 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 2778 . 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 5123 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 848  w3a 1087   = wceq 1542  wex 1781  wcel 2114  ∃!weu 2567  {cab 2713  wne 2931  wral 3050  wrex 3059  ∃!wreu 3347  {crab 3398  Vcvv 3439  [wsbc 3739  csb 3848  cdif 3897  cun 3898  cin 3899  wss 3900  c0 4284  ifcif 4478  {csn 4579  cop 4585   ciun 4945  Disj wdisj 5064   class class class wbr 5097  cmpt 5178   × cxp 5621  dom cdm 5623  ran crn 5624  cres 5625  cima 5626  Fun wfun 6485  wf 6487  1-1wf1 6488  ontowfo 6489  1-1-ontowf1o 6490  cfv 6491  (class class class)co 7358  f cof 7620  1st c1st 7931  2nd c2nd 7932  m cmap 8765  cen 8882  Fincfn 8885  cc 11026  0cc0 11028  1c1 11029   + caddc 11031   < clt 11168  cmin 11366  cn 12147  2c2 12202  0cn0 12403  cz 12490  cuz 12753  ...cfz 13425  ..^cfzo 13572  chash 14255  Σcsu 15611  cdvds 16181
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2183  ax-ext 2707  ax-rep 5223  ax-sep 5240  ax-nul 5250  ax-pow 5309  ax-pr 5376  ax-un 7680  ax-inf2 9552  ax-cnex 11084  ax-resscn 11085  ax-1cn 11086  ax-icn 11087  ax-addcl 11088  ax-addrcl 11089  ax-mulcl 11090  ax-mulrcl 11091  ax-mulcom 11092  ax-addass 11093  ax-mulass 11094  ax-distr 11095  ax-i2m1 11096  ax-1ne0 11097  ax-1rid 11098  ax-rnegex 11099  ax-rrecex 11100  ax-cnre 11101  ax-pre-lttri 11102  ax-pre-lttrn 11103  ax-pre-ltadd 11104  ax-pre-mulgt0 11105  ax-pre-sup 11106
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2538  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2810  df-nfc 2884  df-ne 2932  df-nel 3036  df-ral 3051  df-rex 3060  df-rmo 3349  df-reu 3350  df-rab 3399  df-v 3441  df-sbc 3740  df-csb 3849  df-dif 3903  df-un 3905  df-in 3907  df-ss 3917  df-pss 3920  df-nul 4285  df-if 4479  df-pw 4555  df-sn 4580  df-pr 4582  df-tp 4584  df-op 4586  df-uni 4863  df-int 4902  df-iun 4947  df-disj 5065  df-br 5098  df-opab 5160  df-mpt 5179  df-tr 5205  df-id 5518  df-eprel 5523  df-po 5531  df-so 5532  df-fr 5576  df-se 5577  df-we 5578  df-xp 5629  df-rel 5630  df-cnv 5631  df-co 5632  df-dm 5633  df-rn 5634  df-res 5635  df-ima 5636  df-pred 6258  df-ord 6319  df-on 6320  df-lim 6321  df-suc 6322  df-iota 6447  df-fun 6493  df-fn 6494  df-f 6495  df-f1 6496  df-fo 6497  df-f1o 6498  df-fv 6499  df-isom 6500  df-riota 7315  df-ov 7361  df-oprab 7362  df-mpo 7363  df-of 7622  df-om 7809  df-1st 7933  df-2nd 7934  df-frecs 8223  df-wrecs 8254  df-recs 8303  df-rdg 8341  df-1o 8397  df-2o 8398  df-oadd 8401  df-er 8635  df-map 8767  df-pm 8768  df-en 8886  df-dom 8887  df-sdom 8888  df-fin 8889  df-sup 9347  df-oi 9417  df-dju 9815  df-card 9853  df-pnf 11170  df-mnf 11171  df-xr 11172  df-ltxr 11173  df-le 11174  df-sub 11368  df-neg 11369  df-div 11797  df-nn 12148  df-2 12210  df-3 12211  df-n0 12404  df-xnn0 12477  df-z 12491  df-uz 12754  df-rp 12908  df-fz 13426  df-fzo 13573  df-seq 13927  df-exp 13987  df-fac 14199  df-bc 14228  df-hash 14256  df-cj 15024  df-re 15025  df-im 15026  df-sqrt 15160  df-abs 15161  df-clim 15413  df-sum 15612  df-dvds 16182
This theorem is referenced by:  poimirlem28  37818
  Copyright terms: Public domain W3C validator