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 35713

Description: Lemma for poimir 35737, 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 5894	. . . 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 11919	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑁 ∈ ℂ)
4		npcan1 11330	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℂ → ((𝑁 − 1) + 1) = 𝑁)
5	3, 4	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑁 − 1) + 1) = 𝑁)
6	2	nnzd 12354	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑁 ∈ ℤ)
7		peano2zm 12293	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℤ → (𝑁 − 1) ∈ ℤ)
8		uzid 12526	. . . . . . . . . . . 12 ⊢ ((𝑁 − 1) ∈ ℤ → (𝑁 − 1) ∈ (ℤ_≥‘(𝑁 − 1)))
9		peano2uz 12570	. . . . . . . . . . . 12 ⊢ ((𝑁 − 1) ∈ (ℤ_≥‘(𝑁 − 1)) → ((𝑁 − 1) + 1) ∈ (ℤ_≥‘(𝑁 − 1)))
10	6, 7, 8, 9	4syl 19	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑁 − 1) + 1) ∈ (ℤ_≥‘(𝑁 − 1)))
11	5, 10	eqeltrrd 2840	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘(𝑁 − 1)))
12		fzss2 13225	. . . . . . . . . 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 3918	. . . . . . . 8 ⊢ (𝜑 → (2^nd ‘𝑇) ∈ (1...𝑁))
16		fzp1elp1 13238	. . . . . . . . . 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 7271	. . . . . . . . 9 ⊢ (𝜑 → (1...((𝑁 − 1) + 1)) = (1...𝑁))
19	17, 18	eleqtrd 2841	. . . . . . . 8 ⊢ (𝜑 → ((2^nd ‘𝑇) + 1) ∈ (1...𝑁))
20	15, 19	prssd 4752	. . . . . . 7 ⊢ (𝜑 → {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁))
21		undif 4412	. . . . . . 7 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁) ↔ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = (1...𝑁))
22	20, 21	sylib 217	. . . . . 6 ⊢ (𝜑 → ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = (1...𝑁))
23	22	reseq2d 5880	. . . . 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 3611	. . . . . . . . 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 2857	. . . . . . . 8 ⊢ (𝑈 ∈ 𝑆 → 𝑈 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
28		xp1st 7836	. . . . . . . 8 ⊢ (𝑈 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1^st ‘𝑈) ∈ (((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
29		xp2nd 7837	. . . . . . . 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 6769	. . . . . . . 8 ⊢ (2^nd ‘(1^st ‘𝑈)) ∈ V
32		f1oeq1 6688	. . . . . . . 8 ⊢ (𝑓 = (2^nd ‘(1^st ‘𝑈)) → (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) ↔ (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁)))
33	31, 32	elab 3602	. . . . . . 7 ⊢ ((2^nd ‘(1^st ‘𝑈)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ↔ (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁))
34	30, 33	sylib 217	. . . . . 6 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁))
35		f1ofn 6701	. . . . . 6 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑈)) Fn (1...𝑁))
36		fnresdm 6535	. . . . . 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 2778	. . . 4 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (2^nd ‘(1^st ‘𝑈)))
39	1, 38	eqtr3id 2793	. . 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 12075	. . . . . 6 ⊢ 2 < 3
41		2re 11977	. . . . . . 7 ⊢ 2 ∈ ℝ
42		3re 11983	. . . . . . 7 ⊢ 3 ∈ ℝ
43	41, 42	ltnlei 11026	. . . . . 6 ⊢ (2 < 3 ↔ ¬ 3 ≤ 2)
44	40, 43	mpbi 229	. . . . 5 ⊢ ¬ 3 ≤ 2
45		df-pr 4561	. . . . . . . . . . . 12 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} = ({⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩} ∪ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})
46	45	coeq2i 5758	. . . . . . . . . . 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 6140	. . . . . . . . . . 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 2766	. . . . . . . . . 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 3611	. . . . . . . . . . . . . . . . . . . . 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 2857	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑇 ∈ 𝑆 → 𝑇 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
52		xp1st 7836	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑇 ∈ ((((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1^st ‘𝑇) ∈ (((0..^𝐾) ↑_m (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
53		xp2nd 7837	. . . . . . . . . . . . . . . . . . . 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 6769	. . . . . . . . . . . . . . . . . . . 20 ⊢ (2^nd ‘(1^st ‘𝑇)) ∈ V
56		f1oeq1 6688	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑓 = (2^nd ‘(1^st ‘𝑇)) → (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) ↔ (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁)))
57	55, 56	elab 3602	. . . . . . . . . . . . . . . . . . 19 ⊢ ((2^nd ‘(1^st ‘𝑇)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ↔ (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁))
58	54, 57	sylib 217	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁))
59		f1of1 6699	. . . . . . . . . . . . . . . . . 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 4739	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → {((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁))
62		f1ores 6714	. . . . . . . . . . . . . . . . 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 583	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}–1-1-onto→((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)}))
64		f1of 6700	. . . . . . . . . . . . . . . 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 6701	. . . . . . . . . . . . . . . . . 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 6829	. . . . . . . . . . . . . . . . 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 583	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} = ((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)}))
70	69	feq3d 6571	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} ↔ ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}⟶((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1)})))
71	65, 70	mpbird 256	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}):{((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))})
72		eqid 2738	. . . . . . . . . . . . . . 15 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩} = {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}
73		fvex 6769	. . . . . . . . . . . . . . . 16 ⊢ (2^nd ‘𝑇) ∈ V
74		ovex 7288	. . . . . . . . . . . . . . . 16 ⊢ ((2^nd ‘𝑇) + 1) ∈ V
75	73, 74	fsn 6989	. . . . . . . . . . . . . . 15 ⊢ ({⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}:{(2^nd ‘𝑇)}⟶{((2^nd ‘𝑇) + 1)} ↔ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩} = {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩})
76	72, 75	mpbir 230	. . . . . . . . . . . . . 14 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}:{(2^nd ‘𝑇)}⟶{((2^nd ‘𝑇) + 1)}
77		fco2 6611	. . . . . . . . . . . . . 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 585	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}):{(2^nd ‘𝑇)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))})
79		fvex 6769	. . . . . . . . . . . . . 14 ⊢ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) ∈ V
80	79	fconst2 7062	. . . . . . . . . . . . 13 ⊢ (((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}):{(2^nd ‘𝑇)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} ↔ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}) = ({(2^nd ‘𝑇)} × {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))}))
81	78, 80	sylib 217	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}) = ({(2^nd ‘𝑇)} × {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))}))
82	73, 79	xpsn 6995	. . . . . . . . . . . 12 ⊢ ({(2^nd ‘𝑇)} × {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))}) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}
83	81, 82	eqtrdi 2795	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩}) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
84	83	uneq1d 4092	. . . . . . . . . 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	syl5eq 2791	. . . . . . . . 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 13214	. . . . . . . . . . . . . . . . 17 ⊢ ((2^nd ‘𝑇) ∈ (1...(𝑁 − 1)) → (2^nd ‘𝑇) ∈ ℕ)
87	14, 86	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (2^nd ‘𝑇) ∈ ℕ)
88	87	nnred 11918	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (2^nd ‘𝑇) ∈ ℝ)
89	88	ltp1d 11835	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (2^nd ‘𝑇) < ((2^nd ‘𝑇) + 1))
90	88, 89	ltned 11041	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1))
91	90	necomd 2998	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘𝑇) + 1) ≠ (2^nd ‘𝑇))
92		f1veqaeq 7111	. . . . . . . . . . . . . . 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 833	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) = ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) → ((2^nd ‘𝑇) + 1) = (2^nd ‘𝑇)))
94	93	necon3d 2963	. . . . . . . . . . . . 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 2947	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) = ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)))
97	73, 79	opth 5385	. . . . . . . . . . . 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 2947	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ (2^nd ‘𝑇) = ((2^nd ‘𝑇) + 1))
101	73, 79	opth1 5384	. . . . . . . . . . 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 5373	. . . . . . . . . . . . . . 15 ⊢ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ V
104	103	snid 4594	. . . . . . . . . . . . . 14 ⊢ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}
105		elun1 4106	. . . . . . . . . . . . . 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 2827	. . . . . . . . . . . . 13 ⊢ (({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} → (⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ ({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) ↔ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}))
108	106, 107	mpbii 232	. . . . . . . . . . . 12 ⊢ (({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} → ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
109	103	elpr 4581	. . . . . . . . . . . . 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 986	. . . . . . . . . . . . 13 ⊢ ((⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩ ∨ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩) ↔ ¬ (¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩ ∧ ¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩))
111	109, 110	bitri 274	. . . . . . . . . . . 12 ⊢ (⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ ∈ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ↔ ¬ (¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩ ∧ ¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩))
112	108, 111	sylib 217	. . . . . . . . . . 11 ⊢ (({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∪ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} → ¬ (¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩ ∧ ¬ ⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩ = ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩))
113	112	necon2ai 2972	. . . . . . . . . 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 583	. . . . . . . . 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 3010	. . . . . . . 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 7012	. . . . . . . . . . . 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 583	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇)}) = {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩})
118		fnressn 7012	. . . . . . . . . . . 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 583	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1)}) = {⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩})
120	117, 119	uneq12d 4094	. . . . . . . . . 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 4561	. . . . . . . . . . . 12 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} = ({(2^nd ‘𝑇)} ∪ {((2^nd ‘𝑇) + 1)})
122	121	reseq2i 5877	. . . . . . . . . . 11 ⊢ ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = ((2^nd ‘(1^st ‘𝑇)) ↾ ({(2^nd ‘𝑇)} ∪ {((2^nd ‘𝑇) + 1)}))
123		resundi 5894	. . . . . . . . . . 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 2766	. . . . . . . . . 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 4561	. . . . . . . . . 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 2804	. . . . . . . . 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 35712	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = ((2^nd ‘(1^st ‘𝑇)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))
129		uneq12 4088	. . . . . . . . . . . . . 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 5894	. . . . . . . . . . . . . . . 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 5880	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑇)) ↾ (1...𝑁)))
132		fnresdm 6535	. . . . . . . . . . . . . . . . . 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 2778	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = (2^nd ‘(1^st ‘𝑇)))
135	130, 134	eqtr3id 2793	. . . . . . . . . . . . . . 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 2754	. . . . . . . . . . . . . 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	syl5ib 243	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∧ ((2^nd ‘(1^st ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = ((2^nd ‘(1^st ‘𝑇)) ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) → (2^nd ‘(1^st ‘𝑈)) = (2^nd ‘(1^st ‘𝑇))))
138	128, 137	mpan2d 690	. . . . . . . . . . . 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 2963	. . . . . . . . . . 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 2998	. . . . . . . . 9 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
142	126, 141	eqnetrrd 3011	. . . . . . . 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 5350	. . . . . . . . . . . 12 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} ∈ V
144	55, 143	coex 7751	. . . . . . . . . . 11 ⊢ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) ∈ V
145		prex 5350	. . . . . . . . . . 11 ⊢ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∈ V
146	31	resex 5928	. . . . . . . . . . 11 ⊢ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∈ V
147		hashtpg 14127	. . . . . . . . . . 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 1459	. . . . . . . . . 10 ⊢ ((((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) ≠ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∧ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ≠ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∧ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) ↔ (♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) = 3)
149	148	biimpi 215	. . . . . . . . 9 ⊢ ((((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) ≠ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ∧ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩} ≠ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∧ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩})) → (♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) = 3)
150	149	3expia 1119	. . . . . . . 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 583	. . . . . . 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 5350	. . . . . . . . . . . . 13 ⊢ {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∈ V
153		prex 5350	. . . . . . . . . . . . 13 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∈ V
154	152, 153	mapval 8585	. . . . . . . . . . . 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 9019	. . . . . . . . . . . . 13 ⊢ {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∈ Fin
156		prfi 9019	. . . . . . . . . . . . 13 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ∈ Fin
157		mapfi 9045	. . . . . . . . . . . . 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 688	. . . . . . . . . . . 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 2836	. . . . . . . . . . 11 ⊢ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ∈ Fin
160		f1of 6700	. . . . . . . . . . . 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 3996	. . . . . . . . . . 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 8918	. . . . . . . . . . 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 688	. . . . . . . . . 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 4752	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)} ⊆ (1...𝑁))
165		f1ores 6714	. . . . . . . . . . . . . . 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 583	. . . . . . . . . . . . . 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 6834	. . . . . . . . . . . . . . . 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 1369	. . . . . . . . . . . . . . 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 6697	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}):{((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}–1-1-onto→((2^nd ‘(1^st ‘𝑇)) “ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}) ↔ ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}):{((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}))
170	166, 169	mpbid 231	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}):{((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
171		f1oprg 6744	. . . . . . . . . . . . . . 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 689	. . . . . . . . . . . . . 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 583	. . . . . . . . . . . . 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 6722	. . . . . . . . . . . . 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 583	. . . . . . . . . . . 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 6114	. . . . . . . . . . . . . . 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 688	. . . . . . . . . . . . . 14 ⊢ ran {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} = {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}
178	177	eqimssi 3975	. . . . . . . . . . . . 13 ⊢ ran {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} ⊆ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}
179		cores 6142	. . . . . . . . . . . . 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 6688	. . . . . . . . . . . . 13 ⊢ ((((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) = ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) → ((((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ↔ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}))
181	178, 179, 180	mp2b 10	. . . . . . . . . . . 12 ⊢ ((((2^nd ‘(1^st ‘𝑇)) ↾ {((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)}) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ↔ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
182	175, 181	sylib 217	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
183	95	necomd 2998	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) ≠ ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)))
184		fvex 6769	. . . . . . . . . . . . . 14 ⊢ ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) ∈ V
185		f1oprg 6744	. . . . . . . . . . . . . 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 689	. . . . . . . . . . . . 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 583	. . . . . . . . . . . 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 4665	. . . . . . . . . . . . 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 6690	. . . . . . . . . . . . 13 ⊢ ({((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} = {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} → ({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} ↔ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}))
190	188, 189	ax-mp 5	. . . . . . . . . . . 12 ⊢ ({⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))} ↔ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
191	187, 190	sylib 217	. . . . . . . . . . 11 ⊢ (𝜑 → {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
192		f1of1 6699	. . . . . . . . . . . . . 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 6714	. . . . . . . . . . . . 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 583	. . . . . . . . . . . 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 6706	. . . . . . . . . . . . . . . . 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 6502	. . . . . . . . . . . . . . . 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 6707	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑈)):(1...𝑁)–onto→(1...𝑁))
201		foima 6677	. . . . . . . . . . . . . . . . . 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 6707	. . . . . . . . . . . . . . . . . 18 ⊢ ((2^nd ‘(1^st ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^nd ‘(1^st ‘𝑇)):(1...𝑁)–onto→(1...𝑁))
204		foima 6677	. . . . . . . . . . . . . . . . . 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 2781	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ (1...𝑁)) = ((2^nd ‘(1^st ‘𝑇)) “ (1...𝑁)))
207	128	rneqd 5836	. . . . . . . . . . . . . . . . 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 5593	. . . . . . . . . . . . . . . . 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 5593	. . . . . . . . . . . . . . . . 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 2804	. . . . . . . . . . . . . . . 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 4054	. . . . . . . . . . . . . . 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 6706	. . . . . . . . . . . . . . . . . 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 6502	. . . . . . . . . . . . . . . . 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 4198	. . . . . . . . . . . . . . . . . 18 ⊢ ((1...𝑁) ∩ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
217		sseqin2 4146	. . . . . . . . . . . . . . . . . . 19 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ⊆ (1...𝑁) ↔ ((1...𝑁) ∩ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
218	20, 217	sylib 217	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ((1...𝑁) ∩ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
219	216, 218	eqtr3id 2793	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
220	219	imaeq2d 5958	. . . . . . . . . . . . . . . 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 2780	. . . . . . . . . . . . . . 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 2782	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑇)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
223	219	imaeq2d 5958	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) “ ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))) = ((2^nd ‘(1^st ‘𝑈)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
224		fnimapr 6834	. . . . . . . . . . . . . . . 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 1369	. . . . . . . . . . . . . . 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 2795	. . . . . . . . . . . . . 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 2786	. . . . . . . . . . . . 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 6697	. . . . . . . . . . . 12 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→((2^nd ‘(1^st ‘𝑈)) “ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ↔ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}))
229	195, 228	mpbid 231	. . . . . . . . . . 11 ⊢ (𝜑 → ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))})
230		ssabral 3992	. . . . . . . . . . . 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 6688	. . . . . . . . . . . . 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 6688	. . . . . . . . . . . . 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 6688	. . . . . . . . . . . . 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 4638	. . . . . . . . . . . 12 ⊢ (∀𝑓 ∈ {((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ↔ (((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∧ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∧ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}))
235	230, 234	bitri 274	. . . . . . . . . . 11 ⊢ ({((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})} ⊆ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ↔ (((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∧ {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ∧ ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}):{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}))
236	182, 191, 229, 235	syl3anbrc 1341	. . . . . . . . . 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 14052	. . . . . . . . . 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 586	. . . . . . . . 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 8728	. . . . . . . . . . . 12 ⊢ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ≈ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}
240		hashprg 14038	. . . . . . . . . . . . . . . 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 688	. . . . . . . . . . . . . . 15 ⊢ (((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)) ≠ ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇)) ↔ (♯‘{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}) = 2)
242	95, 241	sylib 217	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (♯‘{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}) = 2)
243		hashprg 14038	. . . . . . . . . . . . . . . 16 ⊢ (((2^nd ‘𝑇) ∈ V ∧ ((2^nd ‘𝑇) + 1) ∈ V) → ((2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1) ↔ (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = 2))
244	73, 74, 243	mp2an 688	. . . . . . . . . . . . . . 15 ⊢ ((2^nd ‘𝑇) ≠ ((2^nd ‘𝑇) + 1) ↔ (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = 2)
245	90, 244	sylib 217	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = 2)
246	242, 245	eqtr4d 2781	. . . . . . . . . . . . 13 ⊢ (𝜑 → (♯‘{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}) = (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}))
247		hashen 13989	. . . . . . . . . . . . . 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 688	. . . . . . . . . . . . 13 ⊢ ((♯‘{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}) = (♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ↔ {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ≈ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
249	246, 248	sylib 217	. . . . . . . . . . . 12 ⊢ (𝜑 → {((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))} ≈ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})
250		hashfacen 14094	. . . . . . . . . . . 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 586	. . . . . . . . . . 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 8585	. . . . . . . . . . . . . 14 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ↑_m {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) = {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}
253		mapfi 9045	. . . . . . . . . . . . . . 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 688	. . . . . . . . . . . . . 14 ⊢ ({(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)} ↑_m {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ∈ Fin
255	252, 254	eqeltrri 2836	. . . . . . . . . . . . 13 ⊢ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}⟶{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}} ∈ Fin
256		f1of 6700	. . . . . . . . . . . . . 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 3996	. . . . . . . . . . . . 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 8918	. . . . . . . . . . . . 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 688	. . . . . . . . . . . 12 ⊢ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}} ∈ Fin
260		hashen 13989	. . . . . . . . . . . 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 688	. . . . . . . . . . 11 ⊢ ((♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}}) = (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}) ↔ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}} ≈ {𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}})
262	251, 261	sylibr 233	. . . . . . . . . 10 ⊢ (𝜑 → (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1)), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))}}) = (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}))
263		hashfac 14100	. . . . . . . . . . . 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 6760	. . . . . . . . . . . 12 ⊢ (𝜑 → (!‘(♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = (!‘2))
266		fac2 13921	. . . . . . . . . . . 12 ⊢ (!‘2) = 2
267	265, 266	eqtrdi 2795	. . . . . . . . . . 11 ⊢ (𝜑 → (!‘(♯‘{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})) = 2)
268	264, 267	syl5eq 2791	. . . . . . . . . 10 ⊢ (𝜑 → (♯‘{𝑓 ∣ 𝑓:{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}–1-1-onto→{(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}}) = 2)
269	262, 268	eqtrd 2778	. . . . . . . . 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 5096	. . . . . . . 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 5073	. . . . . . . 8 ⊢ ((♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) = 3 → ((♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) ≤ 2 ↔ 3 ≤ 2))
272	270, 271	syl5ibcom 244	. . . . . . 7 ⊢ (𝜑 → ((♯‘{((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}), {⟨(2^nd ‘𝑇), ((2^nd ‘(1^st ‘𝑇))‘(2^nd ‘𝑇))⟩, ⟨((2^nd ‘𝑇) + 1), ((2^nd ‘(1^st ‘𝑇))‘((2^nd ‘𝑇) + 1))⟩}, ((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})}) = 3 → 3 ≤ 2))
273	151, 272	syld 47	. . . . . 6 ⊢ (𝜑 → (((2^nd ‘(1^st ‘𝑈)) ↾ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)}) ≠ ((2^nd ‘(1^st ‘𝑇)) ∘ {⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩}) → 3 ≤ 2))
274	273	necon1bd 2960	. . . . 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 6157	. . . . 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 2797	. . . 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 4094	. . 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 2780	. 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 6140	. 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 2797	1 ⊢ (𝜑 → (2^nd ‘(1^st ‘𝑈)) = ((2^nd ‘(1^st ‘𝑇)) ∘ ({⟨(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)⟩, ⟨((2^nd ‘𝑇) + 1), (2^nd ‘𝑇)⟩} ∪ ( I ↾ ((1...𝑁) ∖ {(2^nd ‘𝑇), ((2^nd ‘𝑇) + 1)})))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 395 ∨ wo 843 ∧ w3a 1085 = wceq 1539 ∈ wcel 2108 {cab 2715 ≠ wne 2942 ∀wral 3063 {crab 3067 Vcvv 3422 ⦋csb 3828 ∖ cdif 3880 ∪ cun 3881 ∩ cin 3882 ⊆ wss 3883 ifcif 4456 {csn 4558 {cpr 4560 {ctp 4562 ⟨cop 4564 class class class wbr 5070 ↦ cmpt 5153 I cid 5479 × cxp 5578 ^◡ccnv 5579 ran crn 5581 ↾ cres 5582 “ cima 5583 ∘ ccom 5584 Fun wfun 6412 Fn wfn 6413 ⟶wf 6414 –1-1→wf1 6415 –onto→wfo 6416 –1-1-onto→wf1o 6417 ‘cfv 6418 (class class class)co 7255 ∘_f cof 7509 1^st c1st 7802 2^nd c2nd 7803 ↑_m cmap 8573 ≈ cen 8688 Fincfn 8691 ℂcc 10800 0cc0 10802 1c1 10803 + caddc 10805 < clt 10940 ≤ cle 10941 − cmin 11135 ℕcn 11903 2c2 11958 3c3 11959 ℤcz 12249 ℤ_≥cuz 12511 ...cfz 13168 ..^cfzo 13311 !cfa 13915 ♯chash 13972

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1799 ax-4 1813 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2110 ax-9 2118 ax-10 2139 ax-11 2156 ax-12 2173 ax-ext 2709 ax-rep 5205 ax-sep 5218 ax-nul 5225 ax-pow 5283 ax-pr 5347 ax-un 7566 ax-cnex 10858 ax-resscn 10859 ax-1cn 10860 ax-icn 10861 ax-addcl 10862 ax-addrcl 10863 ax-mulcl 10864 ax-mulrcl 10865 ax-mulcom 10866 ax-addass 10867 ax-mulass 10868 ax-distr 10869 ax-i2m1 10870 ax-1ne0 10871 ax-1rid 10872 ax-rnegex 10873 ax-rrecex 10874 ax-cnre 10875 ax-pre-lttri 10876 ax-pre-lttrn 10877 ax-pre-ltadd 10878 ax-pre-mulgt0 10879

This theorem depends on definitions: df-bi 206 df-an 396 df-or 844 df-3or 1086 df-3an 1087 df-tru 1542 df-fal 1552 df-ex 1784 df-nf 1788 df-sb 2069 df-mo 2540 df-eu 2569 df-clab 2716 df-cleq 2730 df-clel 2817 df-nfc 2888 df-ne 2943 df-nel 3049 df-ral 3068 df-rex 3069 df-reu 3070 df-rmo 3071 df-rab 3072 df-v 3424 df-sbc 3712 df-csb 3829 df-dif 3886 df-un 3888 df-in 3890 df-ss 3900 df-pss 3902 df-nul 4254 df-if 4457 df-pw 4532 df-sn 4559 df-pr 4561 df-tp 4563 df-op 4565 df-uni 4837 df-int 4877 df-iun 4923 df-br 5071 df-opab 5133 df-mpt 5154 df-tr 5188 df-id 5480 df-eprel 5486 df-po 5494 df-so 5495 df-fr 5535 df-we 5537 df-xp 5586 df-rel 5587 df-cnv 5588 df-co 5589 df-dm 5590 df-rn 5591 df-res 5592 df-ima 5593 df-pred 6191 df-ord 6254 df-on 6255 df-lim 6256 df-suc 6257 df-iota 6376 df-fun 6420 df-fn 6421 df-f 6422 df-f1 6423 df-fo 6424 df-f1o 6425 df-fv 6426 df-riota 7212 df-ov 7258 df-oprab 7259 df-mpo 7260 df-of 7511 df-om 7688 df-1st 7804 df-2nd 7805 df-frecs 8068 df-wrecs 8099 df-recs 8173 df-rdg 8212 df-1o 8267 df-oadd 8271 df-er 8456 df-map 8575 df-pm 8576 df-en 8692 df-dom 8693 df-sdom 8694 df-fin 8695 df-dju 9590 df-card 9628 df-pnf 10942 df-mnf 10943 df-xr 10944 df-ltxr 10945 df-le 10946 df-sub 11137 df-neg 11138 df-div 11563 df-nn 11904 df-2 11966 df-3 11967 df-n0 12164 df-xnn0 12236 df-z 12250 df-uz 12512 df-fz 13169 df-fzo 13312 df-seq 13650 df-fac 13916 df-bc 13945 df-hash 13973

This theorem is referenced by: poimirlem22 35726

W3C validator