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 37799

Description: Lemma for poimir 37823, 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 5951	. . . 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 12163	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑁 ∈ ℂ)
4		npcan1 11564	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℂ → ((𝑁 − 1) + 1) = 𝑁)
5	3, 4	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑁 − 1) + 1) = 𝑁)
6	2	nnzd 12516	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑁 ∈ ℤ)
7		peano2zm 12536	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℤ → (𝑁 − 1) ∈ ℤ)
8		uzid 12768	. . . . . . . . . . . 12 ⊢ ((𝑁 − 1) ∈ ℤ → (𝑁 − 1) ∈ (ℤ_≥‘(𝑁 − 1)))
9		peano2uz 12816	. . . . . . . . . . . 12 ⊢ ((𝑁 − 1) ∈ (ℤ_≥‘(𝑁 − 1)) → ((𝑁 − 1) + 1) ∈ (ℤ_≥‘(𝑁 − 1)))
10	6, 7, 8, 9	4syl 19	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑁 − 1) + 1) ∈ (ℤ_≥‘(𝑁 − 1)))
11	5, 10	eqeltrrd 2836	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘(𝑁 − 1)))
12		fzss2 13482	. . . . . . . . . 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 3933	. . . . . . . 8 ⊢ (𝜑 → (2^nd ‘𝑇) ∈ (1...𝑁))
16		fzp1elp1 13495	. . . . . . . . . 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 7374	. . . . . . . . 9 ⊢ (𝜑 → (1...((𝑁 − 1) + 1)) = (1...𝑁))
19	17, 18	eleqtrd 2837	. . . . . . . 8 ⊢ (𝜑 → ((2^nd ‘𝑇) + 1) ∈ (1...𝑁))
20	15, 19	prssd 4777	. . . . . . 7 ⊢ (𝜑 → {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁))
21		undif 4433	. . . . . . 7 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁) ↔ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = (1...𝑁))
22	20, 21	sylib 218	. . . . . 6 ⊢ (𝜑 → ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = (1...𝑁))
23	22	reseq2d 5937	. . . . 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 3641	. . . . . . . . 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 2853	. . . . . . . 8 ⊢ (𝑈 ∈ 𝑆 → 𝑈 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
28		xp1st 7965	. . . . . . . 8 ⊢ (𝑈 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1^st ‘𝑈) ∈ (((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
29		xp2nd 7966	. . . . . . . 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 6846	. . . . . . . 8 ⊢ (2^nd ‘(1^st ‘𝑈)) ∈ V
32		f1oeq1 6761	. . . . . . . 8 ⊢ (𝑓 = (2^nd ‘(1^st ‘𝑈)) → (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) ↔ (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁)))
33	31, 32	elab 3633	. . . . . . 7 ⊢ ((2^nd ‘(1^st ‘𝑈)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ↔ (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁))
34	30, 33	sylib 218	. . . . . 6 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁))
35		f1ofn 6774	. . . . . 6 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑈)) Fn (1...𝑁))
36		fnresdm 6610	. . . . . 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 2770	. . . 4 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (2^nd ‘(1^st ‘𝑈)))
39	1, 38	eqtr3id 2784	. . 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 12314	. . . . . 6 ⊢ 2 < 3
41		2re 12221	. . . . . . 7 ⊢ 2 ∈ ℝ
42		3re 12227	. . . . . . 7 ⊢ 3 ∈ ℝ
43	41, 42	ltnlei 11256	. . . . . 6 ⊢ (2 < 3 ↔ ¬ 3 ≤ 2)
44	40, 43	mpbi 230	. . . . 5 ⊢ ¬ 3 ≤ 2
45		df-pr 4582	. . . . . . . . . . . 12 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} = ({⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩} ∪ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})
46	45	coeq2i 5808	. . . . . . . . . . 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 6204	. . . . . . . . . . 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 2758	. . . . . . . . . 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 3641	. . . . . . . . . . . . . . . . . . . . 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 2853	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑇 ∈ 𝑆 → 𝑇 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
52		xp1st 7965	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑇 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1^st ‘𝑇) ∈ (((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
53		xp2nd 7966	. . . . . . . . . . . . . . . . . . . 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 6846	. . . . . . . . . . . . . . . . . . . 20 ⊢ (2^nd ‘(1^st ‘𝑇)) ∈ V
56		f1oeq1 6761	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑓 = (2^nd ‘(1^st ‘𝑇)) → (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) ↔ (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁)))
57	55, 56	elab 3633	. . . . . . . . . . . . . . . . . . 19 ⊢ ((2^nd ‘(1^st ‘𝑇)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ↔ (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁))
58	54, 57	sylib 218	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁))
59		f1of1 6772	. . . . . . . . . . . . . . . . . 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 4764	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → {((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁))
62		f1ores 6787	. . . . . . . . . . . . . . . . 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 585	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}–1-1-onto→((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)}))
64		f1of 6773	. . . . . . . . . . . . . . . 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 6774	. . . . . . . . . . . . . . . . . 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 6912	. . . . . . . . . . . . . . . . 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 585	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} = ((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)}))
70	69	feq3d 6646	. . . . . . . . . . . . . . 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 257	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))})
72		eqid 2735	. . . . . . . . . . . . . . 15 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩} = {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}
73		fvex 6846	. . . . . . . . . . . . . . . 16 ⊢ (2^nd ‘𝑇) ∈ V
74		ovex 7391	. . . . . . . . . . . . . . . 16 ⊢ ((2^nd ‘𝑇) + 1) ∈ V
75	73, 74	fsn 7080	. . . . . . . . . . . . . . 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 231	. . . . . . . . . . . . . 14 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}:{(2^nd ‘𝑇)}⟶{((2^nd ‘𝑇) + 1)}
77		fco2 6687	. . . . . . . . . . . . . 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 587	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}):{(2^nd ‘𝑇)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))})
79		fvex 6846	. . . . . . . . . . . . . 14 ⊢ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) ∈ V
80	79	fconst2 7151	. . . . . . . . . . . . 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 218	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}) = ({(2^nd ‘𝑇)} × {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))}))
82	73, 79	xpsn 7086	. . . . . . . . . . . 12 ⊢ ({(2^nd ‘𝑇)} × {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))}) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}
83	81, 82	eqtrdi 2786	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
84	83	uneq1d 4118	. . . . . . . . . 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 2782	. . . . . . . . 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 13471	. . . . . . . . . . . . . . . . 17 ⊢ ((2^nd ‘𝑇) ∈ (1...(𝑁 − 1)) → (2^nd ‘𝑇) ∈ ℕ)
87	14, 86	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (2^nd ‘𝑇) ∈ ℕ)
88	87	nnred 12162	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (2^nd ‘𝑇) ∈ ℝ)
89	88	ltp1d 12074	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (2^nd ‘𝑇) < ((2^nd ‘𝑇) + 1))
90	88, 89	ltned 11271	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1))
91	90	necomd 2986	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘𝑇) + 1) ≠ (2^nd ‘𝑇))
92		f1veqaeq 7202	. . . . . . . . . . . . . . 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 837	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) = ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) → ((2^nd ‘𝑇) + 1) = (2^nd ‘𝑇)))
94	93	necon3d 2952	. . . . . . . . . . . . 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 2936	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) = ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)))
97	73, 79	opth 5423	. . . . . . . . . . . 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 496	. . . . . . . . . . 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 2936	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ (2^nd ‘𝑇) = ((2^nd ‘𝑇) + 1))
101	73, 79	opth1 5422	. . . . . . . . . . 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 5411	. . . . . . . . . . . . . . 15 ⊢ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ V
104	103	snid 4618	. . . . . . . . . . . . . 14 ⊢ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}
105		elun1 4133	. . . . . . . . . . . . . 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 2824	. . . . . . . . . . . . 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 233	. . . . . . . . . . . 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 4604	. . . . . . . . . . . . 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 992	. . . . . . . . . . . . 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 275	. . . . . . . . . . . 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 218	. . . . . . . . . . 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 2960	. . . . . . . . . 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 585	. . . . . . . . 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 2998	. . . . . . . 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 7103	. . . . . . . . . . . 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 585	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇)}) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩})
118		fnressn 7103	. . . . . . . . . . . 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 585	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}) = {⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
120	117, 119	uneq12d 4120	. . . . . . . . . 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 4582	. . . . . . . . . . . 12 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} = ({(2^nd ‘𝑇)} ∪ {((2^nd ‘𝑇) + 1)})
122	121	reseq2i 5934	. . . . . . . . . . 11 ⊢ ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = ((2^nd ‘(1^st ‘𝑇)) ↾ ({(2^nd ‘𝑇)} ∪ {((2^nd ‘𝑇) + 1)}))
123		resundi 5951	. . . . . . . . . . 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 2758	. . . . . . . . . 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 4582	. . . . . . . . . 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 2795	. . . . . . . . 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 37798	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = ((2^nd ‘(1^st ‘𝑇)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))
129		uneq12 4114	. . . . . . . . . . . . . 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 5951	. . . . . . . . . . . . . . . 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 5937	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑇)) ↾ (1...𝑁)))
132		fnresdm 6610	. . . . . . . . . . . . . . . . . 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 2770	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (2^nd ‘(1^st ‘𝑇)))
135	130, 134	eqtr3id 2784	. . . . . . . . . . . . . . 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 2751	. . . . . . . . . . . . . 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 244	. . . . . . . . . . . . 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 695	. . . . . . . . . . . 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 2952	. . . . . . . . . . 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 2986	. . . . . . . . 9 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
142	126, 141	eqnetrrd 2999	. . . . . . . 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 5381	. . . . . . . . . . . 12 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} ∈ V
144	55, 143	coex 7872	. . . . . . . . . . 11 ⊢ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) ∈ V
145		prex 5381	. . . . . . . . . . 11 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∈ V
146	31	resex 5987	. . . . . . . . . . 11 ⊢ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∈ V
147		hashtpg 14410	. . . . . . . . . . 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 1464	. . . . . . . . . 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 216	. . . . . . . . 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 1122	. . . . . . . 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 585	. . . . . . 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 5381	. . . . . . . . . . . . 13 ⊢ {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∈ V
153		prex 5381	. . . . . . . . . . . . 13 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∈ V
154	152, 153	mapval 8777	. . . . . . . . . . . 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 9226	. . . . . . . . . . . . 13 ⊢ {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∈ Fin
156		prfi 9226	. . . . . . . . . . . . 13 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∈ Fin
157		mapfi 9250	. . . . . . . . . . . . 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 693	. . . . . . . . . . . 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 2832	. . . . . . . . . . 11 ⊢ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ∈ Fin
160		f1of 6773	. . . . . . . . . . . 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 4017	. . . . . . . . . . 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 9099	. . . . . . . . . . 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 693	. . . . . . . . . 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 4777	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)} ⊆ (1...𝑁))
165		f1ores 6787	. . . . . . . . . . . . . . 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 585	. . . . . . . . . . . . . 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 6916	. . . . . . . . . . . . . . . 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 1374	. . . . . . . . . . . . . . 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 6770	. . . . . . . . . . . . . 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 232	. . . . . . . . . . . . 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 6819	. . . . . . . . . . . . . . 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 694	. . . . . . . . . . . . . 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 585	. . . . . . . . . . . . 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 6796	. . . . . . . . . . . . 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 585	. . . . . . . . . . . 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 6179	. . . . . . . . . . . . . . 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 693	. . . . . . . . . . . . . 14 ⊢ ran {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} = {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}
178	177	eqimssi 3993	. . . . . . . . . . . . 13 ⊢ ran {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} ⊆ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}
179		cores 6206	. . . . . . . . . . . . 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 6761	. . . . . . . . . . . . 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 218	. . . . . . . . . . 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 2986	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) ≠ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)))
184		fvex 6846	. . . . . . . . . . . . . 14 ⊢ ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) ∈ V
185		f1oprg 6819	. . . . . . . . . . . . . 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 694	. . . . . . . . . . . . 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 585	. . . . . . . . . . . 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 4688	. . . . . . . . . . . . 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 6763	. . . . . . . . . . . . 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 218	. . . . . . . . . . 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 6772	. . . . . . . . . . . . . 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 6787	. . . . . . . . . . . . 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 585	. . . . . . . . . . . 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 6779	. . . . . . . . . . . . . . . . 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 496	. . . . . . . . . . . . . . . 16 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → Fun ^◡(2^nd ‘(1^st ‘𝑈)))
198		imadif 6575	. . . . . . . . . . . . . . . 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 6780	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–onto→(1...𝑁))
201		foima 6750	. . . . . . . . . . . . . . . . . 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 6780	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–onto→(1...𝑁))
204		foima 6750	. . . . . . . . . . . . . . . . . 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 2773	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ (1...𝑁)) = ((2^nd ‘(1^st ‘𝑇)) “ (1...𝑁)))
207	128	rneqd 5886	. . . . . . . . . . . . . . . . 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 5636	. . . . . . . . . . . . . . . . 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 5636	. . . . . . . . . . . . . . . . 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 2795	. . . . . . . . . . . . . . . 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 4078	. . . . . . . . . . . . . . 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 6779	. . . . . . . . . . . . . . . . . 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 496	. . . . . . . . . . . . . . . . 17 ⊢ ((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → Fun ^◡(2^nd ‘(1^st ‘𝑇)))
214		imadif 6575	. . . . . . . . . . . . . . . . 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 4229	. . . . . . . . . . . . . . . . . 18 ⊢ ((1...𝑁) ∩ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
217		sseqin2 4174	. . . . . . . . . . . . . . . . . . 19 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁) ↔ ((1...𝑁) ∩ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
218	20, 217	sylib 218	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ((1...𝑁) ∩ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
219	216, 218	eqtr3id 2784	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
220	219	imaeq2d 6018	. . . . . . . . . . . . . . . 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 2772	. . . . . . . . . . . . . . 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 2774	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑇)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
223	219	imaeq2d 6018	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑈)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
224		fnimapr 6916	. . . . . . . . . . . . . . . 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 1374	. . . . . . . . . . . . . . 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 2786	. . . . . . . . . . . . . 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 2778	. . . . . . . . . . . . 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 6770	. . . . . . . . . . . 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 232	. . . . . . . . . . 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 4015	. . . . . . . . . . . 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 6761	. . . . . . . . . . . . 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 6761	. . . . . . . . . . . . 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 6761	. . . . . . . . . . . . 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 4661	. . . . . . . . . . . 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 275	. . . . . . . . . . 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 1345	. . . . . . . . . 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 14334	. . . . . . . . . 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 588	. . . . . . . . 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 8924	. . . . . . . . . . . 12 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ≈ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}
240		hashprg 14320	. . . . . . . . . . . . . . . 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 693	. . . . . . . . . . . . . . 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 218	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (♯‘{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}) = 2)
243		hashprg 14320	. . . . . . . . . . . . . . . 16 ⊢ (((2^nd ‘𝑇) ∈ V ∧ ((2^nd ‘𝑇) + 1) ∈ V) → ((2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1) ↔ (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = 2))
244	73, 74, 243	mp2an 693	. . . . . . . . . . . . . . 15 ⊢ ((2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1) ↔ (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = 2)
245	90, 244	sylib 218	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = 2)
246	242, 245	eqtr4d 2773	. . . . . . . . . . . . 13 ⊢ (𝜑 → (♯‘{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}) = (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
247		hashen 14272	. . . . . . . . . . . . . 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 693	. . . . . . . . . . . . 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 218	. . . . . . . . . . . 12 ⊢ (𝜑 → {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ≈ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
250		hashfacen 14379	. . . . . . . . . . . 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 588	. . . . . . . . . . 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 8777	. . . . . . . . . . . . . 14 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ↑_m {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}
253		mapfi 9250	. . . . . . . . . . . . . . 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 693	. . . . . . . . . . . . . 14 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ↑_m {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∈ Fin
255	252, 254	eqeltrri 2832	. . . . . . . . . . . . 13 ⊢ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}} ∈ Fin
256		f1of 6773	. . . . . . . . . . . . . 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 4017	. . . . . . . . . . . . 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 9099	. . . . . . . . . . . . 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 693	. . . . . . . . . . . 12 ⊢ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}} ∈ Fin
260		hashen 14272	. . . . . . . . . . . 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 693	. . . . . . . . . . 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 234	. . . . . . . . . 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 14383	. . . . . . . . . . . 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 6837	. . . . . . . . . . . 12 ⊢ (𝜑 → (!‘(♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = (!‘2))
266		fac2 14204	. . . . . . . . . . . 12 ⊢ (!‘2) = 2
267	265, 266	eqtrdi 2786	. . . . . . . . . . 11 ⊢ (𝜑 → (!‘(♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = 2)
268	264, 267	eqtrid 2782	. . . . . . . . . 10 ⊢ (𝜑 → (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}) = 2)
269	262, 268	eqtrd 2770	. . . . . . . . 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 5123	. . . . . . . 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 5100	. . . . . . . 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 245	. . . . . . 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 2949	. . . . 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 6222	. . . . 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 2788	. . . 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 4120	. . 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 2772	. 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 6204	. 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 2788	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 206 ∧ wa 395 ∨ wo 848 ∧ w3a 1087 = wceq 1542 ∈ wcel 2114 {cab 2713 ≠ wne 2931 ∀wral 3050 {crab 3398 Vcvv 3439 ⦋csb 3848 ∖ cdif 3897 ∪ cun 3898 ∩ cin 3899 ⊆ wss 3900 ifcif 4478 {csn 4579 {cpr 4581 {ctp 4583 ⟨cop 4585 class class class wbr 5097 ↦ cmpt 5178 I cid 5517 × cxp 5621 ^◡ccnv 5622 ran crn 5624 ↾ cres 5625 “ cima 5626 ∘ ccom 5627 Fun wfun 6485 Fn wfn 6486 ⟶wf 6487 –1-1→wf1 6488 –onto→wfo 6489 –1-1-onto→wf1o 6490 ‘cfv 6491 (class class class)co 7358 ∘_f cof 7620 1^st c1st 7931 2^nd c2nd 7932 ↑_m cmap 8765 ≈ cen 8882 Fincfn 8885 ℂcc 11026 0cc0 11028 1c1 11029 + caddc 11031 < clt 11168 ≤ cle 11169 − cmin 11366 ℕcn 12147 2c2 12202 3c3 12203 ℤcz 12490 ℤ_≥cuz 12753 ...cfz 13425 ..^cfzo 13572 !cfa 14198 ♯chash 14255

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2183 ax-ext 2707 ax-rep 5223 ax-sep 5240 ax-nul 5250 ax-pow 5309 ax-pr 5376 ax-un 7680 ax-cnex 11084 ax-resscn 11085 ax-1cn 11086 ax-icn 11087 ax-addcl 11088 ax-addrcl 11089 ax-mulcl 11090 ax-mulrcl 11091 ax-mulcom 11092 ax-addass 11093 ax-mulass 11094 ax-distr 11095 ax-i2m1 11096 ax-1ne0 11097 ax-1rid 11098 ax-rnegex 11099 ax-rrecex 11100 ax-cnre 11101 ax-pre-lttri 11102 ax-pre-lttrn 11103 ax-pre-ltadd 11104 ax-pre-mulgt0 11105

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2538 df-eu 2568 df-clab 2714 df-cleq 2727 df-clel 2810 df-nfc 2884 df-ne 2932 df-nel 3036 df-ral 3051 df-rex 3060 df-rmo 3349 df-reu 3350 df-rab 3399 df-v 3441 df-sbc 3740 df-csb 3849 df-dif 3903 df-un 3905 df-in 3907 df-ss 3917 df-pss 3920 df-nul 4285 df-if 4479 df-pw 4555 df-sn 4580 df-pr 4582 df-tp 4584 df-op 4586 df-uni 4863 df-int 4902 df-iun 4947 df-br 5098 df-opab 5160 df-mpt 5179 df-tr 5205 df-id 5518 df-eprel 5523 df-po 5531 df-so 5532 df-fr 5576 df-we 5578 df-xp 5629 df-rel 5630 df-cnv 5631 df-co 5632 df-dm 5633 df-rn 5634 df-res 5635 df-ima 5636 df-pred 6258 df-ord 6319 df-on 6320 df-lim 6321 df-suc 6322 df-iota 6447 df-fun 6493 df-fn 6494 df-f 6495 df-f1 6496 df-fo 6497 df-f1o 6498 df-fv 6499 df-riota 7315 df-ov 7361 df-oprab 7362 df-mpo 7363 df-of 7622 df-om 7809 df-1st 7933 df-2nd 7934 df-frecs 8223 df-wrecs 8254 df-recs 8303 df-rdg 8341 df-1o 8397 df-2o 8398 df-oadd 8401 df-er 8635 df-map 8767 df-pm 8768 df-en 8886 df-dom 8887 df-sdom 8888 df-fin 8889 df-dju 9815 df-card 9853 df-pnf 11170 df-mnf 11171 df-xr 11172 df-ltxr 11173 df-le 11174 df-sub 11368 df-neg 11369 df-div 11797 df-nn 12148 df-2 12210 df-3 12211 df-n0 12404 df-xnn0 12477 df-z 12491 df-uz 12754 df-fz 13426 df-fzo 13573 df-seq 13927 df-fac 14199 df-bc 14228 df-hash 14256

This theorem is referenced by: poimirlem22 37812

W3C validator