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

Theorem poimirlem19 35034
 Description: Lemma for poimir 35048 establishing the vertices of the simplex in poimirlem20 35035. (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(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}
poimirlem22.1 (𝜑𝐹:(0...(𝑁 − 1))⟶((0...𝐾) ↑m (1...𝑁)))
poimirlem22.2 (𝜑𝑇𝑆)
poimirlem22.3 ((𝜑𝑛 ∈ (1...𝑁)) → ∃𝑝 ∈ ran 𝐹(𝑝𝑛) ≠ 0)
poimirlem21.4 (𝜑 → (2nd𝑇) = 𝑁)
Assertion
Ref Expression
poimirlem19 (𝜑𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ ((𝑛 ∈ (1...𝑁) ↦ (((1st ‘(1st𝑇))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0))) ∘f + (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0})))))
Distinct variable groups:   𝑓,𝑗,𝑛,𝑝,𝑡,𝑦   𝜑,𝑗,𝑛,𝑦   𝑗,𝐹,𝑛,𝑦   𝑗,𝑁,𝑛,𝑦   𝑇,𝑗,𝑛,𝑦   𝜑,𝑝,𝑡   𝑓,𝐾,𝑗,𝑛,𝑝,𝑡   𝑓,𝑁,𝑝,𝑡   𝑇,𝑓,𝑝   𝑓,𝐹,𝑝,𝑡   𝑡,𝑇   𝑆,𝑗,𝑛,𝑝,𝑡,𝑦
Allowed substitution hints:   𝜑(𝑓)   𝑆(𝑓)   𝐾(𝑦)

