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

Theorem poimirlem28 32607
 Description: Lemma for poimir 32612, a variant of Sperner's lemma. (Contributed by Brendan Leahy, 21-Aug-2020.)
Hypotheses
Ref Expression
poimir.0 (𝜑𝑁 ∈ ℕ)
poimirlem28.1 (𝑝 = ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) → 𝐵 = 𝐶)
poimirlem28.2 ((𝜑𝑝:(1...𝑁)⟶(0...𝐾)) → 𝐵 ∈ (0...𝑁))
poimirlem28.3 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0)) → 𝐵 < 𝑛)
poimirlem28.4 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 𝐾)) → 𝐵 ≠ (𝑛 − 1))
poimirlem28.5 (𝜑𝐾 ∈ ℕ)
Assertion
Ref Expression
poimirlem28 (𝜑 → ∃𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶)
Distinct variable groups:   𝑓,𝑖,𝑗,𝑛,𝑝,𝑠   𝜑,𝑗,𝑛   𝑗,𝑁,𝑛   𝜑,𝑖,𝑝,𝑠   𝐵,𝑓,𝑖,𝑗,𝑛,𝑠   𝑓,𝐾,𝑖,𝑗,𝑛,𝑝,𝑠   𝑓,𝑁,𝑖,𝑝,𝑠   𝐶,𝑖,𝑛,𝑝
Allowed substitution hints:   𝜑(𝑓)   𝐵(𝑝)   𝐶(𝑓,𝑗,𝑠)

