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

Theorem poimirlem12 33845
Description: Lemma for poimir 33866 connecting walks that could yield from a given cube a given face opposite the final vertex of the walk. (Contributed by Brendan Leahy, 21-Aug-2020.)
Hypotheses
Ref Expression
poimir.0 (𝜑𝑁 ∈ ℕ)
poimirlem22.s 𝑆 = {𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}
poimirlem22.1 (𝜑𝐹:(0...(𝑁 − 1))⟶((0...𝐾) ↑𝑚 (1...𝑁)))
poimirlem12.2 (𝜑𝑇𝑆)
poimirlem12.3 (𝜑 → (2nd𝑇) = 𝑁)
poimirlem12.4 (𝜑𝑈𝑆)
poimirlem12.5 (𝜑 → (2nd𝑈) = 𝑁)
poimirlem12.6 (𝜑𝑀 ∈ (0...(𝑁 − 1)))
Assertion
Ref Expression
poimirlem12 (𝜑 → ((2nd ‘(1st𝑇)) “ (1...𝑀)) ⊆ ((2nd ‘(1st𝑈)) “ (1...𝑀)))
Distinct variable groups:   𝑓,𝑗,𝑡,𝑦   𝜑,𝑗,𝑦   𝑗,𝐹,𝑦   𝑗,𝑀,𝑦   𝑗,𝑁,𝑦   𝑇,𝑗,𝑦   𝑈,𝑗,𝑦   𝜑,𝑡   𝑓,𝐾,𝑗,𝑡   𝑓,𝑀,𝑡   𝑓,𝑁,𝑡   𝑇,𝑓   𝑈,𝑓   𝑓,𝐹,𝑡   𝑡,𝑇   𝑡,𝑈   𝑆,𝑗,𝑡,𝑦
Allowed substitution hints:   𝜑(𝑓)   𝑆(𝑓)   𝐾(𝑦)

