Theorem poimirlem28 34919

Description: Lemma for poimir 34924, a variant of Sperner's lemma. (Contributed by Brendan Leahy, 21-Aug-2020.)

Hypotheses

Ref	Expression
poimir.0	⊢ (𝜑 → 𝑁 ∈ ℕ)
poimirlem28.1	⊢ (𝑝 = ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) → 𝐵 = 𝐶)
poimirlem28.2	⊢ ((𝜑 ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → 𝐵 ∈ (0...𝑁))
poimirlem28.3	⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 0)) → 𝐵 < 𝑛)
poimirlem28.4	⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 𝐾)) → 𝐵 ≠ (𝑛 − 1))
poimirlem28.5	⊢ (𝜑 → 𝐾 ∈ ℕ)

Assertion

Ref	Expression
poimirlem28	⊢ (𝜑 → ∃𝑠 ∈ (((0..^𝐾) ↑m (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.

Step	Hyp	Ref	Expression
1		poimir.0	. . . . . 6 ⊢ (𝜑 → 𝑁 ∈ ℕ)
2	1	nnnn0d 11954	. . . . 5 ⊢ (𝜑 → 𝑁 ∈ ℕ0)
3	1	nnred 11652	. . . . . 6 ⊢ (𝜑 → 𝑁 ∈ ℝ)
4	3	leidd 11205	. . . . 5 ⊢ (𝜑 → 𝑁 ≤ 𝑁)
5	2, 2, 4	3jca 1124	. . . 4 ⊢ (𝜑 → (𝑁 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0 ∧ 𝑁 ≤ 𝑁))
6		oveq2 7163	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 0 → (1...𝑘) = (1...0))
7		fz10 12927	. . . . . . . . . . . . . . . 16 ⊢ (1...0) = ∅
8	6, 7	syl6eq 2872	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 0 → (1...𝑘) = ∅)
9	8	oveq2d 7171	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 0 → ((0..^𝐾) ↑m (1...𝑘)) = ((0..^𝐾) ↑m ∅))
10		fzofi 13341	. . . . . . . . . . . . . . . 16 ⊢ (0..^𝐾) ∈ Fin
11		map0e 8445	. . . . . . . . . . . . . . . 16 ⊢ ((0..^𝐾) ∈ Fin → ((0..^𝐾) ↑m ∅) = 1o)
12	10, 11	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ ((0..^𝐾) ↑m ∅) = 1o
13		df1o2 8115	. . . . . . . . . . . . . . 15 ⊢ 1o = {∅}
14	12, 13	eqtri 2844	. . . . . . . . . . . . . 14 ⊢ ((0..^𝐾) ↑m ∅) = {∅}
15	9, 14	syl6eq 2872	. . . . . . . . . . . . 13 ⊢ (𝑘 = 0 → ((0..^𝐾) ↑m (1...𝑘)) = {∅})
16		eqidd 2822	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 0 → 𝑓 = 𝑓)
17	16, 8, 8	f1oeq123d 6609	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 0 → (𝑓:(1...𝑘)–1-1-onto→(1...𝑘) ↔ 𝑓:∅–1-1-onto→∅))
18		eqid 2821	. . . . . . . . . . . . . . . . 17 ⊢ ∅ = ∅
19		f1o00 6648	. . . . . . . . . . . . . . . . 17 ⊢ (𝑓:∅–1-1-onto→∅ ↔ (𝑓 = ∅ ∧ ∅ = ∅))
20	18, 19	mpbiran2 708	. . . . . . . . . . . . . . . 16 ⊢ (𝑓:∅–1-1-onto→∅ ↔ 𝑓 = ∅)
21	17, 20	syl6bb 289	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 0 → (𝑓:(1...𝑘)–1-1-onto→(1...𝑘) ↔ 𝑓 = ∅))
22	21	abbidv 2885	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 0 → {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)} = {𝑓 ∣ 𝑓 = ∅})
23		df-sn 4567	. . . . . . . . . . . . . 14 ⊢ {∅} = {𝑓 ∣ 𝑓 = ∅}
24	22, 23	syl6eqr 2874	. . . . . . . . . . . . 13 ⊢ (𝑘 = 0 → {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)} = {∅})
25	15, 24	xpeq12d 5585	. . . . . . . . . . . 12 ⊢ (𝑘 = 0 → (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) = ({∅} × {∅}))
26		0ex 5210	. . . . . . . . . . . . 13 ⊢ ∅ ∈ V
27	26, 26	xpsn 6902	. . . . . . . . . . . 12 ⊢ ({∅} × {∅}) = {⟨∅, ∅⟩}
28	25, 27	syl6req 2873	. . . . . . . . . . 11 ⊢ (𝑘 = 0 → {⟨∅, ∅⟩} = (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}))
29		elsni 4583	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑠 ∈ {⟨∅, ∅⟩} → 𝑠 = ⟨∅, ∅⟩)
30	26, 26	op1std 7698	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑠 = ⟨∅, ∅⟩ → (1st ‘𝑠) = ∅)
31	29, 30	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑠 ∈ {⟨∅, ∅⟩} → (1st ‘𝑠) = ∅)
32	31	oveq1d 7170	. . . . . . . . . . . . . . . . 17 ⊢ (𝑠 ∈ {⟨∅, ∅⟩} → ((1st ‘𝑠) ∘f + ∅) = (∅ ∘f + ∅))
33		f0 6559	. . . . . . . . . . . . . . . . . . . 20 ⊢ ∅:∅⟶∅
34		ffn 6513	. . . . . . . . . . . . . . . . . . . 20 ⊢ (∅:∅⟶∅ → ∅ Fn ∅)
35	33, 34	mp1i 13	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑠 ∈ {⟨∅, ∅⟩} → ∅ Fn ∅)
36	26	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑠 ∈ {⟨∅, ∅⟩} → ∅ ∈ V)
37		inidm 4194	. . . . . . . . . . . . . . . . . . 19 ⊢ (∅ ∩ ∅) = ∅
38		0fv 6708	. . . . . . . . . . . . . . . . . . . 20 ⊢ (∅‘𝑛) = ∅
39	38	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑠 ∈ {⟨∅, ∅⟩} ∧ 𝑛 ∈ ∅) → (∅‘𝑛) = ∅)
40	35, 35, 36, 36, 37, 39, 39	offval 7415	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑠 ∈ {⟨∅, ∅⟩} → (∅ ∘f + ∅) = (𝑛 ∈ ∅ ↦ (∅ + ∅)))
41		mpt0 6489	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ∅ ↦ (∅ + ∅)) = ∅
42	40, 41	syl6eq 2872	. . . . . . . . . . . . . . . . 17 ⊢ (𝑠 ∈ {⟨∅, ∅⟩} → (∅ ∘f + ∅) = ∅)
43	32, 42	eqtrd 2856	. . . . . . . . . . . . . . . 16 ⊢ (𝑠 ∈ {⟨∅, ∅⟩} → ((1st ‘𝑠) ∘f + ∅) = ∅)
44	43	uneq1d 4137	. . . . . . . . . . . . . . 15 ⊢ (𝑠 ∈ {⟨∅, ∅⟩} → (((1st ‘𝑠) ∘f + ∅) ∪ ((1...𝑁) × {0})) = (∅ ∪ ((1...𝑁) × {0})))
45		uncom 4128	. . . . . . . . . . . . . . . 16 ⊢ (∅ ∪ ((1...𝑁) × {0})) = (((1...𝑁) × {0}) ∪ ∅)
46		un0 4343	. . . . . . . . . . . . . . . 16 ⊢ (((1...𝑁) × {0}) ∪ ∅) = ((1...𝑁) × {0})
47	45, 46	eqtri 2844	. . . . . . . . . . . . . . 15 ⊢ (∅ ∪ ((1...𝑁) × {0})) = ((1...𝑁) × {0})
48	44, 47	syl6req 2873	. . . . . . . . . . . . . 14 ⊢ (𝑠 ∈ {⟨∅, ∅⟩} → ((1...𝑁) × {0}) = (((1st ‘𝑠) ∘f + ∅) ∪ ((1...𝑁) × {0})))
49	48	csbeq1d 3886	. . . . . . . . . . . . 13 ⊢ (𝑠 ∈ {⟨∅, ∅⟩} → ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵 = ⦋(((1st ‘𝑠) ∘f + ∅) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵)
50	49	eqeq2d 2832	. . . . . . . . . . . 12 ⊢ (𝑠 ∈ {⟨∅, ∅⟩} → (0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵 ↔ 0 = ⦋(((1st ‘𝑠) ∘f + ∅) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵))
51		oveq2 7163	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 0 → (0...𝑘) = (0...0))
52		0z 11991	. . . . . . . . . . . . . . . 16 ⊢ 0 ∈ ℤ
53		fzsn 12948	. . . . . . . . . . . . . . . 16 ⊢ (0 ∈ ℤ → (0...0) = {0})
54	52, 53	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ (0...0) = {0}
55	51, 54	syl6eq 2872	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 0 → (0...𝑘) = {0})
56		oveq2 7163	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑘 = 0 → ((𝑗 + 1)...𝑘) = ((𝑗 + 1)...0))
57	56	imaeq2d 5928	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑘 = 0 → ((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) = ((2nd ‘𝑠) “ ((𝑗 + 1)...0)))
58	57	xpeq1d 5583	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 = 0 → (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}) = (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0}))
59	58	uneq2d 4138	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑘 = 0 → ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0})) = ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0})))
60	59	oveq2d 7171	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 0 → ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) = ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0}))))
61		oveq1 7162	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑘 = 0 → (𝑘 + 1) = (0 + 1))
62		0p1e1 11758	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (0 + 1) = 1
63	61, 62	syl6eq 2872	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 = 0 → (𝑘 + 1) = 1)
64	63	oveq1d 7170	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑘 = 0 → ((𝑘 + 1)...𝑁) = (1...𝑁))
65	64	xpeq1d 5583	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 0 → (((𝑘 + 1)...𝑁) × {0}) = ((1...𝑁) × {0}))
66	60, 65	uneq12d 4139	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 0 → (((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) = (((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})))
67	66	csbeq1d 3886	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 0 → ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵)
68	67	eqeq2d 2832	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 0 → (𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ 𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵))
69	55, 68	rexeqbidv 3402	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 0 → (∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ ∃𝑗 ∈ {0}𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵))
70		c0ex 10634	. . . . . . . . . . . . . . . 16 ⊢ 0 ∈ V
71		oveq2 7163	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑗 = 0 → (1...𝑗) = (1...0))
72	71, 7	syl6eq 2872	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑗 = 0 → (1...𝑗) = ∅)
73	72	imaeq2d 5928	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑗 = 0 → ((2nd ‘𝑠) “ (1...𝑗)) = ((2nd ‘𝑠) “ ∅))
74		ima0 5944	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((2nd ‘𝑠) “ ∅) = ∅
75	73, 74	syl6eq 2872	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑗 = 0 → ((2nd ‘𝑠) “ (1...𝑗)) = ∅)
76	75	xpeq1d 5583	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑗 = 0 → (((2nd ‘𝑠) “ (1...𝑗)) × {1}) = (∅ × {1}))
77		0xp 5648	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (∅ × {1}) = ∅
78	76, 77	syl6eq 2872	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑗 = 0 → (((2nd ‘𝑠) “ (1...𝑗)) × {1}) = ∅)
79		oveq1 7162	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (𝑗 = 0 → (𝑗 + 1) = (0 + 1))
80	79, 62	syl6eq 2872	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑗 = 0 → (𝑗 + 1) = 1)
81	80	oveq1d 7170	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑗 = 0 → ((𝑗 + 1)...0) = (1...0))
82	81, 7	syl6eq 2872	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑗 = 0 → ((𝑗 + 1)...0) = ∅)
83	82	imaeq2d 5928	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑗 = 0 → ((2nd ‘𝑠) “ ((𝑗 + 1)...0)) = ((2nd ‘𝑠) “ ∅))
84	83, 74	syl6eq 2872	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑗 = 0 → ((2nd ‘𝑠) “ ((𝑗 + 1)...0)) = ∅)
85	84	xpeq1d 5583	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑗 = 0 → (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0}) = (∅ × {0}))
86		0xp 5648	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (∅ × {0}) = ∅
87	85, 86	syl6eq 2872	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑗 = 0 → (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0}) = ∅)
88	78, 87	uneq12d 4139	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑗 = 0 → ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0})) = (∅ ∪ ∅))
89		un0 4343	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (∅ ∪ ∅) = ∅
90	88, 89	syl6eq 2872	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 = 0 → ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0})) = ∅)
91	90	oveq2d 7171	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 = 0 → ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0}))) = ((1st ‘𝑠) ∘f + ∅))
92	91	uneq1d 4137	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑗 = 0 → (((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})) = (((1st ‘𝑠) ∘f + ∅) ∪ ((1...𝑁) × {0})))
93	92	csbeq1d 3886	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 = 0 → ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵 = ⦋(((1st ‘𝑠) ∘f + ∅) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵)
94	93	eqeq2d 2832	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 = 0 → (𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵 ↔ 𝑖 = ⦋(((1st ‘𝑠) ∘f + ∅) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵))
95	70, 94	rexsn 4619	. . . . . . . . . . . . . . 15 ⊢ (∃𝑗 ∈ {0}𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...0)) × {0}))) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵 ↔ 𝑖 = ⦋(((1st ‘𝑠) ∘f + ∅) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵)
96	69, 95	syl6bb 289	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 0 → (∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ 𝑖 = ⦋(((1st ‘𝑠) ∘f + ∅) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵))
97	55, 96	raleqbidv 3401	. . . . . . . . . . . . 13 ⊢ (𝑘 = 0 → (∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ ∀𝑖 ∈ {0}𝑖 = ⦋(((1st ‘𝑠) ∘f + ∅) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵))
98		eqeq1 2825	. . . . . . . . . . . . . 14 ⊢ (𝑖 = 0 → (𝑖 = ⦋(((1st ‘𝑠) ∘f + ∅) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵 ↔ 0 = ⦋(((1st ‘𝑠) ∘f + ∅) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵))
99	70, 98	ralsn 4618	. . . . . . . . . . . . 13 ⊢ (∀𝑖 ∈ {0}𝑖 = ⦋(((1st ‘𝑠) ∘f + ∅) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵 ↔ 0 = ⦋(((1st ‘𝑠) ∘f + ∅) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵)
100	97, 99	syl6rbb 290	. . . . . . . . . . . 12 ⊢ (𝑘 = 0 → (0 = ⦋(((1st ‘𝑠) ∘f + ∅) ∪ ((1...𝑁) × {0})) / 𝑝⦌𝐵 ↔ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵))
101	50, 100	sylan9bbr 513	. . . . . . . . . . 11 ⊢ ((𝑘 = 0 ∧ 𝑠 ∈ {⟨∅, ∅⟩}) → (0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵 ↔ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵))
102	28, 101	rabeqbidva 3486	. . . . . . . . . 10 ⊢ (𝑘 = 0 → {𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵} = {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})
103	102	eqcomd 2827	. . . . . . . . 9 ⊢ (𝑘 = 0 → {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵} = {𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵})
104	103	fveq2d 6673	. . . . . . . 8 ⊢ (𝑘 = 0 → (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) = (♯‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵}))
105	104	breq2d 5077	. . . . . . 7 ⊢ (𝑘 = 0 → (2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ↔ 2 ∥ (♯‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵})))
106	105	notbid 320	. . . . . 6 ⊢ (𝑘 = 0 → (¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ↔ ¬ 2 ∥ (♯‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵})))
107	106	imbi2d 343	. . . . 5 ⊢ (𝑘 = 0 → ((𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})) ↔ (𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵}))))
108		oveq2 7163	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑚 → (1...𝑘) = (1...𝑚))
109	108	oveq2d 7171	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑚 → ((0..^𝐾) ↑m (1...𝑘)) = ((0..^𝐾) ↑m (1...𝑚)))
110		eqidd 2822	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑚 → 𝑓 = 𝑓)
111	110, 108, 108	f1oeq123d 6609	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑚 → (𝑓:(1...𝑘)–1-1-onto→(1...𝑘) ↔ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)))
112	111	abbidv 2885	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑚 → {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)} = {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)})
113	109, 112	xpeq12d 5585	. . . . . . . . . 10 ⊢ (𝑘 = 𝑚 → (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) = (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}))
114		oveq2 7163	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑚 → (0...𝑘) = (0...𝑚))
115		oveq2 7163	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 𝑚 → ((𝑗 + 1)...𝑘) = ((𝑗 + 1)...𝑚))
116	115	imaeq2d 5928	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑚 → ((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) = ((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)))
117	116	xpeq1d 5583	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑚 → (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}) = (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))
118	117	uneq2d 4138	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑚 → ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0})) = ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0})))
119	118	oveq2d 7171	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑚 → ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) = ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))))
120		oveq1 7162	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑚 → (𝑘 + 1) = (𝑚 + 1))
121	120	oveq1d 7170	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑚 → ((𝑘 + 1)...𝑁) = ((𝑚 + 1)...𝑁))
122	121	xpeq1d 5583	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑚 → (((𝑘 + 1)...𝑁) × {0}) = (((𝑚 + 1)...𝑁) × {0}))
123	119, 122	uneq12d 4139	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑚 → (((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) = (((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})))
124	123	csbeq1d 3886	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑚 → ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵)
125	124	eqeq2d 2832	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑚 → (𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ 𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵))
126	114, 125	rexeqbidv 3402	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑚 → (∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ ∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵))
127	114, 126	raleqbidv 3401	. . . . . . . . . 10 ⊢ (𝑘 = 𝑚 → (∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵))
128	113, 127	rabeqbidv 3485	. . . . . . . . 9 ⊢ (𝑘 = 𝑚 → {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵} = {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})
129	128	fveq2d 6673	. . . . . . . 8 ⊢ (𝑘 = 𝑚 → (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) = (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))
130	129	breq2d 5077	. . . . . . 7 ⊢ (𝑘 = 𝑚 → (2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ↔ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})))
131	130	notbid 320	. . . . . 6 ⊢ (𝑘 = 𝑚 → (¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ↔ ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})))
132	131	imbi2d 343	. . . . 5 ⊢ (𝑘 = 𝑚 → ((𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})) ↔ (𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))))
133		oveq2 7163	. . . . . . . . . . . 12 ⊢ (𝑘 = (𝑚 + 1) → (1...𝑘) = (1...(𝑚 + 1)))
134	133	oveq2d 7171	. . . . . . . . . . 11 ⊢ (𝑘 = (𝑚 + 1) → ((0..^𝐾) ↑m (1...𝑘)) = ((0..^𝐾) ↑m (1...(𝑚 + 1))))
135		eqidd 2822	. . . . . . . . . . . . 13 ⊢ (𝑘 = (𝑚 + 1) → 𝑓 = 𝑓)
136	135, 133, 133	f1oeq123d 6609	. . . . . . . . . . . 12 ⊢ (𝑘 = (𝑚 + 1) → (𝑓:(1...𝑘)–1-1-onto→(1...𝑘) ↔ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))))
137	136	abbidv 2885	. . . . . . . . . . 11 ⊢ (𝑘 = (𝑚 + 1) → {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)} = {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))})
138	134, 137	xpeq12d 5585	. . . . . . . . . 10 ⊢ (𝑘 = (𝑚 + 1) → (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) = (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}))
139		oveq2 7163	. . . . . . . . . . 11 ⊢ (𝑘 = (𝑚 + 1) → (0...𝑘) = (0...(𝑚 + 1)))
140		oveq2 7163	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = (𝑚 + 1) → ((𝑗 + 1)...𝑘) = ((𝑗 + 1)...(𝑚 + 1)))
141	140	imaeq2d 5928	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = (𝑚 + 1) → ((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) = ((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))))
142	141	xpeq1d 5583	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = (𝑚 + 1) → (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}) = (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))
143	142	uneq2d 4138	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (𝑚 + 1) → ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0})) = ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0})))
144	143	oveq2d 7171	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = (𝑚 + 1) → ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) = ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))))
145		oveq1 7162	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = (𝑚 + 1) → (𝑘 + 1) = ((𝑚 + 1) + 1))
146	145	oveq1d 7170	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (𝑚 + 1) → ((𝑘 + 1)...𝑁) = (((𝑚 + 1) + 1)...𝑁))
147	146	xpeq1d 5583	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = (𝑚 + 1) → (((𝑘 + 1)...𝑁) × {0}) = ((((𝑚 + 1) + 1)...𝑁) × {0}))
148	144, 147	uneq12d 4139	. . . . . . . . . . . . . 14 ⊢ (𝑘 = (𝑚 + 1) → (((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) = (((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})))
149	148	csbeq1d 3886	. . . . . . . . . . . . 13 ⊢ (𝑘 = (𝑚 + 1) → ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵)
150	149	eqeq2d 2832	. . . . . . . . . . . 12 ⊢ (𝑘 = (𝑚 + 1) → (𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ 𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵))
151	139, 150	rexeqbidv 3402	. . . . . . . . . . 11 ⊢ (𝑘 = (𝑚 + 1) → (∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ ∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵))
152	139, 151	raleqbidv 3401	. . . . . . . . . 10 ⊢ (𝑘 = (𝑚 + 1) → (∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵))
153	138, 152	rabeqbidv 3485	. . . . . . . . 9 ⊢ (𝑘 = (𝑚 + 1) → {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵} = {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵})
154	153	fveq2d 6673	. . . . . . . 8 ⊢ (𝑘 = (𝑚 + 1) → (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) = (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))
155	154	breq2d 5077	. . . . . . 7 ⊢ (𝑘 = (𝑚 + 1) → (2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ↔ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵})))
156	155	notbid 320	. . . . . 6 ⊢ (𝑘 = (𝑚 + 1) → (¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ↔ ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵})))
157	156	imbi2d 343	. . . . 5 ⊢ (𝑘 = (𝑚 + 1) → ((𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})) ↔ (𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))))
158		oveq2 7163	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑁 → (1...𝑘) = (1...𝑁))
159	158	oveq2d 7171	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑁 → ((0..^𝐾) ↑m (1...𝑘)) = ((0..^𝐾) ↑m (1...𝑁)))
160		eqidd 2822	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑁 → 𝑓 = 𝑓)
161	160, 158, 158	f1oeq123d 6609	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑁 → (𝑓:(1...𝑘)–1-1-onto→(1...𝑘) ↔ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)))
162	161	abbidv 2885	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑁 → {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)} = {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
163	159, 162	xpeq12d 5585	. . . . . . . . . 10 ⊢ (𝑘 = 𝑁 → (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) = (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
164		oveq2 7163	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑁 → (0...𝑘) = (0...𝑁))
165		oveq2 7163	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 𝑁 → ((𝑗 + 1)...𝑘) = ((𝑗 + 1)...𝑁))
166	165	imaeq2d 5928	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑁 → ((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) = ((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)))
167	166	xpeq1d 5583	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑁 → (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}) = (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))
168	167	uneq2d 4138	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑁 → ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0})) = ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0})))
169	168	oveq2d 7171	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑁 → ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) = ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))))
170		oveq1 7162	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑁 → (𝑘 + 1) = (𝑁 + 1))
171	170	oveq1d 7170	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑁 → ((𝑘 + 1)...𝑁) = ((𝑁 + 1)...𝑁))
172	171	xpeq1d 5583	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑁 → (((𝑘 + 1)...𝑁) × {0}) = (((𝑁 + 1)...𝑁) × {0}))
173	169, 172	uneq12d 4139	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑁 → (((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) = (((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})))
174	173	csbeq1d 3886	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑁 → ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵)
175	174	eqeq2d 2832	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑁 → (𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ 𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵))
176	164, 175	rexeqbidv 3402	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑁 → (∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ ∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵))
177	164, 176	raleqbidv 3401	. . . . . . . . . 10 ⊢ (𝑘 = 𝑁 → (∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵))
178	163, 177	rabeqbidv 3485	. . . . . . . . 9 ⊢ (𝑘 = 𝑁 → {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵} = {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})
179	178	fveq2d 6673	. . . . . . . 8 ⊢ (𝑘 = 𝑁 → (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) = (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))
180	179	breq2d 5077	. . . . . . 7 ⊢ (𝑘 = 𝑁 → (2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ↔ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})))
181	180	notbid 320	. . . . . 6 ⊢ (𝑘 = 𝑁 → (¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ↔ ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})))
182	181	imbi2d 343	. . . . 5 ⊢ (𝑘 = 𝑁 → ((𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑘)) × {𝑓 ∣ 𝑓:(1...𝑘)–1-1-onto→(1...𝑘)}) ∣ ∀𝑖 ∈ (0...𝑘)∃𝑗 ∈ (0...𝑘)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑘)) × {0}))) ∪ (((𝑘 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})) ↔ (𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))))
183		n2dvds1 15716	. . . . . . 7 ⊢ ¬ 2 ∥ 1
184		opex 5355	. . . . . . . . . 10 ⊢ ⟨∅, ∅⟩ ∈ V
185		hashsng 13729	. . . . . . . . . 10 ⊢ (⟨∅, ∅⟩ ∈ V → (♯‘{⟨∅, ∅⟩}) = 1)
186	184, 185	ax-mp 5	. . . . . . . . 9 ⊢ (♯‘{⟨∅, ∅⟩}) = 1
187		nnuz 12280	. . . . . . . . . . . . . . . . 17 ⊢ ℕ = (ℤ≥‘1)
188	1, 187	eleqtrdi 2923	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑁 ∈ (ℤ≥‘1))
189		eluzfz1 12913	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ≥‘1) → 1 ∈ (1...𝑁))
190	188, 189	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 1 ∈ (1...𝑁))
191		poimirlem28.5	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐾 ∈ ℕ)
192	191	nnnn0d 11954	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐾 ∈ ℕ0)
193		0elfz 13003	. . . . . . . . . . . . . . . 16 ⊢ (𝐾 ∈ ℕ0 → 0 ∈ (0...𝐾))
194		fconst6g 6567	. . . . . . . . . . . . . . . 16 ⊢ (0 ∈ (0...𝐾) → ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾))
195	192, 193, 194	3syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾))
196	70	fvconst2 6965	. . . . . . . . . . . . . . . 16 ⊢ (1 ∈ (1...𝑁) → (((1...𝑁) × {0})‘1) = 0)
197	190, 196	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (((1...𝑁) × {0})‘1) = 0)
198	190, 195, 197	3jca 1124	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (1 ∈ (1...𝑁) ∧ ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾) ∧ (((1...𝑁) × {0})‘1) = 0))
199		nfv 1911	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑝(𝜑 ∧ (1 ∈ (1...𝑁) ∧ ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾) ∧ (((1...𝑁) × {0})‘1) = 0))
200		nfcsb1v 3906	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑝⦋((1...𝑁) × {0}) / 𝑝⦌𝐵
201	200	nfeq1 2993	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑝⦋((1...𝑁) × {0}) / 𝑝⦌𝐵 = 0
202	199, 201	nfim 1893	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑝((𝜑 ∧ (1 ∈ (1...𝑁) ∧ ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾) ∧ (((1...𝑁) × {0})‘1) = 0)) → ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵 = 0)
203		ovex 7188	. . . . . . . . . . . . . . . 16 ⊢ (1...𝑁) ∈ V
204		snex 5331	. . . . . . . . . . . . . . . 16 ⊢ {0} ∈ V
205	203, 204	xpex 7475	. . . . . . . . . . . . . . 15 ⊢ ((1...𝑁) × {0}) ∈ V
206		feq1 6494	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑝 = ((1...𝑁) × {0}) → (𝑝:(1...𝑁)⟶(0...𝐾) ↔ ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾)))
207		fveq1 6668	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑝 = ((1...𝑁) × {0}) → (𝑝‘1) = (((1...𝑁) × {0})‘1))
208	207	eqeq1d 2823	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑝 = ((1...𝑁) × {0}) → ((𝑝‘1) = 0 ↔ (((1...𝑁) × {0})‘1) = 0))
209	206, 208	3anbi23d 1435	. . . . . . . . . . . . . . . . 17 ⊢ (𝑝 = ((1...𝑁) × {0}) → ((1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0) ↔ (1 ∈ (1...𝑁) ∧ ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾) ∧ (((1...𝑁) × {0})‘1) = 0)))
210	209	anbi2d 630	. . . . . . . . . . . . . . . 16 ⊢ (𝑝 = ((1...𝑁) × {0}) → ((𝜑 ∧ (1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0)) ↔ (𝜑 ∧ (1 ∈ (1...𝑁) ∧ ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾) ∧ (((1...𝑁) × {0})‘1) = 0))))
211		csbeq1a 3896	. . . . . . . . . . . . . . . . 17 ⊢ (𝑝 = ((1...𝑁) × {0}) → 𝐵 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵)
212	211	eqeq1d 2823	. . . . . . . . . . . . . . . 16 ⊢ (𝑝 = ((1...𝑁) × {0}) → (𝐵 = 0 ↔ ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵 = 0))
213	210, 212	imbi12d 347	. . . . . . . . . . . . . . 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 10636	. . . . . . . . . . . . . . . . 17 ⊢ 1 ∈ V
215		eleq1 2900	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 = 1 → (𝑛 ∈ (1...𝑁) ↔ 1 ∈ (1...𝑁)))
216		fveqeq2 6678	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 = 1 → ((𝑝‘𝑛) = 0 ↔ (𝑝‘1) = 0))
217	215, 216	3anbi13d 1434	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 = 1 → ((𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 0) ↔ (1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0)))
218	217	anbi2d 630	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 1 → ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 0)) ↔ (𝜑 ∧ (1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0))))
219		breq2 5069	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 1 → (𝐵 < 𝑛 ↔ 𝐵 < 1))
220	218, 219	imbi12d 347	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 1 → (((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 0)) → 𝐵 < 𝑛) ↔ ((𝜑 ∧ (1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0)) → 𝐵 < 1)))
221		poimirlem28.3	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 0)) → 𝐵 < 𝑛)
222	214, 220, 221	vtocl 3559	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0)) → 𝐵 < 1)
223		poimirlem28.2	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → 𝐵 ∈ (0...𝑁))
224		elfznn0 12999	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐵 ∈ (0...𝑁) → 𝐵 ∈ ℕ0)
225		nn0lt10b 12043	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐵 ∈ ℕ0 → (𝐵 < 1 ↔ 𝐵 = 0))
226	223, 224, 225	3syl 18	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → (𝐵 < 1 ↔ 𝐵 = 0))
227	226	3ad2antr2 1185	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0)) → (𝐵 < 1 ↔ 𝐵 = 0))
228	222, 227	mpbid 234	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (1 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘1) = 0)) → 𝐵 = 0)
229	202, 205, 213, 228	vtoclf 3558	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (1 ∈ (1...𝑁) ∧ ((1...𝑁) × {0}):(1...𝑁)⟶(0...𝐾) ∧ (((1...𝑁) × {0})‘1) = 0)) → ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵 = 0)
230	198, 229	mpdan 685	. . . . . . . . . . . . 13 ⊢ (𝜑 → ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵 = 0)
231	230	eqcomd 2827	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵)
232	231	ralrimivw 3183	. . . . . . . . . . 11 ⊢ (𝜑 → ∀𝑠 ∈ {⟨∅, ∅⟩}0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵)
233		rabid2 3381	. . . . . . . . . . 11 ⊢ ({⟨∅, ∅⟩} = {𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵} ↔ ∀𝑠 ∈ {⟨∅, ∅⟩}0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵)
234	232, 233	sylibr 236	. . . . . . . . . 10 ⊢ (𝜑 → {⟨∅, ∅⟩} = {𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵})
235	234	fveq2d 6673	. . . . . . . . 9 ⊢ (𝜑 → (♯‘{⟨∅, ∅⟩}) = (♯‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵}))
236	186, 235	syl5eqr 2870	. . . . . . . 8 ⊢ (𝜑 → 1 = (♯‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵}))
237	236	breq2d 5077	. . . . . . 7 ⊢ (𝜑 → (2 ∥ 1 ↔ 2 ∥ (♯‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵})))
238	183, 237	mtbii 328	. . . . . 6 ⊢ (𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵}))
239	238	a1i 11	. . . . 5 ⊢ (𝑁 ∈ ℕ0 → (𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ {⟨∅, ∅⟩} ∣ 0 = ⦋((1...𝑁) × {0}) / 𝑝⦌𝐵})))
240		2z 12013	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℤ
241		fzfi 13339	. . . . . . . . . . . . . . . . 17 ⊢ (1...(𝑚 + 1)) ∈ Fin
242		mapfi 8819	. . . . . . . . . . . . . . . . 17 ⊢ (((0..^𝐾) ∈ Fin ∧ (1...(𝑚 + 1)) ∈ Fin) → ((0..^𝐾) ↑m (1...(𝑚 + 1))) ∈ Fin)
243	10, 241, 242	mp2an 690	. . . . . . . . . . . . . . . 16 ⊢ ((0..^𝐾) ↑m (1...(𝑚 + 1))) ∈ Fin
244		ovex 7188	. . . . . . . . . . . . . . . . . . 19 ⊢ (1...(𝑚 + 1)) ∈ V
245	244, 244	mapval 8417	. . . . . . . . . . . . . . . . . 18 ⊢ ((1...(𝑚 + 1)) ↑m (1...(𝑚 + 1))) = {𝑓 ∣ 𝑓:(1...(𝑚 + 1))⟶(1...(𝑚 + 1))}
246		mapfi 8819	. . . . . . . . . . . . . . . . . . 19 ⊢ (((1...(𝑚 + 1)) ∈ Fin ∧ (1...(𝑚 + 1)) ∈ Fin) → ((1...(𝑚 + 1)) ↑m (1...(𝑚 + 1))) ∈ Fin)
247	241, 241, 246	mp2an 690	. . . . . . . . . . . . . . . . . 18 ⊢ ((1...(𝑚 + 1)) ↑m (1...(𝑚 + 1))) ∈ Fin
248	245, 247	eqeltrri 2910	. . . . . . . . . . . . . . . . 17 ⊢ {𝑓 ∣ 𝑓:(1...(𝑚 + 1))⟶(1...(𝑚 + 1))} ∈ Fin
249		f1of 6614	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1)) → 𝑓:(1...(𝑚 + 1))⟶(1...(𝑚 + 1)))
250	249	ss2abi 4042	. . . . . . . . . . . . . . . . 17 ⊢ {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))} ⊆ {𝑓 ∣ 𝑓:(1...(𝑚 + 1))⟶(1...(𝑚 + 1))}
251		ssfi 8737	. . . . . . . . . . . . . . . . 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)
252	248, 250, 251	mp2an 690	. . . . . . . . . . . . . . . 16 ⊢ {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))} ∈ Fin
253		xpfi 8788	. . . . . . . . . . . . . . . 16 ⊢ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) ∈ Fin ∧ {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))} ∈ Fin) → (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∈ Fin)
254	243, 252, 253	mp2an 690	. . . . . . . . . . . . . . 15 ⊢ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∈ Fin
255		rabfi 8742	. . . . . . . . . . . . . . 15 ⊢ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∈ Fin → {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵} ∈ Fin)
256		hashcl 13716	. . . . . . . . . . . . . . 15 ⊢ ({𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵} ∈ Fin → (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ∈ ℕ0)
257	254, 255, 256	mp2b 10	. . . . . . . . . . . . . 14 ⊢ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ∈ ℕ0
258	257	nn0zi 12006	. . . . . . . . . . . . 13 ⊢ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ∈ ℤ
259		rabfi 8742	. . . . . . . . . . . . . . 15 ⊢ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∈ Fin → {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))} ∈ Fin)
260		hashcl 13716	. . . . . . . . . . . . . . 15 ⊢ ({𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))} ∈ Fin → (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℕ0)
261	254, 259, 260	mp2b 10	. . . . . . . . . . . . . 14 ⊢ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℕ0
262	261	nn0zi 12006	. . . . . . . . . . . . 13 ⊢ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℤ
263	240, 258, 262	3pm3.2i 1335	. . . . . . . . . . . 12 ⊢ (2 ∈ ℤ ∧ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ∈ ℤ ∧ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℤ)
264		nn0p1nn 11935	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 ∈ ℕ0 → (𝑚 + 1) ∈ ℕ)
265	264	ad2antrl 726	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → (𝑚 + 1) ∈ ℕ)
266		uneq1 4131	. . . . . . . . . . . . . . . 16 ⊢ (𝑞 = ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) = (((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})))
267	266	csbeq1d 3886	. . . . . . . . . . . . . . 15 ⊢ (𝑞 = ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵)
268	70	fconst 6564	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑚 + 1) + 1)...𝑁) × {0}):(((𝑚 + 1) + 1)...𝑁)⟶{0}
269	268	jctr 527	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑞:(1...(𝑚 + 1))⟶(0...𝐾) → (𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ ((((𝑚 + 1) + 1)...𝑁) × {0}):(((𝑚 + 1) + 1)...𝑁)⟶{0}))
270	264	nnred 11652	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑚 ∈ ℕ0 → (𝑚 + 1) ∈ ℝ)
271	270	ltp1d 11569	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑚 ∈ ℕ0 → (𝑚 + 1) < ((𝑚 + 1) + 1))
272		fzdisj 12933	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑚 + 1) < ((𝑚 + 1) + 1) → ((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅)
273	271, 272	syl 17	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑚 ∈ ℕ0 → ((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅)
274		fun 6539	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ ((((𝑚 + 1) + 1)...𝑁) × {0}):(((𝑚 + 1) + 1)...𝑁)⟶{0}) ∧ ((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁))⟶((0...𝐾) ∪ {0}))
275	269, 273, 274	syl2anr 598	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑚 ∈ ℕ0 ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁))⟶((0...𝐾) ∪ {0}))
276	275	adantlr 713	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁))⟶((0...𝐾) ∪ {0}))
277	276	adantl 484	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ ((𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁))⟶((0...𝐾) ∪ {0}))
278	264	peano2nnd 11654	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑚 ∈ ℕ0 → ((𝑚 + 1) + 1) ∈ ℕ)
279	278, 187	eleqtrdi 2923	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑚 ∈ ℕ0 → ((𝑚 + 1) + 1) ∈ (ℤ≥‘1))
280	279	ad2antrl 726	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → ((𝑚 + 1) + 1) ∈ (ℤ≥‘1))
281		nn0z 12004	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑚 ∈ ℕ0 → 𝑚 ∈ ℤ)
282	1	nnzd 12085	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝜑 → 𝑁 ∈ ℤ)
283		zltp1le 12031	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝑚 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑚 < 𝑁 ↔ (𝑚 + 1) ≤ 𝑁))
284	281, 282, 283	syl2anr 598	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (𝑚 < 𝑁 ↔ (𝑚 + 1) ≤ 𝑁))
285	284	biimpa 479	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑚 < 𝑁) → (𝑚 + 1) ≤ 𝑁)
286	285	anasss 469	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → (𝑚 + 1) ≤ 𝑁)
287	281	peano2zd 12089	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑚 ∈ ℕ0 → (𝑚 + 1) ∈ ℤ)
288	287	adantr 483	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) → (𝑚 + 1) ∈ ℤ)
289		eluz 12256	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((𝑚 + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑁 ∈ (ℤ≥‘(𝑚 + 1)) ↔ (𝑚 + 1) ≤ 𝑁))
290	288, 282, 289	syl2anr 598	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → (𝑁 ∈ (ℤ≥‘(𝑚 + 1)) ↔ (𝑚 + 1) ≤ 𝑁))
291	286, 290	mpbird 259	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → 𝑁 ∈ (ℤ≥‘(𝑚 + 1)))
292		fzsplit2 12931	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑚 + 1) + 1) ∈ (ℤ≥‘1) ∧ 𝑁 ∈ (ℤ≥‘(𝑚 + 1))) → (1...𝑁) = ((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁)))
293	280, 291, 292	syl2anc 586	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → (1...𝑁) = ((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁)))
294	293	eqcomd 2827	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → ((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁)) = (1...𝑁))
295	192, 193	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝜑 → 0 ∈ (0...𝐾))
296	295	snssd 4741	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝜑 → {0} ⊆ (0...𝐾))
297		ssequn2 4158	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ({0} ⊆ (0...𝐾) ↔ ((0...𝐾) ∪ {0}) = (0...𝐾))
298	296, 297	sylib 220	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → ((0...𝐾) ∪ {0}) = (0...𝐾))
299	298	adantr 483	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → ((0...𝐾) ∪ {0}) = (0...𝐾))
300	294, 299	feq23d 6508	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁))⟶((0...𝐾) ∪ {0}) ↔ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾)))
301	300	adantrr 715	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ ((𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):((1...(𝑚 + 1)) ∪ (((𝑚 + 1) + 1)...𝑁))⟶((0...𝐾) ∪ {0}) ↔ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾)))
302	277, 301	mpbid 234	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ ((𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
303		nfv 1911	. . . . . . . . . . . . . . . . . . . . 21 ⊢ Ⅎ𝑝(𝜑 ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
304		nfcsb1v 3906	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Ⅎ𝑝⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵
305	304	nfel1 2994	. . . . . . . . . . . . . . . . . . . . 21 ⊢ Ⅎ𝑝⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ (0...𝑁)
306	303, 305	nfim 1893	. . . . . . . . . . . . . . . . . . . 20 ⊢ Ⅎ𝑝((𝜑 ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ (0...𝑁))
307		vex 3497	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 𝑞 ∈ V
308		ovex 7188	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝑚 + 1) + 1)...𝑁) ∈ V
309	308, 204	xpex 7475	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑚 + 1) + 1)...𝑁) × {0}) ∈ V
310	307, 309	unex 7468	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) ∈ V
311		feq1 6494	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (𝑝:(1...𝑁)⟶(0...𝐾) ↔ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾)))
312	311	anbi2d 630	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝜑 ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) ↔ (𝜑 ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))))
313		csbeq1a 3896	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → 𝐵 = ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵)
314	313	eleq1d 2897	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (𝐵 ∈ (0...𝑁) ↔ ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ (0...𝑁)))
315	312, 314	imbi12d 347	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (((𝜑 ∧ 𝑝:(1...𝑁)⟶(0...𝐾)) → 𝐵 ∈ (0...𝑁)) ↔ ((𝜑 ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ (0...𝑁))))
316	306, 310, 315, 223	vtoclf 3558	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ (0...𝑁))
317	302, 316	syldan 593	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ ((𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ (0...𝑁))
318	317	anassrs 470	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ (0...𝑁))
319		elfznn0 12999	. . . . . . . . . . . . . . . . 17 ⊢ (⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ (0...𝑁) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ ℕ0)
320	318, 319	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ ℕ0)
321	264	nnnn0d 11954	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑚 ∈ ℕ0 → (𝑚 + 1) ∈ ℕ0)
322	321	adantr 483	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) → (𝑚 + 1) ∈ ℕ0)
323	322	ad2antlr 725	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑚 + 1) ∈ ℕ0)
324		leloe 10726	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝑚 + 1) ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑚 + 1) ≤ 𝑁 ↔ ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)))
325	270, 3, 324	syl2anr 598	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → ((𝑚 + 1) ≤ 𝑁 ↔ ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)))
326	284, 325	bitrd 281	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (𝑚 < 𝑁 ↔ ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)))
327	326	biimpd 231	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (𝑚 < 𝑁 → ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)))
328	327	imdistani 571	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑚 < 𝑁) → ((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)))
329	328	anasss 469	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → ((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)))
330		simplll 773	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → 𝜑)
331	278	nnge1d 11684	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑚 ∈ ℕ0 → 1 ≤ ((𝑚 + 1) + 1))
332	331	ad2antlr 725	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → 1 ≤ ((𝑚 + 1) + 1))
333		zltp1le 12031	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝑚 + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑚 + 1) < 𝑁 ↔ ((𝑚 + 1) + 1) ≤ 𝑁))
334	287, 282, 333	syl2anr 598	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → ((𝑚 + 1) < 𝑁 ↔ ((𝑚 + 1) + 1) ≤ 𝑁))
335	334	biimpa 479	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → ((𝑚 + 1) + 1) ≤ 𝑁)
336	287	peano2zd 12089	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑚 ∈ ℕ0 → ((𝑚 + 1) + 1) ∈ ℤ)
337		1z 12011	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ 1 ∈ ℤ
338		elfz 12897	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((((𝑚 + 1) + 1) ∈ ℤ ∧ 1 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝑚 + 1) + 1) ∈ (1...𝑁) ↔ (1 ≤ ((𝑚 + 1) + 1) ∧ ((𝑚 + 1) + 1) ≤ 𝑁)))
339	337, 338	mp3an2 1445	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((𝑚 + 1) + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝑚 + 1) + 1) ∈ (1...𝑁) ↔ (1 ≤ ((𝑚 + 1) + 1) ∧ ((𝑚 + 1) + 1) ≤ 𝑁)))
340	336, 282, 339	syl2anr 598	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (((𝑚 + 1) + 1) ∈ (1...𝑁) ↔ (1 ≤ ((𝑚 + 1) + 1) ∧ ((𝑚 + 1) + 1) ≤ 𝑁)))
341	340	adantr 483	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → (((𝑚 + 1) + 1) ∈ (1...𝑁) ↔ (1 ≤ ((𝑚 + 1) + 1) ∧ ((𝑚 + 1) + 1) ≤ 𝑁)))
342	332, 335, 341	mpbir2and 711	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → ((𝑚 + 1) + 1) ∈ (1...𝑁))
343	342	adantlr 713	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → ((𝑚 + 1) + 1) ∈ (1...𝑁))
344		nn0re 11905	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑚 ∈ ℕ0 → 𝑚 ∈ ℝ)
345	344	ad2antlr 725	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → 𝑚 ∈ ℝ)
346	270	ad2antlr 725	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → (𝑚 + 1) ∈ ℝ)
347	3	ad2antrr 724	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → 𝑁 ∈ ℝ)
348	344	ltp1d 11569	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑚 ∈ ℕ0 → 𝑚 < (𝑚 + 1))
349	348	ad2antlr 725	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → 𝑚 < (𝑚 + 1))
350		simpr 487	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → (𝑚 + 1) < 𝑁)
351	345, 346, 347, 349, 350	lttrd 10800	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → 𝑚 < 𝑁)
352	351	adantlr 713	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → 𝑚 < 𝑁)
353		anass 471	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑚 < 𝑁) ↔ (𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)))
354	302	anassrs 470	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
355	353, 354	sylanb 583	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑚 < 𝑁) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
356	355	an32s 650	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ 𝑚 < 𝑁) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
357	352, 356	syldan 593	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
358		ffn 6513	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑞:(1...(𝑚 + 1))⟶(0...𝐾) → 𝑞 Fn (1...(𝑚 + 1)))
359	358	ad2antlr 725	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → 𝑞 Fn (1...(𝑚 + 1)))
360	273	ad3antlr 729	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → ((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅)
361		eluz 12256	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((((𝑚 + 1) + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑁 ∈ (ℤ≥‘((𝑚 + 1) + 1)) ↔ ((𝑚 + 1) + 1) ≤ 𝑁))
362	336, 282, 361	syl2anr 598	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ0) → (𝑁 ∈ (ℤ≥‘((𝑚 + 1) + 1)) ↔ ((𝑚 + 1) + 1) ≤ 𝑁))
363	362	adantr 483	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → (𝑁 ∈ (ℤ≥‘((𝑚 + 1) + 1)) ↔ ((𝑚 + 1) + 1) ≤ 𝑁))
364	335, 363	mpbird 259	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → 𝑁 ∈ (ℤ≥‘((𝑚 + 1) + 1)))
365		eluzfz1 12913	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑁 ∈ (ℤ≥‘((𝑚 + 1) + 1)) → ((𝑚 + 1) + 1) ∈ (((𝑚 + 1) + 1)...𝑁))
366	364, 365	syl 17	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑚 + 1) < 𝑁) → ((𝑚 + 1) + 1) ∈ (((𝑚 + 1) + 1)...𝑁))
367	366	adantlr 713	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → ((𝑚 + 1) + 1) ∈ (((𝑚 + 1) + 1)...𝑁))
368		fnconstg 6566	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (0 ∈ V → ((((𝑚 + 1) + 1)...𝑁) × {0}) Fn (((𝑚 + 1) + 1)...𝑁))
369	70, 368	ax-mp 5	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝑚 + 1) + 1)...𝑁) × {0}) Fn (((𝑚 + 1) + 1)...𝑁)
370		fvun2 6754	. . . . . . . . . . . . . . . . . . . . . . . 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)))
371	369, 370	mp3an2 1445	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑞 Fn (1...(𝑚 + 1)) ∧ (((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅ ∧ ((𝑚 + 1) + 1) ∈ (((𝑚 + 1) + 1)...𝑁))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = (((((𝑚 + 1) + 1)...𝑁) × {0})‘((𝑚 + 1) + 1)))
372	359, 360, 367, 371	syl12anc 834	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = (((((𝑚 + 1) + 1)...𝑁) × {0})‘((𝑚 + 1) + 1)))
373	70	fvconst2 6965	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑚 + 1) + 1) ∈ (((𝑚 + 1) + 1)...𝑁) → (((((𝑚 + 1) + 1)...𝑁) × {0})‘((𝑚 + 1) + 1)) = 0)
374	367, 373	syl 17	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → (((((𝑚 + 1) + 1)...𝑁) × {0})‘((𝑚 + 1) + 1)) = 0)
375	372, 374	eqtrd 2856	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = 0)
376		nfv 1911	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ Ⅎ𝑝(𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = 0))
377		nfcv 2977	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ Ⅎ𝑝 <
378		nfcv 2977	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ Ⅎ𝑝((𝑚 + 1) + 1)
379	304, 377, 378	nfbr 5112	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ Ⅎ𝑝⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 < ((𝑚 + 1) + 1)
380	376, 379	nfim 1893	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Ⅎ𝑝((𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = 0)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 < ((𝑚 + 1) + 1))
381		fveq1 6668	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (𝑝‘((𝑚 + 1) + 1)) = ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)))
382	381	eqeq1d 2823	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝑝‘((𝑚 + 1) + 1)) = 0 ↔ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = 0))
383	311, 382	3anbi23d 1435	. . . . . . . . . . . . . . . . . . . . . . . 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)))
384	383	anbi2d 630	. . . . . . . . . . . . . . . . . . . . . . 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))))
385	313	breq1d 5075	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (𝐵 < ((𝑚 + 1) + 1) ↔ ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 < ((𝑚 + 1) + 1)))
386	384, 385	imbi12d 347	. . . . . . . . . . . . . . . . . . . . . 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))))
387		ovex 7188	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑚 + 1) + 1) ∈ V
388		eleq1 2900	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑛 = ((𝑚 + 1) + 1) → (𝑛 ∈ (1...𝑁) ↔ ((𝑚 + 1) + 1) ∈ (1...𝑁)))
389		fveqeq2 6678	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑛 = ((𝑚 + 1) + 1) → ((𝑝‘𝑛) = 0 ↔ (𝑝‘((𝑚 + 1) + 1)) = 0))
390	388, 389	3anbi13d 1434	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑛 = ((𝑚 + 1) + 1) → ((𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 0) ↔ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘((𝑚 + 1) + 1)) = 0)))
391	390	anbi2d 630	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑛 = ((𝑚 + 1) + 1) → ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 0)) ↔ (𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘((𝑚 + 1) + 1)) = 0))))
392		breq2 5069	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑛 = ((𝑚 + 1) + 1) → (𝐵 < 𝑛 ↔ 𝐵 < ((𝑚 + 1) + 1)))
393	391, 392	imbi12d 347	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑛 = ((𝑚 + 1) + 1) → (((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 0)) → 𝐵 < 𝑛) ↔ ((𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘((𝑚 + 1) + 1)) = 0)) → 𝐵 < ((𝑚 + 1) + 1))))
394	387, 393, 221	vtocl 3559	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘((𝑚 + 1) + 1)) = 0)) → 𝐵 < ((𝑚 + 1) + 1))
395	380, 310, 386, 394	vtoclf 3558	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ (((𝑚 + 1) + 1) ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘((𝑚 + 1) + 1)) = 0)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 < ((𝑚 + 1) + 1))
396	330, 343, 357, 375, 395	syl13anc 1368	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 < ((𝑚 + 1) + 1))
397	353, 318	sylanb 583	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑚 < 𝑁) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ (0...𝑁))
398	397	an32s 650	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ 𝑚 < 𝑁) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ (0...𝑁))
399		elfzelz 12907	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ (0...𝑁) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ ℤ)
400	398, 399	syl 17	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ 𝑚 < 𝑁) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ ℤ)
401	352, 400	syldan 593	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ ℤ)
402	287	ad3antlr 729	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → (𝑚 + 1) ∈ ℤ)
403		zleltp1 12032	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ ℤ ∧ (𝑚 + 1) ∈ ℤ) → (⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≤ (𝑚 + 1) ↔ ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 < ((𝑚 + 1) + 1)))
404	401, 402, 403	syl2anc 586	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → (⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≤ (𝑚 + 1) ↔ ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 < ((𝑚 + 1) + 1)))
405	396, 404	mpbird 259	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) < 𝑁) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≤ (𝑚 + 1))
406	348	ad2antlr 725	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → 𝑚 < (𝑚 + 1))
407		breq2 5069	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑚 + 1) = 𝑁 → (𝑚 < (𝑚 + 1) ↔ 𝑚 < 𝑁))
408	407	biimpac 481	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑚 < (𝑚 + 1) ∧ (𝑚 + 1) = 𝑁) → 𝑚 < 𝑁)
409	406, 408	sylan 582	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) = 𝑁) → 𝑚 < 𝑁)
410		elfzle2 12910	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ (0...𝑁) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≤ 𝑁)
411	398, 410	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ 𝑚 < 𝑁) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≤ 𝑁)
412	409, 411	syldan 593	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) = 𝑁) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≤ 𝑁)
413		simpr 487	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) = 𝑁) → (𝑚 + 1) = 𝑁)
414	412, 413	breqtrrd 5093	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ (𝑚 + 1) = 𝑁) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≤ (𝑚 + 1))
415	405, 414	jaodan 954	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) ∧ ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≤ (𝑚 + 1))
416	415	an32s 650	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 + 1) < 𝑁 ∨ (𝑚 + 1) = 𝑁)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≤ (𝑚 + 1))
417	329, 416	sylan 582	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≤ (𝑚 + 1))
418		elfz2nn0 12997	. . . . . . . . . . . . . . . 16 ⊢ (⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ (0...(𝑚 + 1)) ↔ (⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ ℕ0 ∧ (𝑚 + 1) ∈ ℕ0 ∧ ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≤ (𝑚 + 1)))
419	320, 323, 417, 418	syl3anbrc 1339	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∈ (0...(𝑚 + 1)))
420		fzss2 12946	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑁 ∈ (ℤ≥‘(𝑚 + 1)) → (1...(𝑚 + 1)) ⊆ (1...𝑁))
421	291, 420	syl 17	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → (1...(𝑚 + 1)) ⊆ (1...𝑁))
422	421	sselda 3966	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ 𝑛 ∈ (1...(𝑚 + 1))) → 𝑛 ∈ (1...𝑁))
423	422	3ad2antr1 1184	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 0)) → 𝑛 ∈ (1...𝑁))
424	354	3ad2antr2 1185	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 0)) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
425	358	ad2antll 727	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → 𝑞 Fn (1...(𝑚 + 1)))
426	273	ad2antlr 725	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → ((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅)
427		simprl 769	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → 𝑛 ∈ (1...(𝑚 + 1)))
428		fvun1 6753	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑞 Fn (1...(𝑚 + 1)) ∧ ((((𝑚 + 1) + 1)...𝑁) × {0}) Fn (((𝑚 + 1) + 1)...𝑁) ∧ (((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅ ∧ 𝑛 ∈ (1...(𝑚 + 1)))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = (𝑞‘𝑛))
429	369, 428	mp3an2 1445	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑞 Fn (1...(𝑚 + 1)) ∧ (((1...(𝑚 + 1)) ∩ (((𝑚 + 1) + 1)...𝑁)) = ∅ ∧ 𝑛 ∈ (1...(𝑚 + 1)))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = (𝑞‘𝑛))
430	425, 426, 427, 429	syl12anc 834	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = (𝑞‘𝑛))
431	430	adantlrr 719	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = (𝑞‘𝑛))
432	431	3adantr3 1167	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 0)) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = (𝑞‘𝑛))
433		simpr3 1192	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 0)) → (𝑞‘𝑛) = 0)
434	432, 433	eqtrd 2856	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 0)) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0)
435	423, 424, 434	3jca 1124	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 0)) → (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0))
436		nfv 1911	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑝(𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0))
437		nfcv 2977	. . . . . . . . . . . . . . . . . . . 20 ⊢ Ⅎ𝑝𝑛
438	304, 377, 437	nfbr 5112	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑝⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 < 𝑛
439	436, 438	nfim 1893	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑝((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 < 𝑛)
440		fveq1 6668	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (𝑝‘𝑛) = ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛))
441	440	eqeq1d 2823	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝑝‘𝑛) = 0 ↔ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0))
442	311, 441	3anbi23d 1435	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 0) ↔ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0)))
443	442	anbi2d 630	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 0)) ↔ (𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0))))
444	313	breq1d 5075	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (𝐵 < 𝑛 ↔ ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 < 𝑛))
445	443, 444	imbi12d 347	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 0)) → 𝐵 < 𝑛) ↔ ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 < 𝑛)))
446	439, 310, 445, 221	vtoclf 3558	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 < 𝑛)
447	446	adantlr 713	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 0)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 < 𝑛)
448	435, 447	syldan 593	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 0)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 < 𝑛)
449		simp1 1132	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 𝐾) → 𝑛 ∈ (1...(𝑚 + 1)))
450	422	anasss 469	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ ((𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) ∧ 𝑛 ∈ (1...(𝑚 + 1)))) → 𝑛 ∈ (1...𝑁))
451	449, 450	sylanr2 681	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ ((𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 𝐾))) → 𝑛 ∈ (1...𝑁))
452		simp2 1133	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 𝐾) → 𝑞:(1...(𝑚 + 1))⟶(0...𝐾))
453	452, 302	sylanr2 681	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ ((𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 𝐾))) → (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾))
454	430	3adantr3 1167	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 𝐾)) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = (𝑞‘𝑛))
455		simpr3 1192	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 𝐾)) → (𝑞‘𝑛) = 𝐾)
456	454, 455	eqtrd 2856	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ0) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 𝐾)) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾)
457	456	anasss 469	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 𝐾))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾)
458	457	adantrlr 721	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ ((𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 𝐾))) → ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾)
459	451, 453, 458	3jca 1124	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ ((𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 𝐾))) → (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾))
460		nfv 1911	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑝(𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾))
461		nfcv 2977	. . . . . . . . . . . . . . . . . . . 20 ⊢ Ⅎ𝑝(𝑛 − 1)
462	304, 461	nfne 3119	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑝⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≠ (𝑛 − 1)
463	460, 462	nfim 1893	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑝((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≠ (𝑛 − 1))
464	440	eqeq1d 2823	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝑝‘𝑛) = 𝐾 ↔ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾))
465	311, 464	3anbi23d 1435	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 𝐾) ↔ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾)))
466	465	anbi2d 630	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 𝐾)) ↔ (𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾))))
467	313	neeq1d 3075	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (𝐵 ≠ (𝑛 − 1) ↔ ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≠ (𝑛 − 1)))
468	466, 467	imbi12d 347	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑝 = (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) → (((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 𝐾)) → 𝐵 ≠ (𝑛 − 1)) ↔ ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≠ (𝑛 − 1))))
469		poimirlem28.4	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑝:(1...𝑁)⟶(0...𝐾) ∧ (𝑝‘𝑛) = 𝐾)) → 𝐵 ≠ (𝑛 − 1))
470	463, 310, 468, 469	vtoclf 3558	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ (𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})):(1...𝑁)⟶(0...𝐾) ∧ ((𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0}))‘𝑛) = 𝐾)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≠ (𝑛 − 1))
471	459, 470	syldan 593	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 𝐾))) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≠ (𝑛 − 1))
472	471	anassrs 470	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) ∧ (𝑛 ∈ (1...(𝑚 + 1)) ∧ 𝑞:(1...(𝑚 + 1))⟶(0...𝐾) ∧ (𝑞‘𝑛) = 𝐾)) → ⦋(𝑞 ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ≠ (𝑛 − 1))
473	265, 267, 419, 448, 472	poimirlem27 34918	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → 2 ∥ ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})))
474	265, 267, 419	poimirlem26 34917	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → 2 ∥ ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵})))
475		fzfi 13339	. . . . . . . . . . . . . . . . . . 19 ⊢ (0...(𝑚 + 1)) ∈ Fin
476		xpfi 8788	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∈ Fin ∧ (0...(𝑚 + 1)) ∈ Fin) → ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∈ Fin)
477	254, 475, 476	mp2an 690	. . . . . . . . . . . . . . . . . 18 ⊢ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∈ Fin
478		rabfi 8742	. . . . . . . . . . . . . . . . . 18 ⊢ (((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∈ Fin → {𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵} ∈ Fin)
479		hashcl 13716	. . . . . . . . . . . . . . . . . 18 ⊢ ({𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵} ∈ Fin → (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ∈ ℕ0)
480	477, 478, 479	mp2b 10	. . . . . . . . . . . . . . . . 17 ⊢ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ∈ ℕ0
481	480	nn0zi 12006	. . . . . . . . . . . . . . . 16 ⊢ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ∈ ℤ
482		zsubcl 12023	. . . . . . . . . . . . . . . 16 ⊢ (((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ∈ ℤ ∧ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℤ) → ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) ∈ ℤ)
483	481, 262, 482	mp2an 690	. . . . . . . . . . . . . . 15 ⊢ ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) ∈ ℤ
484		zsubcl 12023	. . . . . . . . . . . . . . . 16 ⊢ (((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ∈ ℤ ∧ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ∈ ℤ) → ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵})) ∈ ℤ)
485	481, 258, 484	mp2an 690	. . . . . . . . . . . . . . 15 ⊢ ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵})) ∈ ℤ
486		dvds2sub 15643	. . . . . . . . . . . . . . 15 ⊢ ((2 ∈ ℤ ∧ ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) ∈ ℤ ∧ ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵})) ∈ ℤ) → ((2 ∥ ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) ∧ 2 ∥ ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))) → 2 ∥ (((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) − ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵})))))
487	240, 483, 485, 486	mp3an 1457	. . . . . . . . . . . . . 14 ⊢ ((2 ∥ ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) ∧ 2 ∥ ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))) → 2 ∥ (((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) − ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))))
488	473, 474, 487	syl2anc 586	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → 2 ∥ (((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) − ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))))
489	480	nn0cni 11908	. . . . . . . . . . . . . 14 ⊢ (♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ∈ ℂ
490	261	nn0cni 11908	. . . . . . . . . . . . . 14 ⊢ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℂ
491	257	nn0cni 11908	. . . . . . . . . . . . . 14 ⊢ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ∈ ℂ
492		nnncan1 10921	. . . . . . . . . . . . . 14 ⊢ (((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ∈ ℂ ∧ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℂ ∧ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ∈ ℂ) → (((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) − ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))) = ((♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})))
493	489, 490, 491, 492	mp3an 1457	. . . . . . . . . . . . 13 ⊢ (((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})) − ((♯‘{𝑡 ∈ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) × (0...(𝑚 + 1))) ∣ ∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ ((0...(𝑚 + 1)) ∖ {(2nd ‘𝑡)})𝑖 = ⦋(1st ‘𝑡) / 𝑠⦌⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))) = ((♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}))
494	488, 493	breqtrdi 5106	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → 2 ∥ ((♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})))
495		dvdssub2 15650	. . . . . . . . . . . 12 ⊢ (((2 ∈ ℤ ∧ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ∈ ℤ ∧ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ∈ ℤ) ∧ 2 ∥ ((♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) − (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}))) → (2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ↔ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})))
496	263, 494, 495	sylancr 589	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → (2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ↔ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})))
497		nn0cn 11906	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 ∈ ℕ0 → 𝑚 ∈ ℂ)
498		pncan1 11063	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 ∈ ℂ → ((𝑚 + 1) − 1) = 𝑚)
499	497, 498	syl 17	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑚 ∈ ℕ0 → ((𝑚 + 1) − 1) = 𝑚)
500	499	oveq2d 7171	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑚 ∈ ℕ0 → (0...((𝑚 + 1) − 1)) = (0...𝑚))
501	500	rexeqdv 3416	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑚 ∈ ℕ0 → (∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ ∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵))
502	500, 501	raleqbidv 3401	. . . . . . . . . . . . . . . . 17 ⊢ (𝑚 ∈ ℕ0 → (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵))
503	502	3anbi1d 1436	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 ∈ ℕ0 → ((∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1)) ↔ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))))
504	503	rabbidv 3480	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ ℕ0 → {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))} = {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})
505	504	fveq2d 6673	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ ℕ0 → (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) = (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}))
506	505	ad2antrl 726	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) = (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}))
507	1	adantr 483	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → 𝑁 ∈ ℕ)
508	191	adantr 483	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → 𝐾 ∈ ℕ)
509		simprl 769	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → 𝑚 ∈ ℕ0)
510		simprr 771	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → 𝑚 < 𝑁)
511	507, 508, 509, 510	poimirlem4 34895	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵} ≈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})
512		fzfi 13339	. . . . . . . . . . . . . . . . . 18 ⊢ (1...𝑚) ∈ Fin
513		mapfi 8819	. . . . . . . . . . . . . . . . . 18 ⊢ (((0..^𝐾) ∈ Fin ∧ (1...𝑚) ∈ Fin) → ((0..^𝐾) ↑m (1...𝑚)) ∈ Fin)
514	10, 512, 513	mp2an 690	. . . . . . . . . . . . . . . . 17 ⊢ ((0..^𝐾) ↑m (1...𝑚)) ∈ Fin
515		ovex 7188	. . . . . . . . . . . . . . . . . . . 20 ⊢ (1...𝑚) ∈ V
516	515, 515	mapval 8417	. . . . . . . . . . . . . . . . . . 19 ⊢ ((1...𝑚) ↑m (1...𝑚)) = {𝑓 ∣ 𝑓:(1...𝑚)⟶(1...𝑚)}
517		mapfi 8819	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((1...𝑚) ∈ Fin ∧ (1...𝑚) ∈ Fin) → ((1...𝑚) ↑m (1...𝑚)) ∈ Fin)
518	512, 512, 517	mp2an 690	. . . . . . . . . . . . . . . . . . 19 ⊢ ((1...𝑚) ↑m (1...𝑚)) ∈ Fin
519	516, 518	eqeltrri 2910	. . . . . . . . . . . . . . . . . 18 ⊢ {𝑓 ∣ 𝑓:(1...𝑚)⟶(1...𝑚)} ∈ Fin
520		f1of 6614	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑓:(1...𝑚)–1-1-onto→(1...𝑚) → 𝑓:(1...𝑚)⟶(1...𝑚))
521	520	ss2abi 4042	. . . . . . . . . . . . . . . . . 18 ⊢ {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)} ⊆ {𝑓 ∣ 𝑓:(1...𝑚)⟶(1...𝑚)}
522		ssfi 8737	. . . . . . . . . . . . . . . . . 18 ⊢ (({𝑓 ∣ 𝑓:(1...𝑚)⟶(1...𝑚)} ∈ Fin ∧ {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)} ⊆ {𝑓 ∣ 𝑓:(1...𝑚)⟶(1...𝑚)}) → {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)} ∈ Fin)
523	519, 521, 522	mp2an 690	. . . . . . . . . . . . . . . . 17 ⊢ {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)} ∈ Fin
524		xpfi 8788	. . . . . . . . . . . . . . . . 17 ⊢ ((((0..^𝐾) ↑m (1...𝑚)) ∈ Fin ∧ {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)} ∈ Fin) → (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∈ Fin)
525	514, 523, 524	mp2an 690	. . . . . . . . . . . . . . . 16 ⊢ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∈ Fin
526		rabfi 8742	. . . . . . . . . . . . . . . 16 ⊢ ((((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∈ Fin → {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵} ∈ Fin)
527	525, 526	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵} ∈ Fin
528		rabfi 8742	. . . . . . . . . . . . . . . 16 ⊢ ((((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∈ Fin → {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))} ∈ Fin)
529	254, 528	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))} ∈ Fin
530		hashen 13706	. . . . . . . . . . . . . . 15 ⊢ (({𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵} ∈ Fin ∧ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))} ∈ Fin) → ((♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) = (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ↔ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵} ≈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}))
531	527, 529, 530	mp2an 690	. . . . . . . . . . . . . 14 ⊢ ((♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) = (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ↔ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵} ≈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))})
532	511, 531	sylibr 236	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) = (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}))
533	506, 532	eqtr4d 2859	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) = (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))
534	533	breq2d 5077	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → (2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ (∀𝑖 ∈ (0...((𝑚 + 1) − 1))∃𝑗 ∈ (0...((𝑚 + 1) − 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ∧ ((1st ‘𝑠)‘(𝑚 + 1)) = 0 ∧ ((2nd ‘𝑠)‘(𝑚 + 1)) = (𝑚 + 1))}) ↔ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})))
535	496, 534	bitrd 281	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → (2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ↔ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})))
536	535	biimpd 231	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → (2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) → 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})))
537	536	con3d 155	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁)) → (¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) → ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵})))
538	537	expcom 416	. . . . . . 7 ⊢ ((𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) → (𝜑 → (¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) → ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))))
539	538	a2d 29	. . . . . 6 ⊢ ((𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) → ((𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})) → (𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))))
540	539	3adant1 1126	. . . . 5 ⊢ ((𝑁 ∈ ℕ0 ∧ 𝑚 ∈ ℕ0 ∧ 𝑚 < 𝑁) → ((𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑚)) × {𝑓 ∣ 𝑓:(1...𝑚)–1-1-onto→(1...𝑚)}) ∣ ∀𝑖 ∈ (0...𝑚)∃𝑗 ∈ (0...𝑚)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑚)) × {0}))) ∪ (((𝑚 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})) → (𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑚 + 1))) × {𝑓 ∣ 𝑓:(1...(𝑚 + 1))–1-1-onto→(1...(𝑚 + 1))}) ∣ ∀𝑖 ∈ (0...(𝑚 + 1))∃𝑗 ∈ (0...(𝑚 + 1))𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...(𝑚 + 1))) × {0}))) ∪ ((((𝑚 + 1) + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))))
541	107, 132, 157, 182, 239, 540	fnn0ind 12080	. . . 4 ⊢ ((𝑁 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0 ∧ 𝑁 ≤ 𝑁) → (𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})))
542	5, 541	mpcom 38	. . 3 ⊢ (𝜑 → ¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}))
543		dvds0 15624	. . . . . . . 8 ⊢ (2 ∈ ℤ → 2 ∥ 0)
544	240, 543	ax-mp 5	. . . . . . 7 ⊢ 2 ∥ 0
545		hash0 13727	. . . . . . 7 ⊢ (♯‘∅) = 0
546	544, 545	breqtrri 5092	. . . . . 6 ⊢ 2 ∥ (♯‘∅)
547		fveq2 6669	. . . . . 6 ⊢ ({𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶} = ∅ → (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶}) = (♯‘∅))
548	546, 547	breqtrrid 5103	. . . . 5 ⊢ ({𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶} = ∅ → 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶}))
549	3	ltp1d 11569	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝑁 < (𝑁 + 1))
550	282	peano2zd 12089	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (𝑁 + 1) ∈ ℤ)
551		fzn 12922	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑁 + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑁 < (𝑁 + 1) ↔ ((𝑁 + 1)...𝑁) = ∅))
552	550, 282, 551	syl2anc 586	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (𝑁 < (𝑁 + 1) ↔ ((𝑁 + 1)...𝑁) = ∅))
553	549, 552	mpbid 234	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((𝑁 + 1)...𝑁) = ∅)
554	553	xpeq1d 5583	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (((𝑁 + 1)...𝑁) × {0}) = (∅ × {0}))
555	554, 86	syl6eq 2872	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (((𝑁 + 1)...𝑁) × {0}) = ∅)
556	555	uneq2d 4138	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) = (((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ ∅))
557		un0 4343	. . . . . . . . . . . . . 14 ⊢ (((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ ∅) = ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0})))
558	556, 557	syl6eq 2872	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) = ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))))
559	558	csbeq1d 3886	. . . . . . . . . . . 12 ⊢ (𝜑 → ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 = ⦋((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) / 𝑝⦌𝐵)
560		ovex 7188	. . . . . . . . . . . . 13 ⊢ ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∈ V
561		poimirlem28.1	. . . . . . . . . . . . 13 ⊢ (𝑝 = ((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) → 𝐵 = 𝐶)
562	560, 561	csbie 3917	. . . . . . . . . . . 12 ⊢ ⦋((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) / 𝑝⦌𝐵 = 𝐶
563	559, 562	syl6eq 2872	. . . . . . . . . . 11 ⊢ (𝜑 → ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 = 𝐶)
564	563	eqeq2d 2832	. . . . . . . . . 10 ⊢ (𝜑 → (𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ 𝑖 = 𝐶))
565	564	rexbidv 3297	. . . . . . . . 9 ⊢ (𝜑 → (∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ ∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶))
566	565	ralbidv 3197	. . . . . . . 8 ⊢ (𝜑 → (∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵 ↔ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶))
567	566	rabbidv 3480	. . . . . . 7 ⊢ (𝜑 → {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵} = {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶})
568	567	fveq2d 6673	. . . . . 6 ⊢ (𝜑 → (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) = (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶}))
569	568	breq2d 5077	. . . . 5 ⊢ (𝜑 → (2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) ↔ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶})))
570	548, 569	syl5ibr 248	. . . 4 ⊢ (𝜑 → ({𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶} = ∅ → 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵})))
571	570	necon3bd 3030	. . 3 ⊢ (𝜑 → (¬ 2 ∥ (♯‘{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = ⦋(((1st ‘𝑠) ∘f + ((((2nd ‘𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd ‘𝑠) “ ((𝑗 + 1)...𝑁)) × {0}))) ∪ (((𝑁 + 1)...𝑁) × {0})) / 𝑝⦌𝐵}) → {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶} ≠ ∅))
572	542, 571	mpd 15	. 2 ⊢ (𝜑 → {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶} ≠ ∅)
573		rabn0 4338	. 2 ⊢ ({𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) ∣ ∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶} ≠ ∅ ↔ ∃𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶)
574	572, 573	sylib 220	1 ⊢ (𝜑 → ∃𝑠 ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})∀𝑖 ∈ (0...𝑁)∃𝑗 ∈ (0...𝑁)𝑖 = 𝐶)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 398   ∨ wo 843   ∧ w3a 1083   = wceq 1533   ∈ wcel 2110  {cab 2799   ≠ wne 3016  ∀wral 3138  ∃wrex 3139  {crab 3142  Vcvv 3494  ⦋csb 3882   ∖ cdif 3932   ∪ cun 3933   ∩ cin 3934   ⊆ wss 3935  ∅c0 4290  {csn 4566  ⟨cop 4572   class class class wbr 5065   ↦ cmpt 5145   × cxp 5552   “ cima 5557   Fn wfn 6349  ⟶wf 6350  –1-1-onto→wf1o 6353  ‘cfv 6354  (class class class)co 7155   ∘_f cof 7406  1^st c1st 7686  2^nd c2nd 7687  1_oc1o 8094   ↑_m cmap 8405   ≈ cen 8505  Fincfn 8508  ℂcc 10534  ℝcr 10535  0cc0 10536  1c1 10537   + caddc 10539   < clt 10674   ≤ cle 10675   − cmin 10869  ℕcn 11637  2c2 11691  ℕ₀cn0 11896  ℤcz 11980  ℤ_≥cuz 12242  ...cfz 12891  ..^cfzo 13032  ♯chash 13689   ∥ cdvds 15606

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-rep 5189  ax-sep 5202  ax-nul 5209  ax-pow 5265  ax-pr 5329  ax-un 7460  ax-inf2 9103  ax-cnex 10592  ax-resscn 10593  ax-1cn 10594  ax-icn 10595  ax-addcl 10596  ax-addrcl 10597  ax-mulcl 10598  ax-mulrcl 10599  ax-mulcom 10600  ax-addass 10601  ax-mulass 10602  ax-distr 10603  ax-i2m1 10604  ax-1ne0 10605  ax-1rid 10606  ax-rnegex 10607  ax-rrecex 10608  ax-cnre 10609  ax-pre-lttri 10610  ax-pre-lttrn 10611  ax-pre-ltadd 10612  ax-pre-mulgt0 10613  ax-pre-sup 10614

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1536  df-fal 1546  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3772  df-csb 3883  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-pss 3953  df-nul 4291  df-if 4467  df-pw 4540  df-sn 4567  df-pr 4569  df-tp 4571  df-op 4573  df-uni 4838  df-int 4876  df-iun 4920  df-disj 5031  df-br 5066  df-opab 5128  df-mpt 5146  df-tr 5172  df-id 5459  df-eprel 5464  df-po 5473  df-so 5474  df-fr 5513  df-se 5514  df-we 5515  df-xp 5560  df-rel 5561  df-cnv 5562  df-co 5563  df-dm 5564  df-rn 5565  df-res 5566  df-ima 5567  df-pred 6147  df-ord 6193  df-on 6194  df-lim 6195  df-suc 6196  df-iota 6313  df-fun 6356  df-fn 6357  df-f 6358  df-f1 6359  df-fo 6360  df-f1o 6361  df-fv 6362  df-isom 6363  df-riota 7113  df-ov 7158  df-oprab 7159  df-mpo 7160  df-of 7408  df-om 7580  df-1st 7688  df-2nd 7689  df-wrecs 7946  df-recs 8007  df-rdg 8045  df-1o 8101  df-2o 8102  df-oadd 8105  df-er 8288  df-map 8407  df-pm 8408  df-en 8509  df-dom 8510  df-sdom 8511  df-fin 8512  df-sup 8905  df-oi 8973  df-dju 9329  df-card 9367  df-pnf 10676  df-mnf 10677  df-xr 10678  df-ltxr 10679  df-le 10680  df-sub 10871  df-neg 10872  df-div 11297  df-nn 11638  df-2 11699  df-3 11700  df-n0 11897  df-xnn0 11967  df-z 11981  df-uz 12243  df-rp 12389  df-fz 12892  df-fzo 13033  df-seq 13369  df-exp 13429  df-fac 13633  df-bc 13662  df-hash 13690  df-cj 14457  df-re 14458  df-im 14459  df-sqrt 14593  df-abs 14594  df-clim 14844  df-sum 15042  df-dvds 15607

This theorem is referenced by:  poimirlem32  34923