Proof of Theorem poimirlem19
StepHypRef Expression
1 poimirlem22.2 . . 3 (𝜑𝑇𝑆)
2 fveq2 6652 . . . . . . . . . . 11 (𝑡 = 𝑇 → (2nd𝑡) = (2nd𝑇))
32breq2d 5054 . . . . . . . . . 10 (𝑡 = 𝑇 → (𝑦 < (2nd𝑡) ↔ 𝑦 < (2nd𝑇)))
43ifbid 4461 . . . . . . . . 9 (𝑡 = 𝑇 → if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) = if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)))
54csbeq1d 3859 . . . . . . . 8 (𝑡 = 𝑇if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))
6 2fveq3 6657 . . . . . . . . . 10 (𝑡 = 𝑇 → (1st ‘(1st𝑡)) = (1st ‘(1st𝑇)))
7 2fveq3 6657 . . . . . . . . . . . . 13 (𝑡 = 𝑇 → (2nd ‘(1st𝑡)) = (2nd ‘(1st𝑇)))
87imaeq1d 5906 . . . . . . . . . . . 12 (𝑡 = 𝑇 → ((2nd ‘(1st𝑡)) “ (1...𝑗)) = ((2nd ‘(1st𝑇)) “ (1...𝑗)))
98xpeq1d 5561 . . . . . . . . . . 11 (𝑡 = 𝑇 → (((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) = (((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}))
107imaeq1d 5906 . . . . . . . . . . . 12 (𝑡 = 𝑇 → ((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) = ((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)))
1110xpeq1d 5561 . . . . . . . . . . 11 (𝑡 = 𝑇 → (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}) = (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))
129, 11uneq12d 4115 . . . . . . . . . 10 (𝑡 = 𝑇 → ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})) = ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0})))
136, 12oveq12d 7158 . . . . . . . . 9 (𝑡 = 𝑇 → ((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))))
1413csbeq2dv 3862 . . . . . . . 8 (𝑡 = 𝑇if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))))
155, 14eqtrd 2857 . . . . . . 7 (𝑡 = 𝑇if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))))
1615mpteq2dv 5138 . . . . . 6 (𝑡 = 𝑇 → (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0})))))
1716eqeq2d 2833 . . . . 5 (𝑡 = 𝑇 → (𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ↔ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))))))
18 poimirlem22.s . . . . 5 𝑆 = {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}
1917, 18elrab2 3658 . . . 4 (𝑇𝑆 ↔ (𝑇 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))))))
2019simprbi 500 . . 3 (𝑇𝑆𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0})))))
211, 20syl 17 . 2 (𝜑𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0})))))
22 elrabi 3650 . . . . . . . . . . . 12 (𝑇 ∈ {𝑡 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘f + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} → 𝑇 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
2322, 18eleq2s 2932 . . . . . . . . . . 11 (𝑇𝑆𝑇 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
241, 23syl 17 . . . . . . . . . 10 (𝜑𝑇 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
25 xp1st 7707 . . . . . . . . . 10 (𝑇 ∈ ((((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1st𝑇) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
2624, 25syl 17 . . . . . . . . 9 (𝜑 → (1st𝑇) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
27 xp1st 7707 . . . . . . . . 9 ((1st𝑇) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (1st ‘(1st𝑇)) ∈ ((0..^𝐾) ↑m (1...𝑁)))
2826, 27syl 17 . . . . . . . 8 (𝜑 → (1st ‘(1st𝑇)) ∈ ((0..^𝐾) ↑m (1...𝑁)))
29 elmapfn 8416 . . . . . . . 8 ((1st ‘(1st𝑇)) ∈ ((0..^𝐾) ↑m (1...𝑁)) → (1st ‘(1st𝑇)) Fn (1...𝑁))
3028, 29syl 17 . . . . . . 7 (𝜑 → (1st ‘(1st𝑇)) Fn (1...𝑁))
3130adantr 484 . . . . . 6 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (1st ‘(1st𝑇)) Fn (1...𝑁))
32 1ex 10626 . . . . . . . . . 10 1 ∈ V
33 fnconstg 6548 . . . . . . . . . 10 (1 ∈ V → (((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) Fn ((2nd ‘(1st𝑇)) “ (1...𝑦)))
3432, 33ax-mp 5 . . . . . . . . 9 (((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) Fn ((2nd ‘(1st𝑇)) “ (1...𝑦))
35 c0ex 10624 . . . . . . . . . 10 0 ∈ V
36 fnconstg 6548 . . . . . . . . . 10 (0 ∈ V → (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}) Fn ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)))
3735, 36ax-mp 5 . . . . . . . . 9 (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}) Fn ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁))
3834, 37pm3.2i 474 . . . . . . . 8 ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) Fn ((2nd ‘(1st𝑇)) “ (1...𝑦)) ∧ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}) Fn ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)))
39 xp2nd 7708 . . . . . . . . . . . . 13 ((1st𝑇) ∈ (((0..^𝐾) ↑m (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (2nd ‘(1st𝑇)) ∈ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
4026, 39syl 17 . . . . . . . . . . . 12 (𝜑 → (2nd ‘(1st𝑇)) ∈ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
41 fvex 6665 . . . . . . . . . . . . 13 (2nd ‘(1st𝑇)) ∈ V
42 f1oeq1 6586 . . . . . . . . . . . . 13 (𝑓 = (2nd ‘(1st𝑇)) → (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) ↔ (2nd ‘(1st𝑇)):(1...𝑁)–1-1-onto→(1...𝑁)))
4341, 42elab 3642 . . . . . . . . . . . 12 ((2nd ‘(1st𝑇)) ∈ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ↔ (2nd ‘(1st𝑇)):(1...𝑁)–1-1-onto→(1...𝑁))
4440, 43sylib 221 . . . . . . . . . . 11 (𝜑 → (2nd ‘(1st𝑇)):(1...𝑁)–1-1-onto→(1...𝑁))
45 dff1o3 6603 . . . . . . . . . . . 12 ((2nd ‘(1st𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) ↔ ((2nd ‘(1st𝑇)):(1...𝑁)–onto→(1...𝑁) ∧ Fun (2nd ‘(1st𝑇))))
4645simprbi 500 . . . . . . . . . . 11 ((2nd ‘(1st𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → Fun (2nd ‘(1st𝑇)))
4744, 46syl 17 . . . . . . . . . 10 (𝜑 → Fun (2nd ‘(1st𝑇)))
48 imain 6418 . . . . . . . . . 10 (Fun (2nd ‘(1st𝑇)) → ((2nd ‘(1st𝑇)) “ ((1...𝑦) ∩ ((𝑦 + 1)...𝑁))) = (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∩ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁))))
4947, 48syl 17 . . . . . . . . 9 (𝜑 → ((2nd ‘(1st𝑇)) “ ((1...𝑦) ∩ ((𝑦 + 1)...𝑁))) = (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∩ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁))))
50 elfznn0 12995 . . . . . . . . . . . . . 14 (𝑦 ∈ (0...(𝑁 − 1)) → 𝑦 ∈ ℕ0)
5150nn0red 11944 . . . . . . . . . . . . 13 (𝑦 ∈ (0...(𝑁 − 1)) → 𝑦 ∈ ℝ)
5251ltp1d 11559 . . . . . . . . . . . 12 (𝑦 ∈ (0...(𝑁 − 1)) → 𝑦 < (𝑦 + 1))
53 fzdisj 12929 . . . . . . . . . . . 12 (𝑦 < (𝑦 + 1) → ((1...𝑦) ∩ ((𝑦 + 1)...𝑁)) = ∅)
5452, 53syl 17 . . . . . . . . . . 11 (𝑦 ∈ (0...(𝑁 − 1)) → ((1...𝑦) ∩ ((𝑦 + 1)...𝑁)) = ∅)
5554imaeq2d 5907 . . . . . . . . . 10 (𝑦 ∈ (0...(𝑁 − 1)) → ((2nd ‘(1st𝑇)) “ ((1...𝑦) ∩ ((𝑦 + 1)...𝑁))) = ((2nd ‘(1st𝑇)) “ ∅))
56 ima0 5923 . . . . . . . . . 10 ((2nd ‘(1st𝑇)) “ ∅) = ∅
5755, 56syl6eq 2873 . . . . . . . . 9 (𝑦 ∈ (0...(𝑁 − 1)) → ((2nd ‘(1st𝑇)) “ ((1...𝑦) ∩ ((𝑦 + 1)...𝑁))) = ∅)
5849, 57sylan9req 2878 . . . . . . . 8 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∩ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁))) = ∅)
59 fnun 6443 . . . . . . . 8 ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) Fn ((2nd ‘(1st𝑇)) “ (1...𝑦)) ∧ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}) Fn ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁))) ∧ (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∩ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁))) = ∅) → ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0})) Fn (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∪ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁))))
6038, 58, 59sylancr 590 . . . . . . 7 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0})) Fn (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∪ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁))))
61 imaundi 5986 . . . . . . . . 9 ((2nd ‘(1st𝑇)) “ ((1...𝑦) ∪ ((𝑦 + 1)...𝑁))) = (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∪ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)))
62 nn0p1nn 11924 . . . . . . . . . . . . . . 15 (𝑦 ∈ ℕ0 → (𝑦 + 1) ∈ ℕ)
6350, 62syl 17 . . . . . . . . . . . . . 14 (𝑦 ∈ (0...(𝑁 − 1)) → (𝑦 + 1) ∈ ℕ)
64 nnuz 12269 . . . . . . . . . . . . . 14 ℕ = (ℤ‘1)
6563, 64eleqtrdi 2924 . . . . . . . . . . . . 13 (𝑦 ∈ (0...(𝑁 − 1)) → (𝑦 + 1) ∈ (ℤ‘1))
6665adantl 485 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (𝑦 + 1) ∈ (ℤ‘1))
67 poimir.0 . . . . . . . . . . . . . . . 16 (𝜑𝑁 ∈ ℕ)
6867nncnd 11641 . . . . . . . . . . . . . . 15 (𝜑𝑁 ∈ ℂ)
69 npcan1 11054 . . . . . . . . . . . . . . 15 (𝑁 ∈ ℂ → ((𝑁 − 1) + 1) = 𝑁)
7068, 69syl 17 . . . . . . . . . . . . . 14 (𝜑 → ((𝑁 − 1) + 1) = 𝑁)
7170adantr 484 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑁 − 1) + 1) = 𝑁)
72 elfzuz3 12899 . . . . . . . . . . . . . . 15 (𝑦 ∈ (0...(𝑁 − 1)) → (𝑁 − 1) ∈ (ℤ𝑦))
73 peano2uz 12289 . . . . . . . . . . . . . . 15 ((𝑁 − 1) ∈ (ℤ𝑦) → ((𝑁 − 1) + 1) ∈ (ℤ𝑦))
7472, 73syl 17 . . . . . . . . . . . . . 14 (𝑦 ∈ (0...(𝑁 − 1)) → ((𝑁 − 1) + 1) ∈ (ℤ𝑦))
7574adantl 485 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑁 − 1) + 1) ∈ (ℤ𝑦))
7671, 75eqeltrrd 2915 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → 𝑁 ∈ (ℤ𝑦))
77 fzsplit2 12927 . . . . . . . . . . . 12 (((𝑦 + 1) ∈ (ℤ‘1) ∧ 𝑁 ∈ (ℤ𝑦)) → (1...𝑁) = ((1...𝑦) ∪ ((𝑦 + 1)...𝑁)))
7866, 76, 77syl2anc 587 . . . . . . . . . . 11 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (1...𝑁) = ((1...𝑦) ∪ ((𝑦 + 1)...𝑁)))
7978imaeq2d 5907 . . . . . . . . . 10 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((2nd ‘(1st𝑇)) “ (1...𝑁)) = ((2nd ‘(1st𝑇)) “ ((1...𝑦) ∪ ((𝑦 + 1)...𝑁))))
80 f1ofo 6604 . . . . . . . . . . . 12 ((2nd ‘(1st𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → (2nd ‘(1st𝑇)):(1...𝑁)–onto→(1...𝑁))
81 foima 6577 . . . . . . . . . . . 12 ((2nd ‘(1st𝑇)):(1...𝑁)–onto→(1...𝑁) → ((2nd ‘(1st𝑇)) “ (1...𝑁)) = (1...𝑁))
8244, 80, 813syl 18 . . . . . . . . . . 11 (𝜑 → ((2nd ‘(1st𝑇)) “ (1...𝑁)) = (1...𝑁))
8382adantr 484 . . . . . . . . . 10 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((2nd ‘(1st𝑇)) “ (1...𝑁)) = (1...𝑁))
8479, 83eqtr3d 2859 . . . . . . . . 9 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((2nd ‘(1st𝑇)) “ ((1...𝑦) ∪ ((𝑦 + 1)...𝑁))) = (1...𝑁))
8561, 84syl5eqr 2871 . . . . . . . 8 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∪ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁))) = (1...𝑁))
8685fneq2d 6426 . . . . . . 7 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0})) Fn (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∪ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁))) ↔ ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0})) Fn (1...𝑁)))
8760, 86mpbid 235 . . . . . 6 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0})) Fn (1...𝑁))
88 ovexd 7175 . . . . . 6 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (1...𝑁) ∈ V)
89 inidm 4169 . . . . . 6 ((1...𝑁) ∩ (1...𝑁)) = (1...𝑁)
90 eqidd 2823 . . . . . 6 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) → ((1st ‘(1st𝑇))‘𝑛) = ((1st ‘(1st𝑇))‘𝑛))
91 eqidd 2823 . . . . . 6 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) → (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛))
9231, 87, 88, 88, 89, 90, 91offval 7401 . . . . 5 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))) = (𝑛 ∈ (1...𝑁) ↦ (((1st ‘(1st𝑇))‘𝑛) + (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛))))
93 elmapi 8415 . . . . . . . . . . . . 13 ((1st ‘(1st𝑇)) ∈ ((0..^𝐾) ↑m (1...𝑁)) → (1st ‘(1st𝑇)):(1...𝑁)⟶(0..^𝐾))
9428, 93syl 17 . . . . . . . . . . . 12 (𝜑 → (1st ‘(1st𝑇)):(1...𝑁)⟶(0..^𝐾))
9594ffvelrnda 6833 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...𝑁)) → ((1st ‘(1st𝑇))‘𝑛) ∈ (0..^𝐾))
96 elfzonn0 13077 . . . . . . . . . . 11 (((1st ‘(1st𝑇))‘𝑛) ∈ (0..^𝐾) → ((1st ‘(1st𝑇))‘𝑛) ∈ ℕ0)
9795, 96syl 17 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...𝑁)) → ((1st ‘(1st𝑇))‘𝑛) ∈ ℕ0)
9897nn0cnd 11945 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → ((1st ‘(1st𝑇))‘𝑛) ∈ ℂ)
9998adantlr 714 . . . . . . . 8 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) → ((1st ‘(1st𝑇))‘𝑛) ∈ ℂ)
100 ax-1cn 10584 . . . . . . . . . 10 1 ∈ ℂ
101 0cn 10622 . . . . . . . . . 10 0 ∈ ℂ
102100, 101ifcli 4485 . . . . . . . . 9 if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0) ∈ ℂ
103102a1i 11 . . . . . . . 8 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) → if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0) ∈ ℂ)
104 snssi 4714 . . . . . . . . . . 11 (1 ∈ ℂ → {1} ⊆ ℂ)
105100, 104ax-mp 5 . . . . . . . . . 10 {1} ⊆ ℂ
106 snssi 4714 . . . . . . . . . . 11 (0 ∈ ℂ → {0} ⊆ ℂ)
107101, 106ax-mp 5 . . . . . . . . . 10 {0} ⊆ ℂ
108105, 107unssi 4136 . . . . . . . . 9 ({1} ∪ {0}) ⊆ ℂ
10932fconst 6546 . . . . . . . . . . . . 13 ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}):(((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1)))⟶{1}
11035fconst 6546 . . . . . . . . . . . . 13 ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}):(((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁))⟶{0}
111109, 110pm3.2i 474 . . . . . . . . . . . 12 (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}):(((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1)))⟶{1} ∧ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}):(((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁))⟶{0})
112 simpr 488 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑛 ∈ ((1 + 1)...𝑁)) → 𝑛 ∈ ((1 + 1)...𝑁))
11367nnzd 12074 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑𝑁 ∈ ℤ)
114 1z 12000 . . . . . . . . . . . . . . . . . . . . . . . 24 1 ∈ ℤ
115 peano2z 12011 . . . . . . . . . . . . . . . . . . . . . . . 24 (1 ∈ ℤ → (1 + 1) ∈ ℤ)
116114, 115ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . 23 (1 + 1) ∈ ℤ
117113, 116jctil 523 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ((1 + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ))
118 elfzelz 12902 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 ∈ ((1 + 1)...𝑁) → 𝑛 ∈ ℤ)
119118, 114jctir 524 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 ∈ ((1 + 1)...𝑁) → (𝑛 ∈ ℤ ∧ 1 ∈ ℤ))
120 fzsubel 12938 . . . . . . . . . . . . . . . . . . . . . 22 ((((1 + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑛 ∈ ℤ ∧ 1 ∈ ℤ)) → (𝑛 ∈ ((1 + 1)...𝑁) ↔ (𝑛 − 1) ∈ (((1 + 1) − 1)...(𝑁 − 1))))
121117, 119, 120syl2an 598 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑛 ∈ ((1 + 1)...𝑁)) → (𝑛 ∈ ((1 + 1)...𝑁) ↔ (𝑛 − 1) ∈ (((1 + 1) − 1)...(𝑁 − 1))))
122112, 121mpbid 235 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑛 ∈ ((1 + 1)...𝑁)) → (𝑛 − 1) ∈ (((1 + 1) − 1)...(𝑁 − 1)))
123100, 100pncan3oi 10891 . . . . . . . . . . . . . . . . . . . . 21 ((1 + 1) − 1) = 1
124123oveq1i 7150 . . . . . . . . . . . . . . . . . . . 20 (((1 + 1) − 1)...(𝑁 − 1)) = (1...(𝑁 − 1))
125122, 124eleqtrdi 2924 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑛 ∈ ((1 + 1)...𝑁)) → (𝑛 − 1) ∈ (1...(𝑁 − 1)))
126125ralrimiva 3174 . . . . . . . . . . . . . . . . . 18 (𝜑 → ∀𝑛 ∈ ((1 + 1)...𝑁)(𝑛 − 1) ∈ (1...(𝑁 − 1)))
127 simpr 488 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦 ∈ (1...(𝑁 − 1))) → 𝑦 ∈ (1...(𝑁 − 1)))
128 peano2zm 12013 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑁 ∈ ℤ → (𝑁 − 1) ∈ ℤ)
129113, 128syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → (𝑁 − 1) ∈ ℤ)
130129, 114jctil 523 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → (1 ∈ ℤ ∧ (𝑁 − 1) ∈ ℤ))
131 elfzelz 12902 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 ∈ (1...(𝑁 − 1)) → 𝑦 ∈ ℤ)
132131, 114jctir 524 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 ∈ (1...(𝑁 − 1)) → (𝑦 ∈ ℤ ∧ 1 ∈ ℤ))
133 fzaddel 12936 . . . . . . . . . . . . . . . . . . . . . . 23 (((1 ∈ ℤ ∧ (𝑁 − 1) ∈ ℤ) ∧ (𝑦 ∈ ℤ ∧ 1 ∈ ℤ)) → (𝑦 ∈ (1...(𝑁 − 1)) ↔ (𝑦 + 1) ∈ ((1 + 1)...((𝑁 − 1) + 1))))
134130, 132, 133syl2an 598 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦 ∈ (1...(𝑁 − 1))) → (𝑦 ∈ (1...(𝑁 − 1)) ↔ (𝑦 + 1) ∈ ((1 + 1)...((𝑁 − 1) + 1))))
135127, 134mpbid 235 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑦 ∈ (1...(𝑁 − 1))) → (𝑦 + 1) ∈ ((1 + 1)...((𝑁 − 1) + 1)))
13670oveq2d 7156 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ((1 + 1)...((𝑁 − 1) + 1)) = ((1 + 1)...𝑁))
137136adantr 484 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑦 ∈ (1...(𝑁 − 1))) → ((1 + 1)...((𝑁 − 1) + 1)) = ((1 + 1)...𝑁))
138135, 137eleqtrd 2916 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ (1...(𝑁 − 1))) → (𝑦 + 1) ∈ ((1 + 1)...𝑁))
139118zcnd 12076 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 ∈ ((1 + 1)...𝑁) → 𝑛 ∈ ℂ)
140131zcnd 12076 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 ∈ (1...(𝑁 − 1)) → 𝑦 ∈ ℂ)
141 subadd2 10879 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑛 ∈ ℂ ∧ 1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → ((𝑛 − 1) = 𝑦 ↔ (𝑦 + 1) = 𝑛))
142100, 141mp3an2 1446 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 ∈ ℂ ∧ 𝑦 ∈ ℂ) → ((𝑛 − 1) = 𝑦 ↔ (𝑦 + 1) = 𝑛))
143 eqcom 2829 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 = (𝑛 − 1) ↔ (𝑛 − 1) = 𝑦)
144 eqcom 2829 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑛 = (𝑦 + 1) ↔ (𝑦 + 1) = 𝑛)
145142, 143, 1443bitr4g 317 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑛 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (𝑦 = (𝑛 − 1) ↔ 𝑛 = (𝑦 + 1)))
146139, 140, 145syl2anr 599 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑦 ∈ (1...(𝑁 − 1)) ∧ 𝑛 ∈ ((1 + 1)...𝑁)) → (𝑦 = (𝑛 − 1) ↔ 𝑛 = (𝑦 + 1)))
147146ralrimiva 3174 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ (1...(𝑁 − 1)) → ∀𝑛 ∈ ((1 + 1)...𝑁)(𝑦 = (𝑛 − 1) ↔ 𝑛 = (𝑦 + 1)))
148147adantl 485 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ (1...(𝑁 − 1))) → ∀𝑛 ∈ ((1 + 1)...𝑁)(𝑦 = (𝑛 − 1) ↔ 𝑛 = (𝑦 + 1)))
149 reu6i 3694 . . . . . . . . . . . . . . . . . . . 20 (((𝑦 + 1) ∈ ((1 + 1)...𝑁) ∧ ∀𝑛 ∈ ((1 + 1)...𝑁)(𝑦 = (𝑛 − 1) ↔ 𝑛 = (𝑦 + 1))) → ∃!𝑛 ∈ ((1 + 1)...𝑁)𝑦 = (𝑛 − 1))
150138, 148, 149syl2anc 587 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ (1...(𝑁 − 1))) → ∃!𝑛 ∈ ((1 + 1)...𝑁)𝑦 = (𝑛 − 1))
151150ralrimiva 3174 . . . . . . . . . . . . . . . . . 18 (𝜑 → ∀𝑦 ∈ (1...(𝑁 − 1))∃!𝑛 ∈ ((1 + 1)...𝑁)𝑦 = (𝑛 − 1))
152 eqid 2822 . . . . . . . . . . . . . . . . . . 19 (𝑛 ∈ ((1 + 1)...𝑁) ↦ (𝑛 − 1)) = (𝑛 ∈ ((1 + 1)...𝑁) ↦ (𝑛 − 1))
153152f1ompt 6857 . . . . . . . . . . . . . . . . . 18 ((𝑛 ∈ ((1 + 1)...𝑁) ↦ (𝑛 − 1)):((1 + 1)...𝑁)–1-1-onto→(1...(𝑁 − 1)) ↔ (∀𝑛 ∈ ((1 + 1)...𝑁)(𝑛 − 1) ∈ (1...(𝑁 − 1)) ∧ ∀𝑦 ∈ (1...(𝑁 − 1))∃!𝑛 ∈ ((1 + 1)...𝑁)𝑦 = (𝑛 − 1)))
154126, 151, 153sylanbrc 586 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑛 ∈ ((1 + 1)...𝑁) ↦ (𝑛 − 1)):((1 + 1)...𝑁)–1-1-onto→(1...(𝑁 − 1)))
155 f1osng 6637 . . . . . . . . . . . . . . . . . 18 ((1 ∈ V ∧ 𝑁 ∈ ℕ) → {⟨1, 𝑁⟩}:{1}–1-1-onto→{𝑁})
15632, 67, 155sylancr 590 . . . . . . . . . . . . . . . . 17 (𝜑 → {⟨1, 𝑁⟩}:{1}–1-1-onto→{𝑁})
15767nnred 11640 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑁 ∈ ℝ)
158157ltm1d 11561 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑁 − 1) < 𝑁)
159129zred 12075 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑁 − 1) ∈ ℝ)
160159, 157ltnled 10776 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑁 − 1) < 𝑁 ↔ ¬ 𝑁 ≤ (𝑁 − 1)))
161158, 160mpbid 235 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ¬ 𝑁 ≤ (𝑁 − 1))
162 elfzle2 12906 . . . . . . . . . . . . . . . . . . 19 (𝑁 ∈ (1...(𝑁 − 1)) → 𝑁 ≤ (𝑁 − 1))
163161, 162nsyl 142 . . . . . . . . . . . . . . . . . 18 (𝜑 → ¬ 𝑁 ∈ (1...(𝑁 − 1)))
164 disjsn 4621 . . . . . . . . . . . . . . . . . 18 (((1...(𝑁 − 1)) ∩ {𝑁}) = ∅ ↔ ¬ 𝑁 ∈ (1...(𝑁 − 1)))
165163, 164sylibr 237 . . . . . . . . . . . . . . . . 17 (𝜑 → ((1...(𝑁 − 1)) ∩ {𝑁}) = ∅)
166 1re 10630 . . . . . . . . . . . . . . . . . . . . . 22 1 ∈ ℝ
167166ltp1i 11533 . . . . . . . . . . . . . . . . . . . . 21 1 < (1 + 1)
168116zrei 11975 . . . . . . . . . . . . . . . . . . . . . 22 (1 + 1) ∈ ℝ
169166, 168ltnlei 10750 . . . . . . . . . . . . . . . . . . . . 21 (1 < (1 + 1) ↔ ¬ (1 + 1) ≤ 1)
170167, 169mpbi 233 . . . . . . . . . . . . . . . . . . . 20 ¬ (1 + 1) ≤ 1
171 elfzle1 12905 . . . . . . . . . . . . . . . . . . . 20 (1 ∈ ((1 + 1)...𝑁) → (1 + 1) ≤ 1)
172170, 171mto 200 . . . . . . . . . . . . . . . . . . 19 ¬ 1 ∈ ((1 + 1)...𝑁)
173 disjsn 4621 . . . . . . . . . . . . . . . . . . 19 ((((1 + 1)...𝑁) ∩ {1}) = ∅ ↔ ¬ 1 ∈ ((1 + 1)...𝑁))
174172, 173mpbir 234 . . . . . . . . . . . . . . . . . 18 (((1 + 1)...𝑁) ∩ {1}) = ∅
175 f1oun 6616 . . . . . . . . . . . . . . . . . 18 ((((𝑛 ∈ ((1 + 1)...𝑁) ↦ (𝑛 − 1)):((1 + 1)...𝑁)–1-1-onto→(1...(𝑁 − 1)) ∧ {⟨1, 𝑁⟩}:{1}–1-1-onto→{𝑁}) ∧ ((((1 + 1)...𝑁) ∩ {1}) = ∅ ∧ ((1...(𝑁 − 1)) ∩ {𝑁}) = ∅)) → ((𝑛 ∈ ((1 + 1)...𝑁) ↦ (𝑛 − 1)) ∪ {⟨1, 𝑁⟩}):(((1 + 1)...𝑁) ∪ {1})–1-1-onto→((1...(𝑁 − 1)) ∪ {𝑁}))
176174, 175mpanr1 702 . . . . . . . . . . . . . . . . 17 ((((𝑛 ∈ ((1 + 1)...𝑁) ↦ (𝑛 − 1)):((1 + 1)...𝑁)–1-1-onto→(1...(𝑁 − 1)) ∧ {⟨1, 𝑁⟩}:{1}–1-1-onto→{𝑁}) ∧ ((1...(𝑁 − 1)) ∩ {𝑁}) = ∅) → ((𝑛 ∈ ((1 + 1)...𝑁) ↦ (𝑛 − 1)) ∪ {⟨1, 𝑁⟩}):(((1 + 1)...𝑁) ∪ {1})–1-1-onto→((1...(𝑁 − 1)) ∪ {𝑁}))
177154, 156, 165, 176syl21anc 836 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑛 ∈ ((1 + 1)...𝑁) ↦ (𝑛 − 1)) ∪ {⟨1, 𝑁⟩}):(((1 + 1)...𝑁) ∪ {1})–1-1-onto→((1...(𝑁 − 1)) ∪ {𝑁}))
178 eleq1 2901 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 = 1 → (𝑛 ∈ ((1 + 1)...𝑁) ↔ 1 ∈ ((1 + 1)...𝑁)))
179172, 178mtbiri 330 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 = 1 → ¬ 𝑛 ∈ ((1 + 1)...𝑁))
180179necon2ai 3040 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ ((1 + 1)...𝑁) → 𝑛 ≠ 1)
181 ifnefalse 4451 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ≠ 1 → if(𝑛 = 1, 𝑁, (𝑛 − 1)) = (𝑛 − 1))
182180, 181syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝑛 ∈ ((1 + 1)...𝑁) → if(𝑛 = 1, 𝑁, (𝑛 − 1)) = (𝑛 − 1))
183182mpteq2ia 5133 . . . . . . . . . . . . . . . . . . 19 (𝑛 ∈ ((1 + 1)...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) = (𝑛 ∈ ((1 + 1)...𝑁) ↦ (𝑛 − 1))
184183uneq1i 4110 . . . . . . . . . . . . . . . . . 18 ((𝑛 ∈ ((1 + 1)...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) ∪ {⟨1, 𝑁⟩}) = ((𝑛 ∈ ((1 + 1)...𝑁) ↦ (𝑛 − 1)) ∪ {⟨1, 𝑁⟩})
18532a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝜑 → 1 ∈ V)
186 ssv 3966 . . . . . . . . . . . . . . . . . . . 20 ℕ ⊆ V
187186, 67sseldi 3940 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑁 ∈ V)
18867, 64eleqtrdi 2924 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑁 ∈ (ℤ‘1))
189 fzpred 12950 . . . . . . . . . . . . . . . . . . . . 21 (𝑁 ∈ (ℤ‘1) → (1...𝑁) = ({1} ∪ ((1 + 1)...𝑁)))
190188, 189syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (1...𝑁) = ({1} ∪ ((1 + 1)...𝑁)))
191 uncom 4104 . . . . . . . . . . . . . . . . . . . 20 ({1} ∪ ((1 + 1)...𝑁)) = (((1 + 1)...𝑁) ∪ {1})
192190, 191syl6req 2874 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (((1 + 1)...𝑁) ∪ {1}) = (1...𝑁))
193 iftrue 4445 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 1 → if(𝑛 = 1, 𝑁, (𝑛 − 1)) = 𝑁)
194193adantl 485 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑛 = 1) → if(𝑛 = 1, 𝑁, (𝑛 − 1)) = 𝑁)
195185, 187, 192, 194fmptapd 6915 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑛 ∈ ((1 + 1)...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) ∪ {⟨1, 𝑁⟩}) = (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))))
196184, 195syl5eqr 2871 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑛 ∈ ((1 + 1)...𝑁) ↦ (𝑛 − 1)) ∪ {⟨1, 𝑁⟩}) = (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))))
19770, 188eqeltrd 2914 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((𝑁 − 1) + 1) ∈ (ℤ‘1))
198 uzid 12246 . . . . . . . . . . . . . . . . . . . . 21 ((𝑁 − 1) ∈ ℤ → (𝑁 − 1) ∈ (ℤ‘(𝑁 − 1)))
199 peano2uz 12289 . . . . . . . . . . . . . . . . . . . . 21 ((𝑁 − 1) ∈ (ℤ‘(𝑁 − 1)) → ((𝑁 − 1) + 1) ∈ (ℤ‘(𝑁 − 1)))
200129, 198, 1993syl 18 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑁 − 1) + 1) ∈ (ℤ‘(𝑁 − 1)))
20170, 200eqeltrrd 2915 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑁 ∈ (ℤ‘(𝑁 − 1)))
202 fzsplit2 12927 . . . . . . . . . . . . . . . . . . 19 ((((𝑁 − 1) + 1) ∈ (ℤ‘1) ∧ 𝑁 ∈ (ℤ‘(𝑁 − 1))) → (1...𝑁) = ((1...(𝑁 − 1)) ∪ (((𝑁 − 1) + 1)...𝑁)))
203197, 201, 202syl2anc 587 . . . . . . . . . . . . . . . . . 18 (𝜑 → (1...𝑁) = ((1...(𝑁 − 1)) ∪ (((𝑁 − 1) + 1)...𝑁)))
20470oveq1d 7155 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (((𝑁 − 1) + 1)...𝑁) = (𝑁...𝑁))
205 fzsn 12944 . . . . . . . . . . . . . . . . . . . . 21 (𝑁 ∈ ℤ → (𝑁...𝑁) = {𝑁})
206113, 205syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑁...𝑁) = {𝑁})
207204, 206eqtrd 2857 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (((𝑁 − 1) + 1)...𝑁) = {𝑁})
208207uneq2d 4114 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((1...(𝑁 − 1)) ∪ (((𝑁 − 1) + 1)...𝑁)) = ((1...(𝑁 − 1)) ∪ {𝑁}))
209203, 208eqtr2d 2858 . . . . . . . . . . . . . . . . 17 (𝜑 → ((1...(𝑁 − 1)) ∪ {𝑁}) = (1...𝑁))
210196, 192, 209f1oeq123d 6592 . . . . . . . . . . . . . . . 16 (𝜑 → (((𝑛 ∈ ((1 + 1)...𝑁) ↦ (𝑛 − 1)) ∪ {⟨1, 𝑁⟩}):(((1 + 1)...𝑁) ∪ {1})–1-1-onto→((1...(𝑁 − 1)) ∪ {𝑁}) ↔ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))):(1...𝑁)–1-1-onto→(1...𝑁)))
211177, 210mpbid 235 . . . . . . . . . . . . . . 15 (𝜑 → (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))):(1...𝑁)–1-1-onto→(1...𝑁))
212 f1oco 6619 . . . . . . . . . . . . . . 15 (((2nd ‘(1st𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) ∧ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))):(1...𝑁)–1-1-onto→(1...𝑁)) → ((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))):(1...𝑁)–1-1-onto→(1...𝑁))
21344, 211, 212syl2anc 587 . . . . . . . . . . . . . 14 (𝜑 → ((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))):(1...𝑁)–1-1-onto→(1...𝑁))
214 dff1o3 6603 . . . . . . . . . . . . . . 15 (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))):(1...𝑁)–1-1-onto→(1...𝑁) ↔ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))):(1...𝑁)–onto→(1...𝑁) ∧ Fun ((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))))))
215214simprbi 500 . . . . . . . . . . . . . 14 (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))):(1...𝑁)–1-1-onto→(1...𝑁) → Fun ((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))))
216 imain 6418 . . . . . . . . . . . . . 14 (Fun ((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) → (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ ((1...(𝑦 + 1)) ∩ (((𝑦 + 1) + 1)...𝑁))) = ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) ∩ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁))))
217213, 215, 2163syl 18 . . . . . . . . . . . . 13 (𝜑 → (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ ((1...(𝑦 + 1)) ∩ (((𝑦 + 1) + 1)...𝑁))) = ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) ∩ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁))))
21863nnred 11640 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ (0...(𝑁 − 1)) → (𝑦 + 1) ∈ ℝ)
219218ltp1d 11559 . . . . . . . . . . . . . . . 16 (𝑦 ∈ (0...(𝑁 − 1)) → (𝑦 + 1) < ((𝑦 + 1) + 1))
220 fzdisj 12929 . . . . . . . . . . . . . . . 16 ((𝑦 + 1) < ((𝑦 + 1) + 1) → ((1...(𝑦 + 1)) ∩ (((𝑦 + 1) + 1)...𝑁)) = ∅)
221219, 220syl 17 . . . . . . . . . . . . . . 15 (𝑦 ∈ (0...(𝑁 − 1)) → ((1...(𝑦 + 1)) ∩ (((𝑦 + 1) + 1)...𝑁)) = ∅)
222221imaeq2d 5907 . . . . . . . . . . . . . 14 (𝑦 ∈ (0...(𝑁 − 1)) → (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ ((1...(𝑦 + 1)) ∩ (((𝑦 + 1) + 1)...𝑁))) = (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ ∅))
223 ima0 5923 . . . . . . . . . . . . . 14 (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ ∅) = ∅
224222, 223syl6eq 2873 . . . . . . . . . . . . 13 (𝑦 ∈ (0...(𝑁 − 1)) → (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ ((1...(𝑦 + 1)) ∩ (((𝑦 + 1) + 1)...𝑁))) = ∅)
225217, 224sylan9req 2878 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) ∩ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁))) = ∅)
226 fun 6521 . . . . . . . . . . . 12 (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}):(((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1)))⟶{1} ∧ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}):(((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁))⟶{0}) ∧ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) ∩ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁))) = ∅) → (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0})):((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) ∪ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)))⟶({1} ∪ {0}))
227111, 225, 226sylancr 590 . . . . . . . . . . 11 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0})):((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) ∪ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)))⟶({1} ∪ {0}))
228 imaundi 5986 . . . . . . . . . . . . 13 (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ ((1...(𝑦 + 1)) ∪ (((𝑦 + 1) + 1)...𝑁))) = ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) ∪ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)))
22963peano2nnd 11642 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ (0...(𝑁 − 1)) → ((𝑦 + 1) + 1) ∈ ℕ)
230229, 64eleqtrdi 2924 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ (0...(𝑁 − 1)) → ((𝑦 + 1) + 1) ∈ (ℤ‘1))
231230adantl 485 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑦 + 1) + 1) ∈ (ℤ‘1))
232 eluzp1p1 12258 . . . . . . . . . . . . . . . . . . 19 ((𝑁 − 1) ∈ (ℤ𝑦) → ((𝑁 − 1) + 1) ∈ (ℤ‘(𝑦 + 1)))
23372, 232syl 17 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ (0...(𝑁 − 1)) → ((𝑁 − 1) + 1) ∈ (ℤ‘(𝑦 + 1)))
234233adantl 485 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑁 − 1) + 1) ∈ (ℤ‘(𝑦 + 1)))
23571, 234eqeltrrd 2915 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → 𝑁 ∈ (ℤ‘(𝑦 + 1)))
236 fzsplit2 12927 . . . . . . . . . . . . . . . 16 ((((𝑦 + 1) + 1) ∈ (ℤ‘1) ∧ 𝑁 ∈ (ℤ‘(𝑦 + 1))) → (1...𝑁) = ((1...(𝑦 + 1)) ∪ (((𝑦 + 1) + 1)...𝑁)))
237231, 235, 236syl2anc 587 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (1...𝑁) = ((1...(𝑦 + 1)) ∪ (((𝑦 + 1) + 1)...𝑁)))
238237imaeq2d 5907 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...𝑁)) = (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ ((1...(𝑦 + 1)) ∪ (((𝑦 + 1) + 1)...𝑁))))
239 f1ofo 6604 . . . . . . . . . . . . . . . 16 (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))):(1...𝑁)–1-1-onto→(1...𝑁) → ((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))):(1...𝑁)–onto→(1...𝑁))
240 foima 6577 . . . . . . . . . . . . . . . 16 (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))):(1...𝑁)–onto→(1...𝑁) → (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...𝑁)) = (1...𝑁))
241213, 239, 2403syl 18 . . . . . . . . . . . . . . 15 (𝜑 → (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...𝑁)) = (1...𝑁))
242241adantr 484 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...𝑁)) = (1...𝑁))
243238, 242eqtr3d 2859 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ ((1...(𝑦 + 1)) ∪ (((𝑦 + 1) + 1)...𝑁))) = (1...𝑁))
244228, 243syl5eqr 2871 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) ∪ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁))) = (1...𝑁))
245244feq2d 6480 . . . . . . . . . . 11 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0})):((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) ∪ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)))⟶({1} ∪ {0}) ↔ (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0})):(1...𝑁)⟶({1} ∪ {0})))
246227, 245mpbid 235 . . . . . . . . . 10 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0})):(1...𝑁)⟶({1} ∪ {0}))
247246ffvelrnda 6833 . . . . . . . . 9 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) → ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) ∈ ({1} ∪ {0}))
248108, 247sseldi 3940 . . . . . . . 8 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) → ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) ∈ ℂ)
24999, 103, 248subadd23d 11008 . . . . . . 7 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) → ((((1st ‘(1st𝑇))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0)) + ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛)) = (((1st ‘(1st𝑇))‘𝑛) + (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0))))
250 oveq2 7148 . . . . . . . . . 10 (1 = if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0) → (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − 1) = (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0)))
251250eqeq1d 2824 . . . . . . . . 9 (1 = if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0) → ((((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − 1) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛) ↔ (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0)) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛)))
252 oveq2 7148 . . . . . . . . . 10 (0 = if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0) → (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − 0) = (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0)))
253252eqeq1d 2824 . . . . . . . . 9 (0 = if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0) → ((((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − 0) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛) ↔ (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0)) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛)))
254 1m1e0 11697 . . . . . . . . . . . . 13 (1 − 1) = 0
255 f1ofn 6598 . . . . . . . . . . . . . . . . . . . 20 ((2nd ‘(1st𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → (2nd ‘(1st𝑇)) Fn (1...𝑁))
25644, 255syl 17 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (2nd ‘(1st𝑇)) Fn (1...𝑁))
257256adantr 484 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (2nd ‘(1st𝑇)) Fn (1...𝑁))
258 imassrn 5918 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (1...(𝑦 + 1))) ⊆ ran (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))
259 f1of 6597 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))):(1...𝑁)–1-1-onto→(1...𝑁) → (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))):(1...𝑁)⟶(1...𝑁))
260211, 259syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))):(1...𝑁)⟶(1...𝑁))
261260frnd 6501 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ran (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) ⊆ (1...𝑁))
262258, 261sstrid 3953 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (1...(𝑦 + 1))) ⊆ (1...𝑁))
263262adantr 484 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (1...(𝑦 + 1))) ⊆ (1...𝑁))
264 eqidd 2823 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) = (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))))
265 eluzfz1 12909 . . . . . . . . . . . . . . . . . . . . . 22 (𝑁 ∈ (ℤ‘1) → 1 ∈ (1...𝑁))
266188, 265syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 1 ∈ (1...𝑁))
267264, 194, 266, 67fvmptd 6757 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))‘1) = 𝑁)
268267adantr 484 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))‘1) = 𝑁)
269 f1ofn 6598 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))):(1...𝑁)–1-1-onto→(1...𝑁) → (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) Fn (1...𝑁))
270211, 269syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) Fn (1...𝑁))
271270adantr 484 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) Fn (1...𝑁))
272 fzss2 12942 . . . . . . . . . . . . . . . . . . . . 21 (𝑁 ∈ (ℤ‘(𝑦 + 1)) → (1...(𝑦 + 1)) ⊆ (1...𝑁))
273235, 272syl 17 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (1...(𝑦 + 1)) ⊆ (1...𝑁))
274 eluzfz1 12909 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑦 + 1) ∈ (ℤ‘1) → 1 ∈ (1...(𝑦 + 1)))
27565, 274syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ (0...(𝑁 − 1)) → 1 ∈ (1...(𝑦 + 1)))
276275adantl 485 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → 1 ∈ (1...(𝑦 + 1)))
277 fnfvima 6978 . . . . . . . . . . . . . . . . . . . 20 (((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) Fn (1...𝑁) ∧ (1...(𝑦 + 1)) ⊆ (1...𝑁) ∧ 1 ∈ (1...(𝑦 + 1))) → ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))‘1) ∈ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (1...(𝑦 + 1))))
278271, 273, 276, 277syl3anc 1368 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))‘1) ∈ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (1...(𝑦 + 1))))
279268, 278eqeltrrd 2915 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → 𝑁 ∈ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (1...(𝑦 + 1))))
280 fnfvima 6978 . . . . . . . . . . . . . . . . . 18 (((2nd ‘(1st𝑇)) Fn (1...𝑁) ∧ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (1...(𝑦 + 1))) ⊆ (1...𝑁) ∧ 𝑁 ∈ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (1...(𝑦 + 1)))) → ((2nd ‘(1st𝑇))‘𝑁) ∈ ((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (1...(𝑦 + 1)))))
281257, 263, 279, 280syl3anc 1368 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((2nd ‘(1st𝑇))‘𝑁) ∈ ((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (1...(𝑦 + 1)))))
282 imaco 6082 . . . . . . . . . . . . . . . . 17 (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) = ((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (1...(𝑦 + 1))))
283281, 282eleqtrrdi 2925 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((2nd ‘(1st𝑇))‘𝑁) ∈ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))))
284 fnconstg 6548 . . . . . . . . . . . . . . . . . 18 (1 ∈ V → ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) Fn (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))))
28532, 284ax-mp 5 . . . . . . . . . . . . . . . . 17 ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) Fn (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1)))
286 fnconstg 6548 . . . . . . . . . . . . . . . . . 18 (0 ∈ V → ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}) Fn (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)))
28735, 286ax-mp 5 . . . . . . . . . . . . . . . . 17 ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}) Fn (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁))
288 fvun1 6736 . . . . . . . . . . . . . . . . 17 ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) Fn (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) ∧ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}) Fn (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) ∧ (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) ∩ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁))) = ∅ ∧ ((2nd ‘(1st𝑇))‘𝑁) ∈ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))))) → ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁)) = (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1})‘((2nd ‘(1st𝑇))‘𝑁)))
289285, 287, 288mp3an12 1448 . . . . . . . . . . . . . . . 16 ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) ∩ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁))) = ∅ ∧ ((2nd ‘(1st𝑇))‘𝑁) ∈ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1)))) → ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁)) = (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1})‘((2nd ‘(1st𝑇))‘𝑁)))
290225, 283, 289syl2anc 587 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁)) = (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1})‘((2nd ‘(1st𝑇))‘𝑁)))
29132fvconst2 6948 . . . . . . . . . . . . . . . 16 (((2nd ‘(1st𝑇))‘𝑁) ∈ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) → (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1})‘((2nd ‘(1st𝑇))‘𝑁)) = 1)
292283, 291syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1})‘((2nd ‘(1st𝑇))‘𝑁)) = 1)
293290, 292eqtrd 2857 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁)) = 1)
294293oveq1d 7155 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁)) − 1) = (1 − 1))
295 fzss1 12941 . . . . . . . . . . . . . . . . . 18 ((𝑦 + 1) ∈ (ℤ‘1) → ((𝑦 + 1)...𝑁) ⊆ (1...𝑁))
29665, 295syl 17 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ (0...(𝑁 − 1)) → ((𝑦 + 1)...𝑁) ⊆ (1...𝑁))
297296adantl 485 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑦 + 1)...𝑁) ⊆ (1...𝑁))
298 eluzfz2 12910 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ (ℤ‘(𝑦 + 1)) → 𝑁 ∈ ((𝑦 + 1)...𝑁))
299235, 298syl 17 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → 𝑁 ∈ ((𝑦 + 1)...𝑁))
300 fnfvima 6978 . . . . . . . . . . . . . . . 16 (((2nd ‘(1st𝑇)) Fn (1...𝑁) ∧ ((𝑦 + 1)...𝑁) ⊆ (1...𝑁) ∧ 𝑁 ∈ ((𝑦 + 1)...𝑁)) → ((2nd ‘(1st𝑇))‘𝑁) ∈ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)))
301257, 297, 299, 300syl3anc 1368 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((2nd ‘(1st𝑇))‘𝑁) ∈ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)))
302 fvun2 6737 . . . . . . . . . . . . . . . 16 (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) Fn ((2nd ‘(1st𝑇)) “ (1...𝑦)) ∧ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}) Fn ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) ∧ ((((2nd ‘(1st𝑇)) “ (1...𝑦)) ∩ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁))) = ∅ ∧ ((2nd ‘(1st𝑇))‘𝑁) ∈ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)))) → (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁)) = ((((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0})‘((2nd ‘(1st𝑇))‘𝑁)))
30334, 37, 302mp3an12 1448 . . . . . . . . . . . . . . 15 (((((2nd ‘(1st𝑇)) “ (1...𝑦)) ∩ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁))) = ∅ ∧ ((2nd ‘(1st𝑇))‘𝑁) ∈ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁))) → (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁)) = ((((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0})‘((2nd ‘(1st𝑇))‘𝑁)))
30458, 301, 303syl2anc 587 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁)) = ((((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0})‘((2nd ‘(1st𝑇))‘𝑁)))
30535fvconst2 6948 . . . . . . . . . . . . . . 15 (((2nd ‘(1st𝑇))‘𝑁) ∈ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) → ((((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0})‘((2nd ‘(1st𝑇))‘𝑁)) = 0)
306301, 305syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0})‘((2nd ‘(1st𝑇))‘𝑁)) = 0)
307304, 306eqtrd 2857 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁)) = 0)
308254, 294, 3073eqtr4a 2883 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁)) − 1) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁)))
309 fveq2 6652 . . . . . . . . . . . . . 14 (𝑛 = ((2nd ‘(1st𝑇))‘𝑁) → ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) = ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁)))
310309oveq1d 7155 . . . . . . . . . . . . 13 (𝑛 = ((2nd ‘(1st𝑇))‘𝑁) → (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − 1) = (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁)) − 1))
311 fveq2 6652 . . . . . . . . . . . . 13 (𝑛 = ((2nd ‘(1st𝑇))‘𝑁) → (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁)))
312310, 311eqeq12d 2838 . . . . . . . . . . . 12 (𝑛 = ((2nd ‘(1st𝑇))‘𝑁) → ((((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − 1) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛) ↔ (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁)) − 1) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘((2nd ‘(1st𝑇))‘𝑁))))
313308, 312syl5ibrcom 250 . . . . . . . . . . 11 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (𝑛 = ((2nd ‘(1st𝑇))‘𝑁) → (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − 1) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛)))
314313imp 410 . . . . . . . . . 10 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 = ((2nd ‘(1st𝑇))‘𝑁)) → (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − 1) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛))
315314adantlr 714 . . . . . . . . 9 ((((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) ∧ 𝑛 = ((2nd ‘(1st𝑇))‘𝑁)) → (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − 1) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛))
316248subid1d 10975 . . . . . . . . . . 11 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) → (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − 0) = ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛))
317316adantr 484 . . . . . . . . . 10 ((((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) ∧ ¬ 𝑛 = ((2nd ‘(1st𝑇))‘𝑁)) → (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − 0) = ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛))
318 eldifsn 4693 . . . . . . . . . . . . . 14 (𝑛 ∈ ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}) ↔ (𝑛 ∈ (1...𝑁) ∧ 𝑛 ≠ ((2nd ‘(1st𝑇))‘𝑁)))
319 df-ne 3012 . . . . . . . . . . . . . . 15 (𝑛 ≠ ((2nd ‘(1st𝑇))‘𝑁) ↔ ¬ 𝑛 = ((2nd ‘(1st𝑇))‘𝑁))
320319anbi2i 625 . . . . . . . . . . . . . 14 ((𝑛 ∈ (1...𝑁) ∧ 𝑛 ≠ ((2nd ‘(1st𝑇))‘𝑁)) ↔ (𝑛 ∈ (1...𝑁) ∧ ¬ 𝑛 = ((2nd ‘(1st𝑇))‘𝑁)))
321318, 320bitri 278 . . . . . . . . . . . . 13 (𝑛 ∈ ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}) ↔ (𝑛 ∈ (1...𝑁) ∧ ¬ 𝑛 = ((2nd ‘(1st𝑇))‘𝑁)))
322 fnconstg 6548 . . . . . . . . . . . . . . . . . 18 (0 ∈ V → (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0}) Fn ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))))
32335, 322ax-mp 5 . . . . . . . . . . . . . . . . 17 (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0}) Fn ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1)))
32434, 323pm3.2i 474 . . . . . . . . . . . . . . . 16 ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) Fn ((2nd ‘(1st𝑇)) “ (1...𝑦)) ∧ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0}) Fn ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))))
325 imain 6418 . . . . . . . . . . . . . . . . . 18 (Fun (2nd ‘(1st𝑇)) → ((2nd ‘(1st𝑇)) “ ((1...𝑦) ∩ ((𝑦 + 1)...(𝑁 − 1)))) = (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∩ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1)))))
32647, 325syl 17 . . . . . . . . . . . . . . . . 17 (𝜑 → ((2nd ‘(1st𝑇)) “ ((1...𝑦) ∩ ((𝑦 + 1)...(𝑁 − 1)))) = (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∩ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1)))))
327 fzdisj 12929 . . . . . . . . . . . . . . . . . . . 20 (𝑦 < (𝑦 + 1) → ((1...𝑦) ∩ ((𝑦 + 1)...(𝑁 − 1))) = ∅)
32852, 327syl 17 . . . . . . . . . . . . . . . . . . 19 (𝑦 ∈ (0...(𝑁 − 1)) → ((1...𝑦) ∩ ((𝑦 + 1)...(𝑁 − 1))) = ∅)
329328imaeq2d 5907 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ (0...(𝑁 − 1)) → ((2nd ‘(1st𝑇)) “ ((1...𝑦) ∩ ((𝑦 + 1)...(𝑁 − 1)))) = ((2nd ‘(1st𝑇)) “ ∅))
330329, 56syl6eq 2873 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ (0...(𝑁 − 1)) → ((2nd ‘(1st𝑇)) “ ((1...𝑦) ∩ ((𝑦 + 1)...(𝑁 − 1)))) = ∅)
331326, 330sylan9req 2878 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∩ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1)))) = ∅)
332 fnun 6443 . . . . . . . . . . . . . . . 16 ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) Fn ((2nd ‘(1st𝑇)) “ (1...𝑦)) ∧ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0}) Fn ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1)))) ∧ (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∩ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1)))) = ∅) → ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) Fn (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∪ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1)))))
333324, 331, 332sylancr 590 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) Fn (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∪ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1)))))
334 imaundi 5986 . . . . . . . . . . . . . . . . 17 ((2nd ‘(1st𝑇)) “ ((1...𝑦) ∪ ((𝑦 + 1)...(𝑁 − 1)))) = (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∪ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))))
335203, 208eqtrd 2857 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → (1...𝑁) = ((1...(𝑁 − 1)) ∪ {𝑁}))
336335difeq1d 4073 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → ((1...𝑁) ∖ {𝑁}) = (((1...(𝑁 − 1)) ∪ {𝑁}) ∖ {𝑁}))
337 difun2 4401 . . . . . . . . . . . . . . . . . . . . . . 23 (((1...(𝑁 − 1)) ∪ {𝑁}) ∖ {𝑁}) = ((1...(𝑁 − 1)) ∖ {𝑁})
338336, 337syl6eq 2873 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ((1...𝑁) ∖ {𝑁}) = ((1...(𝑁 − 1)) ∖ {𝑁}))
339 difsn 4704 . . . . . . . . . . . . . . . . . . . . . . 23 𝑁 ∈ (1...(𝑁 − 1)) → ((1...(𝑁 − 1)) ∖ {𝑁}) = (1...(𝑁 − 1)))
340163, 339syl 17 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ((1...(𝑁 − 1)) ∖ {𝑁}) = (1...(𝑁 − 1)))
341338, 340eqtrd 2857 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((1...𝑁) ∖ {𝑁}) = (1...(𝑁 − 1)))
342341adantr 484 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((1...𝑁) ∖ {𝑁}) = (1...(𝑁 − 1)))
34372adantl 485 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (𝑁 − 1) ∈ (ℤ𝑦))
344 fzsplit2 12927 . . . . . . . . . . . . . . . . . . . . 21 (((𝑦 + 1) ∈ (ℤ‘1) ∧ (𝑁 − 1) ∈ (ℤ𝑦)) → (1...(𝑁 − 1)) = ((1...𝑦) ∪ ((𝑦 + 1)...(𝑁 − 1))))
34566, 343, 344syl2anc 587 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (1...(𝑁 − 1)) = ((1...𝑦) ∪ ((𝑦 + 1)...(𝑁 − 1))))
346342, 345eqtrd 2857 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((1...𝑁) ∖ {𝑁}) = ((1...𝑦) ∪ ((𝑦 + 1)...(𝑁 − 1))))
347346imaeq2d 5907 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((2nd ‘(1st𝑇)) “ ((1...𝑁) ∖ {𝑁})) = ((2nd ‘(1st𝑇)) “ ((1...𝑦) ∪ ((𝑦 + 1)...(𝑁 − 1)))))
348 imadif 6417 . . . . . . . . . . . . . . . . . . . . 21 (Fun (2nd ‘(1st𝑇)) → ((2nd ‘(1st𝑇)) “ ((1...𝑁) ∖ {𝑁})) = (((2nd ‘(1st𝑇)) “ (1...𝑁)) ∖ ((2nd ‘(1st𝑇)) “ {𝑁})))
34947, 348syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((2nd ‘(1st𝑇)) “ ((1...𝑁) ∖ {𝑁})) = (((2nd ‘(1st𝑇)) “ (1...𝑁)) ∖ ((2nd ‘(1st𝑇)) “ {𝑁})))
350 elfz1end 12932 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑁 ∈ ℕ ↔ 𝑁 ∈ (1...𝑁))
35167, 350sylib 221 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑𝑁 ∈ (1...𝑁))
352 fnsnfv 6725 . . . . . . . . . . . . . . . . . . . . . . 23 (((2nd ‘(1st𝑇)) Fn (1...𝑁) ∧ 𝑁 ∈ (1...𝑁)) → {((2nd ‘(1st𝑇))‘𝑁)} = ((2nd ‘(1st𝑇)) “ {𝑁}))
353256, 351, 352syl2anc 587 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → {((2nd ‘(1st𝑇))‘𝑁)} = ((2nd ‘(1st𝑇)) “ {𝑁}))
354353eqcomd 2828 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((2nd ‘(1st𝑇)) “ {𝑁}) = {((2nd ‘(1st𝑇))‘𝑁)})
35582, 354difeq12d 4075 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (((2nd ‘(1st𝑇)) “ (1...𝑁)) ∖ ((2nd ‘(1st𝑇)) “ {𝑁})) = ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}))
356349, 355eqtrd 2857 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((2nd ‘(1st𝑇)) “ ((1...𝑁) ∖ {𝑁})) = ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}))
357356adantr 484 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((2nd ‘(1st𝑇)) “ ((1...𝑁) ∖ {𝑁})) = ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}))
358347, 357eqtr3d 2859 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((2nd ‘(1st𝑇)) “ ((1...𝑦) ∪ ((𝑦 + 1)...(𝑁 − 1)))) = ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}))
359334, 358syl5eqr 2871 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∪ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1)))) = ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}))
360359fneq2d 6426 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) Fn (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∪ ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1)))) ↔ ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) Fn ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)})))
361333, 360mpbid 235 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) Fn ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}))
362 incom 4152 . . . . . . . . . . . . . . . 16 (((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}) ∩ {((2nd ‘(1st𝑇))‘𝑁)}) = ({((2nd ‘(1st𝑇))‘𝑁)} ∩ ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}))
363 disjdif 4393 . . . . . . . . . . . . . . . 16 ({((2nd ‘(1st𝑇))‘𝑁)} ∩ ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)})) = ∅
364362, 363eqtri 2845 . . . . . . . . . . . . . . 15 (((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}) ∩ {((2nd ‘(1st𝑇))‘𝑁)}) = ∅
365 fnconstg 6548 . . . . . . . . . . . . . . . . . 18 (1 ∈ V → ({((2nd ‘(1st𝑇))‘𝑁)} × {1}) Fn {((2nd ‘(1st𝑇))‘𝑁)})
36632, 365ax-mp 5 . . . . . . . . . . . . . . . . 17 ({((2nd ‘(1st𝑇))‘𝑁)} × {1}) Fn {((2nd ‘(1st𝑇))‘𝑁)}
367 fvun1 6736 . . . . . . . . . . . . . . . . 17 ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) Fn ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}) ∧ ({((2nd ‘(1st𝑇))‘𝑁)} × {1}) Fn {((2nd ‘(1st𝑇))‘𝑁)} ∧ ((((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}) ∩ {((2nd ‘(1st𝑇))‘𝑁)}) = ∅ ∧ 𝑛 ∈ ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}))) → ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {1}))‘𝑛) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0}))‘𝑛))
368366, 367mp3an2 1446 . . . . . . . . . . . . . . . 16 ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) Fn ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}) ∧ ((((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}) ∩ {((2nd ‘(1st𝑇))‘𝑁)}) = ∅ ∧ 𝑛 ∈ ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}))) → ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {1}))‘𝑛) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0}))‘𝑛))
369 fnconstg 6548 . . . . . . . . . . . . . . . . . 18 (0 ∈ V → ({((2nd ‘(1st𝑇))‘𝑁)} × {0}) Fn {((2nd ‘(1st𝑇))‘𝑁)})
37035, 369ax-mp 5 . . . . . . . . . . . . . . . . 17 ({((2nd ‘(1st𝑇))‘𝑁)} × {0}) Fn {((2nd ‘(1st𝑇))‘𝑁)}
371 fvun1 6736 . . . . . . . . . . . . . . . . 17 ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) Fn ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}) ∧ ({((2nd ‘(1st𝑇))‘𝑁)} × {0}) Fn {((2nd ‘(1st𝑇))‘𝑁)} ∧ ((((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}) ∩ {((2nd ‘(1st𝑇))‘𝑁)}) = ∅ ∧ 𝑛 ∈ ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}))) → ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {0}))‘𝑛) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0}))‘𝑛))
372370, 371mp3an2 1446 . . . . . . . . . . . . . . . 16 ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) Fn ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}) ∧ ((((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}) ∩ {((2nd ‘(1st𝑇))‘𝑁)}) = ∅ ∧ 𝑛 ∈ ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}))) → ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {0}))‘𝑛) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0}))‘𝑛))
373368, 372eqtr4d 2860 . . . . . . . . . . . . . . 15 ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) Fn ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}) ∧ ((((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}) ∩ {((2nd ‘(1st𝑇))‘𝑁)}) = ∅ ∧ 𝑛 ∈ ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}))) → ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {1}))‘𝑛) = ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {0}))‘𝑛))
374364, 373mpanr1 702 . . . . . . . . . . . . . 14 ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) Fn ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)}) ∧ 𝑛 ∈ ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)})) → ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {1}))‘𝑛) = ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {0}))‘𝑛))
375361, 374sylan 583 . . . . . . . . . . . . 13 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ ((1...𝑁) ∖ {((2nd ‘(1st𝑇))‘𝑁)})) → ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {1}))‘𝑛) = ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {0}))‘𝑛))
376321, 375sylan2br 597 . . . . . . . . . . . 12 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ (𝑛 ∈ (1...𝑁) ∧ ¬ 𝑛 = ((2nd ‘(1st𝑇))‘𝑁))) → ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {1}))‘𝑛) = ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {0}))‘𝑛))
377376anassrs 471 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) ∧ ¬ 𝑛 = ((2nd ‘(1st𝑇))‘𝑁)) → ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {1}))‘𝑛) = ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {0}))‘𝑛))
378 imaundi 5986 . . . . . . . . . . . . . . . . . . 19 (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((1 + 1)...(𝑦 + 1)) ∪ {1})) = ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ ((1 + 1)...(𝑦 + 1))) ∪ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ {1}))
379 imaco 6082 . . . . . . . . . . . . . . . . . . . 20 (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ ((1 + 1)...(𝑦 + 1))) = ((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ ((1 + 1)...(𝑦 + 1))))
380 imaco 6082 . . . . . . . . . . . . . . . . . . . 20 (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ {1}) = ((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ {1}))
381379, 380uneq12i 4112 . . . . . . . . . . . . . . . . . . 19 ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ ((1 + 1)...(𝑦 + 1))) ∪ (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ {1})) = (((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ ((1 + 1)...(𝑦 + 1)))) ∪ ((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ {1})))
382378, 381eqtri 2845 . . . . . . . . . . . . . . . . . 18 (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((1 + 1)...(𝑦 + 1)) ∪ {1})) = (((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ ((1 + 1)...(𝑦 + 1)))) ∪ ((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ {1})))
383 fzpred 12950 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑦 + 1) ∈ (ℤ‘1) → (1...(𝑦 + 1)) = ({1} ∪ ((1 + 1)...(𝑦 + 1))))
38465, 383syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ (0...(𝑁 − 1)) → (1...(𝑦 + 1)) = ({1} ∪ ((1 + 1)...(𝑦 + 1))))
385 uncom 4104 . . . . . . . . . . . . . . . . . . . . 21 ({1} ∪ ((1 + 1)...(𝑦 + 1))) = (((1 + 1)...(𝑦 + 1)) ∪ {1})
386384, 385syl6eq 2873 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ (0...(𝑁 − 1)) → (1...(𝑦 + 1)) = (((1 + 1)...(𝑦 + 1)) ∪ {1}))
387386imaeq2d 5907 . . . . . . . . . . . . . . . . . . 19 (𝑦 ∈ (0...(𝑁 − 1)) → (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) = (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((1 + 1)...(𝑦 + 1)) ∪ {1})))
388387adantl 485 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) = (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((1 + 1)...(𝑦 + 1)) ∪ {1})))
389 elfzelz 12902 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 ∈ (0...(𝑁 − 1)) → 𝑦 ∈ ℤ)
390123a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ ℤ → ((1 + 1) − 1) = 1)
391 zcn 11974 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦 ∈ ℤ → 𝑦 ∈ ℂ)
392 pncan1 11053 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦 ∈ ℂ → ((𝑦 + 1) − 1) = 𝑦)
393391, 392syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ ℤ → ((𝑦 + 1) − 1) = 𝑦)
394390, 393oveq12d 7158 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 ∈ ℤ → (((1 + 1) − 1)...((𝑦 + 1) − 1)) = (1...𝑦))
395 elfzelz 12902 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)) → 𝑗 ∈ ℤ)
396395zcnd 12076 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)) → 𝑗 ∈ ℂ)
397 pncan1 11053 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑗 ∈ ℂ → ((𝑗 + 1) − 1) = 𝑗)
398396, 397syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)) → ((𝑗 + 1) − 1) = 𝑗)
399398eleq1d 2898 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)) → (((𝑗 + 1) − 1) ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)) ↔ 𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1))))
400399ibir 271 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)) → ((𝑗 + 1) − 1) ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)))
401400adantl 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑦 ∈ ℤ ∧ 𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1))) → ((𝑗 + 1) − 1) ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)))
402 peano2z 12011 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑦 ∈ ℤ → (𝑦 + 1) ∈ ℤ)
403402, 116jctil 523 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑦 ∈ ℤ → ((1 + 1) ∈ ℤ ∧ (𝑦 + 1) ∈ ℤ))
404395peano2zd 12078 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)) → (𝑗 + 1) ∈ ℤ)
405404, 114jctir 524 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)) → ((𝑗 + 1) ∈ ℤ ∧ 1 ∈ ℤ))
406 fzsubel 12938 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((((1 + 1) ∈ ℤ ∧ (𝑦 + 1) ∈ ℤ) ∧ ((𝑗 + 1) ∈ ℤ ∧ 1 ∈ ℤ)) → ((𝑗 + 1) ∈ ((1 + 1)...(𝑦 + 1)) ↔ ((𝑗 + 1) − 1) ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1))))
407403, 405, 406syl2an 598 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑦 ∈ ℤ ∧ 𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1))) → ((𝑗 + 1) ∈ ((1 + 1)...(𝑦 + 1)) ↔ ((𝑗 + 1) − 1) ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1))))
408401, 407mpbird 260 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑦 ∈ ℤ ∧ 𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1))) → (𝑗 + 1) ∈ ((1 + 1)...(𝑦 + 1)))
409398eqcomd 2828 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)) → 𝑗 = ((𝑗 + 1) − 1))
410409adantl 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑦 ∈ ℤ ∧ 𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1))) → 𝑗 = ((𝑗 + 1) − 1))
411 oveq1 7147 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑛 = (𝑗 + 1) → (𝑛 − 1) = ((𝑗 + 1) − 1))
412411rspceeqv 3613 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝑗 + 1) ∈ ((1 + 1)...(𝑦 + 1)) ∧ 𝑗 = ((𝑗 + 1) − 1)) → ∃𝑛 ∈ ((1 + 1)...(𝑦 + 1))𝑗 = (𝑛 − 1))
413408, 410, 412syl2anc 587 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑦 ∈ ℤ ∧ 𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1))) → ∃𝑛 ∈ ((1 + 1)...(𝑦 + 1))𝑗 = (𝑛 − 1))
414413ex 416 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑦 ∈ ℤ → (𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)) → ∃𝑛 ∈ ((1 + 1)...(𝑦 + 1))𝑗 = (𝑛 − 1)))
415 simpr 488 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑦 ∈ ℤ ∧ 𝑛 ∈ ((1 + 1)...(𝑦 + 1))) → 𝑛 ∈ ((1 + 1)...(𝑦 + 1)))
416 elfzelz 12902 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) → 𝑛 ∈ ℤ)
417416, 114jctir 524 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) → (𝑛 ∈ ℤ ∧ 1 ∈ ℤ))
418 fzsubel 12938 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((((1 + 1) ∈ ℤ ∧ (𝑦 + 1) ∈ ℤ) ∧ (𝑛 ∈ ℤ ∧ 1 ∈ ℤ)) → (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↔ (𝑛 − 1) ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1))))
419403, 417, 418syl2an 598 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑦 ∈ ℤ ∧ 𝑛 ∈ ((1 + 1)...(𝑦 + 1))) → (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↔ (𝑛 − 1) ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1))))
420415, 419mpbid 235 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑦 ∈ ℤ ∧ 𝑛 ∈ ((1 + 1)...(𝑦 + 1))) → (𝑛 − 1) ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)))
421 eleq1 2901 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑗 = (𝑛 − 1) → (𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)) ↔ (𝑛 − 1) ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1))))
422420, 421syl5ibrcom 250 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑦 ∈ ℤ ∧ 𝑛 ∈ ((1 + 1)...(𝑦 + 1))) → (𝑗 = (𝑛 − 1) → 𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1))))
423422rexlimdva 3270 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑦 ∈ ℤ → (∃𝑛 ∈ ((1 + 1)...(𝑦 + 1))𝑗 = (𝑛 − 1) → 𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1))))
424414, 423impbid 215 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦 ∈ ℤ → (𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)) ↔ ∃𝑛 ∈ ((1 + 1)...(𝑦 + 1))𝑗 = (𝑛 − 1)))
425 vex 3472 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 𝑗 ∈ V
426 eqid 2822 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↦ (𝑛 − 1)) = (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↦ (𝑛 − 1))
427426elrnmpt 5805 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 ∈ V → (𝑗 ∈ ran (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↦ (𝑛 − 1)) ↔ ∃𝑛 ∈ ((1 + 1)...(𝑦 + 1))𝑗 = (𝑛 − 1)))
428425, 427ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 ∈ ran (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↦ (𝑛 − 1)) ↔ ∃𝑛 ∈ ((1 + 1)...(𝑦 + 1))𝑗 = (𝑛 − 1))
429424, 428syl6bbr 292 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ ℤ → (𝑗 ∈ (((1 + 1) − 1)...((𝑦 + 1) − 1)) ↔ 𝑗 ∈ ran (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↦ (𝑛 − 1))))
430429eqrdv 2820 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 ∈ ℤ → (((1 + 1) − 1)...((𝑦 + 1) − 1)) = ran (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↦ (𝑛 − 1)))
431394, 430eqtr3d 2859 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 ∈ ℤ → (1...𝑦) = ran (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↦ (𝑛 − 1)))
432389, 431syl 17 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 ∈ (0...(𝑁 − 1)) → (1...𝑦) = ran (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↦ (𝑛 − 1)))
433432adantl 485 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (1...𝑦) = ran (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↦ (𝑛 − 1)))
434 df-ima 5545 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ ((1 + 1)...(𝑦 + 1))) = ran ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) ↾ ((1 + 1)...(𝑦 + 1)))
435 uzid 12246 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (1 ∈ ℤ → 1 ∈ (ℤ‘1))
436 peano2uz 12289 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (1 ∈ (ℤ‘1) → (1 + 1) ∈ (ℤ‘1))
437114, 435, 436mp2b 10 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (1 + 1) ∈ (ℤ‘1)
438 fzss1 12941 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((1 + 1) ∈ (ℤ‘1) → ((1 + 1)...(𝑦 + 1)) ⊆ (1...(𝑦 + 1)))
439437, 438ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((1 + 1)...(𝑦 + 1)) ⊆ (1...(𝑦 + 1))
440439, 273sstrid 3953 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((1 + 1)...(𝑦 + 1)) ⊆ (1...𝑁))
441440resmptd 5886 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) ↾ ((1 + 1)...(𝑦 + 1))) = (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))))
442 elfzle1 12905 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (1 ∈ ((1 + 1)...(𝑦 + 1)) → (1 + 1) ≤ 1)
443170, 442mto 200 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ¬ 1 ∈ ((1 + 1)...(𝑦 + 1))
444 eleq1 2901 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑛 = 1 → (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↔ 1 ∈ ((1 + 1)...(𝑦 + 1))))
445443, 444mtbiri 330 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑛 = 1 → ¬ 𝑛 ∈ ((1 + 1)...(𝑦 + 1)))
446445necon2ai 3040 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) → 𝑛 ≠ 1)
447446, 181syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) → if(𝑛 = 1, 𝑁, (𝑛 − 1)) = (𝑛 − 1))
448447mpteq2ia 5133 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) = (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↦ (𝑛 − 1))
449441, 448syl6eq 2873 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) ↾ ((1 + 1)...(𝑦 + 1))) = (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↦ (𝑛 − 1)))
450449rneqd 5785 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ran ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) ↾ ((1 + 1)...(𝑦 + 1))) = ran (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↦ (𝑛 − 1)))
451434, 450syl5eq 2869 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ ((1 + 1)...(𝑦 + 1))) = ran (𝑛 ∈ ((1 + 1)...(𝑦 + 1)) ↦ (𝑛 − 1)))
452433, 451eqtr4d 2860 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (1...𝑦) = ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ ((1 + 1)...(𝑦 + 1))))
453452imaeq2d 5907 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((2nd ‘(1st𝑇)) “ (1...𝑦)) = ((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ ((1 + 1)...(𝑦 + 1)))))
454267sneqd 4551 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → {((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))‘1)} = {𝑁})
455 fnsnfv 6725 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) Fn (1...𝑁) ∧ 1 ∈ (1...𝑁)) → {((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))‘1)} = ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ {1}))
456270, 266, 455syl2anc 587 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → {((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))‘1)} = ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ {1}))
457454, 456eqtr3d 2859 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → {𝑁} = ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ {1}))
458457imaeq2d 5907 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((2nd ‘(1st𝑇)) “ {𝑁}) = ((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ {1})))
459353, 458eqtrd 2857 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → {((2nd ‘(1st𝑇))‘𝑁)} = ((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ {1})))
460459adantr 484 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → {((2nd ‘(1st𝑇))‘𝑁)} = ((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ {1})))
461453, 460uneq12d 4115 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∪ {((2nd ‘(1st𝑇))‘𝑁)}) = (((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ ((1 + 1)...(𝑦 + 1)))) ∪ ((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ {1}))))
462382, 388, 4613eqtr4a 2883 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) = (((2nd ‘(1st𝑇)) “ (1...𝑦)) ∪ {((2nd ‘(1st𝑇))‘𝑁)}))
463462xpeq1d 5561 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) = ((((2nd ‘(1st𝑇)) “ (1...𝑦)) ∪ {((2nd ‘(1st𝑇))‘𝑁)}) × {1}))
464 xpundir 5598 . . . . . . . . . . . . . . . 16 ((((2nd ‘(1st𝑇)) “ (1...𝑦)) ∪ {((2nd ‘(1st𝑇))‘𝑁)}) × {1}) = ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {1}))
465463, 464syl6eq 2873 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) = ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {1})))
466 imaco 6082 . . . . . . . . . . . . . . . . 17 (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) = ((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (((𝑦 + 1) + 1)...𝑁)))
467 df-ima 5545 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (((𝑦 + 1) + 1)...𝑁)) = ran ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) ↾ (((𝑦 + 1) + 1)...𝑁))
468 fzss1 12941 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝑦 + 1) + 1) ∈ (ℤ‘1) → (((𝑦 + 1) + 1)...𝑁) ⊆ (1...𝑁))
469231, 468syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((𝑦 + 1) + 1)...𝑁) ⊆ (1...𝑁))
470469resmptd 5886 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) ↾ (((𝑦 + 1) + 1)...𝑁)) = (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))))
471 1red 10631 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑦 ∈ (0...(𝑁 − 1)) → 1 ∈ ℝ)
47263nnzd 12074 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑦 ∈ (0...(𝑁 − 1)) → (𝑦 + 1) ∈ ℤ)
473472peano2zd 12078 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑦 ∈ (0...(𝑁 − 1)) → ((𝑦 + 1) + 1) ∈ ℤ)
474473zred 12075 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑦 ∈ (0...(𝑁 − 1)) → ((𝑦 + 1) + 1) ∈ ℝ)
47563nnge1d 11673 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑦 ∈ (0...(𝑁 − 1)) → 1 ≤ (𝑦 + 1))
476471, 218, 474, 475, 219lelttrd 10787 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑦 ∈ (0...(𝑁 − 1)) → 1 < ((𝑦 + 1) + 1))
477471, 474ltnled 10776 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑦 ∈ (0...(𝑁 − 1)) → (1 < ((𝑦 + 1) + 1) ↔ ¬ ((𝑦 + 1) + 1) ≤ 1))
478476, 477mpbid 235 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑦 ∈ (0...(𝑁 − 1)) → ¬ ((𝑦 + 1) + 1) ≤ 1)
479 elfzle1 12905 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (1 ∈ (((𝑦 + 1) + 1)...𝑁) → ((𝑦 + 1) + 1) ≤ 1)
480478, 479nsyl 142 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑦 ∈ (0...(𝑁 − 1)) → ¬ 1 ∈ (((𝑦 + 1) + 1)...𝑁))
481 eleq1 2901 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑛 = 1 → (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↔ 1 ∈ (((𝑦 + 1) + 1)...𝑁)))
482481notbid 321 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑛 = 1 → (¬ 𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↔ ¬ 1 ∈ (((𝑦 + 1) + 1)...𝑁)))
483480, 482syl5ibrcom 250 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑦 ∈ (0...(𝑁 − 1)) → (𝑛 = 1 → ¬ 𝑛 ∈ (((𝑦 + 1) + 1)...𝑁)))
484483necon2ad 3026 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦 ∈ (0...(𝑁 − 1)) → (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) → 𝑛 ≠ 1))
485484imp 410 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦 ∈ (0...(𝑁 − 1)) ∧ 𝑛 ∈ (((𝑦 + 1) + 1)...𝑁)) → 𝑛 ≠ 1)
486485, 181syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑦 ∈ (0...(𝑁 − 1)) ∧ 𝑛 ∈ (((𝑦 + 1) + 1)...𝑁)) → if(𝑛 = 1, 𝑁, (𝑛 − 1)) = (𝑛 − 1))
487486mpteq2dva 5137 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 ∈ (0...(𝑁 − 1)) → (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) = (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↦ (𝑛 − 1)))
488487adantl 485 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) = (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↦ (𝑛 − 1)))
489470, 488eqtrd 2857 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) ↾ (((𝑦 + 1) + 1)...𝑁)) = (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↦ (𝑛 − 1)))
490489rneqd 5785 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ran ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) ↾ (((𝑦 + 1) + 1)...𝑁)) = ran (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↦ (𝑛 − 1)))
491467, 490syl5eq 2869 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (((𝑦 + 1) + 1)...𝑁)) = ran (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↦ (𝑛 − 1)))
492 eqid 2822 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↦ (𝑛 − 1)) = (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↦ (𝑛 − 1))
493492elrnmpt 5805 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 ∈ V → (𝑗 ∈ ran (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↦ (𝑛 − 1)) ↔ ∃𝑛 ∈ (((𝑦 + 1) + 1)...𝑁)𝑗 = (𝑛 − 1)))
494425, 493ax-mp 5 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 ∈ ran (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↦ (𝑛 − 1)) ↔ ∃𝑛 ∈ (((𝑦 + 1) + 1)...𝑁)𝑗 = (𝑛 − 1))
495 simpr 488 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (((𝑦 + 1) + 1)...𝑁)) → 𝑛 ∈ (((𝑦 + 1) + 1)...𝑁))
496113, 473anim12ci 616 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((𝑦 + 1) + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ))
497 elfzelz 12902 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) → 𝑛 ∈ ℤ)
498497, 114jctir 524 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) → (𝑛 ∈ ℤ ∧ 1 ∈ ℤ))
499 fzsubel 12938 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((𝑦 + 1) + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑛 ∈ ℤ ∧ 1 ∈ ℤ)) → (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↔ (𝑛 − 1) ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1))))
500496, 498, 499syl2an 598 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (((𝑦 + 1) + 1)...𝑁)) → (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↔ (𝑛 − 1) ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1))))
501495, 500mpbid 235 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (((𝑦 + 1) + 1)...𝑁)) → (𝑛 − 1) ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)))
502 eleq1 2901 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑗 = (𝑛 − 1) → (𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)) ↔ (𝑛 − 1) ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1))))
503501, 502syl5ibrcom 250 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (((𝑦 + 1) + 1)...𝑁)) → (𝑗 = (𝑛 − 1) → 𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1))))
504503rexlimdva 3270 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (∃𝑛 ∈ (((𝑦 + 1) + 1)...𝑁)𝑗 = (𝑛 − 1) → 𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1))))
505 elfzelz 12902 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)) → 𝑗 ∈ ℤ)
506505zcnd 12076 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)) → 𝑗 ∈ ℂ)
507506, 397syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)) → ((𝑗 + 1) − 1) = 𝑗)
508507eleq1d 2898 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)) → (((𝑗 + 1) − 1) ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)) ↔ 𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1))))
509508ibir 271 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)) → ((𝑗 + 1) − 1) ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)))
510509adantl 485 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1))) → ((𝑗 + 1) − 1) ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)))
511505peano2zd 12078 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)) → (𝑗 + 1) ∈ ℤ)
512511, 114jctir 524 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)) → ((𝑗 + 1) ∈ ℤ ∧ 1 ∈ ℤ))
513 fzsubel 12938 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((𝑦 + 1) + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ ((𝑗 + 1) ∈ ℤ ∧ 1 ∈ ℤ)) → ((𝑗 + 1) ∈ (((𝑦 + 1) + 1)...𝑁) ↔ ((𝑗 + 1) − 1) ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1))))
514496, 512, 513syl2an 598 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1))) → ((𝑗 + 1) ∈ (((𝑦 + 1) + 1)...𝑁) ↔ ((𝑗 + 1) − 1) ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1))))
515510, 514mpbird 260 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1))) → (𝑗 + 1) ∈ (((𝑦 + 1) + 1)...𝑁))
516507eqcomd 2828 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)) → 𝑗 = ((𝑗 + 1) − 1))
517516adantl 485 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1))) → 𝑗 = ((𝑗 + 1) − 1))
518411rspceeqv 3613 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝑗 + 1) ∈ (((𝑦 + 1) + 1)...𝑁) ∧ 𝑗 = ((𝑗 + 1) − 1)) → ∃𝑛 ∈ (((𝑦 + 1) + 1)...𝑁)𝑗 = (𝑛 − 1))
519515, 517, 518syl2anc 587 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1))) → ∃𝑛 ∈ (((𝑦 + 1) + 1)...𝑁)𝑗 = (𝑛 − 1))
520519ex 416 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)) → ∃𝑛 ∈ (((𝑦 + 1) + 1)...𝑁)𝑗 = (𝑛 − 1)))
521504, 520impbid 215 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (∃𝑛 ∈ (((𝑦 + 1) + 1)...𝑁)𝑗 = (𝑛 − 1) ↔ 𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1))))
522494, 521syl5bb 286 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (𝑗 ∈ ran (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↦ (𝑛 − 1)) ↔ 𝑗 ∈ ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1))))
523522eqrdv 2820 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ran (𝑛 ∈ (((𝑦 + 1) + 1)...𝑁) ↦ (𝑛 − 1)) = ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)))
52463nncnd 11641 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 ∈ (0...(𝑁 − 1)) → (𝑦 + 1) ∈ ℂ)
525 pncan1 11053 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑦 + 1) ∈ ℂ → (((𝑦 + 1) + 1) − 1) = (𝑦 + 1))
526524, 525syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 ∈ (0...(𝑁 − 1)) → (((𝑦 + 1) + 1) − 1) = (𝑦 + 1))
527526oveq1d 7155 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ (0...(𝑁 − 1)) → ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)) = ((𝑦 + 1)...(𝑁 − 1)))
528527adantl 485 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((𝑦 + 1) + 1) − 1)...(𝑁 − 1)) = ((𝑦 + 1)...(𝑁 − 1)))
529491, 523, 5283eqtrd 2861 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (((𝑦 + 1) + 1)...𝑁)) = ((𝑦 + 1)...(𝑁 − 1)))
530529imaeq2d 5907 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((2nd ‘(1st𝑇)) “ ((𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))) “ (((𝑦 + 1) + 1)...𝑁))) = ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))))
531466, 530syl5eq 2869 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) = ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))))
532531xpeq1d 5561 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}) = (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0}))
533465, 532uneq12d 4115 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0})) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {1})) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})))
534 un23 4119 . . . . . . . . . . . . . 14 (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {1})) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {1}))
535533, 534syl6eq 2873 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0})) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {1})))
536535fveq1d 6654 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) = ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {1}))‘𝑛))
537536ad2antrr 725 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) ∧ ¬ 𝑛 = ((2nd ‘(1st𝑇))‘𝑁)) → ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) = ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {1}))‘𝑛))
538 imaundi 5986 . . . . . . . . . . . . . . . . . 18 ((2nd ‘(1st𝑇)) “ (((𝑦 + 1)...(𝑁 − 1)) ∪ {𝑁})) = (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) ∪ ((2nd ‘(1st𝑇)) “ {𝑁}))
539 fzsplit2 12927 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑁 − 1) + 1) ∈ (ℤ‘(𝑦 + 1)) ∧ 𝑁 ∈ (ℤ‘(𝑁 − 1))) → ((𝑦 + 1)...𝑁) = (((𝑦 + 1)...(𝑁 − 1)) ∪ (((𝑁 − 1) + 1)...𝑁)))
540233, 201, 539syl2anr 599 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑦 + 1)...𝑁) = (((𝑦 + 1)...(𝑁 − 1)) ∪ (((𝑁 − 1) + 1)...𝑁)))
541207uneq2d 4114 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (((𝑦 + 1)...(𝑁 − 1)) ∪ (((𝑁 − 1) + 1)...𝑁)) = (((𝑦 + 1)...(𝑁 − 1)) ∪ {𝑁}))
542541adantr 484 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((𝑦 + 1)...(𝑁 − 1)) ∪ (((𝑁 − 1) + 1)...𝑁)) = (((𝑦 + 1)...(𝑁 − 1)) ∪ {𝑁}))
543540, 542eqtrd 2857 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑦 + 1)...𝑁) = (((𝑦 + 1)...(𝑁 − 1)) ∪ {𝑁}))
544543imaeq2d 5907 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) = ((2nd ‘(1st𝑇)) “ (((𝑦 + 1)...(𝑁 − 1)) ∪ {𝑁})))
545353adantr 484 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → {((2nd ‘(1st𝑇))‘𝑁)} = ((2nd ‘(1st𝑇)) “ {𝑁}))
546545uneq2d 4114 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) ∪ {((2nd ‘(1st𝑇))‘𝑁)}) = (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) ∪ ((2nd ‘(1st𝑇)) “ {𝑁})))
547538, 544, 5463eqtr4a 2883 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) = (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) ∪ {((2nd ‘(1st𝑇))‘𝑁)}))
548547xpeq1d 5561 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}) = ((((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) ∪ {((2nd ‘(1st𝑇))‘𝑁)}) × {0}))
549 xpundir 5598 . . . . . . . . . . . . . . . 16 ((((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) ∪ {((2nd ‘(1st𝑇))‘𝑁)}) × {0}) = ((((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0}) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {0}))
550548, 549syl6eq 2873 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}) = ((((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0}) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {0})))
551550uneq2d 4114 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0})) = ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ ((((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0}) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {0}))))
552 unass 4117 . . . . . . . . . . . . . 14 (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {0})) = ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ ((((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0}) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {0})))
553551, 552eqtr4di 2875 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0})) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {0})))
554553fveq1d 6654 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛) = ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {0}))‘𝑛))
555554ad2antrr 725 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) ∧ ¬ 𝑛 = ((2nd ‘(1st𝑇))‘𝑁)) → (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛) = ((((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...(𝑁 − 1))) × {0})) ∪ ({((2nd ‘(1st𝑇))‘𝑁)} × {0}))‘𝑛))
556377, 537, 5553eqtr4d 2867 . . . . . . . . . 10 ((((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) ∧ ¬ 𝑛 = ((2nd ‘(1st𝑇))‘𝑁)) → ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛))
557317, 556eqtrd 2857 . . . . . . . . 9 ((((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) ∧ ¬ 𝑛 = ((2nd ‘(1st𝑇))‘𝑁)) → (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − 0) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛))
558251, 253, 315, 557ifbothda 4476 . . . . . . . 8 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) → (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0)) = (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛))
559558oveq2d 7156 . . . . . . 7 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) → (((1st ‘(1st𝑇))‘𝑛) + (((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0))) = (((1st ‘(1st𝑇))‘𝑛) + (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛)))
560249, 559eqtr2d 2858 . . . . . 6 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) → (((1st ‘(1st𝑇))‘𝑛) + (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛)) = ((((1st ‘(1st𝑇))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0)) + ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛)))
561560mpteq2dva 5137 . . . . 5 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (𝑛 ∈ (1...𝑁) ↦ (((1st ‘(1st𝑇))‘𝑛) + (((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))‘𝑛))) = (𝑛 ∈ (1...𝑁) ↦ ((((1st ‘(1st𝑇))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0)) + ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛))))
56292, 561eqtrd 2857 . . . 4 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))) = (𝑛 ∈ (1...𝑁) ↦ ((((1st ‘(1st𝑇))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0)) + ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛))))
56351adantl 485 . . . . . . . . 9 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → 𝑦 ∈ ℝ)
564159adantr 484 . . . . . . . . 9 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (𝑁 − 1) ∈ ℝ)
565157adantr 484 . . . . . . . . 9 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → 𝑁 ∈ ℝ)
566 elfzle2 12906 . . . . . . . . . 10 (𝑦 ∈ (0...(𝑁 − 1)) → 𝑦 ≤ (𝑁 − 1))
567566adantl 485 . . . . . . . . 9 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → 𝑦 ≤ (𝑁 − 1))
568158adantr 484 . . . . . . . . 9 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (𝑁 − 1) < 𝑁)
569563, 564, 565, 567, 568lelttrd 10787 . . . . . . . 8 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → 𝑦 < 𝑁)
570 poimirlem21.4 . . . . . . . . 9 (𝜑 → (2nd𝑇) = 𝑁)
571570adantr 484 . . . . . . . 8 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (2nd𝑇) = 𝑁)
572569, 571breqtrrd 5070 . . . . . . 7 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → 𝑦 < (2nd𝑇))
573572iftrued 4447 . . . . . 6 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) = 𝑦)
574573csbeq1d 3859 . . . . 5 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))) = 𝑦 / 𝑗((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))))
575 vex 3472 . . . . . 6 𝑦 ∈ V
576 oveq2 7148 . . . . . . . . . 10 (𝑗 = 𝑦 → (1...𝑗) = (1...𝑦))
577576imaeq2d 5907 . . . . . . . . 9 (𝑗 = 𝑦 → ((2nd ‘(1st𝑇)) “ (1...𝑗)) = ((2nd ‘(1st𝑇)) “ (1...𝑦)))
578577xpeq1d 5561 . . . . . . . 8 (𝑗 = 𝑦 → (((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) = (((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}))
579 oveq1 7147 . . . . . . . . . . 11 (𝑗 = 𝑦 → (𝑗 + 1) = (𝑦 + 1))
580579oveq1d 7155 . . . . . . . . . 10 (𝑗 = 𝑦 → ((𝑗 + 1)...𝑁) = ((𝑦 + 1)...𝑁))
581580imaeq2d 5907 . . . . . . . . 9 (𝑗 = 𝑦 → ((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) = ((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)))
582581xpeq1d 5561 . . . . . . . 8 (𝑗 = 𝑦 → (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}) = (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))
583578, 582uneq12d 4115 . . . . . . 7 (𝑗 = 𝑦 → ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0})) = ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0})))
584583oveq2d 7156 . . . . . 6 (𝑗 = 𝑦 → ((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))))
585575, 584csbie 3890 . . . . 5 𝑦 / 𝑗((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0})))
586574, 585syl6eq 2873 . . . 4 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑦)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑦 + 1)...𝑁)) × {0}))))
587 ovexd 7175 . . . . 5 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) → (((1st ‘(1st𝑇))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0)) ∈ V)
588 fvexd 6667 . . . . 5 (((𝜑𝑦 ∈ (0...(𝑁 − 1))) ∧ 𝑛 ∈ (1...𝑁)) → ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛) ∈ V)
589 eqidd 2823 . . . . 5 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (𝑛 ∈ (1...𝑁) ↦ (((1st ‘(1st𝑇))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0))) = (𝑛 ∈ (1...𝑁) ↦ (((1st ‘(1st𝑇))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0))))
590246ffnd 6495 . . . . . 6 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0})) Fn (1...𝑁))
591 nfcv 2979 . . . . . . . . . . 11 𝑛(2nd ‘(1st𝑇))
592 nfmpt1 5140 . . . . . . . . . . 11 𝑛(𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))
593591, 592nfco 5713 . . . . . . . . . 10 𝑛((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1))))
594 nfcv 2979 . . . . . . . . . 10 𝑛(1...(𝑦 + 1))
595593, 594nfima 5915 . . . . . . . . 9 𝑛(((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1)))
596 nfcv 2979 . . . . . . . . 9 𝑛{1}
597595, 596nfxp 5565 . . . . . . . 8 𝑛((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1})
598 nfcv 2979 . . . . . . . . . 10 𝑛(((𝑦 + 1) + 1)...𝑁)
599593, 598nfima 5915 . . . . . . . . 9 𝑛(((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁))
600 nfcv 2979 . . . . . . . . 9 𝑛{0}
601599, 600nfxp 5565 . . . . . . . 8 𝑛((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0})
602597, 601nfun 4116 . . . . . . 7 𝑛(((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))
603602dffn5f 6718 . . . . . 6 ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0})) Fn (1...𝑁) ↔ (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0})) = (𝑛 ∈ (1...𝑁) ↦ ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛)))
604590, 603sylib 221 . . . . 5 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0})) = (𝑛 ∈ (1...𝑁) ↦ ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛)))
60588, 587, 588, 589, 604offval2 7411 . . . 4 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑛 ∈ (1...𝑁) ↦ (((1st ‘(1st𝑇))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0))) ∘f + (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))) = (𝑛 ∈ (1...𝑁) ↦ ((((1st ‘(1st𝑇))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0)) + ((((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))‘𝑛))))
606562, 586, 6053eqtr4rd 2868 . . 3 ((𝜑𝑦 ∈ (0...(𝑁 − 1))) → ((𝑛 ∈ (1...𝑁) ↦ (((1st ‘(1st𝑇))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0))) ∘f + (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))))
607606mpteq2dva 5137 . 2 (𝜑 → (𝑦 ∈ (0...(𝑁 − 1)) ↦ ((𝑛 ∈ (1...𝑁) ↦ (((1st ‘(1st𝑇))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0))) ∘f + (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0})))) = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘f + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0})))))
60821, 607eqtr4d 2860 1 (𝜑𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ ((𝑛 ∈ (1...𝑁) ↦ (((1st ‘(1st𝑇))‘𝑛) − if(𝑛 = ((2nd ‘(1st𝑇))‘𝑁), 1, 0))) ∘f + (((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (1...(𝑦 + 1))) × {1}) ∪ ((((2nd ‘(1st𝑇)) ∘ (𝑛 ∈ (1...𝑁) ↦ if(𝑛 = 1, 𝑁, (𝑛 − 1)))) “ (((𝑦 + 1) + 1)...𝑁)) × {0})))))
 Colors of variables: wff setvar class Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 399   = wceq 1538   ∈ wcel 2114  {cab 2800   ≠ wne 3011  ∀wral 3130  ∃wrex 3131  ∃!wreu 3132  {crab 3134  Vcvv 3469  ⦋csb 3855   ∖ cdif 3905   ∪ cun 3906   ∩ cin 3907   ⊆ wss 3908  ∅c0 4265  ifcif 4439  {csn 4539  ⟨cop 4545   class class class wbr 5042   ↦ cmpt 5122   × cxp 5530  ◡ccnv 5531  ran crn 5533   ↾ cres 5534   “ cima 5535   ∘ ccom 5536  Fun wfun 6328   Fn wfn 6329  ⟶wf 6330  –onto→wfo 6332  –1-1-onto→wf1o 6333  ‘cfv 6334  (class class class)co 7140   ∘f cof 7392  1st c1st 7673  2nd c2nd 7674   ↑m cmap 8393  ℂcc 10524  ℝcr 10525  0cc0 10526  1c1 10527   + caddc 10529   < clt 10664   ≤ cle 10665   − cmin 10859  ℕcn 11625  ℕ0cn0 11885  ℤcz 11969  ℤ≥cuz 12231  ...cfz 12885  ..^cfzo 13028 This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2178  ax-ext 2794  ax-rep 5166  ax-sep 5179  ax-nul 5186  ax-pow 5243  ax-pr 5307  ax-un 7446  ax-cnex 10582  ax-resscn 10583  ax-1cn 10584  ax-icn 10585  ax-addcl 10586  ax-addrcl 10587  ax-mulcl 10588  ax-mulrcl 10589  ax-mulcom 10590  ax-addass 10591  ax-mulass 10592  ax-distr 10593  ax-i2m1 10594  ax-1ne0 10595  ax-1rid 10596  ax-rnegex 10597  ax-rrecex 10598  ax-cnre 10599  ax-pre-lttri 10600  ax-pre-lttrn 10601  ax-pre-ltadd 10602  ax-pre-mulgt0 10603 This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3or 1085  df-3an 1086  df-tru 1541  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2622  df-eu 2653  df-clab 2801  df-cleq 2815  df-clel 2894  df-nfc 2962  df-ne 3012  df-nel 3116  df-ral 3135  df-rex 3136  df-reu 3137  df-rab 3139  df-v 3471  df-sbc 3748  df-csb 3856  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3927  df-nul 4266  df-if 4440  df-pw 4513  df-sn 4540  df-pr 4542  df-tp 4544  df-op 4546  df-uni 4814  df-iun 4896  df-br 5043  df-opab 5105  df-mpt 5123  df-tr 5149  df-id 5437  df-eprel 5442  df-po 5451  df-so 5452  df-fr 5491  df-we 5493  df-xp 5538  df-rel 5539  df-cnv 5540  df-co 5541  df-dm 5542  df-rn 5543  df-res 5544  df-ima 5545  df-pred 6126  df-ord 6172  df-on 6173  df-lim 6174  df-suc 6175  df-iota 6293  df-fun 6336  df-fn 6337  df-f 6338  df-f1 6339  df-fo 6340  df-f1o 6341  df-fv 6342  df-riota 7098  df-ov 7143  df-oprab 7144  df-mpo 7145  df-of 7394  df-om 7566  df-1st 7675  df-2nd 7676  df-wrecs 7934  df-recs 7995  df-rdg 8033  df-er 8276  df-map 8395  df-en 8497  df-dom 8498  df-sdom 8499  df-pnf 10666  df-mnf 10667  df-xr 10668  df-ltxr 10669  df-le 10670  df-sub 10861  df-neg 10862  df-nn 11626  df-n0 11886  df-z 11970  df-uz 12232  df-fz 12886  df-fzo 13029 This theorem is referenced by:  poimirlem20  35035
 Copyright terms: Public domain W3C validator