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 38548

Description: Lemma for poimir 38572, 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 5983	. . . 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 12351	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑁 ∈ ℂ)
4		npcan1 11741	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℂ → ((𝑁 − 1) + 1) = 𝑁)
5	3, 4	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑁 − 1) + 1) = 𝑁)
6	2	nnzd 12719	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑁 ∈ ℤ)
7		peano2zm 12739	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℤ → (𝑁 − 1) ∈ ℤ)
8		uzid 12980	. . . . . . . . . . . 12 ⊢ ((𝑁 − 1) ∈ ℤ → (𝑁 − 1) ∈ (ℤ_≥‘(𝑁 − 1)))
9		peano2uz 13028	. . . . . . . . . . . 12 ⊢ ((𝑁 − 1) ∈ (ℤ_≥‘(𝑁 − 1)) → ((𝑁 − 1) + 1) ∈ (ℤ_≥‘(𝑁 − 1)))
10	6, 7, 8, 9	4syl 20	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑁 − 1) + 1) ∈ (ℤ_≥‘(𝑁 − 1)))
11	5, 10	eqeltrrd 2861	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘(𝑁 − 1)))
12		fzss2 13698	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘(𝑁 − 1)) → (1...(𝑁 − 1)) ⊆ (1...𝑁))
13	11, 12	syl 18	. . . . . . . . 9 ⊢ (𝜑 → (1...(𝑁 − 1)) ⊆ (1...𝑁))
14		poimirlem9.2	. . . . . . . . 9 ⊢ (𝜑 → (2^nd ‘𝑇) ∈ (1...(𝑁 − 1)))
15	13, 14	sseldd 3909	. . . . . . . 8 ⊢ (𝜑 → (2^nd ‘𝑇) ∈ (1...𝑁))
16		fzp1elp1 13711	. . . . . . . . . 10 ⊢ ((2^nd ‘𝑇) ∈ (1...(𝑁 − 1)) → ((2^nd ‘𝑇) + 1) ∈ (1...((𝑁 − 1) + 1)))
17	14, 16	syl 18	. . . . . . . . 9 ⊢ (𝜑 → ((2^nd ‘𝑇) + 1) ∈ (1...((𝑁 − 1) + 1)))
18	5	oveq2d 7436	. . . . . . . . 9 ⊢ (𝜑 → (1...((𝑁 − 1) + 1)) = (1...𝑁))
19	17, 18	eleqtrd 2862	. . . . . . . 8 ⊢ (𝜑 → ((2^nd ‘𝑇) + 1) ∈ (1...𝑁))
20	15, 19	prssd 4782	. . . . . . 7 ⊢ (𝜑 → {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁))
21		undif 4437	. . . . . . 7 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁) ↔ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = (1...𝑁))
22	20, 21	sylib 221	. . . . . 6 ⊢ (𝜑 → ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = (1...𝑁))
23	22	reseq2d 5969	. . . . 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 3640	. . . . . . . . 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 2878	. . . . . . . 8 ⊢ (𝑈 ∈ 𝑆 → 𝑈 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
28		xp1st 8033	. . . . . . . 8 ⊢ (𝑈 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1^st ‘𝑈) ∈ (((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
29		xp2nd 8034	. . . . . . . 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 20	. . . . . . 7 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑈)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
31		fvex 6898	. . . . . . . 8 ⊢ (2^nd ‘(1^st ‘𝑈)) ∈ V
32		f1oeq1 6812	. . . . . . . 8 ⊢ (𝑓 = (2^nd ‘(1^st ‘𝑈)) → (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) ↔ (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁)))
33	31, 32	elab 3632	. . . . . . 7 ⊢ ((2^nd ‘(1^st ‘𝑈)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ↔ (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁))
34	30, 33	sylib 221	. . . . . 6 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁))
35		f1ofn 6825	. . . . . 6 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑈)) Fn (1...𝑁))
36		fnresdm 6658	. . . . . 6 ⊢ ((2^nd ‘(1^st ‘𝑈)) Fn (1...𝑁) → ((2^nd ‘(1^st ‘𝑈)) ↾ (1...𝑁)) = (2^nd ‘(1^st ‘𝑈)))
37	34, 35, 36	3syl 19	. . . . 5 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ (1...𝑁)) = (2^nd ‘(1^st ‘𝑈)))
38	23, 37	eqtrd 2795	. . . 4 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (2^nd ‘(1^st ‘𝑈)))
39	1, 38	eqtr3id 2809	. . 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 12516	. . . . . 6 ⊢ 2 < 3
41		2re 12417	. . . . . . 7 ⊢ 2 ∈ ℝ
42		3re 12423	. . . . . . 7 ⊢ 3 ∈ ℝ
43	41, 42	ltnlei 11431	. . . . . 6 ⊢ (2 < 3 ↔ ¬ 3 ≤ 2)
44	40, 43	mpbi 233	. . . . 5 ⊢ ¬ 3 ≤ 2
45		df-pr 4586	. . . . . . . . . . . 12 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} = ({⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩} ∪ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})
46	45	coeq2i 5837	. . . . . . . . . . 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 6248	. . . . . . . . . . 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 2783	. . . . . . . . . 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 3640	. . . . . . . . . . . . . . . . . . . . 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 2878	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑇 ∈ 𝑆 → 𝑇 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
52		xp1st 8033	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑇 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1^st ‘𝑇) ∈ (((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
53		xp2nd 8034	. . . . . . . . . . . . . . . . . . . 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 20	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑇)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
55		fvex 6898	. . . . . . . . . . . . . . . . . . . 20 ⊢ (2^nd ‘(1^st ‘𝑇)) ∈ V
56		f1oeq1 6812	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑓 = (2^nd ‘(1^st ‘𝑇)) → (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) ↔ (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁)))
57	55, 56	elab 3632	. . . . . . . . . . . . . . . . . . 19 ⊢ ((2^nd ‘(1^st ‘𝑇)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ↔ (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁))
58	54, 57	sylib 221	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁))
59		f1of1 6823	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1→(1...𝑁))
60	58, 59	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1→(1...𝑁))
61	19	snssd 4746	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → {((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁))
62		f1ores 6839	. . . . . . . . . . . . . . . . 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 596	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}–1-1-onto→((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)}))
64		f1of 6824	. . . . . . . . . . . . . . . 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 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}⟶((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)}))
66		f1ofn 6825	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑇)) Fn (1...𝑁))
67	58, 66	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑇)) Fn (1...𝑁))
68		fnsnfv 6964	. . . . . . . . . . . . . . . . 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 596	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} = ((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)}))
70	69	feq3d 6694	. . . . . . . . . . . . . . 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 260	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))})
72		eqid 2760	. . . . . . . . . . . . . . 15 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩} = {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}
73		fvex 6898	. . . . . . . . . . . . . . . 16 ⊢ (2^nd ‘𝑇) ∈ V
74		ovex 7453	. . . . . . . . . . . . . . . 16 ⊢ ((2^nd ‘𝑇) + 1) ∈ V
75	73, 74	fsn 7136	. . . . . . . . . . . . . . 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 234	. . . . . . . . . . . . . 14 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}:{(2^nd ‘𝑇)}⟶{((2^nd ‘𝑇) + 1)}
77		fco2 6736	. . . . . . . . . . . . . 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 598	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}):{(2^nd ‘𝑇)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))})
79		fvex 6898	. . . . . . . . . . . . . 14 ⊢ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) ∈ V
80	79	fconst2 7211	. . . . . . . . . . . . 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 221	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}) = ({(2^nd ‘𝑇)} × {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))}))
82	73, 79	xpsn 7141	. . . . . . . . . . . 12 ⊢ ({(2^nd ‘𝑇)} × {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))}) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}
83	81, 82	eqtrdi 2811	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
84	83	uneq1d 4166	. . . . . . . . . 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 2807	. . . . . . . . 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 13687	. . . . . . . . . . . . . . . . 17 ⊢ ((2^nd ‘𝑇) ∈ (1...(𝑁 − 1)) → (2^nd ‘𝑇) ∈ ℕ)
87	14, 86	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (2^nd ‘𝑇) ∈ ℕ)
88	87	nnred 12350	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (2^nd ‘𝑇) ∈ ℝ)
89	88	ltp1d 12247	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (2^nd ‘𝑇) < ((2^nd ‘𝑇) + 1))
90	88, 89	ltned 11446	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1))
91	90	necomd 3010	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘𝑇) + 1) ≠ (2^nd ‘𝑇))
92		f1veqaeq 7260	. . . . . . . . . . . . . . 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 850	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) = ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) → ((2^nd ‘𝑇) + 1) = (2^nd ‘𝑇)))
94	93	necon3d 2976	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((2^nd ‘𝑇) + 1) ≠ (2^nd ‘𝑇) → ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) ≠ ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))))
95	91, 94	mpd 16	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) ≠ ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)))
96	95	neneqd 2960	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) = ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)))
97	73, 79	opth 5444	. . . . . . . . . . . 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 503	. . . . . . . . . . 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 141	. . . . . . . . . 10 ⊢ (𝜑 → ¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩)
100	90	neneqd 2960	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ (2^nd ‘𝑇) = ((2^nd ‘𝑇) + 1))
101	73, 79	opth1 5443	. . . . . . . . . . 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 141	. . . . . . . . . 10 ⊢ (𝜑 → ¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩)
103		opex 5431	. . . . . . . . . . . . . . 15 ⊢ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ V
104	103	snid 4622	. . . . . . . . . . . . . 14 ⊢ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}
105		elun1 4180	. . . . . . . . . . . . . 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 2849	. . . . . . . . . . . . 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 236	. . . . . . . . . . . 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 4608	. . . . . . . . . . . . 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 1005	. . . . . . . . . . . . 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 278	. . . . . . . . . . . 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 221	. . . . . . . . . . 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 2984	. . . . . . . . . 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 596	. . . . . . . . 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 3022	. . . . . . . 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 7162	. . . . . . . . . . . 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 596	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇)}) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩})
118		fnressn 7162	. . . . . . . . . . . 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 596	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}) = {⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
120	117, 119	uneq12d 4168	. . . . . . . . . 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 4586	. . . . . . . . . . . 12 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} = ({(2^nd ‘𝑇)} ∪ {((2^nd ‘𝑇) + 1)})
122	121	reseq2i 5966	. . . . . . . . . . 11 ⊢ ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = ((2^nd ‘(1^st ‘𝑇)) ↾ ({(2^nd ‘𝑇)} ∪ {((2^nd ‘𝑇) + 1)}))
123		resundi 5983	. . . . . . . . . . 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 2783	. . . . . . . . . 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 4586	. . . . . . . . . 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 2820	. . . . . . . . 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 38547	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = ((2^nd ‘(1^st ‘𝑇)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))
129		uneq12 4162	. . . . . . . . . . . . . 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 5983	. . . . . . . . . . . . . . . 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 5969	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑇)) ↾ (1...𝑁)))
132		fnresdm 6658	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑇)) Fn (1...𝑁) → ((2^nd ‘(1^st ‘𝑇)) ↾ (1...𝑁)) = (2^nd ‘(1^st ‘𝑇)))
133	58, 66, 132	3syl 19	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ (1...𝑁)) = (2^nd ‘(1^st ‘𝑇)))
134	131, 133	eqtrd 2795	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (2^nd ‘(1^st ‘𝑇)))
135	130, 134	eqtr3id 2809	. . . . . . . . . . . . . . 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 2776	. . . . . . . . . . . . . 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 247	. . . . . . . . . . . . 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 707	. . . . . . . . . . . 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 2976	. . . . . . . . . . 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 16	. . . . . . . . . 10 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
141	140	necomd 3010	. . . . . . . . 9 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
142	126, 141	eqnetrrd 3023	. . . . . . . 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 5395	. . . . . . . . . . . 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 5395	. . . . . . . . . . 11 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∈ V
146	31	resex 6017	. . . . . . . . . . 11 ⊢ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∈ V
147		hashtpg 14630	. . . . . . . . . . 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 1490	. . . . . . . . . 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 219	. . . . . . . . 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 1139	. . . . . . . 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 596	. . . . . . 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 5395	. . . . . . . . . . . . 13 ⊢ {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∈ V
153		prex 5395	. . . . . . . . . . . . 13 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∈ V
154	152, 153	mapval 8858	. . . . . . . . . . . 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 9315	. . . . . . . . . . . . 13 ⊢ {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∈ Fin
156		prfi 9315	. . . . . . . . . . . . 13 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∈ Fin
157		mapfi 9337	. . . . . . . . . . . . 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 705	. . . . . . . . . . . 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 2857	. . . . . . . . . . 11 ⊢ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ∈ Fin
160		f1of 6824	. . . . . . . . . . . 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 3991	. . . . . . . . . . 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 9188	. . . . . . . . . . 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 705	. . . . . . . . . 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 4782	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)} ⊆ (1...𝑁))
165		f1ores 6839	. . . . . . . . . . . . . . 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 596	. . . . . . . . . . . . . 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 6968	. . . . . . . . . . . . . . . 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 1398	. . . . . . . . . . . . . . 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 6821	. . . . . . . . . . . . . 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 235	. . . . . . . . . . . . 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 6871	. . . . . . . . . . . . . . 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 706	. . . . . . . . . . . . . 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 596	. . . . . . . . . . . . 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 6848	. . . . . . . . . . . . 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 596	. . . . . . . . . . . 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 6223	. . . . . . . . . . . . . . 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 705	. . . . . . . . . . . . . 14 ⊢ ran {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} = {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}
178	177	eqimssi 3968	. . . . . . . . . . . . 13 ⊢ ran {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} ⊆ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}
179		cores 6250	. . . . . . . . . . . . 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 6812	. . . . . . . . . . . . 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 221	. . . . . . . . . . 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 3010	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) ≠ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)))
184		fvex 6898	. . . . . . . . . . . . . 14 ⊢ ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) ∈ V
185		f1oprg 6871	. . . . . . . . . . . . . 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 706	. . . . . . . . . . . . 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 596	. . . . . . . . . . . 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 4692	. . . . . . . . . . . . 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 6814	. . . . . . . . . . . . 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 221	. . . . . . . . . . 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 6823	. . . . . . . . . . . . . 14 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1→(1...𝑁))
193	34, 192	syl 18	. . . . . . . . . . . . 13 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1→(1...𝑁))
194		f1ores 6839	. . . . . . . . . . . . 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 596	. . . . . . . . . . . 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 6831	. . . . . . . . . . . . . . . . 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 503	. . . . . . . . . . . . . . . 16 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → Fun ^◡(2^nd ‘(1^st ‘𝑈)))
198		imadif 6624	. . . . . . . . . . . . . . . 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 19	. . . . . . . . . . . . . . 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 6832	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–onto→(1...𝑁))
201		foima 6801	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–onto→(1...𝑁) → ((2^nd ‘(1^st ‘𝑈)) “ (1...𝑁)) = (1...𝑁))
202	34, 200, 201	3syl 19	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ (1...𝑁)) = (1...𝑁))
203		f1ofo 6832	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–onto→(1...𝑁))
204		foima 6801	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–onto→(1...𝑁) → ((2^nd ‘(1^st ‘𝑇)) “ (1...𝑁)) = (1...𝑁))
205	58, 203, 204	3syl 19	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) “ (1...𝑁)) = (1...𝑁))
206	202, 205	eqtr4d 2798	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ (1...𝑁)) = ((2^nd ‘(1^st ‘𝑇)) “ (1...𝑁)))
207	128	rneqd 5919	. . . . . . . . . . . . . . . . 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 5663	. . . . . . . . . . . . . . . . 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 5663	. . . . . . . . . . . . . . . . 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 2820	. . . . . . . . . . . . . . . 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 4064	. . . . . . . . . . . . . . 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 6831	. . . . . . . . . . . . . . . . . 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 503	. . . . . . . . . . . . . . . . 17 ⊢ ((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → Fun ^◡(2^nd ‘(1^st ‘𝑇)))
214		imadif 6624	. . . . . . . . . . . . . . . . 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 19	. . . . . . . . . . . . . . . 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 4223	. . . . . . . . . . . . . . . . . 18 ⊢ ((1...𝑁) ∩ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
217		sseqin2 4120	. . . . . . . . . . . . . . . . . . 19 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁) ↔ ((1...𝑁) ∩ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
218	20, 217	sylib 221	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ((1...𝑁) ∩ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
219	216, 218	eqtr3id 2809	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
220	219	imaeq2d 6051	. . . . . . . . . . . . . . . 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 2797	. . . . . . . . . . . . . . 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 2799	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑇)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
223	219	imaeq2d 6051	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑈)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
224		fnimapr 6968	. . . . . . . . . . . . . . . 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 1398	. . . . . . . . . . . . . . 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 2811	. . . . . . . . . . . . . 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 2803	. . . . . . . . . . . . 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 6821	. . . . . . . . . . . 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 235	. . . . . . . . . . 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 3989	. . . . . . . . . . . 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 6812	. . . . . . . . . . . . 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 6812	. . . . . . . . . . . . 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 6812	. . . . . . . . . . . . 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 4665	. . . . . . . . . . . 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 278	. . . . . . . . . . 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 1362	. . . . . . . . . 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 14553	. . . . . . . . . 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 599	. . . . . . . . 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 9012	. . . . . . . . . . . 12 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ≈ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}
240		hashprg 14539	. . . . . . . . . . . . . . . 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 705	. . . . . . . . . . . . . . 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 221	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (♯‘{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}) = 2)
243		hashprg 14539	. . . . . . . . . . . . . . . 16 ⊢ (((2^nd ‘𝑇) ∈ V ∧ ((2^nd ‘𝑇) + 1) ∈ V) → ((2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1) ↔ (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = 2))
244	73, 74, 243	mp2an 705	. . . . . . . . . . . . . . 15 ⊢ ((2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1) ↔ (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = 2)
245	90, 244	sylib 221	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = 2)
246	242, 245	eqtr4d 2798	. . . . . . . . . . . . 13 ⊢ (𝜑 → (♯‘{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}) = (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
247		hashen 14491	. . . . . . . . . . . . . 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 705	. . . . . . . . . . . . 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 221	. . . . . . . . . . . 12 ⊢ (𝜑 → {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ≈ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
250		hashfacen 14599	. . . . . . . . . . . 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 599	. . . . . . . . . . 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 8858	. . . . . . . . . . . . . 14 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ↑_m {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}
253		mapfi 9337	. . . . . . . . . . . . . . 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 705	. . . . . . . . . . . . . 14 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ↑_m {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∈ Fin
255	252, 254	eqeltrri 2857	. . . . . . . . . . . . 13 ⊢ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}} ∈ Fin
256		f1of 6824	. . . . . . . . . . . . . 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 3991	. . . . . . . . . . . . 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 9188	. . . . . . . . . . . . 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 705	. . . . . . . . . . . 12 ⊢ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}} ∈ Fin
260		hashen 14491	. . . . . . . . . . . 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 705	. . . . . . . . . . 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 237	. . . . . . . . . 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 14603	. . . . . . . . . . . 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 6889	. . . . . . . . . . . 12 ⊢ (𝜑 → (!‘(♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = (!‘2))
266		fac2 14423	. . . . . . . . . . . 12 ⊢ (!‘2) = 2
267	265, 266	eqtrdi 2811	. . . . . . . . . . 11 ⊢ (𝜑 → (!‘(♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = 2)
268	264, 267	eqtrid 2807	. . . . . . . . . 10 ⊢ (𝜑 → (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}) = 2)
269	262, 268	eqtrd 2795	. . . . . . . . 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 5130	. . . . . . . 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 5105	. . . . . . . 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 248	. . . . . . 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 48	. . . . . 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 2973	. . . . 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 21	. . . 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 6266	. . . . 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 2813	. . . 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 4168	. . 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 2797	. 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 6248	. 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 2813	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

This proof depends on syntax axioms: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 401 ∨ wo 861 ∧ w3a 1103 = wceq 1569 ∈ wcel 2144 {cab 2738 ≠ wne 2955 ∀wral 3076 {crab 3412 Vcvv 3450 ⦋csb 3846 ⊆ wss 3895 ∖ cdif 4045 ∩ cin 4089 ∪ cun 4149 ifcif 4481 {csn 4583 {cpr 4585 {ctp 4587 ⟨cop 4589 class class class wbr 5102 ↦ cmpt 5185 I cid 5544 × cxp 5648 ^◡ccnv 5649 ran crn 5651 ↾ cres 5652 “ cima 5653 ∘ ccom 5654 Fun wfun 6532 Fn wfn 6533 ⟶wf 6534 –1-1→wf1 6535 –onto→wfo 6536 –1-1-onto→wf1o 6537 ‘cfv 6538 (class class class)co 7420 ∘_f cof 7691 1^st c1st 7999 2^nd c2nd 8000 ↑_m cmap 8847 ≈ cen 8970 Fincfn 8973 ℂcc 11198 0cc0 11200 1c1 11201 + caddc 11203 < clt 11343 ≤ cle 11344 − cmin 11541 ℕcn 12335 2c2 12397 3c3 12398 ℤcz 12693 ℤ_≥cuz 12965 ...cfz 13639 ..^cfzo 13788 !cfa 14417 ♯chash 14474

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1827 ax-4 1841 ax-5 1942 ax-6 1999 ax-7 2040 ax-8 2146 ax-9 2154 ax-10 2177 ax-11 2193 ax-12 2212 ax-ext 2732 ax-rep 5231 ax-sep 5248 ax-nul 5259 ax-pow 5326 ax-pr 5390 ax-un 7751 ax-cnex 11256 ax-resscn 11257 ax-1cn 11258 ax-icn 11259 ax-addcl 11260 ax-addrcl 11261 ax-mulcl 11262 ax-mulrcl 11263 ax-mulcom 11264 ax-addass 11265 ax-mulass 11266 ax-distr 11267 ax-i2m1 11268 ax-1ne0 11269 ax-1rid 11270 ax-rnegex 11271 ax-rrecex 11272 ax-cnre 11273 ax-pre-lttri 11274 ax-pre-lttrn 11275 ax-pre-ltadd 11276 ax-pre-mulgt0 11277

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1572 df-fal 1582 df-ex 1812 df-nf 1816 df-sb 2099 df-mo 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-nel 3062 df-ral 3077 df-rex 3087 df-rmo 3365 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3739 df-csb 3847 df-ss 3896 df-pss 4014 df-dif 4047 df-in 4091 df-un 4151 df-nul 4279 df-if 4482 df-pw 4558 df-sn 4584 df-pr 4586 df-tp 4588 df-op 4590 df-uni 4867 df-int 4907 df-iun 4952 df-br 5103 df-opab 5167 df-mpt 5186 df-tr 5212 df-id 5545 df-eprel 5550 df-po 5558 df-so 5559 df-fr 5603 df-we 5605 df-xp 5656 df-rel 5657 df-cnv 5658 df-co 5659 df-dm 5660 df-rn 5661 df-res 5662 df-ima 5663 df-pred 6304 df-ord 6365 df-on 6366 df-lim 6367 df-suc 6368 df-iota 6494 df-fun 6540 df-fn 6541 df-f 6542 df-f1 6543 df-fo 6544 df-f1o 6545 df-fv 6546 df-riota 7377 df-ov 7423 df-oprab 7424 df-mpo 7425 df-of 7693 df-om 7878 df-1st 8001 df-2nd 8002 df-frecs 8299 df-wrecs 8330 df-recs 8379 df-rdg 8418 df-1o 8476 df-2o 8477 df-oadd 8480 df-er 8717 df-map 8849 df-pm 8850 df-en 8974 df-dom 8975 df-sdom 8976 df-fin 8977 df-dju 9982 df-card 10020 df-pnf 11345 df-mnf 11346 df-xr 11347 df-ltxr 11348 df-le 11349 df-sub 11543 df-neg 11544 df-div 11974 df-nn 12336 df-2 12405 df-3 12406 df-n0 12607 df-xnn0 12680 df-z 12694 df-uz 12966 df-fz 13640 df-fzo 13789 df-seq 14145 df-fac 14418 df-bc 14447 df-hash 14475

This theorem is used by: poimirlem22 38561

W3C validator