Step | Hyp | Ref
| Expression |
1 | | resundi 5369 |
. . . 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 10980 |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝑁 ∈ ℂ) |
4 | | npcan1 10399 |
. . . . . . . . . . . 12
⊢ (𝑁 ∈ ℂ → ((𝑁 − 1) + 1) = 𝑁) |
5 | 3, 4 | syl 17 |
. . . . . . . . . . 11
⊢ (𝜑 → ((𝑁 − 1) + 1) = 𝑁) |
6 | 2 | nnzd 11425 |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝑁 ∈ ℤ) |
7 | | peano2zm 11364 |
. . . . . . . . . . . 12
⊢ (𝑁 ∈ ℤ → (𝑁 − 1) ∈
ℤ) |
8 | | uzid 11646 |
. . . . . . . . . . . 12
⊢ ((𝑁 − 1) ∈ ℤ
→ (𝑁 − 1) ∈
(ℤ_{≥}‘(𝑁 − 1))) |
9 | | peano2uz 11685 |
. . . . . . . . . . . 12
⊢ ((𝑁 − 1) ∈
(ℤ_{≥}‘(𝑁 − 1)) → ((𝑁 − 1) + 1) ∈
(ℤ_{≥}‘(𝑁 − 1))) |
10 | 6, 7, 8, 9 | 4syl 19 |
. . . . . . . . . . 11
⊢ (𝜑 → ((𝑁 − 1) + 1) ∈
(ℤ_{≥}‘(𝑁 − 1))) |
11 | 5, 10 | eqeltrrd 2699 |
. . . . . . . . . 10
⊢ (𝜑 → 𝑁 ∈ (ℤ_{≥}‘(𝑁 − 1))) |
12 | | fzss2 12323 |
. . . . . . . . . 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 3584 |
. . . . . . . 8
⊢ (𝜑 → (2^{nd}
‘𝑇) ∈ (1...𝑁)) |
16 | | fzp1elp1 12336 |
. . . . . . . . . 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 6620 |
. . . . . . . . 9
⊢ (𝜑 → (1...((𝑁 − 1) + 1)) = (1...𝑁)) |
19 | 17, 18 | eleqtrd 2700 |
. . . . . . . 8
⊢ (𝜑 → ((2^{nd}
‘𝑇) + 1) ∈
(1...𝑁)) |
20 | 15, 19 | prssd 4322 |
. . . . . . 7
⊢ (𝜑 → {(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) + 1)} ⊆
(1...𝑁)) |
21 | | undif 4021 |
. . . . . . 7
⊢
({(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)} ⊆ (1...𝑁) ↔ ({(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) + 1)})) =
(1...𝑁)) |
22 | 20, 21 | sylib 208 |
. . . . . 6
⊢ (𝜑 → ({(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) + 1)} ∪
((1...𝑁) ∖
{(2^{nd} ‘𝑇),
((2^{nd} ‘𝑇)
+ 1)})) = (1...𝑁)) |
23 | 22 | reseq2d 5356 |
. . . . 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 3342 |
. . . . . . . . 9
⊢ (𝑈 ∈ {𝑡 ∈ ((((0..^𝐾) ↑_{𝑚} (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ ⦋if(𝑦 < (2^{nd}
‘𝑡), 𝑦, (𝑦 + 1)) / 𝑗⦌((1^{st}
‘(1^{st} ‘𝑡)) ∘_{𝑓} +
((((2^{nd} ‘(1^{st} ‘𝑡)) “ (1...𝑗)) × {1}) ∪ (((2^{nd}
‘(1^{st} ‘𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} → 𝑈 ∈ ((((0..^𝐾) ↑_{𝑚} (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) |
26 | | poimirlem22.s |
. . . . . . . . 9
⊢ 𝑆 = {𝑡 ∈ ((((0..^𝐾) ↑_{𝑚} (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ ⦋if(𝑦 < (2^{nd}
‘𝑡), 𝑦, (𝑦 + 1)) / 𝑗⦌((1^{st}
‘(1^{st} ‘𝑡)) ∘_{𝑓} +
((((2^{nd} ‘(1^{st} ‘𝑡)) “ (1...𝑗)) × {1}) ∪ (((2^{nd}
‘(1^{st} ‘𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} |
27 | 25, 26 | eleq2s 2716 |
. . . . . . . 8
⊢ (𝑈 ∈ 𝑆 → 𝑈 ∈ ((((0..^𝐾) ↑_{𝑚} (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) |
28 | | xp1st 7143 |
. . . . . . . 8
⊢ (𝑈 ∈ ((((0..^𝐾) ↑_{𝑚}
(1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1^{st} ‘𝑈) ∈ (((0..^𝐾) ↑_{𝑚}
(1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})) |
29 | | xp2nd 7144 |
. . . . . . . 8
⊢
((1^{st} ‘𝑈) ∈ (((0..^𝐾) ↑_{𝑚} (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 6158 |
. . . . . . . 8
⊢
(2^{nd} ‘(1^{st} ‘𝑈)) ∈ V |
32 | | f1oeq1 6084 |
. . . . . . . 8
⊢ (𝑓 = (2^{nd}
‘(1^{st} ‘𝑈)) → (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) ↔ (2^{nd}
‘(1^{st} ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁))) |
33 | 31, 32 | elab 3333 |
. . . . . . 7
⊢
((2^{nd} ‘(1^{st} ‘𝑈)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ↔ (2^{nd}
‘(1^{st} ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁)) |
34 | 30, 33 | sylib 208 |
. . . . . 6
⊢ (𝜑 → (2^{nd}
‘(1^{st} ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁)) |
35 | | f1ofn 6095 |
. . . . . 6
⊢
((2^{nd} ‘(1^{st} ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^{nd}
‘(1^{st} ‘𝑈)) Fn (1...𝑁)) |
36 | | fnresdm 5958 |
. . . . . 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 2655 |
. . . 4
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑈)) ↾ ({(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) + 1)}))) =
(2^{nd} ‘(1^{st} ‘𝑈))) |
39 | 1, 38 | syl5eqr 2669 |
. . 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 11139 |
. . . . . 6
⊢ 2 <
3 |
41 | | 2re 11034 |
. . . . . . 7
⊢ 2 ∈
ℝ |
42 | | 3re 11038 |
. . . . . . 7
⊢ 3 ∈
ℝ |
43 | 41, 42 | ltnlei 10102 |
. . . . . 6
⊢ (2 < 3
↔ ¬ 3 ≤ 2) |
44 | 40, 43 | mpbi 220 |
. . . . 5
⊢ ¬ 3
≤ 2 |
45 | | df-pr 4151 |
. . . . . . . . . . . 12
⊢
{⟨(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)⟩, ⟨((2^{nd}
‘𝑇) + 1),
(2^{nd} ‘𝑇)⟩} = ({⟨(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) + 1)⟩} ∪
{⟨((2^{nd} ‘𝑇) + 1), (2^{nd} ‘𝑇)⟩}) |
46 | 45 | coeq2i 5242 |
. . . . . . . . . . 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 5595 |
. . . . . . . . . . 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 2643 |
. . . . . . . . . 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 3342 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (𝑇 ∈ {𝑡 ∈ ((((0..^𝐾) ↑_{𝑚} (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ ⦋if(𝑦 < (2^{nd}
‘𝑡), 𝑦, (𝑦 + 1)) / 𝑗⦌((1^{st}
‘(1^{st} ‘𝑡)) ∘_{𝑓} +
((((2^{nd} ‘(1^{st} ‘𝑡)) “ (1...𝑗)) × {1}) ∪ (((2^{nd}
‘(1^{st} ‘𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} → 𝑇 ∈ ((((0..^𝐾) ↑_{𝑚} (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) |
51 | 50, 26 | eleq2s 2716 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝑇 ∈ 𝑆 → 𝑇 ∈ ((((0..^𝐾) ↑_{𝑚} (1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁))) |
52 | | xp1st 7143 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝑇 ∈ ((((0..^𝐾) ↑_{𝑚}
(1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1^{st} ‘𝑇) ∈ (((0..^𝐾) ↑_{𝑚}
(1...𝑁)) × {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})) |
53 | | xp2nd 7144 |
. . . . . . . . . . . . . . . . . . . 20
⊢
((1^{st} ‘𝑇) ∈ (((0..^𝐾) ↑_{𝑚} (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 6158 |
. . . . . . . . . . . . . . . . . . . 20
⊢
(2^{nd} ‘(1^{st} ‘𝑇)) ∈ V |
56 | | f1oeq1 6084 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝑓 = (2^{nd}
‘(1^{st} ‘𝑇)) → (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) ↔ (2^{nd}
‘(1^{st} ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁))) |
57 | 55, 56 | elab 3333 |
. . . . . . . . . . . . . . . . . . 19
⊢
((2^{nd} ‘(1^{st} ‘𝑇)) ∈ {𝑓 ∣ 𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ↔ (2^{nd}
‘(1^{st} ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁)) |
58 | 54, 57 | sylib 208 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝜑 → (2^{nd}
‘(1^{st} ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁)) |
59 | | f1of1 6093 |
. . . . . . . . . . . . . . . . . 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 4309 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → {((2^{nd}
‘𝑇) + 1)} ⊆
(1...𝑁)) |
62 | | f1ores 6108 |
. . . . . . . . . . . . . . . . 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 692 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑇)) ↾ {((2^{nd} ‘𝑇) + 1)}):{((2^{nd}
‘𝑇) + 1)}–1-1-onto→((2^{nd} ‘(1^{st}
‘𝑇)) “
{((2^{nd} ‘𝑇)
+ 1)})) |
64 | | f1of 6094 |
. . . . . . . . . . . . . . . 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 6095 |
. . . . . . . . . . . . . . . . . 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 6215 |
. . . . . . . . . . . . . . . . 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 692 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → {((2^{nd}
‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1))} = ((2^{nd}
‘(1^{st} ‘𝑇)) “ {((2^{nd} ‘𝑇) + 1)})) |
70 | 69 | feq3d 5989 |
. . . . . . . . . . . . . . 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 247 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑇)) ↾ {((2^{nd} ‘𝑇) + 1)}):{((2^{nd}
‘𝑇) +
1)}⟶{((2^{nd} ‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1))}) |
72 | | eqid 2621 |
. . . . . . . . . . . . . . 15
⊢
{⟨(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)⟩} = {⟨(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) +
1)⟩} |
73 | | fvex 6158 |
. . . . . . . . . . . . . . . 16
⊢
(2^{nd} ‘𝑇) ∈ V |
74 | | ovex 6632 |
. . . . . . . . . . . . . . . 16
⊢
((2^{nd} ‘𝑇) + 1) ∈ V |
75 | 73, 74 | fsn 6356 |
. . . . . . . . . . . . . . 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 221 |
. . . . . . . . . . . . . 14
⊢
{⟨(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)⟩}:{(2^{nd} ‘𝑇)}⟶{((2^{nd}
‘𝑇) +
1)} |
77 | | fco2 6016 |
. . . . . . . . . . . . . 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 693 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑇)) ∘ {⟨(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) +
1)⟩}):{(2^{nd} ‘𝑇)}⟶{((2^{nd}
‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1))}) |
79 | | fvex 6158 |
. . . . . . . . . . . . . 14
⊢
((2^{nd} ‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1)) ∈
V |
80 | 79 | fconst2 6424 |
. . . . . . . . . . . . 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 208 |
. . . . . . . . . . . 12
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑇)) ∘ {⟨(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) + 1)⟩}) =
({(2^{nd} ‘𝑇)} × {((2^{nd}
‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1))})) |
82 | 73, 79 | xpsn 6361 |
. . . . . . . . . . . 12
⊢
({(2^{nd} ‘𝑇)} × {((2^{nd}
‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1))}) =
{⟨(2^{nd} ‘𝑇), ((2^{nd} ‘(1^{st}
‘𝑇))‘((2^{nd} ‘𝑇) + 1))⟩} |
83 | 81, 82 | syl6eq 2671 |
. . . . . . . . . . 11
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑇)) ∘ {⟨(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) + 1)⟩}) =
{⟨(2^{nd} ‘𝑇), ((2^{nd} ‘(1^{st}
‘𝑇))‘((2^{nd} ‘𝑇) + 1))⟩}) |
84 | 83 | uneq1d 3744 |
. . . . . . . . . 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 2667 |
. . . . . . . . 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 12312 |
. . . . . . . . . . . . . . . . 17
⊢
((2^{nd} ‘𝑇) ∈ (1...(𝑁 − 1)) → (2^{nd}
‘𝑇) ∈
ℕ) |
87 | 14, 86 | syl 17 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → (2^{nd}
‘𝑇) ∈
ℕ) |
88 | 87 | nnred 10979 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (2^{nd}
‘𝑇) ∈
ℝ) |
89 | 88 | ltp1d 10898 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (2^{nd}
‘𝑇) <
((2^{nd} ‘𝑇)
+ 1)) |
90 | 88, 89 | ltned 10117 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (2^{nd}
‘𝑇) ≠
((2^{nd} ‘𝑇)
+ 1)) |
91 | 90 | necomd 2845 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ((2^{nd}
‘𝑇) + 1) ≠
(2^{nd} ‘𝑇)) |
92 | | f1veqaeq 6468 |
. . . . . . . . . . . . . . 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 1321 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (((2^{nd}
‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1)) = ((2^{nd}
‘(1^{st} ‘𝑇))‘(2^{nd} ‘𝑇)) → ((2^{nd}
‘𝑇) + 1) =
(2^{nd} ‘𝑇))) |
94 | 93 | necon3d 2811 |
. . . . . . . . . . . . 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 2795 |
. . . . . . . . . . 11
⊢ (𝜑 → ¬ ((2^{nd}
‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1)) = ((2^{nd}
‘(1^{st} ‘𝑇))‘(2^{nd} ‘𝑇))) |
97 | 73, 79 | opth 4905 |
. . . . . . . . . . . 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 480 |
. . . . . . . . . . 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 135 |
. . . . . . . . . 10
⊢ (𝜑 → ¬
⟨(2^{nd} ‘𝑇), ((2^{nd} ‘(1^{st}
‘𝑇))‘((2^{nd} ‘𝑇) + 1))⟩ =
⟨(2^{nd} ‘𝑇), ((2^{nd} ‘(1^{st}
‘𝑇))‘(2^{nd} ‘𝑇))⟩) |
100 | 90 | neneqd 2795 |
. . . . . . . . . . 11
⊢ (𝜑 → ¬ (2^{nd}
‘𝑇) =
((2^{nd} ‘𝑇)
+ 1)) |
101 | 73, 79 | opth1 4904 |
. . . . . . . . . . 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 135 |
. . . . . . . . . 10
⊢ (𝜑 → ¬
⟨(2^{nd} ‘𝑇), ((2^{nd} ‘(1^{st}
‘𝑇))‘((2^{nd} ‘𝑇) + 1))⟩ =
⟨((2^{nd} ‘𝑇) + 1), ((2^{nd}
‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1))⟩) |
103 | | opex 4893 |
. . . . . . . . . . . . . . 15
⊢
⟨(2^{nd} ‘𝑇), ((2^{nd} ‘(1^{st}
‘𝑇))‘((2^{nd} ‘𝑇) + 1))⟩ ∈
V |
104 | 103 | snid 4179 |
. . . . . . . . . . . . . 14
⊢
⟨(2^{nd} ‘𝑇), ((2^{nd} ‘(1^{st}
‘𝑇))‘((2^{nd} ‘𝑇) + 1))⟩ ∈
{⟨(2^{nd} ‘𝑇), ((2^{nd} ‘(1^{st}
‘𝑇))‘((2^{nd} ‘𝑇) + 1))⟩} |
105 | | elun1 3758 |
. . . . . . . . . . . . . 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 2687 |
. . . . . . . . . . . . 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 223 |
. . . . . . . . . . . 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 4169 |
. . . . . . . . . . . . 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 517 |
. . . . . . . . . . . . 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 264 |
. . . . . . . . . . . 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 208 |
. . . . . . . . . . 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 2819 |
. . . . . . . . . 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 692 |
. . . . . . . . 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 2857 |
. . . . . . . 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 6379 |
. . . . . . . . . . . 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 692 |
. . . . . . . . . . 11
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑇)) ↾ {(2^{nd} ‘𝑇)}) = {⟨(2^{nd}
‘𝑇), ((2^{nd}
‘(1^{st} ‘𝑇))‘(2^{nd} ‘𝑇))⟩}) |
118 | | fnressn 6379 |
. . . . . . . . . . . 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 692 |
. . . . . . . . . . 11
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑇)) ↾ {((2^{nd} ‘𝑇) + 1)}) =
{⟨((2^{nd} ‘𝑇) + 1), ((2^{nd}
‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1))⟩}) |
120 | 117, 119 | uneq12d 3746 |
. . . . . . . . . 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 4151 |
. . . . . . . . . . . 12
⊢
{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)} = ({(2^{nd} ‘𝑇)} ∪ {((2^{nd}
‘𝑇) +
1)}) |
122 | 121 | reseq2i 5353 |
. . . . . . . . . . 11
⊢
((2^{nd} ‘(1^{st} ‘𝑇)) ↾ {(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}) = ((2^{nd}
‘(1^{st} ‘𝑇)) ↾ ({(2^{nd} ‘𝑇)} ∪ {((2^{nd}
‘𝑇) +
1)})) |
123 | | resundi 5369 |
. . . . . . . . . . 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 2643 |
. . . . . . . . . 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 4151 |
. . . . . . . . . 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 2680 |
. . . . . . . . 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 33049 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑈)) ↾ ((1...𝑁) ∖ {(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)})) = ((2^{nd}
‘(1^{st} ‘𝑇)) ↾ ((1...𝑁) ∖ {(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}))) |
129 | | uneq12 3740 |
. . . . . . . . . . . . . 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 5369 |
. . . . . . . . . . . . . . . 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 5356 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑇)) ↾ ({(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) + 1)}))) =
((2^{nd} ‘(1^{st} ‘𝑇)) ↾ (1...𝑁))) |
132 | | fnresdm 5958 |
. . . . . . . . . . . . . . . . . 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 2655 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑇)) ↾ ({(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)} ∪ ((1...𝑁) ∖ {(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) + 1)}))) =
(2^{nd} ‘(1^{st} ‘𝑇))) |
135 | 130, 134 | syl5eqr 2669 |
. . . . . . . . . . . . . . 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 2636 |
. . . . . . . . . . . . . 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 234 |
. . . . . . . . . . . . 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 709 |
. . . . . . . . . . . 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 2811 |
. . . . . . . . . . 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 2845 |
. . . . . . . . 9
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑇)) ↾ {(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}) ≠ ((2^{nd}
‘(1^{st} ‘𝑈)) ↾ {(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)})) |
142 | 126, 141 | eqnetrrd 2858 |
. . . . . . . 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 4870 |
. . . . . . . . . . . 12
⊢
{⟨(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)⟩, ⟨((2^{nd}
‘𝑇) + 1),
(2^{nd} ‘𝑇)⟩} ∈ V |
144 | 55, 143 | coex 7065 |
. . . . . . . . . . 11
⊢
((2^{nd} ‘(1^{st} ‘𝑇)) ∘ {⟨(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) + 1)⟩,
⟨((2^{nd} ‘𝑇) + 1), (2^{nd} ‘𝑇)⟩}) ∈
V |
145 | | prex 4870 |
. . . . . . . . . . 11
⊢
{⟨(2^{nd} ‘𝑇), ((2^{nd} ‘(1^{st}
‘𝑇))‘(2^{nd} ‘𝑇))⟩, ⟨((2^{nd}
‘𝑇) + 1),
((2^{nd} ‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1))⟩} ∈
V |
146 | 31 | resex 5402 |
. . . . . . . . . . 11
⊢
((2^{nd} ‘(1^{st} ‘𝑈)) ↾ {(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}) ∈
V |
147 | | hashtpg 13205 |
. . . . . . . . . . 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 1421 |
. . . . . . . . . 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 206 |
. . . . . . . . 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 1264 |
. . . . . . . 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 692 |
. . . . . . 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 4870 |
. . . . . . . . . . . . 13
⊢
{((2^{nd} ‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1)), ((2^{nd}
‘(1^{st} ‘𝑇))‘(2^{nd} ‘𝑇))} ∈ V |
153 | | prex 4870 |
. . . . . . . . . . . . 13
⊢
{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)} ∈ V |
154 | 152, 153 | mapval 7814 |
. . . . . . . . . . . 12
⊢
({((2^{nd} ‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1)), ((2^{nd}
‘(1^{st} ‘𝑇))‘(2^{nd} ‘𝑇))} ↑_{𝑚}
{(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 8179 |
. . . . . . . . . . . . 13
⊢
{((2^{nd} ‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1)), ((2^{nd}
‘(1^{st} ‘𝑇))‘(2^{nd} ‘𝑇))} ∈ Fin |
156 | | prfi 8179 |
. . . . . . . . . . . . 13
⊢
{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)} ∈ Fin |
157 | | mapfi 8206 |
. . . . . . . . . . . . 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} ‘𝑇))} ↑_{𝑚}
{(2^{nd} ‘𝑇),
((2^{nd} ‘𝑇)
+ 1)}) ∈ Fin) |
158 | 155, 156,
157 | mp2an 707 |
. . . . . . . . . . . 12
⊢
({((2^{nd} ‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1)), ((2^{nd}
‘(1^{st} ‘𝑇))‘(2^{nd} ‘𝑇))} ↑_{𝑚}
{(2^{nd} ‘𝑇),
((2^{nd} ‘𝑇)
+ 1)}) ∈ Fin |
159 | 154, 158 | eqeltrri 2695 |
. . . . . . . . . . 11
⊢ {𝑓 ∣ 𝑓:{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}⟶{((2^{nd}
‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1)), ((2^{nd}
‘(1^{st} ‘𝑇))‘(2^{nd} ‘𝑇))}} ∈ Fin |
160 | | f1of 6094 |
. . . . . . . . . . . 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 3653 |
. . . . . . . . . . 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 8124 |
. . . . . . . . . . 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 707 |
. . . . . . . . . 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 4322 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → {((2^{nd}
‘𝑇) + 1),
(2^{nd} ‘𝑇)}
⊆ (1...𝑁)) |
165 | | f1ores 6108 |
. . . . . . . . . . . . . . 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 692 |
. . . . . . . . . . . . . 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 6219 |
. . . . . . . . . . . . . . . 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 1323 |
. . . . . . . . . . . . . . 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 6091 |
. . . . . . . . . . . . . 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 222 |
. . . . . . . . . . . . 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 6138 |
. . . . . . . . . . . . . . 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 708 |
. . . . . . . . . . . . . 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 692 |
. . . . . . . . . . . . 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 6116 |
. . . . . . . . . . . . 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 692 |
. . . . . . . . . . . 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 5574 |
. . . . . . . . . . . . . . 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 707 |
. . . . . . . . . . . . . 14
⊢ ran
{⟨(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)⟩, ⟨((2^{nd}
‘𝑇) + 1),
(2^{nd} ‘𝑇)⟩} = {((2^{nd} ‘𝑇) + 1), (2^{nd}
‘𝑇)} |
178 | 177 | eqimssi 3638 |
. . . . . . . . . . . . 13
⊢ ran
{⟨(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)⟩, ⟨((2^{nd}
‘𝑇) + 1),
(2^{nd} ‘𝑇)⟩} ⊆ {((2^{nd}
‘𝑇) + 1),
(2^{nd} ‘𝑇)} |
179 | | cores 5597 |
. . . . . . . . . . . . 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 6084 |
. . . . . . . . . . . . 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 208 |
. . . . . . . . . . 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 2845 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑇))‘(2^{nd} ‘𝑇)) ≠ ((2^{nd}
‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1))) |
184 | | fvex 6158 |
. . . . . . . . . . . . . 14
⊢
((2^{nd} ‘(1^{st} ‘𝑇))‘(2^{nd} ‘𝑇)) ∈ V |
185 | | f1oprg 6138 |
. . . . . . . . . . . . . 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 708 |
. . . . . . . . . . . . 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 692 |
. . . . . . . . . . . 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 4237 |
. . . . . . . . . . . . 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 6086 |
. . . . . . . . . . . . 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 208 |
. . . . . . . . . . 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 6093 |
. . . . . . . . . . . . . 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 6108 |
. . . . . . . . . . . . 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 692 |
. . . . . . . . . . . 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 6100 |
. . . . . . . . . . . . . . . . 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 480 |
. . . . . . . . . . . . . . . 16
⊢
((2^{nd} ‘(1^{st} ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → Fun ^{◡}(2^{nd} ‘(1^{st}
‘𝑈))) |
198 | | imadif 5931 |
. . . . . . . . . . . . . . . 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 6101 |
. . . . . . . . . . . . . . . . . 18
⊢
((2^{nd} ‘(1^{st} ‘𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^{nd}
‘(1^{st} ‘𝑈)):(1...𝑁)–onto→(1...𝑁)) |
201 | | foima 6077 |
. . . . . . . . . . . . . . . . . 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 6101 |
. . . . . . . . . . . . . . . . . 18
⊢
((2^{nd} ‘(1^{st} ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → (2^{nd}
‘(1^{st} ‘𝑇)):(1...𝑁)–onto→(1...𝑁)) |
204 | | foima 6077 |
. . . . . . . . . . . . . . . . . 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 2658 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑈)) “ (1...𝑁)) = ((2^{nd} ‘(1^{st}
‘𝑇)) “
(1...𝑁))) |
207 | 128 | rneqd 5313 |
. . . . . . . . . . . . . . . . 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 5087 |
. . . . . . . . . . . . . . . . 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 5087 |
. . . . . . . . . . . . . . . . 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 2680 |
. . . . . . . . . . . . . . . 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 3707 |
. . . . . . . . . . . . . . 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 6100 |
. . . . . . . . . . . . . . . . . 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 480 |
. . . . . . . . . . . . . . . . 17
⊢
((2^{nd} ‘(1^{st} ‘𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → Fun ^{◡}(2^{nd} ‘(1^{st}
‘𝑇))) |
214 | | imadif 5931 |
. . . . . . . . . . . . . . . . 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 3843 |
. . . . . . . . . . . . . . . . . 18
⊢
((1...𝑁) ∩
{(2^{nd} ‘𝑇),
((2^{nd} ‘𝑇)
+ 1)}) = ((1...𝑁) ∖
((1...𝑁) ∖
{(2^{nd} ‘𝑇),
((2^{nd} ‘𝑇)
+ 1)})) |
217 | | sseqin2 3795 |
. . . . . . . . . . . . . . . . . . 19
⊢
({(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)} ⊆ (1...𝑁) ↔ ((1...𝑁) ∩ {(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}) = {(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) +
1)}) |
218 | 20, 217 | sylib 208 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝜑 → ((1...𝑁) ∩ {(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}) = {(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) +
1)}) |
219 | 216, 218 | syl5eqr 2669 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)})) = {(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) +
1)}) |
220 | 219 | imaeq2d 5425 |
. . . . . . . . . . . . . . . 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 2657 |
. . . . . . . . . . . . . . 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 2659 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑈)) “ ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}))) = ((2^{nd}
‘(1^{st} ‘𝑇)) “ {(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)})) |
223 | 219 | imaeq2d 5425 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → ((2^{nd}
‘(1^{st} ‘𝑈)) “ ((1...𝑁) ∖ ((1...𝑁) ∖ {(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}))) = ((2^{nd}
‘(1^{st} ‘𝑈)) “ {(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)})) |
224 | | fnimapr 6219 |
. . . . . . . . . . . . . . . 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 1323 |
. . . . . . . . . . . . . . 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 | syl6eq 2671 |
. . . . . . . . . . . . . 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 2663 |
. . . . . . . . . . . . 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 6091 |
. . . . . . . . . . . 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 222 |
. . . . . . . . . . 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 3652 |
. . . . . . . . . . . 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 6084 |
. . . . . . . . . . . . 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 6084 |
. . . . . . . . . . . . 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 6084 |
. . . . . . . . . . . . 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 4211 |
. . . . . . . . . . . 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 264 |
. . . . . . . . . . 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 1244 |
. . . . . . . . . 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 13137 |
. . . . . . . . . 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 694 |
. . . . . . . . 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 7932 |
. . . . . . . . . . . 12
⊢
{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)} ≈ {(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) +
1)} |
240 | | hashprg 13122 |
. . . . . . . . . . . . . . . 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 707 |
. . . . . . . . . . . . . . 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 208 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (#‘{((2^{nd}
‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1)), ((2^{nd}
‘(1^{st} ‘𝑇))‘(2^{nd} ‘𝑇))}) = 2) |
243 | | hashprg 13122 |
. . . . . . . . . . . . . . . 16
⊢
(((2^{nd} ‘𝑇) ∈ V ∧ ((2^{nd}
‘𝑇) + 1) ∈ V)
→ ((2^{nd} ‘𝑇) ≠ ((2^{nd} ‘𝑇) + 1) ↔
(#‘{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}) = 2)) |
244 | 73, 74, 243 | mp2an 707 |
. . . . . . . . . . . . . . 15
⊢
((2^{nd} ‘𝑇) ≠ ((2^{nd} ‘𝑇) + 1) ↔
(#‘{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}) = 2) |
245 | 90, 244 | sylib 208 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (#‘{(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) + 1)}) =
2) |
246 | 242, 245 | eqtr4d 2658 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (#‘{((2^{nd}
‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1)), ((2^{nd}
‘(1^{st} ‘𝑇))‘(2^{nd} ‘𝑇))}) = (#‘{(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) +
1)})) |
247 | | hashen 13075 |
. . . . . . . . . . . . . 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 707 |
. . . . . . . . . . . . 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 208 |
. . . . . . . . . . . 12
⊢ (𝜑 → {((2^{nd}
‘(1^{st} ‘𝑇))‘((2^{nd} ‘𝑇) + 1)), ((2^{nd}
‘(1^{st} ‘𝑇))‘(2^{nd} ‘𝑇))} ≈ {(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) +
1)}) |
250 | | hashfacen 13176 |
. . . . . . . . . . . 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 694 |
. . . . . . . . . . 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 7814 |
. . . . . . . . . . . . . 14
⊢
({(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)} ↑_{𝑚}
{(2^{nd} ‘𝑇),
((2^{nd} ‘𝑇)
+ 1)}) = {𝑓 ∣ 𝑓:{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}⟶{(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) +
1)}} |
253 | | mapfi 8206 |
. . . . . . . . . . . . . . 15
⊢
(({(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)} ∈ Fin ∧ {(2^{nd}
‘𝑇), ((2^{nd}
‘𝑇) + 1)} ∈ Fin)
→ ({(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)} ↑_{𝑚}
{(2^{nd} ‘𝑇),
((2^{nd} ‘𝑇)
+ 1)}) ∈ Fin) |
254 | 156, 156,
253 | mp2an 707 |
. . . . . . . . . . . . . 14
⊢
({(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)} ↑_{𝑚}
{(2^{nd} ‘𝑇),
((2^{nd} ‘𝑇)
+ 1)}) ∈ Fin |
255 | 252, 254 | eqeltrri 2695 |
. . . . . . . . . . . . 13
⊢ {𝑓 ∣ 𝑓:{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}⟶{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}} ∈
Fin |
256 | | f1of 6094 |
. . . . . . . . . . . . . 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 3653 |
. . . . . . . . . . . . 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 8124 |
. . . . . . . . . . . . 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 707 |
. . . . . . . . . . . 12
⊢ {𝑓 ∣ 𝑓:{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}–1-1-onto→{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}} ∈ Fin |
260 | | hashen 13075 |
. . . . . . . . . . . 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 707 |
. . . . . . . . . . 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 224 |
. . . . . . . . . 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 13180 |
. . . . . . . . . . . 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 6152 |
. . . . . . . . . . . 12
⊢ (𝜑 →
(!‘(#‘{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)})) = (!‘2)) |
266 | | fac2 13006 |
. . . . . . . . . . . 12
⊢
(!‘2) = 2 |
267 | 265, 266 | syl6eq 2671 |
. . . . . . . . . . 11
⊢ (𝜑 →
(!‘(#‘{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)})) = 2) |
268 | 264, 267 | syl5eq 2667 |
. . . . . . . . . 10
⊢ (𝜑 → (#‘{𝑓 ∣ 𝑓:{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}–1-1-onto→{(2^{nd} ‘𝑇), ((2^{nd} ‘𝑇) + 1)}}) = 2) |
269 | 262, 268 | eqtrd 2655 |
. . . . . . . . 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 4639 |
. . . . . . . 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 4616 |
. . . . . . . 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 235 |
. . . . . . 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 2808 |
. . . . 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 5612 |
. . . . 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 | syl6eqr 2673 |
. . . 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 3746 |
. . 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 2657 |
. 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 5595 |
. 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 | syl6eqr 2673 |
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)}))))) |