Proof of Theorem poimirlem28
Dummy variables 𝑘 𝑚 𝑞 𝑡 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 poimir.0 . . . . . 6 (𝜑𝑁 ∈ ℕ)
21nnnn0d 11228 . . . . 5 (𝜑𝑁 ∈ ℕ0)
31nnred 10912 . . . . . 6 (𝜑𝑁 ∈ ℝ)
43leidd 10473 . . . . 5 (𝜑𝑁𝑁)
52, 2, 43jca 1235 . . . 4 (𝜑 → (𝑁 ∈ ℕ0𝑁 ∈ ℕ0𝑁𝑁))
6 oveq2 6557 . . . . . . . . . . . . . . . 16 (𝑘 = 0 → (1...𝑘) = (1...0))
7 fz10 12233 . . . . . . . . . . . . . . . 16 (1...0) = ∅
86, 7syl6eq 2660 . . . . . . . . . . . . . . 15 (𝑘 = 0 → (1...𝑘) = ∅)
98oveq2d 6565 . . . . . . . . . . . . . 14 (𝑘 = 0 → ((0..^𝐾) ↑𝑚 (1...𝑘)) = ((0..^𝐾) ↑𝑚 ∅))
10 fzofi 12635 . . . . . . . . . . . . . . . 16 (0..^𝐾) ∈ Fin
11 map0e 7781 . . . . . . . . . . . . . . . 16 ((0..^𝐾) ∈ Fin → ((0..^𝐾) ↑𝑚 ∅) = 1𝑜)
1210, 11ax-mp 5 . . . . . . . . . . . . . . 15 ((0..^𝐾) ↑𝑚 ∅) = 1𝑜
13 df1o2 7459 . . . . . . . . . . . . . . 15 1𝑜 = {∅}
1412, 13eqtri 2632 . . . . . . . . . . . . . 14 ((0..^𝐾) ↑𝑚 ∅) = {∅}
159, 14syl6eq 2660 . . . . . . . . . . . . 13 (𝑘 = 0 → ((0..^𝐾) ↑𝑚 (1...𝑘)) = {∅})
16 eqidd 2611 . . . . . . . . . . . . . . . . 17 (𝑘 = 0 → 𝑓 = 𝑓)
1716, 8, 8f1oeq123d 6046 . . . . . . . . . . . . . . . 16 (𝑘 = 0 → (𝑓:(1...𝑘)–1-1-onto→(1...𝑘) ↔ 𝑓:∅–1-1-onto→∅))
18 eqid 2610 . . . . . . . . . . . . . . . . 17 ∅ = ∅
19 f1o00 6083 . . . . . . . . . . . . . . . . 17 (𝑓:∅–1-1-onto→∅ ↔ (𝑓 = ∅ ∧ ∅ = ∅))
2018, 19mpbiran2 956 . . . . . . . . . . . . . . . 16 (𝑓:∅–1-1-onto→∅ ↔ 𝑓 = ∅)
2117, 20syl6bb 275 . . . . . . . . . . . . . . 15 (𝑘 = 0 → (𝑓:(1...𝑘)–1-1-onto→(1...𝑘) ↔ 𝑓 = ∅))
2221abbidv 2728 . . . . . . . . . . . . . 14 (𝑘 = 0 → {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)} = {𝑓𝑓 = ∅})
23 df-sn 4126 . . . . . . . . . . . . . 14 {∅} = {𝑓𝑓 = ∅}
2422, 23syl6eqr 2662 . . . . . . . . . . . . 13 (𝑘 = 0 → {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)} = {∅})
2515, 24xpeq12d 5064 . . . . . . . . . . . 12 (𝑘 = 0 → (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) = ({∅} × {∅}))
26 0ex 4718 . . . . . . . . . . . . 13 ∅ ∈ V
2726, 26xpsn 6313 . . . . . . . . . . . 12 ({∅} × {∅}) = {⟨∅, ∅⟩}
2825, 27syl6req 2661 . . . . . . . . . . 11 (𝑘 = 0 → {⟨∅, ∅⟩} = (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}))
29 elsni 4142 . . . . . . . . . . . . . . . . . . 19 (𝑠 ∈ {⟨∅, ∅⟩} → 𝑠 = ⟨∅, ∅⟩)
3026, 26op1std 7069 . . . . . . . . . . . . . . . . . . 19 (𝑠 = ⟨∅, ∅⟩ → (1st𝑠) = ∅)
3129, 30syl 17 . . . . . . . . . . . . . . . . . 18 (𝑠 ∈ {⟨∅, ∅⟩} → (1st𝑠) = ∅)
3231oveq1d 6564 . . . . . . . . . . . . . . . . 17 (𝑠 ∈ {⟨∅, ∅⟩} → ((1st𝑠) ∘𝑓 + ∅) = (∅ ∘𝑓 + ∅))
33 f0 5999 . . . . . . . . . . . . . . . . . . . 20 ∅:∅⟶∅
34 ffn 5958 . . . . . . . . . . . . . . . . . . . 20 (∅:∅⟶∅ → ∅ Fn ∅)
3533, 34mp1i 13 . . . . . . . . . . . . . . . . . . 19 (𝑠 ∈ {⟨∅, ∅⟩} → ∅ Fn ∅)
3626a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝑠 ∈ {⟨∅, ∅⟩} → ∅ ∈ V)
37 inidm 3784 . . . . . . . . . . . . . . . . . . 19 (∅ ∩ ∅) = ∅
38 0fv 6137 . . . . . . . . . . . . . . . . . . . 20 (∅‘𝑛) = ∅
3938a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝑠 ∈ {⟨∅, ∅⟩} ∧ 𝑛 ∈ ∅) → (∅‘𝑛) = ∅)
4035, 35, 36, 36, 37, 39, 39offval 6802 . . . . . . . . . . . . . . . . . 18 (𝑠 ∈ {⟨∅, ∅⟩} → (∅ ∘𝑓 + ∅) = (𝑛 ∈ ∅ ↦ (∅ + ∅)))
41 mpt0 5934 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ ∅ ↦ (∅ + ∅)) = ∅
4240, 41syl6eq 2660 . . . . . . . . . . . . . . . . 17 (𝑠 ∈ {⟨∅, ∅⟩} → (∅ ∘𝑓 + ∅) = ∅)
4332, 42eqtrd 2644 . . . . . . . . . . . . . . . 16 (𝑠 ∈ {⟨∅, ∅⟩} → ((1st𝑠) ∘𝑓 + ∅) = ∅)
4443uneq1d 3728 . . . . . . . . . . . . . . 15 (𝑠 ∈ {⟨∅, ∅⟩} → (((1st𝑠) ∘𝑓 + ∅) ∪ ((1...𝑁) × {0})) = (∅ ∪ ((1...𝑁) × {0})))
45 uncom 3719 . . . . . . . . . . . . . . . 16 (∅ ∪ ((1...𝑁) × {0})) = (((1...𝑁) × {0}) ∪ ∅)
46 un0 3919 . . . . . . . . . . . . . . . 16 (((1...𝑁) × {0}) ∪ ∅) = ((1...𝑁) × {0})
4745, 46eqtri 2632 . . . . . . . . . . . . . . 15 (∅ ∪ ((1...𝑁) × {0})) = ((1...𝑁) × {0})
4844, 47syl6req 2661 . . . . . . . . . . . . . 14 (𝑠 ∈ {⟨∅, ∅⟩} → ((1...𝑁) × {0}) = (((1st𝑠) ∘𝑓 + ∅) ∪ ((1...𝑁) × {0})))
4948csbeq1d 3506 . . . . . . . . . . . . 13 (𝑠 ∈ {⟨∅, ∅⟩} → ((1...𝑁) × {0}) / 𝑝𝐵 = (((1st𝑠) ∘𝑓 + ∅) ∪ ((1...𝑁) × {0})) / 𝑝𝐵)
5049eqeq2d 2620 . . . . . . . . . . . 12 (𝑠 ∈ {⟨∅, ∅⟩} → (0 = ((1...𝑁) × {0}) / 𝑝𝐵 ↔ 0 = (((1st𝑠) ∘𝑓 + ∅) ∪ ((1...𝑁) × {0})) / 𝑝𝐵))
51 oveq2 6557 . . . . . . . . . . . . . . 15 (𝑘 = 0 → (0...𝑘) = (0...0))
52 0z 11265 . . . . . . . . . . . . . . . 16 0 ∈ ℤ
53 fzsn 12254 . . . . . . . . . . . . . . . 16 (0 ∈ ℤ → (0...0) = {0})
5452, 53ax-mp 5 . . . . . . . . . . . . . . 15 (0...0) = {0}
5551, 54syl6eq 2660 . . . . . . . . . . . . . 14 (𝑘 = 0 → (0...𝑘) = {0})
56 oveq2 6557 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑘 = 0 → ((𝑗 + 1)...𝑘) = ((𝑗 + 1)...0))
5756imaeq2d 5385 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 = 0 → ((2nd𝑠) “ ((𝑗 + 1)...𝑘)) = ((2nd𝑠) “ ((𝑗 + 1)...0)))
5857xpeq1d 5062 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 = 0 → (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}) = (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0}))
5958uneq2d 3729 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 0 → ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0})) = ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0})))
6059oveq2d 6565 . . . . . . . . . . . . . . . . . . 19 (𝑘 = 0 → ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) = ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0}))))
61 oveq1 6556 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 = 0 → (𝑘 + 1) = (0 + 1))
62 0p1e1 11009 . . . . . . . . . . . . . . . . . . . . . 22 (0 + 1) = 1
6361, 62syl6eq 2660 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 = 0 → (𝑘 + 1) = 1)
6463oveq1d 6564 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 0 → ((𝑘 + 1)...𝑁) = (1...𝑁))
6564xpeq1d 5062 . . . . . . . . . . . . . . . . . . 19 (𝑘 = 0 → (((𝑘 + 1)...𝑁) × {0}) = ((1...𝑁) × {0}))
6660, 65uneq12d 3730 . . . . . . . . . . . . . . . . . 18 (𝑘 = 0 → (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})))
6766csbeq1d 3506 . . . . . . . . . . . . . . . . 17 (𝑘 = 0 → (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})) / 𝑝𝐵)
6867eqeq2d 2620 . . . . . . . . . . . . . . . 16 (𝑘 = 0 → (𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})) / 𝑝𝐵))
6955, 68rexeqbidv 3130 . . . . . . . . . . . . . . 15 (𝑘 = 0 → (∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∃𝑗 ∈ {0}𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})) / 𝑝𝐵))
70 c0ex 9913 . . . . . . . . . . . . . . . 16 0 ∈ V
71 oveq2 6557 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 = 0 → (1...𝑗) = (1...0))
7271, 7syl6eq 2660 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 = 0 → (1...𝑗) = ∅)
7372imaeq2d 5385 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 = 0 → ((2nd𝑠) “ (1...𝑗)) = ((2nd𝑠) “ ∅))
74 ima0 5400 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((2nd𝑠) “ ∅) = ∅
7573, 74syl6eq 2660 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑗 = 0 → ((2nd𝑠) “ (1...𝑗)) = ∅)
7675xpeq1d 5062 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 = 0 → (((2nd𝑠) “ (1...𝑗)) × {1}) = (∅ × {1}))
77 0xp 5122 . . . . . . . . . . . . . . . . . . . . . . 23 (∅ × {1}) = ∅
7876, 77syl6eq 2660 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 = 0 → (((2nd𝑠) “ (1...𝑗)) × {1}) = ∅)
79 oveq1 6556 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑗 = 0 → (𝑗 + 1) = (0 + 1))
8079, 62syl6eq 2660 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 = 0 → (𝑗 + 1) = 1)
8180oveq1d 6564 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 = 0 → ((𝑗 + 1)...0) = (1...0))
8281, 7syl6eq 2660 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 = 0 → ((𝑗 + 1)...0) = ∅)
8382imaeq2d 5385 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 = 0 → ((2nd𝑠) “ ((𝑗 + 1)...0)) = ((2nd𝑠) “ ∅))
8483, 74syl6eq 2660 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑗 = 0 → ((2nd𝑠) “ ((𝑗 + 1)...0)) = ∅)
8584xpeq1d 5062 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 = 0 → (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0}) = (∅ × {0}))
86 0xp 5122 . . . . . . . . . . . . . . . . . . . . . . 23 (∅ × {0}) = ∅
8785, 86syl6eq 2660 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 = 0 → (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0}) = ∅)
8878, 87uneq12d 3730 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 = 0 → ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0})) = (∅ ∪ ∅))
89 un0 3919 . . . . . . . . . . . . . . . . . . . . 21 (∅ ∪ ∅) = ∅
9088, 89syl6eq 2660 . . . . . . . . . . . . . . . . . . . 20 (𝑗 = 0 → ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0})) = ∅)
9190oveq2d 6565 . . . . . . . . . . . . . . . . . . 19 (𝑗 = 0 → ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0}))) = ((1st𝑠) ∘𝑓 + ∅))
9291uneq1d 3728 . . . . . . . . . . . . . . . . . 18 (𝑗 = 0 → (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})) = (((1st𝑠) ∘𝑓 + ∅) ∪ ((1...𝑁) × {0})))
9392csbeq1d 3506 . . . . . . . . . . . . . . . . 17 (𝑗 = 0 → (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})) / 𝑝𝐵 = (((1st𝑠) ∘𝑓 + ∅) ∪ ((1...𝑁) × {0})) / 𝑝𝐵)
9493eqeq2d 2620 . . . . . . . . . . . . . . . 16 (𝑗 = 0 → (𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})) / 𝑝𝐵𝑖 = (((1st𝑠) ∘𝑓 + ∅) ∪ ((1...𝑁) × {0})) / 𝑝𝐵))
9570, 94rexsn 4170 . . . . . . . . . . . . . . 15 (∃𝑗 ∈ {0}𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})) / 𝑝𝐵𝑖 = (((1st𝑠) ∘𝑓 + ∅) ∪ ((1...𝑁) × {0})) / 𝑝𝐵)
9669, 95syl6bb 275 . . . . . . . . . . . . . 14 (𝑘 = 0 → (∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵𝑖 = (((1st𝑠) ∘𝑓 + ∅) ∪ ((1...𝑁) × {0})) / 𝑝𝐵))
9755, 96raleqbidv 3129 . . . . . . . . . . . . 13 (𝑘 = 0 → (∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∀𝑖 ∈ {0}𝑖 = (((1st𝑠) ∘𝑓 + ∅) ∪ ((1...𝑁) × {0})) / 𝑝𝐵))
98 eqeq1 2614 . . . . . . . . . . . . . 14 (𝑖 = 0 → (𝑖 = (((1st𝑠) ∘𝑓 + ∅) ∪ ((1...𝑁) × {0})) / 𝑝𝐵 ↔ 0 = (((1st𝑠) ∘𝑓 + ∅) ∪ ((1...𝑁) × {0})) / 𝑝𝐵))
9970, 98ralsn 4169 . . . . . . . . . . . . 13 (∀𝑖 ∈ {0}𝑖 = (((1st𝑠) ∘𝑓 + ∅) ∪ ((1...𝑁) × {0})) / 𝑝𝐵 ↔ 0 = (((1st𝑠) ∘𝑓 + ∅) ∪ ((1...𝑁) × {0})) / 𝑝𝐵)
10097, 99syl6rbb 276 . . . . . . . . . . . 12 (𝑘 = 0 → (0 = (((1st𝑠) ∘𝑓 + ∅) ∪ ((1...𝑁) × {0})) / 𝑝𝐵 ↔ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵))
10150, 100sylan9bbr 733 . . . . . . . . . . 11 ((𝑘 = 0 ∧ 𝑠 ∈ {⟨∅, ∅⟩}) → (0 = ((1...𝑁) × {0}) / 𝑝𝐵 ↔ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵))
10228, 101rabeqbidva 3169 . . . . . . . . . 10 (𝑘 = 0 → {𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ((1...𝑁) × {0}) / 𝑝𝐵} = {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵})
103102eqcomd 2616 . . . . . . . . 9 (𝑘 = 0 → {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵} = {𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ((1...𝑁) × {0}) / 𝑝𝐵})
104103fveq2d 6107 . . . . . . . 8 (𝑘 = 0 → (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵}) = (#‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ((1...𝑁) × {0}) / 𝑝𝐵}))
105104breq2d 4595 . . . . . . 7 (𝑘 = 0 → (2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵}) ↔ 2 ∥ (#‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ((1...𝑁) × {0}) / 𝑝𝐵})))
106105notbid 307 . . . . . 6 (𝑘 = 0 → (¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵}) ↔ ¬ 2 ∥ (#‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ((1...𝑁) × {0}) / 𝑝𝐵})))
107106imbi2d 329 . . . . 5 (𝑘 = 0 → ((𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵})) ↔ (𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ((1...𝑁) × {0}) / 𝑝𝐵}))))
108 oveq2 6557 . . . . . . . . . . . 12 (𝑘 = 𝑚 → (1...𝑘) = (1...𝑚))
109108oveq2d 6565 . . . . . . . . . . 11 (𝑘 = 𝑚 → ((0..^𝐾) ↑𝑚 (1...𝑘)) = ((0..^𝐾) ↑𝑚 (1...𝑚)))
110 eqidd 2611 . . . . . . . . . . . . 13 (𝑘 = 𝑚𝑓 = 𝑓)
111110, 108, 108f1oeq123d 6046 . . . . . . . . . . . 12 (𝑘 = 𝑚 → (𝑓:(1...𝑘)–1-1-onto→(1...𝑘) ↔ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)))
112111abbidv 2728 . . . . . . . . . . 11 (𝑘 = 𝑚 → {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)} = {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)})
113109, 112xpeq12d 5064 . . . . . . . . . 10 (𝑘 = 𝑚 → (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) = (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}))
114 oveq2 6557 . . . . . . . . . . 11 (𝑘 = 𝑚 → (0...𝑘) = (0...𝑚))
115 oveq2 6557 . . . . . . . . . . . . . . . . . . 19 (𝑘 = 𝑚 → ((𝑗 + 1)...𝑘) = ((𝑗 + 1)...𝑚))
116115imaeq2d 5385 . . . . . . . . . . . . . . . . . 18 (𝑘 = 𝑚 → ((2nd𝑠) “ ((𝑗 + 1)...𝑘)) = ((2nd𝑠) “ ((𝑗 + 1)...𝑚)))
117116xpeq1d 5062 . . . . . . . . . . . . . . . . 17 (𝑘 = 𝑚 → (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}) = (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))
118117uneq2d 3729 . . . . . . . . . . . . . . . 16 (𝑘 = 𝑚 → ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0})) = ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0})))
119118oveq2d 6565 . . . . . . . . . . . . . . 15 (𝑘 = 𝑚 → ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) = ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))))
120 oveq1 6556 . . . . . . . . . . . . . . . . 17 (𝑘 = 𝑚 → (𝑘 + 1) = (𝑚 + 1))
121120oveq1d 6564 . . . . . . . . . . . . . . . 16 (𝑘 = 𝑚 → ((𝑘 + 1)...𝑁) = ((𝑚 + 1)...𝑁))
122121xpeq1d 5062 . . . . . . . . . . . . . . 15 (𝑘 = 𝑚 → (((𝑘 + 1)...𝑁) × {0}) = (((𝑚 + 1)...𝑁) × {0}))
123119, 122uneq12d 3730 . . . . . . . . . . . . . 14 (𝑘 = 𝑚 → (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})))
124123csbeq1d 3506 . . . . . . . . . . . . 13 (𝑘 = 𝑚(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵)
125124eqeq2d 2620 . . . . . . . . . . . 12 (𝑘 = 𝑚 → (𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵))
126114, 125rexeqbidv 3130 . . . . . . . . . . 11 (𝑘 = 𝑚 → (∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵))
127114, 126raleqbidv 3129 . . . . . . . . . 10 (𝑘 = 𝑚 → (∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵))
128113, 127rabeqbidv 3168 . . . . . . . . 9 (𝑘 = 𝑚 → {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵} = {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵})
129128fveq2d 6107 . . . . . . . 8 (𝑘 = 𝑚 → (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵}) = (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵}))
130129breq2d 4595 . . . . . . 7 (𝑘 = 𝑚 → (2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵}) ↔ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵})))
131130notbid 307 . . . . . 6 (𝑘 = 𝑚 → (¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵}) ↔ ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵})))
132131imbi2d 329 . . . . 5 (𝑘 = 𝑚 → ((𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵})) ↔ (𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵}))))
133 oveq2 6557 . . . . . . . . . . . 12 (𝑘 = (𝑚 + 1) → (1...𝑘) = (1...(𝑚 + 1)))
134133oveq2d 6565 . . . . . . . . . . 11 (𝑘 = (𝑚 + 1) → ((0..^𝐾) ↑𝑚 (1...𝑘)) = ((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))))
135 eqidd 2611 . . . . . . . . . . . . 13 (𝑘 = (𝑚 + 1) → 𝑓 = 𝑓)
136135, 133, 133f1oeq123d 6046 . . . . . . . . . . . 12 (𝑘 = (𝑚 + 1) → (𝑓:(1...𝑘)–1-1-onto→(1...𝑘) ↔ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))))
137136abbidv 2728 . . . . . . . . . . 11 (𝑘 = (𝑚 + 1) → {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)} = {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))})
138134, 137xpeq12d 5064 . . . . . . . . . 10 (𝑘 = (𝑚 + 1) → (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) = (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}))
139 oveq2 6557 . . . . . . . . . . 11 (𝑘 = (𝑚 + 1) → (0...𝑘) = (0...(𝑚 + 1)))
140 oveq2 6557 . . . . . . . . . . . . . . . . . . 19 (𝑘 = (𝑚 + 1) → ((𝑗 + 1)...𝑘) = ((𝑗 + 1)...(𝑚 + 1)))
141140imaeq2d 5385 . . . . . . . . . . . . . . . . . 18 (𝑘 = (𝑚 + 1) → ((2nd𝑠) “ ((𝑗 + 1)...𝑘)) = ((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))))
142141xpeq1d 5062 . . . . . . . . . . . . . . . . 17 (𝑘 = (𝑚 + 1) → (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}) = (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))
143142uneq2d 3729 . . . . . . . . . . . . . . . 16 (𝑘 = (𝑚 + 1) → ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0})) = ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0})))
144143oveq2d 6565 . . . . . . . . . . . . . . 15 (𝑘 = (𝑚 + 1) → ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) = ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))))
145 oveq1 6556 . . . . . . . . . . . . . . . . 17 (𝑘 = (𝑚 + 1) → (𝑘 + 1) = ((𝑚 + 1) + 1))
146145oveq1d 6564 . . . . . . . . . . . . . . . 16 (𝑘 = (𝑚 + 1) → ((𝑘 + 1)...𝑁) = (((𝑚 + 1) + 1)...𝑁))
147146xpeq1d 5062 . . . . . . . . . . . . . . 15 (𝑘 = (𝑚 + 1) → (((𝑘 + 1)...𝑁) × {0}) = ((((𝑚 + 1) + 1)...𝑁) × {0}))
148144, 147uneq12d 3730 . . . . . . . . . . . . . 14 (𝑘 = (𝑚 + 1) → (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})))
149148csbeq1d 3506 . . . . . . . . . . . . 13 (𝑘 = (𝑚 + 1) → (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵)
150149eqeq2d 2620 . . . . . . . . . . . 12 (𝑘 = (𝑚 + 1) → (𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵))
151139, 150rexeqbidv 3130 . . . . . . . . . . 11 (𝑘 = (𝑚 + 1) → (∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵))
152139, 151raleqbidv 3129 . . . . . . . . . 10 (𝑘 = (𝑚 + 1) → (∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵))
153138, 152rabeqbidv 3168 . . . . . . . . 9 (𝑘 = (𝑚 + 1) → {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵} = {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵})
154153fveq2d 6107 . . . . . . . 8 (𝑘 = (𝑚 + 1) → (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵}) = (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}))
155154breq2d 4595 . . . . . . 7 (𝑘 = (𝑚 + 1) → (2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵}) ↔ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵})))
156155notbid 307 . . . . . 6 (𝑘 = (𝑚 + 1) → (¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵}) ↔ ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵})))
157156imbi2d 329 . . . . 5 (𝑘 = (𝑚 + 1) → ((𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵})) ↔ (𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}))))
158 oveq2 6557 . . . . . . . . . . . 12 (𝑘 = 𝑁 → (1...𝑘) = (1...𝑁))
159158oveq2d 6565 . . . . . . . . . . 11 (𝑘 = 𝑁 → ((0..^𝐾) ↑𝑚 (1...𝑘)) = ((0..^𝐾) ↑𝑚 (1...𝑁)))
160 eqidd 2611 . . . . . . . . . . . . 13 (𝑘 = 𝑁𝑓 = 𝑓)
161160, 158, 158f1oeq123d 6046 . . . . . . . . . . . 12 (𝑘 = 𝑁 → (𝑓:(1...𝑘)–1-1-onto→(1...𝑘) ↔ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)))
162161abbidv 2728 . . . . . . . . . . 11 (𝑘 = 𝑁 → {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)} = {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
163159, 162xpeq12d 5064 . . . . . . . . . 10 (𝑘 = 𝑁 → (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) = (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
164 oveq2 6557 . . . . . . . . . . 11 (𝑘 = 𝑁 → (0...𝑘) = (0...𝑁))
165 oveq2 6557 . . . . . . . . . . . . . . . . . . 19 (𝑘 = 𝑁 → ((𝑗 + 1)...𝑘) = ((𝑗 + 1)...𝑁))
166165imaeq2d 5385 . . . . . . . . . . . . . . . . . 18 (𝑘 = 𝑁 → ((2nd𝑠) “ ((𝑗 + 1)...𝑘)) = ((2nd𝑠) “ ((𝑗 + 1)...𝑁)))
167166xpeq1d 5062 . . . . . . . . . . . . . . . . 17 (𝑘 = 𝑁 → (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}) = (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))
168167uneq2d 3729 . . . . . . . . . . . . . . . 16 (𝑘 = 𝑁 → ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0})) = ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0})))
169168oveq2d 6565 . . . . . . . . . . . . . . 15 (𝑘 = 𝑁 → ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) = ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))))
170 oveq1 6556 . . . . . . . . . . . . . . . . 17 (𝑘 = 𝑁 → (𝑘 + 1) = (𝑁 + 1))
171170oveq1d 6564 . . . . . . . . . . . . . . . 16 (𝑘 = 𝑁 → ((𝑘 + 1)...𝑁) = ((𝑁 + 1)...𝑁))
172171xpeq1d 5062 . . . . . . . . . . . . . . 15 (𝑘 = 𝑁 → (((𝑘 + 1)...𝑁) × {0}) = (((𝑁 + 1)...𝑁) × {0}))
173169, 172uneq12d 3730 . . . . . . . . . . . . . 14 (𝑘 = 𝑁 → (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})))
174173csbeq1d 3506 . . . . . . . . . . . . 13 (𝑘 = 𝑁(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵)
175174eqeq2d 2620 . . . . . . . . . . . 12 (𝑘 = 𝑁 → (𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵))
176164, 175rexeqbidv 3130 . . . . . . . . . . 11 (𝑘 = 𝑁 → (∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵))
177164, 176raleqbidv 3129 . . . . . . . . . 10 (𝑘 = 𝑁 → (∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵))
178163, 177rabeqbidv 3168 . . . . . . . . 9 (𝑘 = 𝑁 → {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵} = {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵})
179178fveq2d 6107 . . . . . . . 8 (𝑘 = 𝑁 → (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵}) = (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵}))
180179breq2d 4595 . . . . . . 7 (𝑘 = 𝑁 → (2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵}) ↔ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵})))
181180notbid 307 . . . . . 6 (𝑘 = 𝑁 → (¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵}) ↔ ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵})))
182181imbi2d 329 . . . . 5 (𝑘 = 𝑁 → ((𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑘)) × {𝑓𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝𝐵})) ↔ (𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵}))))
183 n2dvds1 14942 . . . . . . 7 ¬ 2 ∥ 1
184 opex 4859 . . . . . . . . . 10 ⟨∅, ∅⟩ ∈ V
185 hashsng 13020 . . . . . . . . . 10 (⟨∅, ∅⟩ ∈ V → (#‘{⟨∅, ∅⟩}) = 1)
186184, 185ax-mp 5 . . . . . . . . 9 (#‘{⟨∅, ∅⟩}) = 1
187 nnuz 11599 . . . . . . . . . . . . . . . . 17 ℕ = (ℤ‘1)
1881, 187syl6eleq 2698 . . . . . . . . . . . . . . . 16 (𝜑𝑁 ∈ (ℤ‘1))
189 eluzfz1 12219 . . . . . . . . . . . . . . . 16 (𝑁 ∈ (ℤ‘1) → 1 ∈ (1...𝑁))
190188, 189syl 17 . . . . . . . . . . . . . . 15 (𝜑 → 1 ∈ (1...𝑁))
191 poimirlem28.5 . . . . . . . . . . . . . . . . 17 (𝜑𝐾 ∈ ℕ)
192191nnnn0d 11228 . . . . . . . . . . . . . . . 16 (𝜑𝐾 ∈ ℕ0)
193 0elfz 12305 . . . . . . . . . . . . . . . 16 (𝐾 ∈ ℕ0 → 0 ∈ (0...𝐾))
194 fconst6g 6007 . . . . . . . . . . . . . . . 16 (0 ∈ (0...𝐾) → ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾))
195192, 193, 1943syl 18 . . . . . . . . . . . . . . 15 (𝜑 → ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾))
19670fvconst2 6374 . . . . . . . . . . . . . . . 16 (1 ∈ (1...𝑁) → (((1...𝑁) × {0})‘1) = 0)
197190, 196syl 17 . . . . . . . . . . . . . . 15 (𝜑 → (((1...𝑁) × {0})‘1) = 0)
198190, 195, 1973jca 1235 . . . . . . . . . . . . . 14 (𝜑 → (1 ∈ (1...𝑁) ∧ ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾) ∧ (((1...𝑁) × {0})‘1) = 0))
199 nfv 1830 . . . . . . . . . . . . . . . 16 𝑝(𝜑 ∧ (1 ∈ (1...𝑁) ∧ ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾) ∧ (((1...𝑁) × {0})‘1) = 0))
200 nfcsb1v 3515 . . . . . . . . . . . . . . . . 17 𝑝((1...𝑁) × {0}) / 𝑝𝐵
201200nfeq1 2764 . . . . . . . . . . . . . . . 16 𝑝((1...𝑁) × {0}) / 𝑝𝐵 = 0
202199, 201nfim 1813 . . . . . . . . . . . . . . 15 𝑝((𝜑 ∧ (1 ∈ (1...𝑁) ∧ ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾) ∧ (((1...𝑁) × {0})‘1) = 0)) → ((1...𝑁) × {0}) / 𝑝𝐵 = 0)
203 ovex 6577 . . . . . . . . . . . . . . . 16 (1...𝑁) ∈ V
204 snex 4835 . . . . . . . . . . . . . . . 16 {0} ∈ V
205203, 204xpex 6860 . . . . . . . . . . . . . . 15 ((1...𝑁) × {0}) ∈ V
206 feq1 5939 . . . . . . . . . . . . . . . . . 18 (𝑝 = ((1...𝑁) × {0}) → (𝑝:(1...𝑁)⟶(0...𝐾) ↔ ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾)))
207 fveq1 6102 . . . . . . . . . . . . . . . . . . 19 (𝑝 = ((1...𝑁) × {0}) → (𝑝‘1) = (((1...𝑁) × {0})‘1))
208207eqeq1d 2612 . . . . . . . . . . . . . . . . . 18 (𝑝 = ((1...𝑁) × {0}) → ((𝑝‘1) = 0 ↔ (((1...𝑁) × {0})‘1) = 0))
209206, 2083anbi23d 1394 . . . . . . . . . . . . . . . . 17 (𝑝 = ((1...𝑁) × {0}) → ((1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0) ↔ (1 ∈ (1...𝑁) ∧ ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾) ∧ (((1...𝑁) × {0})‘1) = 0)))
210209anbi2d 736 . . . . . . . . . . . . . . . 16 (𝑝 = ((1...𝑁) × {0}) → ((𝜑 ∧ (1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0)) ↔ (𝜑 ∧ (1 ∈ (1...𝑁) ∧ ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾) ∧ (((1...𝑁) × {0})‘1) = 0))))
211 csbeq1a 3508 . . . . . . . . . . . . . . . . 17 (𝑝 = ((1...𝑁) × {0}) → 𝐵 = ((1...𝑁) × {0}) / 𝑝𝐵)
212211eqeq1d 2612 . . . . . . . . . . . . . . . 16 (𝑝 = ((1...𝑁) × {0}) → (𝐵 = 0 ↔ ((1...𝑁) × {0}) / 𝑝𝐵 = 0))
213210, 212imbi12d 333 . . . . . . . . . . . . . . 15 (𝑝 = ((1...𝑁) × {0}) → (((𝜑 ∧ (1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0)) → 𝐵 = 0) ↔ ((𝜑 ∧ (1 ∈ (1...𝑁) ∧ ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾) ∧ (((1...𝑁) × {0})‘1) = 0)) → ((1...𝑁) × {0}) / 𝑝𝐵 = 0)))
214 1ex 9914 . . . . . . . . . . . . . . . . 17 1 ∈ V
215 eleq1 2676 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 1 → (𝑛 ∈ (1...𝑁) ↔ 1 ∈ (1...𝑁)))
216 fveq2 6103 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 1 → (𝑝𝑛) = (𝑝‘1))
217216eqeq1d 2612 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 1 → ((𝑝𝑛) = 0 ↔ (𝑝‘1) = 0))
218215, 2173anbi13d 1393 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 1 → ((𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0) ↔ (1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0)))
219218anbi2d 736 . . . . . . . . . . . . . . . . . 18 (𝑛 = 1 → ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0)) ↔ (𝜑 ∧ (1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0))))
220 breq2 4587 . . . . . . . . . . . . . . . . . 18 (𝑛 = 1 → (𝐵 < 𝑛𝐵 < 1))
221219, 220imbi12d 333 . . . . . . . . . . . . . . . . 17 (𝑛 = 1 → (((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0)) → 𝐵 < 𝑛) ↔ ((𝜑 ∧ (1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0)) → 𝐵 < 1)))
222 poimirlem28.3 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0)) → 𝐵 < 𝑛)
223214, 221, 222vtocl 3232 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0)) → 𝐵 < 1)
224 poimirlem28.2 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑝:(1...𝑁)⟶(0...𝐾)) → 𝐵 ∈ (0...𝑁))
225 elfznn0 12302 . . . . . . . . . . . . . . . . . 18 (𝐵 ∈ (0...𝑁) → 𝐵 ∈ ℕ0)
226 nn0lt10b 11316 . . . . . . . . . . . . . . . . . 18 (𝐵 ∈ ℕ0 → (𝐵 < 1 ↔ 𝐵 = 0))
227224, 225, 2263syl 18 . . . . . . . . . . . . . . . . 17 ((𝜑𝑝:(1...𝑁)⟶(0...𝐾)) → (𝐵 < 1 ↔ 𝐵 = 0))
2282273ad2antr2 1220 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0)) → (𝐵 < 1 ↔ 𝐵 = 0))
229223, 228mpbid 221 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0)) → 𝐵 = 0)
230202, 205, 213, 229vtoclf 3231 . . . . . . . . . . . . . 14 ((𝜑 ∧ (1 ∈ (1...𝑁) ∧ ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾) ∧ (((1...𝑁) × {0})‘1) = 0)) → ((1...𝑁) × {0}) / 𝑝𝐵 = 0)
231198, 230mpdan 699 . . . . . . . . . . . . 13 (𝜑((1...𝑁) × {0}) / 𝑝𝐵 = 0)
232231eqcomd 2616 . . . . . . . . . . . 12 (𝜑 → 0 = ((1...𝑁) × {0}) / 𝑝𝐵)
233232ralrimivw 2950 . . . . . . . . . . 11 (𝜑 → ∀𝑠 ∈ {⟨∅, ∅⟩}0 = ((1...𝑁) × {0}) / 𝑝𝐵)
234 rabid2 3096 . . . . . . . . . . 11 ({⟨∅, ∅⟩} = {𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ((1...𝑁) × {0}) / 𝑝𝐵} ↔ ∀𝑠 ∈ {⟨∅, ∅⟩}0 = ((1...𝑁) × {0}) / 𝑝𝐵)
235233, 234sylibr 223 . . . . . . . . . 10 (𝜑 → {⟨∅, ∅⟩} = {𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ((1...𝑁) × {0}) / 𝑝𝐵})
236235fveq2d 6107 . . . . . . . . 9 (𝜑 → (#‘{⟨∅, ∅⟩}) = (#‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ((1...𝑁) × {0}) / 𝑝𝐵}))
237186, 236syl5eqr 2658 . . . . . . . 8 (𝜑 → 1 = (#‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ((1...𝑁) × {0}) / 𝑝𝐵}))
238237breq2d 4595 . . . . . . 7 (𝜑 → (2 ∥ 1 ↔ 2 ∥ (#‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ((1...𝑁) × {0}) / 𝑝𝐵})))
239183, 238mtbii 315 . . . . . 6 (𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ((1...𝑁) × {0}) / 𝑝𝐵}))
240239a1i 11 . . . . 5 (𝑁 ∈ ℕ0 → (𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ((1...𝑁) × {0}) / 𝑝𝐵})))
241 2z 11286 . . . . . . . . . . . . 13 2 ∈ ℤ
242 fzfi 12633 . . . . . . . . . . . . . . . . 17 (1...(𝑚 + 1)) ∈ Fin
243 mapfi 8145 . . . . . . . . . . . . . . . . 17 (((0..^𝐾) ∈ Fin ∧ (1...(𝑚 + 1)) ∈ Fin) → ((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) ∈ Fin)
24410, 242, 243mp2an 704 . . . . . . . . . . . . . . . 16 ((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) ∈ Fin
245 ovex 6577 . . . . . . . . . . . . . . . . . . 19 (1...(𝑚 + 1)) ∈ V
246245, 245mapval 7756 . . . . . . . . . . . . . . . . . 18 ((1...(𝑚 + 1)) ↑𝑚 (1...(𝑚 + 1))) = {𝑓𝑓:(1...(𝑚 + 1))⟶(1...(𝑚 + 1))}
247 mapfi 8145 . . . . . . . . . . . . . . . . . . 19 (((1...(𝑚 + 1)) ∈ Fin ∧ (1...(𝑚 + 1)) ∈ Fin) → ((1...(𝑚 + 1)) ↑𝑚 (1...(𝑚 + 1))) ∈ Fin)
248242, 242, 247mp2an 704 . . . . . . . . . . . . . . . . . 18 ((1...(𝑚 + 1)) ↑𝑚 (1...(𝑚 + 1))) ∈ Fin
249246, 248eqeltrri 2685 . . . . . . . . . . . . . . . . 17 {𝑓𝑓:(1...(𝑚 + 1))⟶(1...(𝑚 + 1))} ∈ Fin
250 f1of 6050 . . . . . . . . . . . . . . . . . 18 (𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1)) → 𝑓:(1...(𝑚 + 1))⟶(1...(𝑚 + 1)))
251250ss2abi 3637 . . . . . . . . . . . . . . . . 17 {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))} ⊆ {𝑓𝑓:(1...(𝑚 + 1))⟶(1...(𝑚 + 1))}
252 ssfi 8065 . . . . . . . . . . . . . . . . 17 (({𝑓𝑓:(1...(𝑚 + 1))⟶(1...(𝑚 + 1))} ∈ Fin ∧ {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))} ⊆ {𝑓𝑓:(1...(𝑚 + 1))⟶(1...(𝑚 + 1))}) → {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))} ∈ Fin)
253249, 251, 252mp2an 704 . . . . . . . . . . . . . . . 16 {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))} ∈ Fin
254 xpfi 8116 . . . . . . . . . . . . . . . 16 ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) ∈ Fin ∧ {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))} ∈ Fin) → (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∈ Fin)
255244, 253, 254mp2an 704 . . . . . . . . . . . . . . 15 (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∈ Fin
256 rabfi 8070 . . . . . . . . . . . . . . 15 ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∈ Fin → {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵} ∈ Fin)
257 hashcl 13009 . . . . . . . . . . . . . . 15 ({𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵} ∈ Fin → (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ∈ ℕ0)
258255, 256, 257mp2b 10 . . . . . . . . . . . . . 14 (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ∈ ℕ0
259258nn0zi 11279 . . . . . . . . . . . . 13 (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ∈ ℤ
260 rabfi 8070 . . . . . . . . . . . . . . 15 ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∈ Fin → {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))} ∈ Fin)
261 hashcl 13009 . . . . . . . . . . . . . . 15 ({𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))} ∈ Fin → (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℕ0)
262255, 260, 261mp2b 10 . . . . . . . . . . . . . 14 (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℕ0
263262nn0zi 11279 . . . . . . . . . . . . 13 (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℤ
264241, 259, 2633pm3.2i 1232 . . . . . . . . . . . 12 (2 ∈ ℤ ∧ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ∈ ℤ ∧ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℤ)
265 nn0p1nn 11209 . . . . . . . . . . . . . . . 16 (𝑚 ∈ ℕ0 → (𝑚 + 1) ∈ ℕ)
266265ad2antrl 760 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → (𝑚 + 1) ∈ ℕ)
267 uneq1 3722 . . . . . . . . . . . . . . . 16 (𝑞 = ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})))
268267csbeq1d 3506 . . . . . . . . . . . . . . 15 (𝑞 = ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵)
26970fconst 6004 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑚 + 1) + 1)...𝑁) × {0}):(((𝑚 + 1) + 1)...𝑁)⟶{0}
270269jctr 563 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑞:(1...(𝑚 + 1))⟶(0...𝐾) → (𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ ((((𝑚 + 1) + 1)...𝑁) × {0}):(((𝑚 + 1) + 1)...𝑁)⟶{0}))
271265nnred 10912 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑚 ∈ ℕ0 → (𝑚 + 1) ∈ ℝ)
272271ltp1d 10833 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑚 ∈ ℕ0 → (𝑚 + 1) < ((𝑚 + 1) + 1))
273 fzdisj 12239 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑚 + 1) < ((𝑚 + 1) + 1) → ((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅)
274272, 273syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑚 ∈ ℕ0 → ((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅)
275 fun 5979 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ ((((𝑚 + 1) + 1)...𝑁) × {0}):(((𝑚 + 1) + 1)...𝑁)⟶{0}) ∧ ((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁))⟶((0...𝐾) ∪ {0}))
276270, 274, 275syl2anr 494 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑚 ∈ ℕ0𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁))⟶((0...𝐾) ∪ {0}))
277276adantlr 747 . . . . . . . . . . . . . . . . . . . . 21 (((𝑚 ∈ ℕ0𝑚 < 𝑁) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁))⟶((0...𝐾) ∪ {0}))
278277adantl 481 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ ((𝑚 ∈ ℕ0𝑚 < 𝑁) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁))⟶((0...𝐾) ∪ {0}))
279265peano2nnd 10914 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑚 ∈ ℕ0 → ((𝑚 + 1) + 1) ∈ ℕ)
280279, 187syl6eleq 2698 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑚 ∈ ℕ0 → ((𝑚 + 1) + 1) ∈ (ℤ‘1))
281280ad2antrl 760 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → ((𝑚 + 1) + 1) ∈ (ℤ‘1))
282 nn0z 11277 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑚 ∈ ℕ0𝑚 ∈ ℤ)
2831nnzd 11357 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑𝑁 ∈ ℤ)
284 zltp1le 11304 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑚 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑚 < 𝑁 ↔ (𝑚 + 1) ≤ 𝑁))
285282, 283, 284syl2anr 494 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑚 ∈ ℕ0) → (𝑚 < 𝑁 ↔ (𝑚 + 1) ≤ 𝑁))
286285biimpa 500 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑚 ∈ ℕ0) ∧ 𝑚 < 𝑁) → (𝑚 + 1) ≤ 𝑁)
287286anasss 677 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → (𝑚 + 1) ≤ 𝑁)
288282peano2zd 11361 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑚 ∈ ℕ0 → (𝑚 + 1) ∈ ℤ)
289288adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑚 ∈ ℕ0𝑚 < 𝑁) → (𝑚 + 1) ∈ ℤ)
290 eluz 11577 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑚 + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑁 ∈ (ℤ‘(𝑚 + 1)) ↔ (𝑚 + 1) ≤ 𝑁))
291289, 283, 290syl2anr 494 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → (𝑁 ∈ (ℤ‘(𝑚 + 1)) ↔ (𝑚 + 1) ≤ 𝑁))
292287, 291mpbird 246 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → 𝑁 ∈ (ℤ‘(𝑚 + 1)))
293 fzsplit2 12237 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑚 + 1) + 1) ∈ (ℤ‘1) ∧ 𝑁 ∈ (ℤ‘(𝑚 + 1))) → (1...𝑁) = ((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁)))
294281, 292, 293syl2anc 691 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → (1...𝑁) = ((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁)))
295294eqcomd 2616 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → ((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁)) = (1...𝑁))
296192, 193syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → 0 ∈ (0...𝐾))
297296snssd 4281 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → {0} ⊆ (0...𝐾))
298 ssequn2 3748 . . . . . . . . . . . . . . . . . . . . . . . 24 ({0} ⊆ (0...𝐾) ↔ ((0...𝐾) ∪ {0}) = (0...𝐾))
299297, 298sylib 207 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → ((0...𝐾) ∪ {0}) = (0...𝐾))
300299adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → ((0...𝐾) ∪ {0}) = (0...𝐾))
301295, 300feq23d 5953 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁))⟶((0...𝐾) ∪ {0}) ↔ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾)))
302301adantrr 749 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ ((𝑚 ∈ ℕ0𝑚 < 𝑁) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁))⟶((0...𝐾) ∪ {0}) ↔ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾)))
303278, 302mpbid 221 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ ((𝑚 ∈ ℕ0𝑚 < 𝑁) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
304 nfv 1830 . . . . . . . . . . . . . . . . . . . . 21 𝑝(𝜑 ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
305 nfcsb1v 3515 . . . . . . . . . . . . . . . . . . . . . 22 𝑝(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵
306305nfel1 2765 . . . . . . . . . . . . . . . . . . . . 21 𝑝(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ (0...𝑁)
307304, 306nfim 1813 . . . . . . . . . . . . . . . . . . . 20 𝑝((𝜑 ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ (0...𝑁))
308 vex 3176 . . . . . . . . . . . . . . . . . . . . 21 𝑞 ∈ V
309 ovex 6577 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑚 + 1) + 1)...𝑁) ∈ V
310309, 204xpex 6860 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑚 + 1) + 1)...𝑁) × {0}) ∈ V
311308, 310unex 6854 . . . . . . . . . . . . . . . . . . . 20 (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) ∈ V
312 feq1 5939 . . . . . . . . . . . . . . . . . . . . . 22 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (𝑝:(1...𝑁)⟶(0...𝐾) ↔ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾)))
313312anbi2d 736 . . . . . . . . . . . . . . . . . . . . 21 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝜑𝑝:(1...𝑁)⟶(0...𝐾)) ↔ (𝜑 ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))))
314 csbeq1a 3508 . . . . . . . . . . . . . . . . . . . . . 22 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → 𝐵 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵)
315314eleq1d 2672 . . . . . . . . . . . . . . . . . . . . 21 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (𝐵 ∈ (0...𝑁) ↔ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ (0...𝑁)))
316313, 315imbi12d 333 . . . . . . . . . . . . . . . . . . . 20 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (((𝜑𝑝:(1...𝑁)⟶(0...𝐾)) → 𝐵 ∈ (0...𝑁)) ↔ ((𝜑 ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ (0...𝑁))))
317307, 311, 316, 224vtoclf 3231 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ (0...𝑁))
318303, 317syldan 486 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ ((𝑚 ∈ ℕ0𝑚 < 𝑁) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ (0...𝑁))
319318anassrs 678 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ (0...𝑁))
320 elfznn0 12302 . . . . . . . . . . . . . . . . 17 ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ (0...𝑁) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ ℕ0)
321319, 320syl 17 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ ℕ0)
322265nnnn0d 11228 . . . . . . . . . . . . . . . . . 18 (𝑚 ∈ ℕ0 → (𝑚 + 1) ∈ ℕ0)
323322adantr 480 . . . . . . . . . . . . . . . . 17 ((𝑚 ∈ ℕ0𝑚 < 𝑁) → (𝑚 + 1) ∈ ℕ0)
324323ad2antlr 759 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑚 + 1) ∈ ℕ0)
325 leloe 10003 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑚 + 1) ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑚 + 1) ≤ 𝑁 ↔ ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)))
326271, 3, 325syl2anr 494 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑚 ∈ ℕ0) → ((𝑚 + 1) ≤ 𝑁 ↔ ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)))
327285, 326bitrd 267 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑚 ∈ ℕ0) → (𝑚 < 𝑁 ↔ ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)))
328327biimpd 218 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑚 ∈ ℕ0) → (𝑚 < 𝑁 → ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)))
329328imdistani 722 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑚 ∈ ℕ0) ∧ 𝑚 < 𝑁) → ((𝜑𝑚 ∈ ℕ0) ∧ ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)))
330329anasss 677 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → ((𝜑𝑚 ∈ ℕ0) ∧ ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)))
331 simplll 794 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → 𝜑)
332279nnge1d 10940 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑚 ∈ ℕ0 → 1 ≤ ((𝑚 + 1) + 1))
333332ad2antlr 759 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → 1 ≤ ((𝑚 + 1) + 1))
334 zltp1le 11304 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝑚 + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑚 + 1) < 𝑁 ↔ ((𝑚 + 1) + 1) ≤ 𝑁))
335288, 283, 334syl2anr 494 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑚 ∈ ℕ0) → ((𝑚 + 1) < 𝑁 ↔ ((𝑚 + 1) + 1) ≤ 𝑁))
336335biimpa 500 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → ((𝑚 + 1) + 1) ≤ 𝑁)
337288peano2zd 11361 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑚 ∈ ℕ0 → ((𝑚 + 1) + 1) ∈ ℤ)
338 1z 11284 . . . . . . . . . . . . . . . . . . . . . . . . . 26 1 ∈ ℤ
339 elfz 12203 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝑚 + 1) + 1) ∈ ℤ ∧ 1 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝑚 + 1) + 1) ∈ (1...𝑁) ↔ (1 ≤ ((𝑚 + 1) + 1) ∧ ((𝑚 + 1) + 1) ≤ 𝑁)))
340338, 339mp3an2 1404 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝑚 + 1) + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝑚 + 1) + 1) ∈ (1...𝑁) ↔ (1 ≤ ((𝑚 + 1) + 1) ∧ ((𝑚 + 1) + 1) ≤ 𝑁)))
341337, 283, 340syl2anr 494 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑚 ∈ ℕ0) → (((𝑚 + 1) + 1) ∈ (1...𝑁) ↔ (1 ≤ ((𝑚 + 1) + 1) ∧ ((𝑚 + 1) + 1) ≤ 𝑁)))
342341adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → (((𝑚 + 1) + 1) ∈ (1...𝑁) ↔ (1 ≤ ((𝑚 + 1) + 1) ∧ ((𝑚 + 1) + 1) ≤ 𝑁)))
343333, 336, 342mpbir2and 959 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → ((𝑚 + 1) + 1) ∈ (1...𝑁))
344343adantlr 747 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → ((𝑚 + 1) + 1) ∈ (1...𝑁))
345 nn0re 11178 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑚 ∈ ℕ0𝑚 ∈ ℝ)
346345ad2antlr 759 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → 𝑚 ∈ ℝ)
347271ad2antlr 759 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → (𝑚 + 1) ∈ ℝ)
3483ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → 𝑁 ∈ ℝ)
349345ltp1d 10833 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑚 ∈ ℕ0𝑚 < (𝑚 + 1))
350349ad2antlr 759 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → 𝑚 < (𝑚 + 1))
351 simpr 476 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → (𝑚 + 1) < 𝑁)
352346, 347, 348, 350, 351lttrd 10077 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → 𝑚 < 𝑁)
353352adantlr 747 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → 𝑚 < 𝑁)
354 anass 679 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑚 ∈ ℕ0) ∧ 𝑚 < 𝑁) ↔ (𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)))
355303anassrs 678 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
356354, 355sylanb 488 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑚 < 𝑁) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
357356an32s 842 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ 𝑚 < 𝑁) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
358353, 357syldan 486 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
359 ffn 5958 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑞:(1...(𝑚 + 1))⟶(0...𝐾) → 𝑞 Fn (1...(𝑚 + 1)))
360359ad2antlr 759 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → 𝑞 Fn (1...(𝑚 + 1)))
361274ad3antlr 763 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → ((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅)
362 eluz 11577 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝑚 + 1) + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑁 ∈ (ℤ‘((𝑚 + 1) + 1)) ↔ ((𝑚 + 1) + 1) ≤ 𝑁))
363337, 283, 362syl2anr 494 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑚 ∈ ℕ0) → (𝑁 ∈ (ℤ‘((𝑚 + 1) + 1)) ↔ ((𝑚 + 1) + 1) ≤ 𝑁))
364363adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → (𝑁 ∈ (ℤ‘((𝑚 + 1) + 1)) ↔ ((𝑚 + 1) + 1) ≤ 𝑁))
365336, 364mpbird 246 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → 𝑁 ∈ (ℤ‘((𝑚 + 1) + 1)))
366 eluzfz1 12219 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑁 ∈ (ℤ‘((𝑚 + 1) + 1)) → ((𝑚 + 1) + 1) ∈ (((𝑚 + 1) + 1)...𝑁))
367365, 366syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → ((𝑚 + 1) + 1) ∈ (((𝑚 + 1) + 1)...𝑁))
368367adantlr 747 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → ((𝑚 + 1) + 1) ∈ (((𝑚 + 1) + 1)...𝑁))
369 fnconstg 6006 . . . . . . . . . . . . . . . . . . . . . . . . 25 (0 ∈ V → ((((𝑚 + 1) + 1)...𝑁) × {0}) Fn (((𝑚 + 1) + 1)...𝑁))
37070, 369ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑚 + 1) + 1)...𝑁) × {0}) Fn (((𝑚 + 1) + 1)...𝑁)
371 fvun2 6180 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑞 Fn (1...(𝑚 + 1)) ∧ ((((𝑚 + 1) + 1)...𝑁) × {0}) Fn (((𝑚 + 1) + 1)...𝑁) ∧ (((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅ ∧ ((𝑚 + 1) + 1) ∈ (((𝑚 + 1) + 1)...𝑁))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = (((((𝑚 + 1) + 1)...𝑁) × {0})‘((𝑚 + 1) + 1)))
372370, 371mp3an2 1404 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑞 Fn (1...(𝑚 + 1)) ∧ (((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅ ∧ ((𝑚 + 1) + 1) ∈ (((𝑚 + 1) + 1)...𝑁))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = (((((𝑚 + 1) + 1)...𝑁) × {0})‘((𝑚 + 1) + 1)))
373360, 361, 368, 372syl12anc 1316 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = (((((𝑚 + 1) + 1)...𝑁) × {0})‘((𝑚 + 1) + 1)))
37470fvconst2 6374 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑚 + 1) + 1) ∈ (((𝑚 + 1) + 1)...𝑁) → (((((𝑚 + 1) + 1)...𝑁) × {0})‘((𝑚 + 1) + 1)) = 0)
375368, 374syl 17 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → (((((𝑚 + 1) + 1)...𝑁) × {0})‘((𝑚 + 1) + 1)) = 0)
376373, 375eqtrd 2644 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = 0)
377 nfv 1830 . . . . . . . . . . . . . . . . . . . . . . 23 𝑝(𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = 0))
378 nfcv 2751 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑝 <
379 nfcv 2751 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑝((𝑚 + 1) + 1)
380305, 378, 379nfbr 4629 . . . . . . . . . . . . . . . . . . . . . . 23 𝑝(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 < ((𝑚 + 1) + 1)
381377, 380nfim 1813 . . . . . . . . . . . . . . . . . . . . . 22 𝑝((𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = 0)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 < ((𝑚 + 1) + 1))
382 fveq1 6102 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (𝑝‘((𝑚 + 1) + 1)) = ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)))
383382eqeq1d 2612 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝑝‘((𝑚 + 1) + 1)) = 0 ↔ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = 0))
384312, 3833anbi23d 1394 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘((𝑚 + 1) + 1)) = 0) ↔ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = 0)))
385384anbi2d 736 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘((𝑚 + 1) + 1)) = 0)) ↔ (𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = 0))))
386314breq1d 4593 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (𝐵 < ((𝑚 + 1) + 1) ↔ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 < ((𝑚 + 1) + 1)))
387385, 386imbi12d 333 . . . . . . . . . . . . . . . . . . . . . 22 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (((𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘((𝑚 + 1) + 1)) = 0)) → 𝐵 < ((𝑚 + 1) + 1)) ↔ ((𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = 0)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 < ((𝑚 + 1) + 1))))
388 ovex 6577 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑚 + 1) + 1) ∈ V
389 eleq1 2676 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑛 = ((𝑚 + 1) + 1) → (𝑛 ∈ (1...𝑁) ↔ ((𝑚 + 1) + 1) ∈ (1...𝑁)))
390 fveq2 6103 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑛 = ((𝑚 + 1) + 1) → (𝑝𝑛) = (𝑝‘((𝑚 + 1) + 1)))
391390eqeq1d 2612 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑛 = ((𝑚 + 1) + 1) → ((𝑝𝑛) = 0 ↔ (𝑝‘((𝑚 + 1) + 1)) = 0))
392389, 3913anbi13d 1393 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑛 = ((𝑚 + 1) + 1) → ((𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0) ↔ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘((𝑚 + 1) + 1)) = 0)))
393392anbi2d 736 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑛 = ((𝑚 + 1) + 1) → ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0)) ↔ (𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘((𝑚 + 1) + 1)) = 0))))
394 breq2 4587 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑛 = ((𝑚 + 1) + 1) → (𝐵 < 𝑛𝐵 < ((𝑚 + 1) + 1)))
395393, 394imbi12d 333 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 = ((𝑚 + 1) + 1) → (((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0)) → 𝐵 < 𝑛) ↔ ((𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘((𝑚 + 1) + 1)) = 0)) → 𝐵 < ((𝑚 + 1) + 1))))
396388, 395, 222vtocl 3232 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘((𝑚 + 1) + 1)) = 0)) → 𝐵 < ((𝑚 + 1) + 1))
397381, 311, 387, 396vtoclf 3231 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = 0)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 < ((𝑚 + 1) + 1))
398331, 344, 358, 376, 397syl13anc 1320 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 < ((𝑚 + 1) + 1))
399354, 319sylanb 488 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑚 < 𝑁) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ (0...𝑁))
400399an32s 842 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ 𝑚 < 𝑁) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ (0...𝑁))
401 elfzelz 12213 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ (0...𝑁) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ ℤ)
402400, 401syl 17 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ 𝑚 < 𝑁) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ ℤ)
403353, 402syldan 486 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ ℤ)
404288ad3antlr 763 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → (𝑚 + 1) ∈ ℤ)
405 zleltp1 11305 . . . . . . . . . . . . . . . . . . . . 21 (((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ ℤ ∧ (𝑚 + 1) ∈ ℤ) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ≤ (𝑚 + 1) ↔ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 < ((𝑚 + 1) + 1)))
406403, 404, 405syl2anc 691 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ≤ (𝑚 + 1) ↔ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 < ((𝑚 + 1) + 1)))
407398, 406mpbird 246 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ≤ (𝑚 + 1))
408349ad2antlr 759 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → 𝑚 < (𝑚 + 1))
409 breq2 4587 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑚 + 1) = 𝑁 → (𝑚 < (𝑚 + 1) ↔ 𝑚 < 𝑁))
410409biimpac 502 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑚 < (𝑚 + 1) ∧ (𝑚 + 1) = 𝑁) → 𝑚 < 𝑁)
411408, 410sylan 487 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) = 𝑁) → 𝑚 < 𝑁)
412 elfzle2 12216 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ (0...𝑁) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵𝑁)
413400, 412syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ 𝑚 < 𝑁) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵𝑁)
414411, 413syldan 486 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) = 𝑁) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵𝑁)
415 simpr 476 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) = 𝑁) → (𝑚 + 1) = 𝑁)
416414, 415breqtrrd 4611 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) = 𝑁) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ≤ (𝑚 + 1))
417407, 416jaodan 822 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ≤ (𝑚 + 1))
418417an32s 842 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑚 ∈ ℕ0) ∧ ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ≤ (𝑚 + 1))
419330, 418sylan 487 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ≤ (𝑚 + 1))
420 elfz2nn0 12300 . . . . . . . . . . . . . . . 16 ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ (0...(𝑚 + 1)) ↔ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ ℕ0 ∧ (𝑚 + 1) ∈ ℕ0(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ≤ (𝑚 + 1)))
421321, 324, 419, 420syl3anbrc 1239 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∈ (0...(𝑚 + 1)))
422 fzss2 12252 . . . . . . . . . . . . . . . . . . . 20 (𝑁 ∈ (ℤ‘(𝑚 + 1)) → (1...(𝑚 + 1)) ⊆ (1...𝑁))
423292, 422syl 17 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → (1...(𝑚 + 1)) ⊆ (1...𝑁))
424423sselda 3568 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ 𝑛 ∈ (1...(𝑚 + 1))) → 𝑛 ∈ (1...𝑁))
4254243ad2antr1 1219 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 0)) → 𝑛 ∈ (1...𝑁))
4263553ad2antr2 1220 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 0)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
427359ad2antll 761 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → 𝑞 Fn (1...(𝑚 + 1)))
428274ad2antlr 759 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → ((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅)
429 simprl 790 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → 𝑛 ∈ (1...(𝑚 + 1)))
430 fvun1 6179 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑞 Fn (1...(𝑚 + 1)) ∧ ((((𝑚 + 1) + 1)...𝑁) × {0}) Fn (((𝑚 + 1) + 1)...𝑁) ∧ (((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅ ∧ 𝑛 ∈ (1...(𝑚 + 1)))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = (𝑞𝑛))
431370, 430mp3an2 1404 . . . . . . . . . . . . . . . . . . . . 21 ((𝑞 Fn (1...(𝑚 + 1)) ∧ (((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅ ∧ 𝑛 ∈ (1...(𝑚 + 1)))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = (𝑞𝑛))
432427, 428, 429, 431syl12anc 1316 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = (𝑞𝑛))
433432adantlrr 753 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = (𝑞𝑛))
4344333adantr3 1215 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 0)) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = (𝑞𝑛))
435 simpr3 1062 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 0)) → (𝑞𝑛) = 0)
436434, 435eqtrd 2644 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 0)) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0)
437425, 426, 4363jca 1235 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 0)) → (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0))
438 nfv 1830 . . . . . . . . . . . . . . . . . . 19 𝑝(𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0))
439 nfcv 2751 . . . . . . . . . . . . . . . . . . . 20 𝑝𝑛
440305, 378, 439nfbr 4629 . . . . . . . . . . . . . . . . . . 19 𝑝(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 < 𝑛
441438, 440nfim 1813 . . . . . . . . . . . . . . . . . 18 𝑝((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 < 𝑛)
442 fveq1 6102 . . . . . . . . . . . . . . . . . . . . . 22 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (𝑝𝑛) = ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛))
443442eqeq1d 2612 . . . . . . . . . . . . . . . . . . . . 21 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝑝𝑛) = 0 ↔ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0))
444312, 4433anbi23d 1394 . . . . . . . . . . . . . . . . . . . 20 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0) ↔ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0)))
445444anbi2d 736 . . . . . . . . . . . . . . . . . . 19 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0)) ↔ (𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0))))
446314breq1d 4593 . . . . . . . . . . . . . . . . . . 19 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (𝐵 < 𝑛(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 < 𝑛))
447445, 446imbi12d 333 . . . . . . . . . . . . . . . . . 18 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 0)) → 𝐵 < 𝑛) ↔ ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 < 𝑛)))
448441, 311, 447, 222vtoclf 3231 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 < 𝑛)
449448adantlr 747 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 < 𝑛)
450437, 449syldan 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 0)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 < 𝑛)
451 simp1 1054 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 𝐾) → 𝑛 ∈ (1...(𝑚 + 1)))
452424anasss 677 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ ((𝑚 ∈ ℕ0𝑚 < 𝑁) ∧ 𝑛 ∈ (1...(𝑚 + 1)))) → 𝑛 ∈ (1...𝑁))
453451, 452sylanr2 683 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ ((𝑚 ∈ ℕ0𝑚 < 𝑁) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 𝐾))) → 𝑛 ∈ (1...𝑁))
454 simp2 1055 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 𝐾) → 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))
455454, 303sylanr2 683 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ ((𝑚 ∈ ℕ0𝑚 < 𝑁) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 𝐾))) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
4564323adantr3 1215 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 𝐾)) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = (𝑞𝑛))
457 simpr3 1062 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 𝐾)) → (𝑞𝑛) = 𝐾)
458456, 457eqtrd 2644 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑚 ∈ ℕ0) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 𝐾)) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾)
459458anasss 677 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 𝐾))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾)
460459adantrlr 755 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ ((𝑚 ∈ ℕ0𝑚 < 𝑁) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 𝐾))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾)
461453, 455, 4603jca 1235 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ ((𝑚 ∈ ℕ0𝑚 < 𝑁) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 𝐾))) → (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾))
462 nfv 1830 . . . . . . . . . . . . . . . . . . 19 𝑝(𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾))
463 nfcv 2751 . . . . . . . . . . . . . . . . . . . 20 𝑝(𝑛 − 1)
464305, 463nfne 2882 . . . . . . . . . . . . . . . . . . 19 𝑝(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ≠ (𝑛 − 1)
465462, 464nfim 1813 . . . . . . . . . . . . . . . . . 18 𝑝((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ≠ (𝑛 − 1))
466442eqeq1d 2612 . . . . . . . . . . . . . . . . . . . . 21 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝑝𝑛) = 𝐾 ↔ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾))
467312, 4663anbi23d 1394 . . . . . . . . . . . . . . . . . . . 20 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 𝐾) ↔ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾)))
468467anbi2d 736 . . . . . . . . . . . . . . . . . . 19 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 𝐾)) ↔ (𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾))))
469314neeq1d 2841 . . . . . . . . . . . . . . . . . . 19 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (𝐵 ≠ (𝑛 − 1) ↔ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ≠ (𝑛 − 1)))
470468, 469imbi12d 333 . . . . . . . . . . . . . . . . . 18 (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 𝐾)) → 𝐵 ≠ (𝑛 − 1)) ↔ ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ≠ (𝑛 − 1))))
471 poimirlem28.4 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝𝑛) = 𝐾)) → 𝐵 ≠ (𝑛 − 1))
472465, 311, 470, 471vtoclf 3231 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ≠ (𝑛 − 1))
473461, 472syldan 486 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ ((𝑚 ∈ ℕ0𝑚 < 𝑁) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 𝐾))) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ≠ (𝑛 − 1))
474473anassrs 678 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞𝑛) = 𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ≠ (𝑛 − 1))
475266, 268, 421, 450, 474poimirlem27 32606 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → 2 ∥ ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})))
476266, 268, 421poimirlem26 32605 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → 2 ∥ ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵})))
477 fzfi 12633 . . . . . . . . . . . . . . . . . . 19 (0...(𝑚 + 1)) ∈ Fin
478 xpfi 8116 . . . . . . . . . . . . . . . . . . 19 (((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∈ Fin ∧ (0...(𝑚 + 1)) ∈ Fin) → ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∈ Fin)
479255, 477, 478mp2an 704 . . . . . . . . . . . . . . . . . 18 ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∈ Fin
480 rabfi 8070 . . . . . . . . . . . . . . . . . 18 (((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∈ Fin → {𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵} ∈ Fin)
481 hashcl 13009 . . . . . . . . . . . . . . . . . 18 ({𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵} ∈ Fin → (#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ∈ ℕ0)
482479, 480, 481mp2b 10 . . . . . . . . . . . . . . . . 17 (#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ∈ ℕ0
483482nn0zi 11279 . . . . . . . . . . . . . . . 16 (#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ∈ ℤ
484 zsubcl 11296 . . . . . . . . . . . . . . . 16 (((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ∈ ℤ ∧ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℤ) → ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) ∈ ℤ)
485483, 263, 484mp2an 704 . . . . . . . . . . . . . . 15 ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) ∈ ℤ
486 zsubcl 11296 . . . . . . . . . . . . . . . 16 (((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ∈ ℤ ∧ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ∈ ℤ) → ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵})) ∈ ℤ)
487483, 259, 486mp2an 704 . . . . . . . . . . . . . . 15 ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵})) ∈ ℤ
488 dvds2sub 14854 . . . . . . . . . . . . . . 15 ((2 ∈ ℤ ∧ ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) ∈ ℤ ∧ ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵})) ∈ ℤ) → ((2 ∥ ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) ∧ 2 ∥ ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}))) → 2 ∥ (((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) − ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵})))))
489241, 485, 487, 488mp3an 1416 . . . . . . . . . . . . . 14 ((2 ∥ ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) ∧ 2 ∥ ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}))) → 2 ∥ (((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) − ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}))))
490475, 476, 489syl2anc 691 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → 2 ∥ (((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) − ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}))))
491482nn0cni 11181 . . . . . . . . . . . . . 14 (#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ∈ ℂ
492262nn0cni 11181 . . . . . . . . . . . . . 14 (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℂ
493258nn0cni 11181 . . . . . . . . . . . . . 14 (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ∈ ℂ
494 nnncan1 10196 . . . . . . . . . . . . . 14 (((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ∈ ℂ ∧ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℂ ∧ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ∈ ℂ) → (((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) − ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}))) = ((#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})))
495491, 492, 493, 494mp3an 1416 . . . . . . . . . . . . 13 (((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) − ((#‘{𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd𝑡)})𝑖 = (1st𝑡) / 𝑠(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}))) = ((#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}))
496490, 495syl6breq 4624 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → 2 ∥ ((#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})))
497 dvdssub2 14861 . . . . . . . . . . . 12 (((2 ∈ ℤ ∧ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ∈ ℤ ∧ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℤ) ∧ 2 ∥ ((#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) − (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}))) → (2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ↔ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})))
498264, 496, 497sylancr 694 . . . . . . . . . . 11 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → (2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ↔ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})))
499 nn0cn 11179 . . . . . . . . . . . . . . . . . . . 20 (𝑚 ∈ ℕ0𝑚 ∈ ℂ)
500 pncan1 10333 . . . . . . . . . . . . . . . . . . . 20 (𝑚 ∈ ℂ → ((𝑚 + 1) − 1) = 𝑚)
501499, 500syl 17 . . . . . . . . . . . . . . . . . . 19 (𝑚 ∈ ℕ0 → ((𝑚 + 1) − 1) = 𝑚)
502501oveq2d 6565 . . . . . . . . . . . . . . . . . 18 (𝑚 ∈ ℕ0 → (0...((𝑚 + 1) − 1)) = (0...𝑚))
503502rexeqdv 3122 . . . . . . . . . . . . . . . . . 18 (𝑚 ∈ ℕ0 → (∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵))
504502, 503raleqbidv 3129 . . . . . . . . . . . . . . . . 17 (𝑚 ∈ ℕ0 → (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵))
5055043anbi1d 1395 . . . . . . . . . . . . . . . 16 (𝑚 ∈ ℕ0 → ((∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1)) ↔ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))))
506505rabbidv 3164 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℕ0 → {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))} = {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})
507506fveq2d 6107 . . . . . . . . . . . . . 14 (𝑚 ∈ ℕ0 → (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) = (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}))
508507ad2antrl 760 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) = (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}))
5091adantr 480 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → 𝑁 ∈ ℕ)
510191adantr 480 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → 𝐾 ∈ ℕ)
511 simprl 790 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → 𝑚 ∈ ℕ0)
512 simprr 792 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → 𝑚 < 𝑁)
513509, 510, 511, 512poimirlem4 32583 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵} ≈ {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})
514 fzfi 12633 . . . . . . . . . . . . . . . . . 18 (1...𝑚) ∈ Fin
515 mapfi 8145 . . . . . . . . . . . . . . . . . 18 (((0..^𝐾) ∈ Fin ∧ (1...𝑚) ∈ Fin) → ((0..^𝐾) ↑𝑚 (1...𝑚)) ∈ Fin)
51610, 514, 515mp2an 704 . . . . . . . . . . . . . . . . 17 ((0..^𝐾) ↑𝑚 (1...𝑚)) ∈ Fin
517 ovex 6577 . . . . . . . . . . . . . . . . . . . 20 (1...𝑚) ∈ V
518517, 517mapval 7756 . . . . . . . . . . . . . . . . . . 19 ((1...𝑚) ↑𝑚 (1...𝑚)) = {𝑓𝑓:(1...𝑚)⟶(1...𝑚)}
519 mapfi 8145 . . . . . . . . . . . . . . . . . . . 20 (((1...𝑚) ∈ Fin ∧ (1...𝑚) ∈ Fin) → ((1...𝑚) ↑𝑚 (1...𝑚)) ∈ Fin)
520514, 514, 519mp2an 704 . . . . . . . . . . . . . . . . . . 19 ((1...𝑚) ↑𝑚 (1...𝑚)) ∈ Fin
521518, 520eqeltrri 2685 . . . . . . . . . . . . . . . . . 18 {𝑓𝑓:(1...𝑚)⟶(1...𝑚)} ∈ Fin
522 f1of 6050 . . . . . . . . . . . . . . . . . . 19 (𝑓:(1...𝑚)–1-1-onto→(1...𝑚) → 𝑓:(1...𝑚)⟶(1...𝑚))
523522ss2abi 3637 . . . . . . . . . . . . . . . . . 18 {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)} ⊆ {𝑓𝑓:(1...𝑚)⟶(1...𝑚)}
524 ssfi 8065 . . . . . . . . . . . . . . . . . 18 (({𝑓𝑓:(1...𝑚)⟶(1...𝑚)} ∈ Fin ∧ {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)} ⊆ {𝑓𝑓:(1...𝑚)⟶(1...𝑚)}) → {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)} ∈ Fin)
525521, 523, 524mp2an 704 . . . . . . . . . . . . . . . . 17 {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)} ∈ Fin
526 xpfi 8116 . . . . . . . . . . . . . . . . 17 ((((0..^𝐾) ↑𝑚 (1...𝑚)) ∈ Fin ∧ {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)} ∈ Fin) → (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∈ Fin)
527516, 525, 526mp2an 704 . . . . . . . . . . . . . . . 16 (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∈ Fin
528 rabfi 8070 . . . . . . . . . . . . . . . 16 ((((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∈ Fin → {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵} ∈ Fin)
529527, 528ax-mp 5 . . . . . . . . . . . . . . 15 {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵} ∈ Fin
530 rabfi 8070 . . . . . . . . . . . . . . . 16 ((((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∈ Fin → {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))} ∈ Fin)
531255, 530ax-mp 5 . . . . . . . . . . . . . . 15 {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))} ∈ Fin
532 hashen 12997 . . . . . . . . . . . . . . 15 (({𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵} ∈ Fin ∧ {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))} ∈ Fin) → ((#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵}) = (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ↔ {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵} ≈ {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}))
533529, 531, 532mp2an 704 . . . . . . . . . . . . . 14 ((#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵}) = (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ↔ {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵} ≈ {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})
534513, 533sylibr 223 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵}) = (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}))
535508, 534eqtr4d 2647 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) = (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵}))
536535breq2d 4595 . . . . . . . . . . 11 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → (2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ↔ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵})))
537498, 536bitrd 267 . . . . . . . . . 10 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → (2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) ↔ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵})))
538537biimpd 218 . . . . . . . . 9 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → (2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}) → 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵})))
539538con3d 147 . . . . . . . 8 ((𝜑 ∧ (𝑚 ∈ ℕ0𝑚 < 𝑁)) → (¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵}) → ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵})))
540539expcom 450 . . . . . . 7 ((𝑚 ∈ ℕ0𝑚 < 𝑁) → (𝜑 → (¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵}) → ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}))))
541540a2d 29 . . . . . 6 ((𝑚 ∈ ℕ0𝑚 < 𝑁) → ((𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵})) → (𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}))))
5425413adant1 1072 . . . . 5 ((𝑁 ∈ ℕ0𝑚 ∈ ℕ0𝑚 < 𝑁) → ((𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑚)) × {𝑓𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝𝐵})) → (𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...(𝑚 + 1))) × {𝑓𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵}))))
543107, 132, 157, 182, 240, 542fnn0ind 11352 . . . 4 ((𝑁 ∈ ℕ0𝑁 ∈ ℕ0𝑁𝑁) → (𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵})))
5445, 543mpcom 37 . . 3 (𝜑 → ¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵}))
545 dvds0 14835 . . . . . . . 8 (2 ∈ ℤ → 2 ∥ 0)
546241, 545ax-mp 5 . . . . . . 7 2 ∥ 0
547 hash0 13019 . . . . . . 7 (#‘∅) = 0
548546, 547breqtrri 4610 . . . . . 6 2 ∥ (#‘∅)
549 fveq2 6103 . . . . . 6 ({𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶} = ∅ → (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶}) = (#‘∅))
550548, 549syl5breqr 4621 . . . . 5 ({𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶} = ∅ → 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶}))
5513ltp1d 10833 . . . . . . . . . . . . . . . . . 18 (𝜑𝑁 < (𝑁 + 1))
552283peano2zd 11361 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑁 + 1) ∈ ℤ)
553 fzn 12228 . . . . . . . . . . . . . . . . . . 19 (((𝑁 + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑁 < (𝑁 + 1) ↔ ((𝑁 + 1)...𝑁) = ∅))
554552, 283, 553syl2anc 691 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑁 < (𝑁 + 1) ↔ ((𝑁 + 1)...𝑁) = ∅))
555551, 554mpbid 221 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑁 + 1)...𝑁) = ∅)
556555xpeq1d 5062 . . . . . . . . . . . . . . . 16 (𝜑 → (((𝑁 + 1)...𝑁) × {0}) = (∅ × {0}))
557556, 86syl6eq 2660 . . . . . . . . . . . . . . 15 (𝜑 → (((𝑁 + 1)...𝑁) × {0}) = ∅)
558557uneq2d 3729 . . . . . . . . . . . . . 14 (𝜑 → (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ ∅))
559 un0 3919 . . . . . . . . . . . . . 14 (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ ∅) = ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0})))
560558, 559syl6eq 2660 . . . . . . . . . . . . 13 (𝜑 → (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) = ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))))
561560csbeq1d 3506 . . . . . . . . . . . 12 (𝜑(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵 = ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) / 𝑝𝐵)
562 ovex 6577 . . . . . . . . . . . . 13 ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∈ V
563 poimirlem28.1 . . . . . . . . . . . . 13 (𝑝 = ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) → 𝐵 = 𝐶)
564562, 563csbie 3525 . . . . . . . . . . . 12 ((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) / 𝑝𝐵 = 𝐶
565561, 564syl6eq 2660 . . . . . . . . . . 11 (𝜑(((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵 = 𝐶)
566565eqeq2d 2620 . . . . . . . . . 10 (𝜑 → (𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵𝑖 = 𝐶))
567566rexbidv 3034 . . . . . . . . 9 (𝜑 → (∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶))
568567ralbidv 2969 . . . . . . . 8 (𝜑 → (∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶))
569568rabbidv 3164 . . . . . . 7 (𝜑 → {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵} = {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶})
570569fveq2d 6107 . . . . . 6 (𝜑 → (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵}) = (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶}))
571570breq2d 4595 . . . . 5 (𝜑 → (2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵}) ↔ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶})))
572550, 571syl5ibr 235 . . . 4 (𝜑 → ({𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶} = ∅ → 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵})))
573572necon3bd 2796 . . 3 (𝜑 → (¬ 2 ∥ (#‘{𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = (((1st𝑠) ∘𝑓 + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝𝐵}) → {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶} ≠ ∅))
574544, 573mpd 15 . 2 (𝜑 → {𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶} ≠ ∅)
575 rabn0 3912 . 2 ({𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶} ≠ ∅ ↔ ∃𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶)
576574, 575sylib 207 1 (𝜑 → ∃𝑠 ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶)
 Colors of variables: wff setvar class Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 195   ∨ wo 382   ∧ wa 383   ∧ w3a 1031   = wceq 1475   ∈ wcel 1977  {cab 2596   ≠ wne 2780  ∀wral 2896  ∃wrex 2897  {crab 2900  Vcvv 3173  ⦋csb 3499   ∖ cdif 3537   ∪ cun 3538   ∩ cin 3539   ⊆ wss 3540  ∅c0 3874  {csn 4125  ⟨cop 4131   class class class wbr 4583   ↦ cmpt 4643   × cxp 5036   “ cima 5041   Fn wfn 5799  ⟶wf 5800  –1-1-onto→wf1o 5803  ‘cfv 5804  (class class class)co 6549   ∘𝑓 cof 6793  1st c1st 7057  2nd c2nd 7058  1𝑜c1o 7440   ↑𝑚 cmap 7744   ≈ cen 7838  Fincfn 7841  ℂcc 9813  ℝcr 9814  0cc0 9815  1c1 9816   + caddc 9818   < clt 9953   ≤ cle 9954   − cmin 10145  ℕcn 10897  2c2 10947  ℕ0cn0 11169  ℤcz 11254  ℤ≥cuz 11563  ...cfz 12197  ..^cfzo 12334  #chash 12979   ∥ cdvds 14821 This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-rep 4699  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847  ax-inf2 8421  ax-cnex 9871  ax-resscn 9872  ax-1cn 9873  ax-icn 9874  ax-addcl 9875  ax-addrcl 9876  ax-mulcl 9877  ax-mulrcl 9878  ax-mulcom 9879  ax-addass 9880  ax-mulass 9881  ax-distr 9882  ax-i2m1 9883  ax-1ne0 9884  ax-1rid 9885  ax-rnegex 9886  ax-rrecex 9887  ax-cnre 9888  ax-pre-lttri 9889  ax-pre-lttrn 9890  ax-pre-ltadd 9891  ax-pre-mulgt0 9892  ax-pre-sup 9893 This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3or 1032  df-3an 1033  df-tru 1478  df-fal 1481  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-nel 2783  df-ral 2901  df-rex 2902  df-reu 2903  df-rmo 2904  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-pss 3556  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-tp 4130  df-op 4132  df-uni 4373  df-int 4411  df-iun 4457  df-disj 4554  df-br 4584  df-opab 4644  df-mpt 4645  df-tr 4681  df-eprel 4949  df-id 4953  df-po 4959  df-so 4960  df-fr 4997  df-se 4998  df-we 4999  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-pred 5597  df-ord 5643  df-on 5644  df-lim 5645  df-suc 5646  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812  df-isom 5813  df-riota 6511  df-ov 6552  df-oprab 6553  df-mpt2 6554  df-of 6795  df-om 6958  df-1st 7059  df-2nd 7060  df-wrecs 7294  df-recs 7355  df-rdg 7393  df-1o 7447  df-2o 7448  df-oadd 7451  df-er 7629  df-map 7746  df-pm 7747  df-en 7842  df-dom 7843  df-sdom 7844  df-fin 7845  df-sup 8231  df-oi 8298  df-card 8648  df-cda 8873  df-pnf 9955  df-mnf 9956  df-xr 9957  df-ltxr 9958  df-le 9959  df-sub 10147  df-neg 10148  df-div 10564  df-nn 10898  df-2 10956  df-3 10957  df-n0 11170  df-xnn0 11241  df-z 11255  df-uz 11564  df-rp 11709  df-fz 12198  df-fzo 12335  df-seq 12664  df-exp 12723  df-fac 12923  df-bc 12952  df-hash 12980  df-cj 13687  df-re 13688  df-im 13689  df-sqrt 13823  df-abs 13824  df-clim 14067  df-sum 14265  df-dvds 14822 This theorem is referenced by:  poimirlem32  32611
 Copyright terms: Public domain W3C validator