Proof of Theorem poimirlem12
StepHypRef Expression
1 eldif 3742 . . . . . . 7 (𝑦 ∈ (((2nd ‘(1st𝑇)) “ (1...𝑀)) ∖ ((2nd ‘(1st𝑈)) “ (1...𝑀))) ↔ (𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀)) ∧ ¬ 𝑦 ∈ ((2nd ‘(1st𝑈)) “ (1...𝑀))))
2 imassrn 5659 . . . . . . . . . . . 12 ((2nd ‘(1st𝑇)) “ (1...𝑀)) ⊆ ran (2nd ‘(1st𝑇))
3 poimirlem12.2 . . . . . . . . . . . . . . . 16 (𝜑𝑇𝑆)
4 elrabi 3514 . . . . . . . . . . . . . . . . 17 (𝑇 ∈ {𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} → 𝑇 ∈ ((((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
5 poimirlem22.s . . . . . . . . . . . . . . . . 17 𝑆 = {𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))}
64, 5eleq2s 2862 . . . . . . . . . . . . . . . 16 (𝑇𝑆𝑇 ∈ ((((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
7 xp1st 7398 . . . . . . . . . . . . . . . 16 (𝑇 ∈ ((((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1st𝑇) ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
83, 6, 73syl 18 . . . . . . . . . . . . . . 15 (𝜑 → (1st𝑇) ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
9 xp2nd 7399 . . . . . . . . . . . . . . 15 ((1st𝑇) ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (2nd ‘(1st𝑇)) ∈ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
108, 9syl 17 . . . . . . . . . . . . . 14 (𝜑 → (2nd ‘(1st𝑇)) ∈ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
11 fvex 6388 . . . . . . . . . . . . . . 15 (2nd ‘(1st𝑇)) ∈ V
12 f1oeq1 6310 . . . . . . . . . . . . . . 15 (𝑓 = (2nd ‘(1st𝑇)) → (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) ↔ (2nd ‘(1st𝑇)):(1...𝑁)–1-1-onto→(1...𝑁)))
1311, 12elab 3504 . . . . . . . . . . . . . 14 ((2nd ‘(1st𝑇)) ∈ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ↔ (2nd ‘(1st𝑇)):(1...𝑁)–1-1-onto→(1...𝑁))
1410, 13sylib 209 . . . . . . . . . . . . 13 (𝜑 → (2nd ‘(1st𝑇)):(1...𝑁)–1-1-onto→(1...𝑁))
15 f1of 6320 . . . . . . . . . . . . 13 ((2nd ‘(1st𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → (2nd ‘(1st𝑇)):(1...𝑁)⟶(1...𝑁))
16 frn 6229 . . . . . . . . . . . . 13 ((2nd ‘(1st𝑇)):(1...𝑁)⟶(1...𝑁) → ran (2nd ‘(1st𝑇)) ⊆ (1...𝑁))
1714, 15, 163syl 18 . . . . . . . . . . . 12 (𝜑 → ran (2nd ‘(1st𝑇)) ⊆ (1...𝑁))
182, 17syl5ss 3772 . . . . . . . . . . 11 (𝜑 → ((2nd ‘(1st𝑇)) “ (1...𝑀)) ⊆ (1...𝑁))
19 poimirlem12.4 . . . . . . . . . . . . . . 15 (𝜑𝑈𝑆)
20 elrabi 3514 . . . . . . . . . . . . . . . 16 (𝑈 ∈ {𝑡 ∈ ((((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∣ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))} → 𝑈 ∈ ((((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
2120, 5eleq2s 2862 . . . . . . . . . . . . . . 15 (𝑈𝑆𝑈 ∈ ((((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)))
22 xp1st 7398 . . . . . . . . . . . . . . 15 (𝑈 ∈ ((((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) → (1st𝑈) ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
2319, 21, 223syl 18 . . . . . . . . . . . . . 14 (𝜑 → (1st𝑈) ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}))
24 xp2nd 7399 . . . . . . . . . . . . . 14 ((1st𝑈) ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (2nd ‘(1st𝑈)) ∈ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
2523, 24syl 17 . . . . . . . . . . . . 13 (𝜑 → (2nd ‘(1st𝑈)) ∈ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)})
26 fvex 6388 . . . . . . . . . . . . . 14 (2nd ‘(1st𝑈)) ∈ V
27 f1oeq1 6310 . . . . . . . . . . . . . 14 (𝑓 = (2nd ‘(1st𝑈)) → (𝑓:(1...𝑁)–1-1-onto→(1...𝑁) ↔ (2nd ‘(1st𝑈)):(1...𝑁)–1-1-onto→(1...𝑁)))
2826, 27elab 3504 . . . . . . . . . . . . 13 ((2nd ‘(1st𝑈)) ∈ {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)} ↔ (2nd ‘(1st𝑈)):(1...𝑁)–1-1-onto→(1...𝑁))
2925, 28sylib 209 . . . . . . . . . . . 12 (𝜑 → (2nd ‘(1st𝑈)):(1...𝑁)–1-1-onto→(1...𝑁))
30 f1ofo 6327 . . . . . . . . . . . 12 ((2nd ‘(1st𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → (2nd ‘(1st𝑈)):(1...𝑁)–onto→(1...𝑁))
31 foima 6303 . . . . . . . . . . . 12 ((2nd ‘(1st𝑈)):(1...𝑁)–onto→(1...𝑁) → ((2nd ‘(1st𝑈)) “ (1...𝑁)) = (1...𝑁))
3229, 30, 313syl 18 . . . . . . . . . . 11 (𝜑 → ((2nd ‘(1st𝑈)) “ (1...𝑁)) = (1...𝑁))
3318, 32sseqtr4d 3802 . . . . . . . . . 10 (𝜑 → ((2nd ‘(1st𝑇)) “ (1...𝑀)) ⊆ ((2nd ‘(1st𝑈)) “ (1...𝑁)))
3433ssdifd 3908 . . . . . . . . 9 (𝜑 → (((2nd ‘(1st𝑇)) “ (1...𝑀)) ∖ ((2nd ‘(1st𝑈)) “ (1...𝑀))) ⊆ (((2nd ‘(1st𝑈)) “ (1...𝑁)) ∖ ((2nd ‘(1st𝑈)) “ (1...𝑀))))
35 dff1o3 6326 . . . . . . . . . . . 12 ((2nd ‘(1st𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) ↔ ((2nd ‘(1st𝑈)):(1...𝑁)–onto→(1...𝑁) ∧ Fun (2nd ‘(1st𝑈))))
3635simprbi 490 . . . . . . . . . . 11 ((2nd ‘(1st𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → Fun (2nd ‘(1st𝑈)))
37 imadif 6151 . . . . . . . . . . 11 (Fun (2nd ‘(1st𝑈)) → ((2nd ‘(1st𝑈)) “ ((1...𝑁) ∖ (1...𝑀))) = (((2nd ‘(1st𝑈)) “ (1...𝑁)) ∖ ((2nd ‘(1st𝑈)) “ (1...𝑀))))
3829, 36, 373syl 18 . . . . . . . . . 10 (𝜑 → ((2nd ‘(1st𝑈)) “ ((1...𝑁) ∖ (1...𝑀))) = (((2nd ‘(1st𝑈)) “ (1...𝑁)) ∖ ((2nd ‘(1st𝑈)) “ (1...𝑀))))
39 difun2 4208 . . . . . . . . . . . 12 ((((𝑀 + 1)...𝑁) ∪ (1...𝑀)) ∖ (1...𝑀)) = (((𝑀 + 1)...𝑁) ∖ (1...𝑀))
40 poimirlem12.6 . . . . . . . . . . . . . . . . 17 (𝜑𝑀 ∈ (0...(𝑁 − 1)))
41 elfznn0 12640 . . . . . . . . . . . . . . . . 17 (𝑀 ∈ (0...(𝑁 − 1)) → 𝑀 ∈ ℕ0)
42 nn0p1nn 11579 . . . . . . . . . . . . . . . . 17 (𝑀 ∈ ℕ0 → (𝑀 + 1) ∈ ℕ)
4340, 41, 423syl 18 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑀 + 1) ∈ ℕ)
44 nnuz 11923 . . . . . . . . . . . . . . . 16 ℕ = (ℤ‘1)
4543, 44syl6eleq 2854 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀 + 1) ∈ (ℤ‘1))
46 poimir.0 . . . . . . . . . . . . . . . . . 18 (𝜑𝑁 ∈ ℕ)
4746nncnd 11292 . . . . . . . . . . . . . . . . 17 (𝜑𝑁 ∈ ℂ)
48 npcan1 10709 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ ℂ → ((𝑁 − 1) + 1) = 𝑁)
4947, 48syl 17 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑁 − 1) + 1) = 𝑁)
50 elfzuz3 12546 . . . . . . . . . . . . . . . . 17 (𝑀 ∈ (0...(𝑁 − 1)) → (𝑁 − 1) ∈ (ℤ𝑀))
51 peano2uz 11941 . . . . . . . . . . . . . . . . 17 ((𝑁 − 1) ∈ (ℤ𝑀) → ((𝑁 − 1) + 1) ∈ (ℤ𝑀))
5240, 50, 513syl 18 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑁 − 1) + 1) ∈ (ℤ𝑀))
5349, 52eqeltrrd 2845 . . . . . . . . . . . . . . 15 (𝜑𝑁 ∈ (ℤ𝑀))
54 fzsplit2 12573 . . . . . . . . . . . . . . 15 (((𝑀 + 1) ∈ (ℤ‘1) ∧ 𝑁 ∈ (ℤ𝑀)) → (1...𝑁) = ((1...𝑀) ∪ ((𝑀 + 1)...𝑁)))
5545, 53, 54syl2anc 579 . . . . . . . . . . . . . 14 (𝜑 → (1...𝑁) = ((1...𝑀) ∪ ((𝑀 + 1)...𝑁)))
56 uncom 3919 . . . . . . . . . . . . . 14 ((1...𝑀) ∪ ((𝑀 + 1)...𝑁)) = (((𝑀 + 1)...𝑁) ∪ (1...𝑀))
5755, 56syl6eq 2815 . . . . . . . . . . . . 13 (𝜑 → (1...𝑁) = (((𝑀 + 1)...𝑁) ∪ (1...𝑀)))
5857difeq1d 3889 . . . . . . . . . . . 12 (𝜑 → ((1...𝑁) ∖ (1...𝑀)) = ((((𝑀 + 1)...𝑁) ∪ (1...𝑀)) ∖ (1...𝑀)))
59 incom 3967 . . . . . . . . . . . . . 14 (((𝑀 + 1)...𝑁) ∩ (1...𝑀)) = ((1...𝑀) ∩ ((𝑀 + 1)...𝑁))
6040, 41syl 17 . . . . . . . . . . . . . . . . 17 (𝜑𝑀 ∈ ℕ0)
6160nn0red 11599 . . . . . . . . . . . . . . . 16 (𝜑𝑀 ∈ ℝ)
6261ltp1d 11208 . . . . . . . . . . . . . . 15 (𝜑𝑀 < (𝑀 + 1))
63 fzdisj 12575 . . . . . . . . . . . . . . 15 (𝑀 < (𝑀 + 1) → ((1...𝑀) ∩ ((𝑀 + 1)...𝑁)) = ∅)
6462, 63syl 17 . . . . . . . . . . . . . 14 (𝜑 → ((1...𝑀) ∩ ((𝑀 + 1)...𝑁)) = ∅)
6559, 64syl5eq 2811 . . . . . . . . . . . . 13 (𝜑 → (((𝑀 + 1)...𝑁) ∩ (1...𝑀)) = ∅)
66 disj3 4182 . . . . . . . . . . . . 13 ((((𝑀 + 1)...𝑁) ∩ (1...𝑀)) = ∅ ↔ ((𝑀 + 1)...𝑁) = (((𝑀 + 1)...𝑁) ∖ (1...𝑀)))
6765, 66sylib 209 . . . . . . . . . . . 12 (𝜑 → ((𝑀 + 1)...𝑁) = (((𝑀 + 1)...𝑁) ∖ (1...𝑀)))
6839, 58, 673eqtr4a 2825 . . . . . . . . . . 11 (𝜑 → ((1...𝑁) ∖ (1...𝑀)) = ((𝑀 + 1)...𝑁))
6968imaeq2d 5648 . . . . . . . . . 10 (𝜑 → ((2nd ‘(1st𝑈)) “ ((1...𝑁) ∖ (1...𝑀))) = ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)))
7038, 69eqtr3d 2801 . . . . . . . . 9 (𝜑 → (((2nd ‘(1st𝑈)) “ (1...𝑁)) ∖ ((2nd ‘(1st𝑈)) “ (1...𝑀))) = ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)))
7134, 70sseqtrd 3801 . . . . . . . 8 (𝜑 → (((2nd ‘(1st𝑇)) “ (1...𝑀)) ∖ ((2nd ‘(1st𝑈)) “ (1...𝑀))) ⊆ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)))
7271sselda 3761 . . . . . . 7 ((𝜑𝑦 ∈ (((2nd ‘(1st𝑇)) “ (1...𝑀)) ∖ ((2nd ‘(1st𝑈)) “ (1...𝑀)))) → 𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)))
731, 72sylan2br 588 . . . . . 6 ((𝜑 ∧ (𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀)) ∧ ¬ 𝑦 ∈ ((2nd ‘(1st𝑈)) “ (1...𝑀)))) → 𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)))
74 fveq2 6375 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑈 → (2nd𝑡) = (2nd𝑈))
7574breq2d 4821 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑈 → (𝑦 < (2nd𝑡) ↔ 𝑦 < (2nd𝑈)))
7675ifbid 4265 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑈 → if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) = if(𝑦 < (2nd𝑈), 𝑦, (𝑦 + 1)))
7776csbeq1d 3698 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑈if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑈), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))
78 2fveq3 6380 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑈 → (1st ‘(1st𝑡)) = (1st ‘(1st𝑈)))
79 2fveq3 6380 . . . . . . . . . . . . . . . . . . . . 21 (𝑡 = 𝑈 → (2nd ‘(1st𝑡)) = (2nd ‘(1st𝑈)))
8079imaeq1d 5647 . . . . . . . . . . . . . . . . . . . 20 (𝑡 = 𝑈 → ((2nd ‘(1st𝑡)) “ (1...𝑗)) = ((2nd ‘(1st𝑈)) “ (1...𝑗)))
8180xpeq1d 5306 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑈 → (((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) = (((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}))
8279imaeq1d 5647 . . . . . . . . . . . . . . . . . . . 20 (𝑡 = 𝑈 → ((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) = ((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)))
8382xpeq1d 5306 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑈 → (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}) = (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0}))
8481, 83uneq12d 3930 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑈 → ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})) = ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0})))
8578, 84oveq12d 6860 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑈 → ((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0}))))
8685csbeq2dv 4153 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑈if(𝑦 < (2nd𝑈), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑈), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0}))))
8777, 86eqtrd 2799 . . . . . . . . . . . . . . 15 (𝑡 = 𝑈if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑈), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0}))))
8887mpteq2dv 4904 . . . . . . . . . . . . . 14 (𝑡 = 𝑈 → (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑈), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0})))))
8988eqeq2d 2775 . . . . . . . . . . . . 13 (𝑡 = 𝑈 → (𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ↔ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑈), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0}))))))
9089, 5elrab2 3523 . . . . . . . . . . . 12 (𝑈𝑆 ↔ (𝑈 ∈ ((((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑈), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0}))))))
9190simprbi 490 . . . . . . . . . . 11 (𝑈𝑆𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑈), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0})))))
9219, 91syl 17 . . . . . . . . . 10 (𝜑𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑈), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0})))))
93 breq1 4812 . . . . . . . . . . . . . 14 (𝑦 = 𝑀 → (𝑦 < (2nd𝑈) ↔ 𝑀 < (2nd𝑈)))
94 id 22 . . . . . . . . . . . . . 14 (𝑦 = 𝑀𝑦 = 𝑀)
9593, 94ifbieq1d 4266 . . . . . . . . . . . . 13 (𝑦 = 𝑀 → if(𝑦 < (2nd𝑈), 𝑦, (𝑦 + 1)) = if(𝑀 < (2nd𝑈), 𝑀, (𝑦 + 1)))
9646nnred 11291 . . . . . . . . . . . . . . . . 17 (𝜑𝑁 ∈ ℝ)
97 peano2rem 10602 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ ℝ → (𝑁 − 1) ∈ ℝ)
9896, 97syl 17 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑁 − 1) ∈ ℝ)
99 elfzle2 12552 . . . . . . . . . . . . . . . . 17 (𝑀 ∈ (0...(𝑁 − 1)) → 𝑀 ≤ (𝑁 − 1))
10040, 99syl 17 . . . . . . . . . . . . . . . 16 (𝜑𝑀 ≤ (𝑁 − 1))
10196ltm1d 11210 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑁 − 1) < 𝑁)
10261, 98, 96, 100, 101lelttrd 10449 . . . . . . . . . . . . . . 15 (𝜑𝑀 < 𝑁)
103 poimirlem12.5 . . . . . . . . . . . . . . 15 (𝜑 → (2nd𝑈) = 𝑁)
104102, 103breqtrrd 4837 . . . . . . . . . . . . . 14 (𝜑𝑀 < (2nd𝑈))
105104iftrued 4251 . . . . . . . . . . . . 13 (𝜑 → if(𝑀 < (2nd𝑈), 𝑀, (𝑦 + 1)) = 𝑀)
10695, 105sylan9eqr 2821 . . . . . . . . . . . 12 ((𝜑𝑦 = 𝑀) → if(𝑦 < (2nd𝑈), 𝑦, (𝑦 + 1)) = 𝑀)
107106csbeq1d 3698 . . . . . . . . . . 11 ((𝜑𝑦 = 𝑀) → if(𝑦 < (2nd𝑈), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0}))) = 𝑀 / 𝑗((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0}))))
108 oveq2 6850 . . . . . . . . . . . . . . . . . 18 (𝑗 = 𝑀 → (1...𝑗) = (1...𝑀))
109108imaeq2d 5648 . . . . . . . . . . . . . . . . 17 (𝑗 = 𝑀 → ((2nd ‘(1st𝑈)) “ (1...𝑗)) = ((2nd ‘(1st𝑈)) “ (1...𝑀)))
110109xpeq1d 5306 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑀 → (((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) = (((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}))
111 oveq1 6849 . . . . . . . . . . . . . . . . . . 19 (𝑗 = 𝑀 → (𝑗 + 1) = (𝑀 + 1))
112111oveq1d 6857 . . . . . . . . . . . . . . . . . 18 (𝑗 = 𝑀 → ((𝑗 + 1)...𝑁) = ((𝑀 + 1)...𝑁))
113112imaeq2d 5648 . . . . . . . . . . . . . . . . 17 (𝑗 = 𝑀 → ((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) = ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)))
114113xpeq1d 5306 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑀 → (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0}) = (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}))
115110, 114uneq12d 3930 . . . . . . . . . . . . . . 15 (𝑗 = 𝑀 → ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0})) = ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0})))
116115oveq2d 6858 . . . . . . . . . . . . . 14 (𝑗 = 𝑀 → ((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}))))
117116adantl 473 . . . . . . . . . . . . 13 ((𝜑𝑗 = 𝑀) → ((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}))))
11840, 117csbied 3718 . . . . . . . . . . . 12 (𝜑𝑀 / 𝑗((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}))))
119118adantr 472 . . . . . . . . . . 11 ((𝜑𝑦 = 𝑀) → 𝑀 / 𝑗((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}))))
120107, 119eqtrd 2799 . . . . . . . . . 10 ((𝜑𝑦 = 𝑀) → if(𝑦 < (2nd𝑈), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}))))
121 ovexd 6876 . . . . . . . . . 10 (𝜑 → ((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}))) ∈ V)
12292, 120, 40, 121fvmptd 6477 . . . . . . . . 9 (𝜑 → (𝐹𝑀) = ((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}))))
123122fveq1d 6377 . . . . . . . 8 (𝜑 → ((𝐹𝑀)‘𝑦) = (((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0})))‘𝑦))
124123adantr 472 . . . . . . 7 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) → ((𝐹𝑀)‘𝑦) = (((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0})))‘𝑦))
125 imassrn 5659 . . . . . . . . . 10 ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) ⊆ ran (2nd ‘(1st𝑈))
126 f1of 6320 . . . . . . . . . . 11 ((2nd ‘(1st𝑈)):(1...𝑁)–1-1-onto→(1...𝑁) → (2nd ‘(1st𝑈)):(1...𝑁)⟶(1...𝑁))
127 frn 6229 . . . . . . . . . . 11 ((2nd ‘(1st𝑈)):(1...𝑁)⟶(1...𝑁) → ran (2nd ‘(1st𝑈)) ⊆ (1...𝑁))
12829, 126, 1273syl 18 . . . . . . . . . 10 (𝜑 → ran (2nd ‘(1st𝑈)) ⊆ (1...𝑁))
129125, 128syl5ss 3772 . . . . . . . . 9 (𝜑 → ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) ⊆ (1...𝑁))
130129sselda 3761 . . . . . . . 8 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) → 𝑦 ∈ (1...𝑁))
131 xp1st 7398 . . . . . . . . . . 11 ((1st𝑈) ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (1st ‘(1st𝑈)) ∈ ((0..^𝐾) ↑𝑚 (1...𝑁)))
132 elmapfn 8083 . . . . . . . . . . 11 ((1st ‘(1st𝑈)) ∈ ((0..^𝐾) ↑𝑚 (1...𝑁)) → (1st ‘(1st𝑈)) Fn (1...𝑁))
13323, 131, 1323syl 18 . . . . . . . . . 10 (𝜑 → (1st ‘(1st𝑈)) Fn (1...𝑁))
134133adantr 472 . . . . . . . . 9 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) → (1st ‘(1st𝑈)) Fn (1...𝑁))
135 1ex 10289 . . . . . . . . . . . . . 14 1 ∈ V
136 fnconstg 6275 . . . . . . . . . . . . . 14 (1 ∈ V → (((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) Fn ((2nd ‘(1st𝑈)) “ (1...𝑀)))
137135, 136ax-mp 5 . . . . . . . . . . . . 13 (((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) Fn ((2nd ‘(1st𝑈)) “ (1...𝑀))
138 c0ex 10287 . . . . . . . . . . . . . 14 0 ∈ V
139 fnconstg 6275 . . . . . . . . . . . . . 14 (0 ∈ V → (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}) Fn ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)))
140138, 139ax-mp 5 . . . . . . . . . . . . 13 (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}) Fn ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))
141137, 140pm3.2i 462 . . . . . . . . . . . 12 ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) Fn ((2nd ‘(1st𝑈)) “ (1...𝑀)) ∧ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}) Fn ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)))
142 imain 6152 . . . . . . . . . . . . . 14 (Fun (2nd ‘(1st𝑈)) → ((2nd ‘(1st𝑈)) “ ((1...𝑀) ∩ ((𝑀 + 1)...𝑁))) = (((2nd ‘(1st𝑈)) “ (1...𝑀)) ∩ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))))
14329, 36, 1423syl 18 . . . . . . . . . . . . 13 (𝜑 → ((2nd ‘(1st𝑈)) “ ((1...𝑀) ∩ ((𝑀 + 1)...𝑁))) = (((2nd ‘(1st𝑈)) “ (1...𝑀)) ∩ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))))
14464imaeq2d 5648 . . . . . . . . . . . . . 14 (𝜑 → ((2nd ‘(1st𝑈)) “ ((1...𝑀) ∩ ((𝑀 + 1)...𝑁))) = ((2nd ‘(1st𝑈)) “ ∅))
145 ima0 5663 . . . . . . . . . . . . . 14 ((2nd ‘(1st𝑈)) “ ∅) = ∅
146144, 145syl6eq 2815 . . . . . . . . . . . . 13 (𝜑 → ((2nd ‘(1st𝑈)) “ ((1...𝑀) ∩ ((𝑀 + 1)...𝑁))) = ∅)
147143, 146eqtr3d 2801 . . . . . . . . . . . 12 (𝜑 → (((2nd ‘(1st𝑈)) “ (1...𝑀)) ∩ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) = ∅)
148 fnun 6175 . . . . . . . . . . . 12 ((((((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)...𝑁))))
149141, 147, 148sylancr 581 . . . . . . . . . . 11 (𝜑 → ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0})) Fn (((2nd ‘(1st𝑈)) “ (1...𝑀)) ∪ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))))
150 imaundi 5728 . . . . . . . . . . . . 13 ((2nd ‘(1st𝑈)) “ ((1...𝑀) ∪ ((𝑀 + 1)...𝑁))) = (((2nd ‘(1st𝑈)) “ (1...𝑀)) ∪ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)))
15155imaeq2d 5648 . . . . . . . . . . . . . 14 (𝜑 → ((2nd ‘(1st𝑈)) “ (1...𝑁)) = ((2nd ‘(1st𝑈)) “ ((1...𝑀) ∪ ((𝑀 + 1)...𝑁))))
152151, 32eqtr3d 2801 . . . . . . . . . . . . 13 (𝜑 → ((2nd ‘(1st𝑈)) “ ((1...𝑀) ∪ ((𝑀 + 1)...𝑁))) = (1...𝑁))
153150, 152syl5eqr 2813 . . . . . . . . . . . 12 (𝜑 → (((2nd ‘(1st𝑈)) “ (1...𝑀)) ∪ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) = (1...𝑁))
154153fneq2d 6160 . . . . . . . . . . 11 (𝜑 → (((((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...𝑁)))
155149, 154mpbid 223 . . . . . . . . . 10 (𝜑 → ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0})) Fn (1...𝑁))
156155adantr 472 . . . . . . . . 9 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) → ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0})) Fn (1...𝑁))
157 ovexd 6876 . . . . . . . . 9 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) → (1...𝑁) ∈ V)
158 inidm 3982 . . . . . . . . 9 ((1...𝑁) ∩ (1...𝑁)) = (1...𝑁)
159 eqidd 2766 . . . . . . . . 9 (((𝜑𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) ∧ 𝑦 ∈ (1...𝑁)) → ((1st ‘(1st𝑈))‘𝑦) = ((1st ‘(1st𝑈))‘𝑦))
160 fvun2 6459 . . . . . . . . . . . . 13 (((((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)...𝑁)))) → (((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}))‘𝑦) = ((((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0})‘𝑦))
161137, 140, 160mp3an12 1575 . . . . . . . . . . . 12 (((((2nd ‘(1st𝑈)) “ (1...𝑀)) ∩ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) = ∅ ∧ 𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) → (((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}))‘𝑦) = ((((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0})‘𝑦))
162147, 161sylan 575 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) → (((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}))‘𝑦) = ((((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0})‘𝑦))
163138fvconst2 6662 . . . . . . . . . . . 12 (𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) → ((((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0})‘𝑦) = 0)
164163adantl 473 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) → ((((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0})‘𝑦) = 0)
165162, 164eqtrd 2799 . . . . . . . . . 10 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) → (((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}))‘𝑦) = 0)
166165adantr 472 . . . . . . . . 9 (((𝜑𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) ∧ 𝑦 ∈ (1...𝑁)) → (((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0}))‘𝑦) = 0)
167134, 156, 157, 157, 158, 159, 166ofval 7104 . . . . . . . 8 (((𝜑𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) ∧ 𝑦 ∈ (1...𝑁)) → (((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0})))‘𝑦) = (((1st ‘(1st𝑈))‘𝑦) + 0))
168130, 167mpdan 678 . . . . . . 7 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) → (((1st ‘(1st𝑈)) ∘𝑓 + ((((2nd ‘(1st𝑈)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁)) × {0})))‘𝑦) = (((1st ‘(1st𝑈))‘𝑦) + 0))
169 elmapi 8082 . . . . . . . . . . . . 13 ((1st ‘(1st𝑈)) ∈ ((0..^𝐾) ↑𝑚 (1...𝑁)) → (1st ‘(1st𝑈)):(1...𝑁)⟶(0..^𝐾))
17023, 131, 1693syl 18 . . . . . . . . . . . 12 (𝜑 → (1st ‘(1st𝑈)):(1...𝑁)⟶(0..^𝐾))
171170ffvelrnda 6549 . . . . . . . . . . 11 ((𝜑𝑦 ∈ (1...𝑁)) → ((1st ‘(1st𝑈))‘𝑦) ∈ (0..^𝐾))
172 elfzonn0 12721 . . . . . . . . . . 11 (((1st ‘(1st𝑈))‘𝑦) ∈ (0..^𝐾) → ((1st ‘(1st𝑈))‘𝑦) ∈ ℕ0)
173171, 172syl 17 . . . . . . . . . 10 ((𝜑𝑦 ∈ (1...𝑁)) → ((1st ‘(1st𝑈))‘𝑦) ∈ ℕ0)
174173nn0cnd 11600 . . . . . . . . 9 ((𝜑𝑦 ∈ (1...𝑁)) → ((1st ‘(1st𝑈))‘𝑦) ∈ ℂ)
175174addid1d 10490 . . . . . . . 8 ((𝜑𝑦 ∈ (1...𝑁)) → (((1st ‘(1st𝑈))‘𝑦) + 0) = ((1st ‘(1st𝑈))‘𝑦))
176130, 175syldan 585 . . . . . . 7 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) → (((1st ‘(1st𝑈))‘𝑦) + 0) = ((1st ‘(1st𝑈))‘𝑦))
177124, 168, 1763eqtrd 2803 . . . . . 6 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑈)) “ ((𝑀 + 1)...𝑁))) → ((𝐹𝑀)‘𝑦) = ((1st ‘(1st𝑈))‘𝑦))
17873, 177syldan 585 . . . . 5 ((𝜑 ∧ (𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀)) ∧ ¬ 𝑦 ∈ ((2nd ‘(1st𝑈)) “ (1...𝑀)))) → ((𝐹𝑀)‘𝑦) = ((1st ‘(1st𝑈))‘𝑦))
179 fveq2 6375 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑇 → (2nd𝑡) = (2nd𝑇))
180179breq2d 4821 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑇 → (𝑦 < (2nd𝑡) ↔ 𝑦 < (2nd𝑇)))
181180ifbid 4265 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑇 → if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) = if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)))
182181csbeq1d 3698 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑇if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))))
183 2fveq3 6380 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑇 → (1st ‘(1st𝑡)) = (1st ‘(1st𝑇)))
184 2fveq3 6380 . . . . . . . . . . . . . . . . . . . . 21 (𝑡 = 𝑇 → (2nd ‘(1st𝑡)) = (2nd ‘(1st𝑇)))
185184imaeq1d 5647 . . . . . . . . . . . . . . . . . . . 20 (𝑡 = 𝑇 → ((2nd ‘(1st𝑡)) “ (1...𝑗)) = ((2nd ‘(1st𝑇)) “ (1...𝑗)))
186185xpeq1d 5306 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑇 → (((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) = (((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}))
187184imaeq1d 5647 . . . . . . . . . . . . . . . . . . . 20 (𝑡 = 𝑇 → ((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) = ((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)))
188187xpeq1d 5306 . . . . . . . . . . . . . . . . . . 19 (𝑡 = 𝑇 → (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}) = (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))
189186, 188uneq12d 3930 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑇 → ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})) = ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0})))
190183, 189oveq12d 6860 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑇 → ((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))))
191190csbeq2dv 4153 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑇if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))))
192182, 191eqtrd 2799 . . . . . . . . . . . . . . 15 (𝑡 = 𝑇if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0}))) = if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))))
193192mpteq2dv 4904 . . . . . . . . . . . . . 14 (𝑡 = 𝑇 → (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0})))))
194193eqeq2d 2775 . . . . . . . . . . . . 13 (𝑡 = 𝑇 → (𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑡), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑡)) ∘𝑓 + ((((2nd ‘(1st𝑡)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑡)) “ ((𝑗 + 1)...𝑁)) × {0})))) ↔ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))))))
195194, 5elrab2 3523 . . . . . . . . . . . 12 (𝑇𝑆 ↔ (𝑇 ∈ ((((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) × (0...𝑁)) ∧ 𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))))))
196195simprbi 490 . . . . . . . . . . 11 (𝑇𝑆𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0})))))
1973, 196syl 17 . . . . . . . . . 10 (𝜑𝐹 = (𝑦 ∈ (0...(𝑁 − 1)) ↦ if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0})))))
198 breq1 4812 . . . . . . . . . . . . . 14 (𝑦 = 𝑀 → (𝑦 < (2nd𝑇) ↔ 𝑀 < (2nd𝑇)))
199198, 94ifbieq1d 4266 . . . . . . . . . . . . 13 (𝑦 = 𝑀 → if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) = if(𝑀 < (2nd𝑇), 𝑀, (𝑦 + 1)))
200 poimirlem12.3 . . . . . . . . . . . . . . 15 (𝜑 → (2nd𝑇) = 𝑁)
201102, 200breqtrrd 4837 . . . . . . . . . . . . . 14 (𝜑𝑀 < (2nd𝑇))
202201iftrued 4251 . . . . . . . . . . . . 13 (𝜑 → if(𝑀 < (2nd𝑇), 𝑀, (𝑦 + 1)) = 𝑀)
203199, 202sylan9eqr 2821 . . . . . . . . . . . 12 ((𝜑𝑦 = 𝑀) → if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) = 𝑀)
204203csbeq1d 3698 . . . . . . . . . . 11 ((𝜑𝑦 = 𝑀) → if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))) = 𝑀 / 𝑗((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))))
205108imaeq2d 5648 . . . . . . . . . . . . . . . . 17 (𝑗 = 𝑀 → ((2nd ‘(1st𝑇)) “ (1...𝑗)) = ((2nd ‘(1st𝑇)) “ (1...𝑀)))
206205xpeq1d 5306 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑀 → (((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) = (((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}))
207112imaeq2d 5648 . . . . . . . . . . . . . . . . 17 (𝑗 = 𝑀 → ((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) = ((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)))
208207xpeq1d 5306 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑀 → (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}) = (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}))
209206, 208uneq12d 3930 . . . . . . . . . . . . . . 15 (𝑗 = 𝑀 → ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0})) = ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0})))
210209oveq2d 6858 . . . . . . . . . . . . . 14 (𝑗 = 𝑀 → ((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}))))
211210adantl 473 . . . . . . . . . . . . 13 ((𝜑𝑗 = 𝑀) → ((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}))))
21240, 211csbied 3718 . . . . . . . . . . . 12 (𝜑𝑀 / 𝑗((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}))))
213212adantr 472 . . . . . . . . . . 11 ((𝜑𝑦 = 𝑀) → 𝑀 / 𝑗((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}))))
214204, 213eqtrd 2799 . . . . . . . . . 10 ((𝜑𝑦 = 𝑀) → if(𝑦 < (2nd𝑇), 𝑦, (𝑦 + 1)) / 𝑗((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑗)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑗 + 1)...𝑁)) × {0}))) = ((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}))))
215 ovexd 6876 . . . . . . . . . 10 (𝜑 → ((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}))) ∈ V)
216197, 214, 40, 215fvmptd 6477 . . . . . . . . 9 (𝜑 → (𝐹𝑀) = ((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}))))
217216fveq1d 6377 . . . . . . . 8 (𝜑 → ((𝐹𝑀)‘𝑦) = (((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0})))‘𝑦))
218217adantr 472 . . . . . . 7 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) → ((𝐹𝑀)‘𝑦) = (((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0})))‘𝑦))
21918sselda 3761 . . . . . . . 8 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) → 𝑦 ∈ (1...𝑁))
220 xp1st 7398 . . . . . . . . . . 11 ((1st𝑇) ∈ (((0..^𝐾) ↑𝑚 (1...𝑁)) × {𝑓𝑓:(1...𝑁)–1-1-onto→(1...𝑁)}) → (1st ‘(1st𝑇)) ∈ ((0..^𝐾) ↑𝑚 (1...𝑁)))
221 elmapfn 8083 . . . . . . . . . . 11 ((1st ‘(1st𝑇)) ∈ ((0..^𝐾) ↑𝑚 (1...𝑁)) → (1st ‘(1st𝑇)) Fn (1...𝑁))
2228, 220, 2213syl 18 . . . . . . . . . 10 (𝜑 → (1st ‘(1st𝑇)) Fn (1...𝑁))
223222adantr 472 . . . . . . . . 9 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) → (1st ‘(1st𝑇)) Fn (1...𝑁))
224 fnconstg 6275 . . . . . . . . . . . . . 14 (1 ∈ V → (((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) Fn ((2nd ‘(1st𝑇)) “ (1...𝑀)))
225135, 224ax-mp 5 . . . . . . . . . . . . 13 (((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) Fn ((2nd ‘(1st𝑇)) “ (1...𝑀))
226 fnconstg 6275 . . . . . . . . . . . . . 14 (0 ∈ V → (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}) Fn ((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)))
227138, 226ax-mp 5 . . . . . . . . . . . . 13 (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}) Fn ((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁))
228225, 227pm3.2i 462 . . . . . . . . . . . 12 ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) Fn ((2nd ‘(1st𝑇)) “ (1...𝑀)) ∧ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}) Fn ((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)))
229 dff1o3 6326 . . . . . . . . . . . . . . 15 ((2nd ‘(1st𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) ↔ ((2nd ‘(1st𝑇)):(1...𝑁)–onto→(1...𝑁) ∧ Fun (2nd ‘(1st𝑇))))
230229simprbi 490 . . . . . . . . . . . . . 14 ((2nd ‘(1st𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → Fun (2nd ‘(1st𝑇)))
231 imain 6152 . . . . . . . . . . . . . 14 (Fun (2nd ‘(1st𝑇)) → ((2nd ‘(1st𝑇)) “ ((1...𝑀) ∩ ((𝑀 + 1)...𝑁))) = (((2nd ‘(1st𝑇)) “ (1...𝑀)) ∩ ((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁))))
23214, 230, 2313syl 18 . . . . . . . . . . . . 13 (𝜑 → ((2nd ‘(1st𝑇)) “ ((1...𝑀) ∩ ((𝑀 + 1)...𝑁))) = (((2nd ‘(1st𝑇)) “ (1...𝑀)) ∩ ((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁))))
23364imaeq2d 5648 . . . . . . . . . . . . . 14 (𝜑 → ((2nd ‘(1st𝑇)) “ ((1...𝑀) ∩ ((𝑀 + 1)...𝑁))) = ((2nd ‘(1st𝑇)) “ ∅))
234 ima0 5663 . . . . . . . . . . . . . 14 ((2nd ‘(1st𝑇)) “ ∅) = ∅
235233, 234syl6eq 2815 . . . . . . . . . . . . 13 (𝜑 → ((2nd ‘(1st𝑇)) “ ((1...𝑀) ∩ ((𝑀 + 1)...𝑁))) = ∅)
236232, 235eqtr3d 2801 . . . . . . . . . . . 12 (𝜑 → (((2nd ‘(1st𝑇)) “ (1...𝑀)) ∩ ((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁))) = ∅)
237 fnun 6175 . . . . . . . . . . . 12 ((((((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)...𝑁))))
238228, 236, 237sylancr 581 . . . . . . . . . . 11 (𝜑 → ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0})) Fn (((2nd ‘(1st𝑇)) “ (1...𝑀)) ∪ ((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁))))
239 imaundi 5728 . . . . . . . . . . . . 13 ((2nd ‘(1st𝑇)) “ ((1...𝑀) ∪ ((𝑀 + 1)...𝑁))) = (((2nd ‘(1st𝑇)) “ (1...𝑀)) ∪ ((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)))
24055imaeq2d 5648 . . . . . . . . . . . . . 14 (𝜑 → ((2nd ‘(1st𝑇)) “ (1...𝑁)) = ((2nd ‘(1st𝑇)) “ ((1...𝑀) ∪ ((𝑀 + 1)...𝑁))))
241 f1ofo 6327 . . . . . . . . . . . . . . 15 ((2nd ‘(1st𝑇)):(1...𝑁)–1-1-onto→(1...𝑁) → (2nd ‘(1st𝑇)):(1...𝑁)–onto→(1...𝑁))
242 foima 6303 . . . . . . . . . . . . . . 15 ((2nd ‘(1st𝑇)):(1...𝑁)–onto→(1...𝑁) → ((2nd ‘(1st𝑇)) “ (1...𝑁)) = (1...𝑁))
24314, 241, 2423syl 18 . . . . . . . . . . . . . 14 (𝜑 → ((2nd ‘(1st𝑇)) “ (1...𝑁)) = (1...𝑁))
244240, 243eqtr3d 2801 . . . . . . . . . . . . 13 (𝜑 → ((2nd ‘(1st𝑇)) “ ((1...𝑀) ∪ ((𝑀 + 1)...𝑁))) = (1...𝑁))
245239, 244syl5eqr 2813 . . . . . . . . . . . 12 (𝜑 → (((2nd ‘(1st𝑇)) “ (1...𝑀)) ∪ ((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁))) = (1...𝑁))
246245fneq2d 6160 . . . . . . . . . . 11 (𝜑 → (((((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...𝑁)))
247238, 246mpbid 223 . . . . . . . . . 10 (𝜑 → ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0})) Fn (1...𝑁))
248247adantr 472 . . . . . . . . 9 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) → ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0})) Fn (1...𝑁))
249 ovexd 6876 . . . . . . . . 9 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) → (1...𝑁) ∈ V)
250 eqidd 2766 . . . . . . . . 9 (((𝜑𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) ∧ 𝑦 ∈ (1...𝑁)) → ((1st ‘(1st𝑇))‘𝑦) = ((1st ‘(1st𝑇))‘𝑦))
251 fvun1 6458 . . . . . . . . . . . . 13 (((((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...𝑀)))) → (((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}))‘𝑦) = ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1})‘𝑦))
252225, 227, 251mp3an12 1575 . . . . . . . . . . . 12 (((((2nd ‘(1st𝑇)) “ (1...𝑀)) ∩ ((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁))) = ∅ ∧ 𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) → (((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}))‘𝑦) = ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1})‘𝑦))
253236, 252sylan 575 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) → (((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}))‘𝑦) = ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1})‘𝑦))
254135fvconst2 6662 . . . . . . . . . . . 12 (𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀)) → ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1})‘𝑦) = 1)
255254adantl 473 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) → ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1})‘𝑦) = 1)
256253, 255eqtrd 2799 . . . . . . . . . 10 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) → (((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}))‘𝑦) = 1)
257256adantr 472 . . . . . . . . 9 (((𝜑𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) ∧ 𝑦 ∈ (1...𝑁)) → (((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0}))‘𝑦) = 1)
258223, 248, 249, 249, 158, 250, 257ofval 7104 . . . . . . . 8 (((𝜑𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) ∧ 𝑦 ∈ (1...𝑁)) → (((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0})))‘𝑦) = (((1st ‘(1st𝑇))‘𝑦) + 1))
259219, 258mpdan 678 . . . . . . 7 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) → (((1st ‘(1st𝑇)) ∘𝑓 + ((((2nd ‘(1st𝑇)) “ (1...𝑀)) × {1}) ∪ (((2nd ‘(1st𝑇)) “ ((𝑀 + 1)...𝑁)) × {0})))‘𝑦) = (((1st ‘(1st𝑇))‘𝑦) + 1))
260218, 259eqtrd 2799 . . . . . 6 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) → ((𝐹𝑀)‘𝑦) = (((1st ‘(1st𝑇))‘𝑦) + 1))
261260adantrr 708 . . . . 5 ((𝜑 ∧ (𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀)) ∧ ¬ 𝑦 ∈ ((2nd ‘(1st𝑈)) “ (1...𝑀)))) → ((𝐹𝑀)‘𝑦) = (((1st ‘(1st𝑇))‘𝑦) + 1))
26246nngt0d 11321 . . . . . . . . . 10 (𝜑 → 0 < 𝑁)
263262, 103breqtrrd 4837 . . . . . . . . 9 (𝜑 → 0 < (2nd𝑈))
26446, 5, 19, 263poimirlem5 33838 . . . . . . . 8 (𝜑 → (𝐹‘0) = (1st ‘(1st𝑈)))
265262, 200breqtrrd 4837 . . . . . . . . 9 (𝜑 → 0 < (2nd𝑇))
26646, 5, 3, 265poimirlem5 33838 . . . . . . . 8 (𝜑 → (𝐹‘0) = (1st ‘(1st𝑇)))
267264, 266eqtr3d 2801 . . . . . . 7 (𝜑 → (1st ‘(1st𝑈)) = (1st ‘(1st𝑇)))
268267fveq1d 6377 . . . . . 6 (𝜑 → ((1st ‘(1st𝑈))‘𝑦) = ((1st ‘(1st𝑇))‘𝑦))
269268adantr 472 . . . . 5 ((𝜑 ∧ (𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀)) ∧ ¬ 𝑦 ∈ ((2nd ‘(1st𝑈)) “ (1...𝑀)))) → ((1st ‘(1st𝑈))‘𝑦) = ((1st ‘(1st𝑇))‘𝑦))
270178, 261, 2693eqtr3d 2807 . . . 4 ((𝜑 ∧ (𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀)) ∧ ¬ 𝑦 ∈ ((2nd ‘(1st𝑈)) “ (1...𝑀)))) → (((1st ‘(1st𝑇))‘𝑦) + 1) = ((1st ‘(1st𝑇))‘𝑦))
271 elmapi 8082 . . . . . . . . . . . 12 ((1st ‘(1st𝑇)) ∈ ((0..^𝐾) ↑𝑚 (1...𝑁)) → (1st ‘(1st𝑇)):(1...𝑁)⟶(0..^𝐾))
2728, 220, 2713syl 18 . . . . . . . . . . 11 (𝜑 → (1st ‘(1st𝑇)):(1...𝑁)⟶(0..^𝐾))
273272ffvelrnda 6549 . . . . . . . . . 10 ((𝜑𝑦 ∈ (1...𝑁)) → ((1st ‘(1st𝑇))‘𝑦) ∈ (0..^𝐾))
274 elfzonn0 12721 . . . . . . . . . 10 (((1st ‘(1st𝑇))‘𝑦) ∈ (0..^𝐾) → ((1st ‘(1st𝑇))‘𝑦) ∈ ℕ0)
275273, 274syl 17 . . . . . . . . 9 ((𝜑𝑦 ∈ (1...𝑁)) → ((1st ‘(1st𝑇))‘𝑦) ∈ ℕ0)
276275nn0red 11599 . . . . . . . 8 ((𝜑𝑦 ∈ (1...𝑁)) → ((1st ‘(1st𝑇))‘𝑦) ∈ ℝ)
277276ltp1d 11208 . . . . . . . 8 ((𝜑𝑦 ∈ (1...𝑁)) → ((1st ‘(1st𝑇))‘𝑦) < (((1st ‘(1st𝑇))‘𝑦) + 1))
278276, 277gtned 10426 . . . . . . 7 ((𝜑𝑦 ∈ (1...𝑁)) → (((1st ‘(1st𝑇))‘𝑦) + 1) ≠ ((1st ‘(1st𝑇))‘𝑦))
279219, 278syldan 585 . . . . . 6 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) → (((1st ‘(1st𝑇))‘𝑦) + 1) ≠ ((1st ‘(1st𝑇))‘𝑦))
280279neneqd 2942 . . . . 5 ((𝜑𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀))) → ¬ (((1st ‘(1st𝑇))‘𝑦) + 1) = ((1st ‘(1st𝑇))‘𝑦))
281280adantrr 708 . . . 4 ((𝜑 ∧ (𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀)) ∧ ¬ 𝑦 ∈ ((2nd ‘(1st𝑈)) “ (1...𝑀)))) → ¬ (((1st ‘(1st𝑇))‘𝑦) + 1) = ((1st ‘(1st𝑇))‘𝑦))
282270, 281pm2.65da 851 . . 3 (𝜑 → ¬ (𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀)) ∧ ¬ 𝑦 ∈ ((2nd ‘(1st𝑈)) “ (1...𝑀))))
283 iman 390 . . 3 ((𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀)) → 𝑦 ∈ ((2nd ‘(1st𝑈)) “ (1...𝑀))) ↔ ¬ (𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀)) ∧ ¬ 𝑦 ∈ ((2nd ‘(1st𝑈)) “ (1...𝑀))))
284282, 283sylibr 225 . 2 (𝜑 → (𝑦 ∈ ((2nd ‘(1st𝑇)) “ (1...𝑀)) → 𝑦 ∈ ((2nd ‘(1st𝑈)) “ (1...𝑀))))
285284ssrdv 3767 1 (𝜑 → ((2nd ‘(1st𝑇)) “ (1...𝑀)) ⊆ ((2nd ‘(1st𝑈)) “ (1...𝑀)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 384   = wceq 1652  wcel 2155  {cab 2751  wne 2937  {crab 3059  Vcvv 3350  csb 3691  cdif 3729  cun 3730  cin 3731  wss 3732  c0 4079  ifcif 4243  {csn 4334   class class class wbr 4809  cmpt 4888   × cxp 5275  ccnv 5276  ran crn 5278  cima 5280  Fun wfun 6062   Fn wfn 6063  wf 6064  ontowfo 6066  1-1-ontowf1o 6067  cfv 6068  (class class class)co 6842  𝑓 cof 7093  1st c1st 7364  2nd c2nd 7365  𝑚 cmap 8060  cc 10187  cr 10188  0cc0 10189  1c1 10190   + caddc 10192   < clt 10328  cle 10329  cmin 10520  cn 11274  0cn0 11538  cuz 11886  ...cfz 12533  ..^cfzo 12673
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1890  ax-4 1904  ax-5 2005  ax-6 2070  ax-7 2105  ax-8 2157  ax-9 2164  ax-10 2183  ax-11 2198  ax-12 2211  ax-13 2352  ax-ext 2743  ax-rep 4930  ax-sep 4941  ax-nul 4949  ax-pow 5001  ax-pr 5062  ax-un 7147  ax-cnex 10245  ax-resscn 10246  ax-1cn 10247  ax-icn 10248  ax-addcl 10249  ax-addrcl 10250  ax-mulcl 10251  ax-mulrcl 10252  ax-mulcom 10253  ax-addass 10254  ax-mulass 10255  ax-distr 10256  ax-i2m1 10257  ax-1ne0 10258  ax-1rid 10259  ax-rnegex 10260  ax-rrecex 10261  ax-cnre 10262  ax-pre-lttri 10263  ax-pre-lttrn 10264  ax-pre-ltadd 10265  ax-pre-mulgt0 10266
This theorem depends on definitions:  df-bi 198  df-an 385  df-or 874  df-3or 1108  df-3an 1109  df-tru 1656  df-ex 1875  df-nf 1879  df-sb 2063  df-mo 2565  df-eu 2582  df-clab 2752  df-cleq 2758  df-clel 2761  df-nfc 2896  df-ne 2938  df-nel 3041  df-ral 3060  df-rex 3061  df-reu 3062  df-rab 3064  df-v 3352  df-sbc 3597  df-csb 3692  df-dif 3735  df-un 3737  df-in 3739  df-ss 3746  df-pss 3748  df-nul 4080  df-if 4244  df-pw 4317  df-sn 4335  df-pr 4337  df-tp 4339  df-op 4341  df-uni 4595  df-iun 4678  df-br 4810  df-opab 4872  df-mpt 4889  df-tr 4912  df-id 5185  df-eprel 5190  df-po 5198  df-so 5199  df-fr 5236  df-we 5238  df-xp 5283  df-rel 5284  df-cnv 5285  df-co 5286  df-dm 5287  df-rn 5288  df-res 5289  df-ima 5290  df-pred 5865  df-ord 5911  df-on 5912  df-lim 5913  df-suc 5914  df-iota 6031  df-fun 6070  df-fn 6071  df-f 6072  df-f1 6073  df-fo 6074  df-f1o 6075  df-fv 6076  df-riota 6803  df-ov 6845  df-oprab 6846  df-mpt2 6847  df-of 7095  df-om 7264  df-1st 7366  df-2nd 7367  df-wrecs 7610  df-recs 7672  df-rdg 7710  df-er 7947  df-map 8062  df-en 8161  df-dom 8162  df-sdom 8163  df-pnf 10330  df-mnf 10331  df-xr 10332  df-ltxr 10333  df-le 10334  df-sub 10522  df-neg 10523  df-nn 11275  df-n0 11539  df-z 11625  df-uz 11887  df-fz 12534  df-fzo 12674
This theorem is referenced by:  poimirlem14  33847
  Copyright terms: Public domain W3C validator