poimirlem9 - Mathbox for Brendan Leahy

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

Theorem poimirlem9 37107

Description: Lemma for poimir 37131, establishing the two walks that yield a given face when the opposite vertex is neither first nor last. (Contributed by Brendan Leahy, 21-Aug-2020.)

**Hypotheses**
Ref	Expression
poimir.0	⊢ (𝜑 → 𝑁 ∈ ℕ)
poimirlem22.s	⊢ 𝑆 = {𝑡 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ ⦋if(𝑦 < (2^nd ‘𝑡), 𝑦, (𝑦 + 1)) / 𝑗⦌((1^st ‘(1^st ‘𝑡)) ∘_f + ((((2^nd ‘(1^st ‘𝑡)) “ (1...𝑗)) × {1}) ∪ (((2^nd ‘(1^st ‘𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}
poimirlem9.1	⊢ (𝜑 → 𝑇 ∈ 𝑆)
poimirlem9.2	⊢ (𝜑 → (2^nd ‘𝑇) ∈ (1...(𝑁 − 1)))
poimirlem9.3	⊢ (𝜑 → 𝑈 ∈ 𝑆)
poimirlem9.4	⊢ (𝜑 → (2^nd ‘(1^st ‘𝑈)) ≠ (2^nd ‘(1^st ‘𝑇)))

**Assertion**
Ref	Expression
poimirlem9	⊢ (𝜑 → (2^nd ‘(1^st ‘𝑈)) = ((2^nd ‘(1^st ‘𝑇)) ∘ ({⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} ∪ ( I ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))))

Distinct variable groups: 𝑓,𝑗,𝑡,𝑦 𝜑,𝑗,𝑦 𝑗,𝐹,𝑦 𝑗,𝑁,𝑦 𝑇,𝑗,𝑦 𝑈,𝑗,𝑦 𝜑,𝑡 𝑓,𝐾,𝑗,𝑡 𝑓,𝑁,𝑡 𝑇,𝑓 𝑈,𝑓 𝑓,𝐹,𝑡 𝑡,𝑇 𝑡,𝑈 𝑆,𝑗,𝑡,𝑦 Allowed substitution hints: 𝜑(𝑓) 𝑆(𝑓) 𝐾(𝑦)

**Proof of Theorem poimirlem9**
Step	Hyp	Ref	Expression
1		resundi 6001	. . . 4 ⊢ ((2^nd ‘(1^st ‘𝑈)) ↾ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∪ ((2^nd ‘(1^st ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))
2		poimir.0	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑁 ∈ ℕ)
3	2	nncnd 12264	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑁 ∈ ℂ)
4		npcan1 11675	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℂ → ((𝑁 − 1) + 1) = 𝑁)
5	3, 4	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑁 − 1) + 1) = 𝑁)
6	2	nnzd 12621	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑁 ∈ ℤ)
7		peano2zm 12641	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℤ → (𝑁 − 1) ∈ ℤ)
8		uzid 12873	. . . . . . . . . . . 12 ⊢ ((𝑁 − 1) ∈ ℤ → (𝑁 − 1) ∈ (ℤ_≥‘(𝑁 − 1)))
9		peano2uz 12921	. . . . . . . . . . . 12 ⊢ ((𝑁 − 1) ∈ (ℤ_≥‘(𝑁 − 1)) → ((𝑁 − 1) + 1) ∈ (ℤ_≥‘(𝑁 − 1)))
10	6, 7, 8, 9	4syl 19	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑁 − 1) + 1) ∈ (ℤ_≥‘(𝑁 − 1)))
11	5, 10	eqeltrrd 2829	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘(𝑁 − 1)))
12		fzss2 13579	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘(𝑁 − 1)) → (1...(𝑁 − 1)) ⊆ (1...𝑁))
13	11, 12	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (1...(𝑁 − 1)) ⊆ (1...𝑁))
14		poimirlem9.2	. . . . . . . . 9 ⊢ (𝜑 → (2^nd ‘𝑇) ∈ (1...(𝑁 − 1)))
15	13, 14	sseldd 3981	. . . . . . . 8 ⊢ (𝜑 → (2^nd ‘𝑇) ∈ (1...𝑁))
16		fzp1elp1 13592	. . . . . . . . . 10 ⊢ ((2^nd ‘𝑇) ∈ (1...(𝑁 − 1)) → ((2^nd ‘𝑇) + 1) ∈ (1...((𝑁 − 1) + 1)))
17	14, 16	syl 17	. . . . . . . . 9 ⊢ (𝜑 → ((2^nd ‘𝑇) + 1) ∈ (1...((𝑁 − 1) + 1)))
18	5	oveq2d 7440	. . . . . . . . 9 ⊢ (𝜑 → (1...((𝑁 − 1) + 1)) = (1...𝑁))
19	17, 18	eleqtrd 2830	. . . . . . . 8 ⊢ (𝜑 → ((2^nd ‘𝑇) + 1) ∈ (1...𝑁))
20	15, 19	prssd 4828	. . . . . . 7 ⊢ (𝜑 → {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁))
21		undif 4483	. . . . . . 7 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁) ↔ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = (1...𝑁))
22	20, 21	sylib 217	. . . . . 6 ⊢ (𝜑 → ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = (1...𝑁))
23	22	reseq2d 5987	. . . . 5 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑈)) ↾ (1...𝑁)))
24		poimirlem9.3	. . . . . . . 8 ⊢ (𝜑 → 𝑈 ∈ 𝑆)
25		elrabi 3676	. . . . . . . . 9 ⊢ (𝑈 ∈ {𝑡 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ ⦋if(𝑦 < (2^nd ‘𝑡), 𝑦, (𝑦 + 1)) / 𝑗⦌((1^st ‘(1^st ‘𝑡)) ∘_f + ((((2^nd ‘(1^st ‘𝑡)) “ (1...𝑗)) × {1}) ∪ (((2^nd ‘(1^st ‘𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} → 𝑈 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
26		poimirlem22.s	. . . . . . . . 9 ⊢ 𝑆 = {𝑡 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ ⦋if(𝑦 < (2^nd ‘𝑡), 𝑦, (𝑦 + 1)) / 𝑗⦌((1^st ‘(1^st ‘𝑡)) ∘_f + ((((2^nd ‘(1^st ‘𝑡)) “ (1...𝑗)) × {1}) ∪ (((2^nd ‘(1^st ‘𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}
27	25, 26	eleq2s 2846	. . . . . . . 8 ⊢ (𝑈 ∈ 𝑆 → 𝑈 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
28		xp1st 8029	. . . . . . . 8 ⊢ (𝑈 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1^st ‘𝑈) ∈ (((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
29		xp2nd 8030	. . . . . . . 8 ⊢ ((1^st ‘𝑈) ∈ (((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (2^nd ‘(1^st ‘𝑈)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
30	24, 27, 28, 29	4syl 19	. . . . . . 7 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑈)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
31		fvex 6913	. . . . . . . 8 ⊢ (2^nd ‘(1^st ‘𝑈)) ∈ V
32		f1oeq1 6830	. . . . . . . 8 ⊢ (𝑓 = (2^nd ‘(1^st ‘𝑈)) → (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) ↔ (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁)))
33	31, 32	elab 3667	. . . . . . 7 ⊢ ((2^nd ‘(1^st ‘𝑈)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ↔ (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁))
34	30, 33	sylib 217	. . . . . 6 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁))
35		f1ofn 6843	. . . . . 6 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑈)) Fn (1...𝑁))
36		fnresdm 6677	. . . . . 6 ⊢ ((2^nd ‘(1^st ‘𝑈)) Fn (1...𝑁) → ((2^nd ‘(1^st ‘𝑈)) ↾ (1...𝑁)) = (2^nd ‘(1^st ‘𝑈)))
37	34, 35, 36	3syl 18	. . . . 5 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ (1...𝑁)) = (2^nd ‘(1^st ‘𝑈)))
38	23, 37	eqtrd 2767	. . . 4 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (2^nd ‘(1^st ‘𝑈)))
39	1, 38	eqtr3id 2781	. . 3 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∪ ((2^nd ‘(1^st ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (2^nd ‘(1^st ‘𝑈)))
40		2lt3 12420	. . . . . 6 ⊢ 2 < 3
41		2re 12322	. . . . . . 7 ⊢ 2 ∈ ℝ
42		3re 12328	. . . . . . 7 ⊢ 3 ∈ ℝ
43	41, 42	ltnlei 11371	. . . . . 6 ⊢ (2 < 3 ↔ ¬ 3 ≤ 2)
44	40, 43	mpbi 229	. . . . 5 ⊢ ¬ 3 ≤ 2
45		df-pr 4633	. . . . . . . . . . . 12 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} = ({⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩} ∪ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})
46	45	coeq2i 5865	. . . . . . . . . . 11 ⊢ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) = ((2^nd ‘(1^st ‘𝑇)) ∘ ({⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩} ∪ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}))
47		coundi 6254	. . . . . . . . . . 11 ⊢ ((2^nd ‘(1^st ‘𝑇)) ∘ ({⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩} ∪ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) = (((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}) ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}))
48	46, 47	eqtri 2755	. . . . . . . . . 10 ⊢ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) = (((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}) ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}))
49		poimirlem9.1	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → 𝑇 ∈ 𝑆)
50		elrabi 3676	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑇 ∈ {𝑡 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ ⦋if(𝑦 < (2^nd ‘𝑡), 𝑦, (𝑦 + 1)) / 𝑗⦌((1^st ‘(1^st ‘𝑡)) ∘_f + ((((2^nd ‘(1^st ‘𝑡)) “ (1...𝑗)) × {1}) ∪ (((2^nd ‘(1^st ‘𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} → 𝑇 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
51	50, 26	eleq2s 2846	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑇 ∈ 𝑆 → 𝑇 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
52		xp1st 8029	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑇 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1^st ‘𝑇) ∈ (((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
53		xp2nd 8030	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((1^st ‘𝑇) ∈ (((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (2^nd ‘(1^st ‘𝑇)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
54	49, 51, 52, 53	4syl 19	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑇)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
55		fvex 6913	. . . . . . . . . . . . . . . . . . . 20 ⊢ (2^nd ‘(1^st ‘𝑇)) ∈ V
56		f1oeq1 6830	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑓 = (2^nd ‘(1^st ‘𝑇)) → (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) ↔ (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁)))
57	55, 56	elab 3667	. . . . . . . . . . . . . . . . . . 19 ⊢ ((2^nd ‘(1^st ‘𝑇)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ↔ (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁))
58	54, 57	sylib 217	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁))
59		f1of1 6841	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1→(1...𝑁))
60	58, 59	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1→(1...𝑁))
61	19	snssd 4815	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → {((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁))
62		f1ores 6856	. . . . . . . . . . . . . . . . 17 ⊢ (((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1→(1...𝑁) ∧ {((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁)) → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}–1-1-onto→((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)}))
63	60, 61, 62	syl2anc 582	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}–1-1-onto→((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)}))
64		f1of 6842	. . . . . . . . . . . . . . . 16 ⊢ (((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}–1-1-onto→((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)}) → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}⟶((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)}))
65	63, 64	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}⟶((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)}))
66		f1ofn 6843	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑇)) Fn (1...𝑁))
67	58, 66	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑇)) Fn (1...𝑁))
68		fnsnfv 6980	. . . . . . . . . . . . . . . . 17 ⊢ (((2^nd ‘(1^st ‘𝑇)) Fn (1...𝑁) ∧ ((2^nd ‘𝑇) + 1) ∈ (1...𝑁)) → {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} = ((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)}))
69	67, 19, 68	syl2anc 582	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} = ((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)}))
70	69	feq3d 6712	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} ↔ ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}⟶((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)})))
71	65, 70	mpbird 256	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))})
72		eqid 2727	. . . . . . . . . . . . . . 15 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩} = {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}
73		fvex 6913	. . . . . . . . . . . . . . . 16 ⊢ (2^nd ‘𝑇) ∈ V
74		ovex 7457	. . . . . . . . . . . . . . . 16 ⊢ ((2^nd ‘𝑇) + 1) ∈ V
75	73, 74	fsn 7148	. . . . . . . . . . . . . . 15 ⊢ ({⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}:{(2^nd ‘𝑇)}⟶{((2^nd ‘𝑇) + 1)} ↔ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩} = {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩})
76	72, 75	mpbir 230	. . . . . . . . . . . . . 14 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}:{(2^nd ‘𝑇)}⟶{((2^nd ‘𝑇) + 1)}
77		fco2 6753	. . . . . . . . . . . . . 14 ⊢ ((((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} ∧ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}:{(2^nd ‘𝑇)}⟶{((2^nd ‘𝑇) + 1)}) → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}):{(2^nd ‘𝑇)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))})
78	71, 76, 77	sylancl 584	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}):{(2^nd ‘𝑇)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))})
79		fvex 6913	. . . . . . . . . . . . . 14 ⊢ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) ∈ V
80	79	fconst2 7221	. . . . . . . . . . . . 13 ⊢ (((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}):{(2^nd ‘𝑇)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} ↔ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}) = ({(2^nd ‘𝑇)} × {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))}))
81	78, 80	sylib 217	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}) = ({(2^nd ‘𝑇)} × {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))}))
82	73, 79	xpsn 7154	. . . . . . . . . . . 12 ⊢ ({(2^nd ‘𝑇)} × {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))}) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}
83	81, 82	eqtrdi 2783	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
84	83	uneq1d 4161	. . . . . . . . . 10 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}) ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) = ({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})))
85	48, 84	eqtrid 2779	. . . . . . . . 9 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) = ({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})))
86		elfznn 13568	. . . . . . . . . . . . . . . . 17 ⊢ ((2^nd ‘𝑇) ∈ (1...(𝑁 − 1)) → (2^nd ‘𝑇) ∈ ℕ)
87	14, 86	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (2^nd ‘𝑇) ∈ ℕ)
88	87	nnred 12263	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (2^nd ‘𝑇) ∈ ℝ)
89	88	ltp1d 12180	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (2^nd ‘𝑇) < ((2^nd ‘𝑇) + 1))
90	88, 89	ltned 11386	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1))
91	90	necomd 2992	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘𝑇) + 1) ≠ (2^nd ‘𝑇))
92		f1veqaeq 7271	. . . . . . . . . . . . . . 15 ⊢ (((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1→(1...𝑁) ∧ (((2^nd ‘𝑇) + 1) ∈ (1...𝑁) ∧ (2^nd ‘𝑇) ∈ (1...𝑁))) → (((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) = ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) → ((2^nd ‘𝑇) + 1) = (2^nd ‘𝑇)))
93	60, 19, 15, 92	syl12anc 835	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) = ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) → ((2^nd ‘𝑇) + 1) = (2^nd ‘𝑇)))
94	93	necon3d 2957	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((2^nd ‘𝑇) + 1) ≠ (2^nd ‘𝑇) → ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) ≠ ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))))
95	91, 94	mpd 15	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) ≠ ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)))
96	95	neneqd 2941	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) = ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)))
97	73, 79	opth 5480	. . . . . . . . . . . 12 ⊢ (⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩ ↔ ((2^nd ‘𝑇) = (2^nd ‘𝑇) ∧ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) = ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))))
98	97	simprbi 495	. . . . . . . . . . 11 ⊢ (⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩ → ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) = ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)))
99	96, 98	nsyl 140	. . . . . . . . . 10 ⊢ (𝜑 → ¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩)
100	90	neneqd 2941	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ (2^nd ‘𝑇) = ((2^nd ‘𝑇) + 1))
101	73, 79	opth1 5479	. . . . . . . . . . 11 ⊢ (⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ → (2^nd ‘𝑇) = ((2^nd ‘𝑇) + 1))
102	100, 101	nsyl 140	. . . . . . . . . 10 ⊢ (𝜑 → ¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩)
103		opex 5468	. . . . . . . . . . . . . . 15 ⊢ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ V
104	103	snid 4667	. . . . . . . . . . . . . 14 ⊢ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}
105		elun1 4176	. . . . . . . . . . . . . 14 ⊢ (⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} → ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ ({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})))
106	104, 105	ax-mp 5	. . . . . . . . . . . . 13 ⊢ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ ({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}))
107		eleq2 2817	. . . . . . . . . . . . 13 ⊢ (({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} → (⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ ({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) ↔ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}))
108	106, 107	mpbii 232	. . . . . . . . . . . 12 ⊢ (({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} → ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
109	103	elpr 4654	. . . . . . . . . . . . 13 ⊢ (⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ↔ (⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩ ∨ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩))
110		oran 987	. . . . . . . . . . . . 13 ⊢ ((⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩ ∨ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩) ↔ ¬ (¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩ ∧ ¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩))
111	109, 110	bitri 274	. . . . . . . . . . . 12 ⊢ (⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ↔ ¬ (¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩ ∧ ¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩))
112	108, 111	sylib 217	. . . . . . . . . . 11 ⊢ (({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} → ¬ (¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩ ∧ ¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩))
113	112	necon2ai 2966	. . . . . . . . . 10 ⊢ ((¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩ ∧ ¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩) → ({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) ≠ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
114	99, 102, 113	syl2anc 582	. . . . . . . . 9 ⊢ (𝜑 → ({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) ≠ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
115	85, 114	eqnetrd 3004	. . . . . . . 8 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) ≠ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
116		fnressn 7171	. . . . . . . . . . . 12 ⊢ (((2^nd ‘(1^st ‘𝑇)) Fn (1...𝑁) ∧ (2^nd ‘𝑇) ∈ (1...𝑁)) → ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇)}) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩})
117	67, 15, 116	syl2anc 582	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇)}) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩})
118		fnressn 7171	. . . . . . . . . . . 12 ⊢ (((2^nd ‘(1^st ‘𝑇)) Fn (1...𝑁) ∧ ((2^nd ‘𝑇) + 1) ∈ (1...𝑁)) → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}) = {⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
119	67, 19, 118	syl2anc 582	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}) = {⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
120	117, 119	uneq12d 4163	. . . . . . . . . 10 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇)}) ∪ ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)})) = ({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩} ∪ {⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}))
121		df-pr 4633	. . . . . . . . . . . 12 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} = ({(2^nd ‘𝑇)} ∪ {((2^nd ‘𝑇) + 1)})
122	121	reseq2i 5984	. . . . . . . . . . 11 ⊢ ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = ((2^nd ‘(1^st ‘𝑇)) ↾ ({(2^nd ‘𝑇)} ∪ {((2^nd ‘𝑇) + 1)}))
123		resundi 6001	. . . . . . . . . . 11 ⊢ ((2^nd ‘(1^st ‘𝑇)) ↾ ({(2^nd ‘𝑇)} ∪ {((2^nd ‘𝑇) + 1)})) = (((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇)}) ∪ ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}))
124	122, 123	eqtri 2755	. . . . . . . . . 10 ⊢ ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = (((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇)}) ∪ ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}))
125		df-pr 4633	. . . . . . . . . 10 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} = ({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩} ∪ {⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
126	120, 124, 125	3eqtr4g 2792	. . . . . . . . 9 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
127		poimirlem9.4	. . . . . . . . . . 11 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑈)) ≠ (2^nd ‘(1^st ‘𝑇)))
128	2, 26, 49, 14, 24	poimirlem8 37106	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = ((2^nd ‘(1^st ‘𝑇)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))
129		uneq12 4157	. . . . . . . . . . . . . 14 ⊢ ((((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∧ ((2^nd ‘(1^st ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = ((2^nd ‘(1^st ‘𝑇)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) → (((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∪ ((2^nd ‘(1^st ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∪ ((2^nd ‘(1^st ‘𝑇)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))))
130		resundi 6001	. . . . . . . . . . . . . . . 16 ⊢ ((2^nd ‘(1^st ‘𝑇)) ↾ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∪ ((2^nd ‘(1^st ‘𝑇)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))
131	22	reseq2d 5987	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑇)) ↾ (1...𝑁)))
132		fnresdm 6677	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑇)) Fn (1...𝑁) → ((2^nd ‘(1^st ‘𝑇)) ↾ (1...𝑁)) = (2^nd ‘(1^st ‘𝑇)))
133	58, 66, 132	3syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ (1...𝑁)) = (2^nd ‘(1^st ‘𝑇)))
134	131, 133	eqtrd 2767	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (2^nd ‘(1^st ‘𝑇)))
135	130, 134	eqtr3id 2781	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∪ ((2^nd ‘(1^st ‘𝑇)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (2^nd ‘(1^st ‘𝑇)))
136	39, 135	eqeq12d 2743	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∪ ((2^nd ‘(1^st ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∪ ((2^nd ‘(1^st ‘𝑇)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) ↔ (2^nd ‘(1^st ‘𝑈)) = (2^nd ‘(1^st ‘𝑇))))
137	129, 136	imbitrid 243	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∧ ((2^nd ‘(1^st ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = ((2^nd ‘(1^st ‘𝑇)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) → (2^nd ‘(1^st ‘𝑈)) = (2^nd ‘(1^st ‘𝑇))))
138	128, 137	mpan2d 692	. . . . . . . . . . . 12 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) → (2^nd ‘(1^st ‘𝑈)) = (2^nd ‘(1^st ‘𝑇))))
139	138	necon3d 2957	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ≠ (2^nd ‘(1^st ‘𝑇)) → ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))
140	127, 139	mpd 15	. . . . . . . . . 10 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
141	140	necomd 2992	. . . . . . . . 9 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
142	126, 141	eqnetrrd 3005	. . . . . . . 8 ⊢ (𝜑 → {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ≠ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
143		prex 5436	. . . . . . . . . . . 12 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} ∈ V
144	55, 143	coex 7942	. . . . . . . . . . 11 ⊢ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) ∈ V
145		prex 5436	. . . . . . . . . . 11 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∈ V
146	31	resex 6036	. . . . . . . . . . 11 ⊢ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∈ V
147		hashtpg 14484	. . . . . . . . . . 11 ⊢ ((((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) ∈ V ∧ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∈ V ∧ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∈ V) → ((((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) ≠ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∧ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ≠ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∧ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) ↔ (♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) = 3))
148	144, 145, 146, 147	mp3an 1457	. . . . . . . . . 10 ⊢ ((((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) ≠ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∧ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ≠ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∧ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) ↔ (♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) = 3)
149	148	biimpi 215	. . . . . . . . 9 ⊢ ((((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) ≠ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∧ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ≠ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∧ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) → (♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) = 3)
150	149	3expia 1118	. . . . . . . 8 ⊢ ((((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) ≠ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∧ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ≠ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) → (((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) → (♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) = 3))
151	115, 142, 150	syl2anc 582	. . . . . . 7 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) → (♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) = 3))
152		prex 5436	. . . . . . . . . . . . 13 ⊢ {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∈ V
153		prex 5436	. . . . . . . . . . . . 13 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∈ V
154	152, 153	mapval 8861	. . . . . . . . . . . 12 ⊢ ({((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ↑_m {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}}
155		prfi 9352	. . . . . . . . . . . . 13 ⊢ {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∈ Fin
156		prfi 9352	. . . . . . . . . . . . 13 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∈ Fin
157		mapfi 9378	. . . . . . . . . . . . 13 ⊢ (({((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∈ Fin ∧ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∈ Fin) → ({((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ↑_m {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∈ Fin)
158	155, 156, 157	mp2an 690	. . . . . . . . . . . 12 ⊢ ({((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ↑_m {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∈ Fin
159	154, 158	eqeltrri 2825	. . . . . . . . . . 11 ⊢ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ∈ Fin
160		f1of 6842	. . . . . . . . . . . 12 ⊢ (𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} → 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
161	160	ss2abi 4061	. . . . . . . . . . 11 ⊢ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ⊆ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}}
162		ssfi 9202	. . . . . . . . . . 11 ⊢ (({𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ∈ Fin ∧ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ⊆ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}}) → {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ∈ Fin)
163	159, 161, 162	mp2an 690	. . . . . . . . . 10 ⊢ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ∈ Fin
164	19, 15	prssd 4828	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)} ⊆ (1...𝑁))
165		f1ores 6856	. . . . . . . . . . . . . . 15 ⊢ (((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1→(1...𝑁) ∧ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)} ⊆ (1...𝑁)) → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}):{((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}–1-1-onto→((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}))
166	60, 164, 165	syl2anc 582	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}):{((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}–1-1-onto→((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}))
167		fnimapr 6985	. . . . . . . . . . . . . . . 16 ⊢ (((2^nd ‘(1^st ‘𝑇)) Fn (1...𝑁) ∧ ((2^nd ‘𝑇) + 1) ∈ (1...𝑁) ∧ (2^nd ‘𝑇) ∈ (1...𝑁)) → ((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}) = {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
168	67, 19, 15, 167	syl3anc 1368	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}) = {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
169	168	f1oeq3d 6839	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}):{((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}–1-1-onto→((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}) ↔ ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}):{((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}))
170	166, 169	mpbid 231	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}):{((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
171		f1oprg 6887	. . . . . . . . . . . . . . 15 ⊢ ((((2^nd ‘𝑇) ∈ V ∧ ((2^nd ‘𝑇) + 1) ∈ V) ∧ (((2^nd ‘𝑇) + 1) ∈ V ∧ (2^nd ‘𝑇) ∈ V)) → (((2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1) ∧ ((2^nd ‘𝑇) + 1) ≠ (2^nd ‘𝑇)) → {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}))
172	73, 74, 74, 73, 171	mp4an 691	. . . . . . . . . . . . . 14 ⊢ (((2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1) ∧ ((2^nd ‘𝑇) + 1) ≠ (2^nd ‘𝑇)) → {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)})
173	90, 91, 172	syl2anc 582	. . . . . . . . . . . . 13 ⊢ (𝜑 → {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)})
174		f1oco 6865	. . . . . . . . . . . . 13 ⊢ ((((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}):{((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∧ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}) → (((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
175	170, 173, 174	syl2anc 582	. . . . . . . . . . . 12 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
176		rnpropg 6229	. . . . . . . . . . . . . . 15 ⊢ (((2^nd ‘𝑇) ∈ V ∧ ((2^nd ‘𝑇) + 1) ∈ V) → ran {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} = {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)})
177	73, 74, 176	mp2an 690	. . . . . . . . . . . . . 14 ⊢ ran {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} = {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}
178	177	eqimssi 4040	. . . . . . . . . . . . 13 ⊢ ran {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} ⊆ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}
179		cores 6256	. . . . . . . . . . . . 13 ⊢ (ran {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} ⊆ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)} → (((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) = ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}))
180		f1oeq1 6830	. . . . . . . . . . . . 13 ⊢ ((((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) = ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) → ((((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ↔ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}))
181	178, 179, 180	mp2b 10	. . . . . . . . . . . 12 ⊢ ((((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ↔ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
182	175, 181	sylib 217	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
183	95	necomd 2992	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) ≠ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)))
184		fvex 6913	. . . . . . . . . . . . . 14 ⊢ ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) ∈ V
185		f1oprg 6887	. . . . . . . . . . . . . 14 ⊢ ((((2^nd ‘𝑇) ∈ V ∧ ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) ∈ V) ∧ (((2^nd ‘𝑇) + 1) ∈ V ∧ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) ∈ V)) → (((2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1) ∧ ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) ≠ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))) → {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))}))
186	73, 184, 74, 79, 185	mp4an 691	. . . . . . . . . . . . 13 ⊢ (((2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1) ∧ ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) ≠ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))) → {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))})
187	90, 183, 186	syl2anc 582	. . . . . . . . . . . 12 ⊢ (𝜑 → {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))})
188		prcom 4739	. . . . . . . . . . . . 13 ⊢ {((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} = {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}
189		f1oeq3 6832	. . . . . . . . . . . . 13 ⊢ ({((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} = {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} → ({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} ↔ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}))
190	188, 189	ax-mp 5	. . . . . . . . . . . 12 ⊢ ({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} ↔ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
191	187, 190	sylib 217	. . . . . . . . . . 11 ⊢ (𝜑 → {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
192		f1of1 6841	. . . . . . . . . . . . . 14 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1→(1...𝑁))
193	34, 192	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1→(1...𝑁))
194		f1ores 6856	. . . . . . . . . . . . 13 ⊢ (((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1→(1...𝑁) ∧ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁)) → ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→((2^nd ‘(1^st ‘𝑈)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
195	193, 20, 194	syl2anc 582	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→((2^nd ‘(1^st ‘𝑈)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
196		dff1o3 6848	. . . . . . . . . . . . . . . . 17 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) ↔ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–onto→(1...𝑁) ∧ Fun ^◡(2^nd ‘(1^st ‘𝑈))))
197	196	simprbi 495	. . . . . . . . . . . . . . . 16 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → Fun ^◡(2^nd ‘(1^st ‘𝑈)))
198		imadif 6640	. . . . . . . . . . . . . . . 16 ⊢ (Fun ^◡(2^nd ‘(1^st ‘𝑈)) → ((2^nd ‘(1^st ‘𝑈)) “ ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (((2^nd ‘(1^st ‘𝑈)) “ (1...𝑁)) ∖ ((2^nd ‘(1^st ‘𝑈)) “ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))))
199	34, 197, 198	3syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (((2^nd ‘(1^st ‘𝑈)) “ (1...𝑁)) ∖ ((2^nd ‘(1^st ‘𝑈)) “ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))))
200		f1ofo 6849	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–onto→(1...𝑁))
201		foima 6819	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–onto→(1...𝑁) → ((2^nd ‘(1^st ‘𝑈)) “ (1...𝑁)) = (1...𝑁))
202	34, 200, 201	3syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ (1...𝑁)) = (1...𝑁))
203		f1ofo 6849	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–onto→(1...𝑁))
204		foima 6819	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–onto→(1...𝑁) → ((2^nd ‘(1^st ‘𝑇)) “ (1...𝑁)) = (1...𝑁))
205	58, 203, 204	3syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) “ (1...𝑁)) = (1...𝑁))
206	202, 205	eqtr4d 2770	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ (1...𝑁)) = ((2^nd ‘(1^st ‘𝑇)) “ (1...𝑁)))
207	128	rneqd 5942	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ran ((2^nd ‘(1^st ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = ran ((2^nd ‘(1^st ‘𝑇)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))
208		df-ima 5693	. . . . . . . . . . . . . . . . 17 ⊢ ((2^nd ‘(1^st ‘𝑈)) “ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = ran ((2^nd ‘(1^st ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
209		df-ima 5693	. . . . . . . . . . . . . . . . 17 ⊢ ((2^nd ‘(1^st ‘𝑇)) “ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = ran ((2^nd ‘(1^st ‘𝑇)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
210	207, 208, 209	3eqtr4g 2792	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = ((2^nd ‘(1^st ‘𝑇)) “ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))
211	206, 210	difeq12d 4121	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑈)) “ (1...𝑁)) ∖ ((2^nd ‘(1^st ‘𝑈)) “ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (((2^nd ‘(1^st ‘𝑇)) “ (1...𝑁)) ∖ ((2^nd ‘(1^st ‘𝑇)) “ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))))
212		dff1o3 6848	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) ↔ ((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–onto→(1...𝑁) ∧ Fun ^◡(2^nd ‘(1^st ‘𝑇))))
213	212	simprbi 495	. . . . . . . . . . . . . . . . 17 ⊢ ((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → Fun ^◡(2^nd ‘(1^st ‘𝑇)))
214		imadif 6640	. . . . . . . . . . . . . . . . 17 ⊢ (Fun ^◡(2^nd ‘(1^st ‘𝑇)) → ((2^nd ‘(1^st ‘𝑇)) “ ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (((2^nd ‘(1^st ‘𝑇)) “ (1...𝑁)) ∖ ((2^nd ‘(1^st ‘𝑇)) “ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))))
215	58, 213, 214	3syl 18	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) “ ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (((2^nd ‘(1^st ‘𝑇)) “ (1...𝑁)) ∖ ((2^nd ‘(1^st ‘𝑇)) “ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))))
216		dfin4 4268	. . . . . . . . . . . . . . . . . 18 ⊢ ((1...𝑁) ∩ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
217		sseqin2 4215	. . . . . . . . . . . . . . . . . . 19 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁) ↔ ((1...𝑁) ∩ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
218	20, 217	sylib 217	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ((1...𝑁) ∩ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
219	216, 218	eqtr3id 2781	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
220	219	imaeq2d 6066	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) “ ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑇)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
221	215, 220	eqtr3d 2769	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑇)) “ (1...𝑁)) ∖ ((2^nd ‘(1^st ‘𝑇)) “ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑇)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
222	199, 211, 221	3eqtrd 2771	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑇)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
223	219	imaeq2d 6066	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑈)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
224		fnimapr 6985	. . . . . . . . . . . . . . . 16 ⊢ (((2^nd ‘(1^st ‘𝑇)) Fn (1...𝑁) ∧ (2^nd ‘𝑇) ∈ (1...𝑁) ∧ ((2^nd ‘𝑇) + 1) ∈ (1...𝑁)) → ((2^nd ‘(1^st ‘𝑇)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))})
225	67, 15, 19, 224	syl3anc 1368	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))})
226	225, 188	eqtrdi 2783	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
227	222, 223, 226	3eqtr3d 2775	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
228	227	f1oeq3d 6839	. . . . . . . . . . . 12 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→((2^nd ‘(1^st ‘𝑈)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ↔ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}))
229	195, 228	mpbid 231	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
230		ssabral 4057	. . . . . . . . . . . 12 ⊢ ({((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})} ⊆ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ↔ ∀𝑓 ∈ {((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
231		f1oeq1 6830	. . . . . . . . . . . . 13 ⊢ (𝑓 = ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) → (𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ↔ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}))
232		f1oeq1 6830	. . . . . . . . . . . . 13 ⊢ (𝑓 = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} → (𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ↔ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}))
233		f1oeq1 6830	. . . . . . . . . . . . 13 ⊢ (𝑓 = ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) → (𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ↔ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}))
234	144, 145, 146, 231, 232, 233	raltp 4712	. . . . . . . . . . . 12 ⊢ (∀𝑓 ∈ {((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ↔ (((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∧ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∧ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}))
235	230, 234	bitri 274	. . . . . . . . . . 11 ⊢ ({((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})} ⊆ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ↔ (((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∧ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∧ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}))
236	182, 191, 229, 235	syl3anbrc 1340	. . . . . . . . . 10 ⊢ (𝜑 → {((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})} ⊆ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}})
237		hashss 14406	. . . . . . . . . 10 ⊢ (({𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ∈ Fin ∧ {((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})} ⊆ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}}) → (♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) ≤ (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}}))
238	163, 236, 237	sylancr 585	. . . . . . . . 9 ⊢ (𝜑 → (♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) ≤ (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}}))
239	153	enref 9010	. . . . . . . . . . . 12 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ≈ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}
240		hashprg 14392	. . . . . . . . . . . . . . . 16 ⊢ ((((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) ∈ V ∧ ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) ∈ V) → (((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) ≠ ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) ↔ (♯‘{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}) = 2))
241	79, 184, 240	mp2an 690	. . . . . . . . . . . . . . 15 ⊢ (((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) ≠ ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) ↔ (♯‘{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}) = 2)
242	95, 241	sylib 217	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (♯‘{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}) = 2)
243		hashprg 14392	. . . . . . . . . . . . . . . 16 ⊢ (((2^nd ‘𝑇) ∈ V ∧ ((2^nd ‘𝑇) + 1) ∈ V) → ((2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1) ↔ (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = 2))
244	73, 74, 243	mp2an 690	. . . . . . . . . . . . . . 15 ⊢ ((2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1) ↔ (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = 2)
245	90, 244	sylib 217	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = 2)
246	242, 245	eqtr4d 2770	. . . . . . . . . . . . 13 ⊢ (𝜑 → (♯‘{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}) = (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
247		hashen 14344	. . . . . . . . . . . . . 14 ⊢ (({((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∈ Fin ∧ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∈ Fin) → ((♯‘{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}) = (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ↔ {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ≈ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
248	155, 156, 247	mp2an 690	. . . . . . . . . . . . 13 ⊢ ((♯‘{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}) = (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ↔ {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ≈ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
249	246, 248	sylib 217	. . . . . . . . . . . 12 ⊢ (𝜑 → {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ≈ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
250		hashfacen 14451	. . . . . . . . . . . 12 ⊢ (({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ≈ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∧ {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ≈ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) → {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ≈ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}})
251	239, 249, 250	sylancr 585	. . . . . . . . . . 11 ⊢ (𝜑 → {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ≈ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}})
252	153, 153	mapval 8861	. . . . . . . . . . . . . 14 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ↑_m {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}
253		mapfi 9378	. . . . . . . . . . . . . . 15 ⊢ (({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∈ Fin ∧ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∈ Fin) → ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ↑_m {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∈ Fin)
254	156, 156, 253	mp2an 690	. . . . . . . . . . . . . 14 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ↑_m {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∈ Fin
255	252, 254	eqeltrri 2825	. . . . . . . . . . . . 13 ⊢ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}} ∈ Fin
256		f1of 6842	. . . . . . . . . . . . . 14 ⊢ (𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} → 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
257	256	ss2abi 4061	. . . . . . . . . . . . 13 ⊢ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}} ⊆ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}
258		ssfi 9202	. . . . . . . . . . . . 13 ⊢ (({𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}} ∈ Fin ∧ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}} ⊆ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}) → {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}} ∈ Fin)
259	255, 257, 258	mp2an 690	. . . . . . . . . . . 12 ⊢ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}} ∈ Fin
260		hashen 14344	. . . . . . . . . . . 12 ⊢ (({𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ∈ Fin ∧ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}} ∈ Fin) → ((♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}}) = (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}) ↔ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ≈ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}))
261	163, 259, 260	mp2an 690	. . . . . . . . . . 11 ⊢ ((♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}}) = (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}) ↔ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ≈ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}})
262	251, 261	sylibr 233	. . . . . . . . . 10 ⊢ (𝜑 → (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}}) = (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}))
263		hashfac 14457	. . . . . . . . . . . 12 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∈ Fin → (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}) = (!‘(♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))
264	156, 263	ax-mp 5	. . . . . . . . . . 11 ⊢ (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}) = (!‘(♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
265	245	fveq2d 6904	. . . . . . . . . . . 12 ⊢ (𝜑 → (!‘(♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = (!‘2))
266		fac2 14276	. . . . . . . . . . . 12 ⊢ (!‘2) = 2
267	265, 266	eqtrdi 2783	. . . . . . . . . . 11 ⊢ (𝜑 → (!‘(♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = 2)
268	264, 267	eqtrid 2779	. . . . . . . . . 10 ⊢ (𝜑 → (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}) = 2)
269	262, 268	eqtrd 2767	. . . . . . . . 9 ⊢ (𝜑 → (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}}) = 2)
270	238, 269	breqtrd 5176	. . . . . . . 8 ⊢ (𝜑 → (♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) ≤ 2)
271		breq1 5153	. . . . . . . 8 ⊢ ((♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) = 3 → ((♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) ≤ 2 ↔ 3 ≤ 2))
272	270, 271	syl5ibcom 244	. . . . . . 7 ⊢ (𝜑 → ((♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) = 3 → 3 ≤ 2))
273	151, 272	syld 47	. . . . . 6 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) → 3 ≤ 2))
274	273	necon1bd 2954	. . . . 5 ⊢ (𝜑 → (¬ 3 ≤ 2 → ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})))
275	44, 274	mpi 20	. . . 4 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}))
276		coires1 6271	. . . . 5 ⊢ ((2^nd ‘(1^st ‘𝑇)) ∘ ( I ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑇)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
277	128, 276	eqtr4di 2785	. . . 4 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = ((2^nd ‘(1^st ‘𝑇)) ∘ ( I ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))))
278	275, 277	uneq12d 4163	. . 3 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∪ ((2^nd ‘(1^st ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ ( I ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))))
279	39, 278	eqtr3d 2769	. 2 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑈)) = (((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ ( I ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))))
280		coundi 6254	. 2 ⊢ ((2^nd ‘(1^st ‘𝑇)) ∘ ({⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} ∪ ( I ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))) = (((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ ( I ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))))
281	279, 280	eqtr4di 2785	1 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑈)) = ((2^nd ‘(1^st ‘𝑇)) ∘ ({⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} ∪ ( I ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 394 ∨ wo 845 ∧ w3a 1084 = wceq 1533 ∈ wcel 2098 {cab 2704 ≠ wne 2936 ∀wral 3057 {crab 3428 Vcvv 3471 ⦋csb 3892 ∖ cdif 3944 ∪ cun 3945 ∩ cin 3946 ⊆ wss 3947 ifcif 4530 {csn 4630 {cpr 4632 {ctp 4634 ⟨cop 4636 class class class wbr 5150 ↦ cmpt 5233 I cid 5577 × cxp 5678 ^◡ccnv 5679 ran crn 5681 ↾ cres 5682 “ cima 5683 ∘ ccom 5684 Fun wfun 6545 Fn wfn 6546 ⟶wf 6547 –1-1→wf1 6548 –onto→wfo 6549 –1-1-onto→wf1o 6550 ‘cfv 6551 (class class class)co 7424 ∘_f cof 7687 1^st c1st 7995 2^nd c2nd 7996 ↑_m cmap 8849 ≈ cen 8965 Fincfn 8968 ℂcc 11142 0cc0 11144 1c1 11145 + caddc 11147 < clt 11284 ≤ cle 11285 − cmin 11480 ℕcn 12248 2c2 12303 3c3 12304 ℤcz 12594 ℤ_≥cuz 12858 ...cfz 13522 ..^cfzo 13665 !cfa 14270 ♯chash 14327

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1789 ax-4 1803 ax-5 1905 ax-6 1963 ax-7 2003 ax-8 2100 ax-9 2108 ax-10 2129 ax-11 2146 ax-12 2166 ax-ext 2698 ax-rep 5287 ax-sep 5301 ax-nul 5308 ax-pow 5367 ax-pr 5431 ax-un 7744 ax-cnex 11200 ax-resscn 11201 ax-1cn 11202 ax-icn 11203 ax-addcl 11204 ax-addrcl 11205 ax-mulcl 11206 ax-mulrcl 11207 ax-mulcom 11208 ax-addass 11209 ax-mulass 11210 ax-distr 11211 ax-i2m1 11212 ax-1ne0 11213 ax-1rid 11214 ax-rnegex 11215 ax-rrecex 11216 ax-cnre 11217 ax-pre-lttri 11218 ax-pre-lttrn 11219 ax-pre-ltadd 11220 ax-pre-mulgt0 11221

This theorem depends on definitions: df-bi 206 df-an 395 df-or 846 df-3or 1085 df-3an 1086 df-tru 1536 df-fal 1546 df-ex 1774 df-nf 1778 df-sb 2060 df-mo 2529 df-eu 2558 df-clab 2705 df-cleq 2719 df-clel 2805 df-nfc 2880 df-ne 2937 df-nel 3043 df-ral 3058 df-rex 3067 df-rmo 3372 df-reu 3373 df-rab 3429 df-v 3473 df-sbc 3777 df-csb 3893 df-dif 3950 df-un 3952 df-in 3954 df-ss 3964 df-pss 3966 df-nul 4325 df-if 4531 df-pw 4606 df-sn 4631 df-pr 4633 df-tp 4635 df-op 4637 df-uni 4911 df-int 4952 df-iun 5000 df-br 5151 df-opab 5213 df-mpt 5234 df-tr 5268 df-id 5578 df-eprel 5584 df-po 5592 df-so 5593 df-fr 5635 df-we 5637 df-xp 5686 df-rel 5687 df-cnv 5688 df-co 5689 df-dm 5690 df-rn 5691 df-res 5692 df-ima 5693 df-pred 6308 df-ord 6375 df-on 6376 df-lim 6377 df-suc 6378 df-iota 6503 df-fun 6553 df-fn 6554 df-f 6555 df-f1 6556 df-fo 6557 df-f1o 6558 df-fv 6559 df-riota 7380 df-ov 7427 df-oprab 7428 df-mpo 7429 df-of 7689 df-om 7875 df-1st 7997 df-2nd 7998 df-frecs 8291 df-wrecs 8322 df-recs 8396 df-rdg 8435 df-1o 8491 df-oadd 8495 df-er 8729 df-map 8851 df-pm 8852 df-en 8969 df-dom 8970 df-sdom 8971 df-fin 8972 df-dju 9930 df-card 9968 df-pnf 11286 df-mnf 11287 df-xr 11288 df-ltxr 11289 df-le 11290 df-sub 11482 df-neg 11483 df-div 11908 df-nn 12249 df-2 12311 df-3 12312 df-n0 12509 df-xnn0 12581 df-z 12595 df-uz 12859 df-fz 13523 df-fzo 13666 df-seq 14005 df-fac 14271 df-bc 14300 df-hash 14328

This theorem is referenced by: poimirlem22 37120

W3C validator

	
		OSZAR »