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

Theorem poimirlem4 35781
Description: Lemma for poimir 35810 connecting the admissible faces on the back face of the (𝑀 + 1)-cube to admissible simplices in the 𝑀-cube. (Contributed by Brendan Leahy, 21-Aug-2020.)
Hypotheses
Ref Expression
poimir.0 (𝜑𝑁 ∈ ℕ)
poimirlem4.1 (𝜑𝐾 ∈ ℕ)
poimirlem4.2 (𝜑𝑀 ∈ ℕ0)
poimirlem4.3 (𝜑𝑀 < 𝑁)
Assertion
Ref Expression
poimirlem4 (𝜑 → {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ≈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))})
Distinct variable groups:   𝑓,𝑖,𝑗,𝑝,𝑠   𝜑,𝑗   𝑗,𝑀   𝑗,𝑁   𝜑,𝑖,𝑝,𝑠   𝐵,𝑓,𝑖,𝑗,𝑠   𝑓,𝐾,𝑖,𝑗,𝑝,𝑠   𝑓,𝑀,𝑖,𝑝,𝑠   𝑓,𝑁,𝑖,𝑝,𝑠
Allowed substitution hints:   𝜑(𝑓)   𝐵(𝑝)

Proof of Theorem poimirlem4
Dummy variables 𝑘 𝑛 𝑡 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 poimir.0 . . . . . . . 8 (𝜑𝑁 ∈ ℕ)
21adantr 481 . . . . . . 7 ((𝜑𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → 𝑁 ∈ ℕ)
3 poimirlem4.1 . . . . . . . 8 (𝜑𝐾 ∈ ℕ)
43adantr 481 . . . . . . 7 ((𝜑𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → 𝐾 ∈ ℕ)
5 poimirlem4.2 . . . . . . . 8 (𝜑𝑀 ∈ ℕ0)
65adantr 481 . . . . . . 7 ((𝜑𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → 𝑀 ∈ ℕ0)
7 poimirlem4.3 . . . . . . . 8 (𝜑𝑀 < 𝑁)
87adantr 481 . . . . . . 7 ((𝜑𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → 𝑀 < 𝑁)
9 xp1st 7863 . . . . . . . . 9 (𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) → (1st𝑡) ∈ ((0..^𝐾) ↑m (1...𝑀)))
10 elmapi 8637 . . . . . . . . 9 ((1st𝑡) ∈ ((0..^𝐾) ↑m (1...𝑀)) → (1st𝑡):(1...𝑀)⟶(0..^𝐾))
119, 10syl 17 . . . . . . . 8 (𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) → (1st𝑡):(1...𝑀)⟶(0..^𝐾))
1211adantl 482 . . . . . . 7 ((𝜑𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → (1st𝑡):(1...𝑀)⟶(0..^𝐾))
13 xp2nd 7864 . . . . . . . . 9 (𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) → (2nd𝑡) ∈ {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})
14 fvex 6787 . . . . . . . . . 10 (2nd𝑡) ∈ V
15 f1oeq1 6704 . . . . . . . . . 10 (𝑓 = (2nd𝑡) → (𝑓:(1...𝑀)–1-1-onto→(1...𝑀) ↔ (2nd𝑡):(1...𝑀)–1-1-onto→(1...𝑀)))
1614, 15elab 3609 . . . . . . . . 9 ((2nd𝑡) ∈ {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)} ↔ (2nd𝑡):(1...𝑀)–1-1-onto→(1...𝑀))
1713, 16sylib 217 . . . . . . . 8 (𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) → (2nd𝑡):(1...𝑀)–1-1-onto→(1...𝑀))
1817adantl 482 . . . . . . 7 ((𝜑𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → (2nd𝑡):(1...𝑀)–1-1-onto→(1...𝑀))
192, 4, 6, 8, 12, 18poimirlem3 35780 . . . . . 6 ((𝜑𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵 → (⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∧ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = ((((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) ∘f + (((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ (((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩})‘(𝑀 + 1)) = 0 ∧ (((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})‘(𝑀 + 1)) = (𝑀 + 1)))))
20 fvex 6787 . . . . . . . . . . . . . . . 16 (1st𝑡) ∈ V
21 snex 5354 . . . . . . . . . . . . . . . 16 {⟨(𝑀 + 1), 0⟩} ∈ V
2220, 21unex 7596 . . . . . . . . . . . . . . 15 ((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) ∈ V
23 snex 5354 . . . . . . . . . . . . . . . 16 {⟨(𝑀 + 1), (𝑀 + 1)⟩} ∈ V
2414, 23unex 7596 . . . . . . . . . . . . . . 15 ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) ∈ V
2522, 24op1std 7841 . . . . . . . . . . . . . 14 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → (1st𝑠) = ((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}))
2622, 24op2ndd 7842 . . . . . . . . . . . . . . . . 17 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → (2nd𝑠) = ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}))
2726imaeq1d 5968 . . . . . . . . . . . . . . . 16 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → ((2nd𝑠) “ (1...𝑗)) = (((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ (1...𝑗)))
2827xpeq1d 5618 . . . . . . . . . . . . . . 15 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → (((2nd𝑠) “ (1...𝑗)) × {1}) = ((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ (1...𝑗)) × {1}))
2926imaeq1d 5968 . . . . . . . . . . . . . . . 16 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → ((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) = (((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ ((𝑗 + 1)...(𝑀 + 1))))
3029xpeq1d 5618 . . . . . . . . . . . . . . 15 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}) = ((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))
3128, 30uneq12d 4098 . . . . . . . . . . . . . 14 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})) = (((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})))
3225, 31oveq12d 7293 . . . . . . . . . . . . 13 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → ((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) = (((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) ∘f + (((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))))
3332uneq1d 4096 . . . . . . . . . . . 12 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) = ((((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) ∘f + (((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})))
3433csbeq1d 3836 . . . . . . . . . . 11 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 = ((((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) ∘f + (((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵)
3534eqeq2d 2749 . . . . . . . . . 10 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → (𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵𝑖 = ((((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) ∘f + (((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵))
3635rexbidv 3226 . . . . . . . . 9 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → (∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∃𝑗 ∈ (0...𝑀)𝑖 = ((((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) ∘f + (((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵))
3736ralbidv 3112 . . . . . . . 8 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = ((((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) ∘f + (((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵))
3825fveq1d 6776 . . . . . . . . 9 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → ((1st𝑠)‘(𝑀 + 1)) = (((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩})‘(𝑀 + 1)))
3938eqeq1d 2740 . . . . . . . 8 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → (((1st𝑠)‘(𝑀 + 1)) = 0 ↔ (((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩})‘(𝑀 + 1)) = 0))
4026fveq1d 6776 . . . . . . . . 9 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → ((2nd𝑠)‘(𝑀 + 1)) = (((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})‘(𝑀 + 1)))
4140eqeq1d 2740 . . . . . . . 8 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → (((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1) ↔ (((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})‘(𝑀 + 1)) = (𝑀 + 1)))
4237, 39, 413anbi123d 1435 . . . . . . 7 (𝑠 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → ((∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1)) ↔ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = ((((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) ∘f + (((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ (((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩})‘(𝑀 + 1)) = 0 ∧ (((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})‘(𝑀 + 1)) = (𝑀 + 1))))
4342elrab 3624 . . . . . 6 (⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))} ↔ (⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∧ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = ((((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) ∘f + (((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ (((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩})‘(𝑀 + 1)) = 0 ∧ (((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})‘(𝑀 + 1)) = (𝑀 + 1))))
4419, 43syl6ibr 251 . . . . 5 ((𝜑𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵 → ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))}))
4544ralrimiva 3103 . . . 4 (𝜑 → ∀𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})(∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵 → ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))}))
46 fveq2 6774 . . . . . . . . . . 11 (𝑠 = 𝑡 → (1st𝑠) = (1st𝑡))
47 fveq2 6774 . . . . . . . . . . . . . 14 (𝑠 = 𝑡 → (2nd𝑠) = (2nd𝑡))
4847imaeq1d 5968 . . . . . . . . . . . . 13 (𝑠 = 𝑡 → ((2nd𝑠) “ (1...𝑗)) = ((2nd𝑡) “ (1...𝑗)))
4948xpeq1d 5618 . . . . . . . . . . . 12 (𝑠 = 𝑡 → (((2nd𝑠) “ (1...𝑗)) × {1}) = (((2nd𝑡) “ (1...𝑗)) × {1}))
5047imaeq1d 5968 . . . . . . . . . . . . 13 (𝑠 = 𝑡 → ((2nd𝑠) “ ((𝑗 + 1)...𝑀)) = ((2nd𝑡) “ ((𝑗 + 1)...𝑀)))
5150xpeq1d 5618 . . . . . . . . . . . 12 (𝑠 = 𝑡 → (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}) = (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))
5249, 51uneq12d 4098 . . . . . . . . . . 11 (𝑠 = 𝑡 → ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0})) = ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0})))
5346, 52oveq12d 7293 . . . . . . . . . 10 (𝑠 = 𝑡 → ((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) = ((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))))
5453uneq1d 4096 . . . . . . . . 9 (𝑠 = 𝑡 → (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})))
5554csbeq1d 3836 . . . . . . . 8 (𝑠 = 𝑡(((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵)
5655eqeq2d 2749 . . . . . . 7 (𝑠 = 𝑡 → (𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵))
5756rexbidv 3226 . . . . . 6 (𝑠 = 𝑡 → (∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵))
5857ralbidv 3112 . . . . 5 (𝑠 = 𝑡 → (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵))
5958ralrab 3630 . . . 4 (∀𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))} ↔ ∀𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})(∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵 → ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))}))
6045, 59sylibr 233 . . 3 (𝜑 → ∀𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))})
61 xp1st 7863 . . . . . . . . . . . . . . 15 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → (1st𝑘) ∈ ((0..^𝐾) ↑m (1...(𝑀 + 1))))
62 elmapi 8637 . . . . . . . . . . . . . . 15 ((1st𝑘) ∈ ((0..^𝐾) ↑m (1...(𝑀 + 1))) → (1st𝑘):(1...(𝑀 + 1))⟶(0..^𝐾))
6361, 62syl 17 . . . . . . . . . . . . . 14 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → (1st𝑘):(1...(𝑀 + 1))⟶(0..^𝐾))
64 fzssp1 13299 . . . . . . . . . . . . . 14 (1...𝑀) ⊆ (1...(𝑀 + 1))
65 fssres 6640 . . . . . . . . . . . . . 14 (((1st𝑘):(1...(𝑀 + 1))⟶(0..^𝐾) ∧ (1...𝑀) ⊆ (1...(𝑀 + 1))) → ((1st𝑘) ↾ (1...𝑀)):(1...𝑀)⟶(0..^𝐾))
6663, 64, 65sylancl 586 . . . . . . . . . . . . 13 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → ((1st𝑘) ↾ (1...𝑀)):(1...𝑀)⟶(0..^𝐾))
67 ovex 7308 . . . . . . . . . . . . . 14 (0..^𝐾) ∈ V
68 ovex 7308 . . . . . . . . . . . . . 14 (1...𝑀) ∈ V
6967, 68elmap 8659 . . . . . . . . . . . . 13 (((1st𝑘) ↾ (1...𝑀)) ∈ ((0..^𝐾) ↑m (1...𝑀)) ↔ ((1st𝑘) ↾ (1...𝑀)):(1...𝑀)⟶(0..^𝐾))
7066, 69sylibr 233 . . . . . . . . . . . 12 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → ((1st𝑘) ↾ (1...𝑀)) ∈ ((0..^𝐾) ↑m (1...𝑀)))
7170ad2antlr 724 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ((1st𝑘) ↾ (1...𝑀)) ∈ ((0..^𝐾) ↑m (1...𝑀)))
72 xp2nd 7864 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → (2nd𝑘) ∈ {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})
73 fvex 6787 . . . . . . . . . . . . . . . . . 18 (2nd𝑘) ∈ V
74 f1oeq1 6704 . . . . . . . . . . . . . . . . . 18 (𝑓 = (2nd𝑘) → (𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1)) ↔ (2nd𝑘):(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))))
7573, 74elab 3609 . . . . . . . . . . . . . . . . 17 ((2nd𝑘) ∈ {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))} ↔ (2nd𝑘):(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1)))
7672, 75sylib 217 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → (2nd𝑘):(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1)))
77 f1of1 6715 . . . . . . . . . . . . . . . 16 ((2nd𝑘):(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1)) → (2nd𝑘):(1...(𝑀 + 1))–1-1→(1...(𝑀 + 1)))
7876, 77syl 17 . . . . . . . . . . . . . . 15 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → (2nd𝑘):(1...(𝑀 + 1))–1-1→(1...(𝑀 + 1)))
79 f1ores 6730 . . . . . . . . . . . . . . 15 (((2nd𝑘):(1...(𝑀 + 1))–1-1→(1...(𝑀 + 1)) ∧ (1...𝑀) ⊆ (1...(𝑀 + 1))) → ((2nd𝑘) ↾ (1...𝑀)):(1...𝑀)–1-1-onto→((2nd𝑘) “ (1...𝑀)))
8078, 64, 79sylancl 586 . . . . . . . . . . . . . 14 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → ((2nd𝑘) ↾ (1...𝑀)):(1...𝑀)–1-1-onto→((2nd𝑘) “ (1...𝑀)))
8180ad2antlr 724 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ((2nd𝑘) ↾ (1...𝑀)):(1...𝑀)–1-1-onto→((2nd𝑘) “ (1...𝑀)))
82 dff1o3 6722 . . . . . . . . . . . . . . . . . . 19 ((2nd𝑘):(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1)) ↔ ((2nd𝑘):(1...(𝑀 + 1))–onto→(1...(𝑀 + 1)) ∧ Fun (2nd𝑘)))
8382simprbi 497 . . . . . . . . . . . . . . . . . 18 ((2nd𝑘):(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1)) → Fun (2nd𝑘))
84 imadif 6518 . . . . . . . . . . . . . . . . . 18 (Fun (2nd𝑘) → ((2nd𝑘) “ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) = (((2nd𝑘) “ (1...(𝑀 + 1))) ∖ ((2nd𝑘) “ {(𝑀 + 1)})))
8576, 83, 843syl 18 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → ((2nd𝑘) “ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) = (((2nd𝑘) “ (1...(𝑀 + 1))) ∖ ((2nd𝑘) “ {(𝑀 + 1)})))
8685ad2antlr 724 . . . . . . . . . . . . . . . 16 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ((2nd𝑘) “ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) = (((2nd𝑘) “ (1...(𝑀 + 1))) ∖ ((2nd𝑘) “ {(𝑀 + 1)})))
87 f1ofo 6723 . . . . . . . . . . . . . . . . . . 19 ((2nd𝑘):(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1)) → (2nd𝑘):(1...(𝑀 + 1))–onto→(1...(𝑀 + 1)))
88 foima 6693 . . . . . . . . . . . . . . . . . . 19 ((2nd𝑘):(1...(𝑀 + 1))–onto→(1...(𝑀 + 1)) → ((2nd𝑘) “ (1...(𝑀 + 1))) = (1...(𝑀 + 1)))
8976, 87, 883syl 18 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → ((2nd𝑘) “ (1...(𝑀 + 1))) = (1...(𝑀 + 1)))
9089ad2antlr 724 . . . . . . . . . . . . . . . . 17 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ((2nd𝑘) “ (1...(𝑀 + 1))) = (1...(𝑀 + 1)))
91 f1ofn 6717 . . . . . . . . . . . . . . . . . . . 20 ((2nd𝑘):(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1)) → (2nd𝑘) Fn (1...(𝑀 + 1)))
9276, 91syl 17 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → (2nd𝑘) Fn (1...(𝑀 + 1)))
93 nn0p1nn 12272 . . . . . . . . . . . . . . . . . . . . 21 (𝑀 ∈ ℕ0 → (𝑀 + 1) ∈ ℕ)
945, 93syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑀 + 1) ∈ ℕ)
95 elfz1end 13286 . . . . . . . . . . . . . . . . . . . 20 ((𝑀 + 1) ∈ ℕ ↔ (𝑀 + 1) ∈ (1...(𝑀 + 1)))
9694, 95sylib 217 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑀 + 1) ∈ (1...(𝑀 + 1)))
97 fnsnfv 6847 . . . . . . . . . . . . . . . . . . 19 (((2nd𝑘) Fn (1...(𝑀 + 1)) ∧ (𝑀 + 1) ∈ (1...(𝑀 + 1))) → {((2nd𝑘)‘(𝑀 + 1))} = ((2nd𝑘) “ {(𝑀 + 1)}))
9892, 96, 97syl2anr 597 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) → {((2nd𝑘)‘(𝑀 + 1))} = ((2nd𝑘) “ {(𝑀 + 1)}))
99 sneq 4571 . . . . . . . . . . . . . . . . . 18 (((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1) → {((2nd𝑘)‘(𝑀 + 1))} = {(𝑀 + 1)})
10098, 99sylan9req 2799 . . . . . . . . . . . . . . . . 17 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ((2nd𝑘) “ {(𝑀 + 1)}) = {(𝑀 + 1)})
10190, 100difeq12d 4058 . . . . . . . . . . . . . . . 16 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → (((2nd𝑘) “ (1...(𝑀 + 1))) ∖ ((2nd𝑘) “ {(𝑀 + 1)})) = ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)}))
10286, 101eqtrd 2778 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ((2nd𝑘) “ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) = ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)}))
103 1z 12350 . . . . . . . . . . . . . . . . . . . . 21 1 ∈ ℤ
104 nn0uz 12620 . . . . . . . . . . . . . . . . . . . . . . 23 0 = (ℤ‘0)
105 1m1e0 12045 . . . . . . . . . . . . . . . . . . . . . . . 24 (1 − 1) = 0
106105fveq2i 6777 . . . . . . . . . . . . . . . . . . . . . . 23 (ℤ‘(1 − 1)) = (ℤ‘0)
107104, 106eqtr4i 2769 . . . . . . . . . . . . . . . . . . . . . 22 0 = (ℤ‘(1 − 1))
1085, 107eleqtrdi 2849 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑀 ∈ (ℤ‘(1 − 1)))
109 fzsuc2 13314 . . . . . . . . . . . . . . . . . . . . 21 ((1 ∈ ℤ ∧ 𝑀 ∈ (ℤ‘(1 − 1))) → (1...(𝑀 + 1)) = ((1...𝑀) ∪ {(𝑀 + 1)}))
110103, 108, 109sylancr 587 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (1...(𝑀 + 1)) = ((1...𝑀) ∪ {(𝑀 + 1)}))
111110difeq1d 4056 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)}) = (((1...𝑀) ∪ {(𝑀 + 1)}) ∖ {(𝑀 + 1)}))
112 difun2 4414 . . . . . . . . . . . . . . . . . . 19 (((1...𝑀) ∪ {(𝑀 + 1)}) ∖ {(𝑀 + 1)}) = ((1...𝑀) ∖ {(𝑀 + 1)})
113111, 112eqtrdi 2794 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)}) = ((1...𝑀) ∖ {(𝑀 + 1)}))
1145nn0red 12294 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑀 ∈ ℝ)
115 ltp1 11815 . . . . . . . . . . . . . . . . . . . . . 22 (𝑀 ∈ ℝ → 𝑀 < (𝑀 + 1))
116 peano2re 11148 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑀 ∈ ℝ → (𝑀 + 1) ∈ ℝ)
117 ltnle 11054 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑀 ∈ ℝ ∧ (𝑀 + 1) ∈ ℝ) → (𝑀 < (𝑀 + 1) ↔ ¬ (𝑀 + 1) ≤ 𝑀))
118116, 117mpdan 684 . . . . . . . . . . . . . . . . . . . . . 22 (𝑀 ∈ ℝ → (𝑀 < (𝑀 + 1) ↔ ¬ (𝑀 + 1) ≤ 𝑀))
119115, 118mpbid 231 . . . . . . . . . . . . . . . . . . . . 21 (𝑀 ∈ ℝ → ¬ (𝑀 + 1) ≤ 𝑀)
120114, 119syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ¬ (𝑀 + 1) ≤ 𝑀)
121 elfzle2 13260 . . . . . . . . . . . . . . . . . . . 20 ((𝑀 + 1) ∈ (1...𝑀) → (𝑀 + 1) ≤ 𝑀)
122120, 121nsyl 140 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ¬ (𝑀 + 1) ∈ (1...𝑀))
123 difsn 4731 . . . . . . . . . . . . . . . . . . 19 (¬ (𝑀 + 1) ∈ (1...𝑀) → ((1...𝑀) ∖ {(𝑀 + 1)}) = (1...𝑀))
124122, 123syl 17 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((1...𝑀) ∖ {(𝑀 + 1)}) = (1...𝑀))
125113, 124eqtrd 2778 . . . . . . . . . . . . . . . . 17 (𝜑 → ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)}) = (1...𝑀))
126125imaeq2d 5969 . . . . . . . . . . . . . . . 16 (𝜑 → ((2nd𝑘) “ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) = ((2nd𝑘) “ (1...𝑀)))
127126ad2antrr 723 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ((2nd𝑘) “ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) = ((2nd𝑘) “ (1...𝑀)))
128125ad2antrr 723 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)}) = (1...𝑀))
129102, 127, 1283eqtr3d 2786 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ((2nd𝑘) “ (1...𝑀)) = (1...𝑀))
130129f1oeq3d 6713 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → (((2nd𝑘) ↾ (1...𝑀)):(1...𝑀)–1-1-onto→((2nd𝑘) “ (1...𝑀)) ↔ ((2nd𝑘) ↾ (1...𝑀)):(1...𝑀)–1-1-onto→(1...𝑀)))
13181, 130mpbid 231 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ((2nd𝑘) ↾ (1...𝑀)):(1...𝑀)–1-1-onto→(1...𝑀))
13273resex 5939 . . . . . . . . . . . . 13 ((2nd𝑘) ↾ (1...𝑀)) ∈ V
133 f1oeq1 6704 . . . . . . . . . . . . 13 (𝑓 = ((2nd𝑘) ↾ (1...𝑀)) → (𝑓:(1...𝑀)–1-1-onto→(1...𝑀) ↔ ((2nd𝑘) ↾ (1...𝑀)):(1...𝑀)–1-1-onto→(1...𝑀)))
134132, 133elab 3609 . . . . . . . . . . . 12 (((2nd𝑘) ↾ (1...𝑀)) ∈ {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)} ↔ ((2nd𝑘) ↾ (1...𝑀)):(1...𝑀)–1-1-onto→(1...𝑀))
135131, 134sylibr 233 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ((2nd𝑘) ↾ (1...𝑀)) ∈ {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})
13671, 135opelxpd 5627 . . . . . . . . . 10 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}))
1371363ad2antr3 1189 . . . . . . . . 9 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) → ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}))
138 3anass 1094 . . . . . . . . . . 11 ((∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ↔ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))))
139138biancomi 463 . . . . . . . . . 10 ((∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ↔ ((((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵))
14094nnzd 12425 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (𝑀 + 1) ∈ ℤ)
141 uzid 12597 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑀 + 1) ∈ ℤ → (𝑀 + 1) ∈ (ℤ‘(𝑀 + 1)))
142 peano2uz 12641 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑀 + 1) ∈ (ℤ‘(𝑀 + 1)) → ((𝑀 + 1) + 1) ∈ (ℤ‘(𝑀 + 1)))
143140, 141, 1423syl 18 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → ((𝑀 + 1) + 1) ∈ (ℤ‘(𝑀 + 1)))
1445nn0zd 12424 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑𝑀 ∈ ℤ)
1451nnzd 12425 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑𝑁 ∈ ℤ)
146 zltp1le 12370 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 < 𝑁 ↔ (𝑀 + 1) ≤ 𝑁))
147 peano2z 12361 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑀 ∈ ℤ → (𝑀 + 1) ∈ ℤ)
148 eluz 12596 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝑀 + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑁 ∈ (ℤ‘(𝑀 + 1)) ↔ (𝑀 + 1) ≤ 𝑁))
149147, 148sylan 580 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑁 ∈ (ℤ‘(𝑀 + 1)) ↔ (𝑀 + 1) ≤ 𝑁))
150146, 149bitr4d 281 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 < 𝑁𝑁 ∈ (ℤ‘(𝑀 + 1))))
151144, 145, 150syl2anc 584 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (𝑀 < 𝑁𝑁 ∈ (ℤ‘(𝑀 + 1))))
1527, 151mpbid 231 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑𝑁 ∈ (ℤ‘(𝑀 + 1)))
153 fzsplit2 13281 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑀 + 1) + 1) ∈ (ℤ‘(𝑀 + 1)) ∧ 𝑁 ∈ (ℤ‘(𝑀 + 1))) → ((𝑀 + 1)...𝑁) = (((𝑀 + 1)...(𝑀 + 1)) ∪ (((𝑀 + 1) + 1)...𝑁)))
154143, 152, 153syl2anc 584 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → ((𝑀 + 1)...𝑁) = (((𝑀 + 1)...(𝑀 + 1)) ∪ (((𝑀 + 1) + 1)...𝑁)))
155 fzsn 13298 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑀 + 1) ∈ ℤ → ((𝑀 + 1)...(𝑀 + 1)) = {(𝑀 + 1)})
156140, 155syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → ((𝑀 + 1)...(𝑀 + 1)) = {(𝑀 + 1)})
157156uneq1d 4096 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → (((𝑀 + 1)...(𝑀 + 1)) ∪ (((𝑀 + 1) + 1)...𝑁)) = ({(𝑀 + 1)} ∪ (((𝑀 + 1) + 1)...𝑁)))
158154, 157eqtrd 2778 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ((𝑀 + 1)...𝑁) = ({(𝑀 + 1)} ∪ (((𝑀 + 1) + 1)...𝑁)))
159158xpeq1d 5618 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (((𝑀 + 1)...𝑁) × {0}) = (({(𝑀 + 1)} ∪ (((𝑀 + 1) + 1)...𝑁)) × {0}))
160159uneq2d 4097 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ (((𝑀 + 1)...𝑁) × {0})) = ((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ (({(𝑀 + 1)} ∪ (((𝑀 + 1) + 1)...𝑁)) × {0})))
161 xpundir 5656 . . . . . . . . . . . . . . . . . . . . . . 23 (({(𝑀 + 1)} ∪ (((𝑀 + 1) + 1)...𝑁)) × {0}) = (({(𝑀 + 1)} × {0}) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0}))
162 ovex 7308 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑀 + 1) ∈ V
163 c0ex 10969 . . . . . . . . . . . . . . . . . . . . . . . . 25 0 ∈ V
164162, 163xpsn 7013 . . . . . . . . . . . . . . . . . . . . . . . 24 ({(𝑀 + 1)} × {0}) = {⟨(𝑀 + 1), 0⟩}
165164uneq1i 4093 . . . . . . . . . . . . . . . . . . . . . . 23 (({(𝑀 + 1)} × {0}) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) = ({⟨(𝑀 + 1), 0⟩} ∪ ((((𝑀 + 1) + 1)...𝑁) × {0}))
166161, 165eqtri 2766 . . . . . . . . . . . . . . . . . . . . . 22 (({(𝑀 + 1)} ∪ (((𝑀 + 1) + 1)...𝑁)) × {0}) = ({⟨(𝑀 + 1), 0⟩} ∪ ((((𝑀 + 1) + 1)...𝑁) × {0}))
167166uneq2i 4094 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ (({(𝑀 + 1)} ∪ (((𝑀 + 1) + 1)...𝑁)) × {0})) = ((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ ({⟨(𝑀 + 1), 0⟩} ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})))
168 unass 4100 . . . . . . . . . . . . . . . . . . . . 21 (((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ {⟨(𝑀 + 1), 0⟩}) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) = ((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ ({⟨(𝑀 + 1), 0⟩} ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})))
169167, 168eqtr4i 2769 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ (({(𝑀 + 1)} ∪ (((𝑀 + 1) + 1)...𝑁)) × {0})) = (((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ {⟨(𝑀 + 1), 0⟩}) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0}))
170160, 169eqtrdi 2794 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ (((𝑀 + 1)...𝑁) × {0})) = (((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ {⟨(𝑀 + 1), 0⟩}) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})))
171170ad3antrrr 727 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → ((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ (((𝑀 + 1)...𝑁) × {0})) = (((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ {⟨(𝑀 + 1), 0⟩}) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})))
172162a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → (𝑀 + 1) ∈ V)
173163a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → 0 ∈ V)
174110eqcomd 2744 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((1...𝑀) ∪ {(𝑀 + 1)}) = (1...(𝑀 + 1)))
175174ad3antrrr 727 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → ((1...𝑀) ∪ {(𝑀 + 1)}) = (1...(𝑀 + 1)))
176 fveq2 6774 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 = (𝑀 + 1) → ((1st𝑘)‘𝑛) = ((1st𝑘)‘(𝑀 + 1)))
177 fveq2 6774 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 = (𝑀 + 1) → (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘(𝑀 + 1)))
178176, 177oveq12d 7293 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = (𝑀 + 1) → (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛)) = (((1st𝑘)‘(𝑀 + 1)) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘(𝑀 + 1))))
179 simplrl 774 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → ((1st𝑘)‘(𝑀 + 1)) = 0)
180 imain 6519 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (Fun (2nd𝑘) → ((2nd𝑘) “ ((1...𝑗) ∩ ((𝑗 + 1)...(𝑀 + 1)))) = (((2nd𝑘) “ (1...𝑗)) ∩ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))))
18176, 83, 1803syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → ((2nd𝑘) “ ((1...𝑗) ∩ ((𝑗 + 1)...(𝑀 + 1)))) = (((2nd𝑘) “ (1...𝑗)) ∩ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))))
182181ad2antlr 724 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ((2nd𝑘) “ ((1...𝑗) ∩ ((𝑗 + 1)...(𝑀 + 1)))) = (((2nd𝑘) “ (1...𝑗)) ∩ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))))
183 elfznn0 13349 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℕ0)
184183nn0red 12294 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℝ)
185184ltp1d 11905 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑗 ∈ (0...𝑀) → 𝑗 < (𝑗 + 1))
186 fzdisj 13283 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑗 < (𝑗 + 1) → ((1...𝑗) ∩ ((𝑗 + 1)...(𝑀 + 1))) = ∅)
187185, 186syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑗 ∈ (0...𝑀) → ((1...𝑗) ∩ ((𝑗 + 1)...(𝑀 + 1))) = ∅)
188187imaeq2d 5969 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 ∈ (0...𝑀) → ((2nd𝑘) “ ((1...𝑗) ∩ ((𝑗 + 1)...(𝑀 + 1)))) = ((2nd𝑘) “ ∅))
189 ima0 5985 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((2nd𝑘) “ ∅) = ∅
190188, 189eqtrdi 2794 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 ∈ (0...𝑀) → ((2nd𝑘) “ ((1...𝑗) ∩ ((𝑗 + 1)...(𝑀 + 1)))) = ∅)
191182, 190sylan9req 2799 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → (((2nd𝑘) “ (1...𝑗)) ∩ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))) = ∅)
192 simplr 766 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))
19392ad2antlr 724 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → (2nd𝑘) Fn (1...(𝑀 + 1)))
194 nn0p1nn 12272 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑗 ∈ ℕ0 → (𝑗 + 1) ∈ ℕ)
195 nnuz 12621 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ℕ = (ℤ‘1)
196194, 195eleqtrdi 2849 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑗 ∈ ℕ0 → (𝑗 + 1) ∈ (ℤ‘1))
197 fzss1 13295 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑗 + 1) ∈ (ℤ‘1) → ((𝑗 + 1)...(𝑀 + 1)) ⊆ (1...(𝑀 + 1)))
198183, 196, 1973syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑗 ∈ (0...𝑀) → ((𝑗 + 1)...(𝑀 + 1)) ⊆ (1...(𝑀 + 1)))
199 elfzuz3 13253 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑗 ∈ (0...𝑀) → 𝑀 ∈ (ℤ𝑗))
200 eluzp1p1 12610 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑀 ∈ (ℤ𝑗) → (𝑀 + 1) ∈ (ℤ‘(𝑗 + 1)))
201 eluzfz2 13264 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑀 + 1) ∈ (ℤ‘(𝑗 + 1)) → (𝑀 + 1) ∈ ((𝑗 + 1)...(𝑀 + 1)))
202199, 200, 2013syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑗 ∈ (0...𝑀) → (𝑀 + 1) ∈ ((𝑗 + 1)...(𝑀 + 1)))
203198, 202jca 512 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 ∈ (0...𝑀) → (((𝑗 + 1)...(𝑀 + 1)) ⊆ (1...(𝑀 + 1)) ∧ (𝑀 + 1) ∈ ((𝑗 + 1)...(𝑀 + 1))))
204 fnfvima 7109 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((2nd𝑘) Fn (1...(𝑀 + 1)) ∧ ((𝑗 + 1)...(𝑀 + 1)) ⊆ (1...(𝑀 + 1)) ∧ (𝑀 + 1) ∈ ((𝑗 + 1)...(𝑀 + 1))) → ((2nd𝑘)‘(𝑀 + 1)) ∈ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))))
2052043expb 1119 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((2nd𝑘) Fn (1...(𝑀 + 1)) ∧ (((𝑗 + 1)...(𝑀 + 1)) ⊆ (1...(𝑀 + 1)) ∧ (𝑀 + 1) ∈ ((𝑗 + 1)...(𝑀 + 1)))) → ((2nd𝑘)‘(𝑀 + 1)) ∈ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))))
206193, 203, 205syl2an 596 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → ((2nd𝑘)‘(𝑀 + 1)) ∈ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))))
207192, 206eqeltrrd 2840 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → (𝑀 + 1) ∈ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))))
208 1ex 10971 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 1 ∈ V
209 fnconstg 6662 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (1 ∈ V → (((2nd𝑘) “ (1...𝑗)) × {1}) Fn ((2nd𝑘) “ (1...𝑗)))
210208, 209ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((2nd𝑘) “ (1...𝑗)) × {1}) Fn ((2nd𝑘) “ (1...𝑗))
211 fnconstg 6662 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (0 ∈ V → (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}) Fn ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))))
212163, 211ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}) Fn ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))
213 fvun2 6860 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((2nd𝑘) “ (1...𝑗)) × {1}) Fn ((2nd𝑘) “ (1...𝑗)) ∧ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}) Fn ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) ∧ ((((2nd𝑘) “ (1...𝑗)) ∩ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))) = ∅ ∧ (𝑀 + 1) ∈ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))))) → (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘(𝑀 + 1)) = ((((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})‘(𝑀 + 1)))
214210, 212, 213mp3an12 1450 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((2nd𝑘) “ (1...𝑗)) ∩ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))) = ∅ ∧ (𝑀 + 1) ∈ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))) → (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘(𝑀 + 1)) = ((((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})‘(𝑀 + 1)))
215191, 207, 214syl2anc 584 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘(𝑀 + 1)) = ((((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})‘(𝑀 + 1)))
216163fvconst2 7079 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑀 + 1) ∈ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) → ((((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})‘(𝑀 + 1)) = 0)
217207, 216syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → ((((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})‘(𝑀 + 1)) = 0)
218215, 217eqtrd 2778 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘(𝑀 + 1)) = 0)
219218adantlrl 717 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘(𝑀 + 1)) = 0)
220179, 219oveq12d 7293 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → (((1st𝑘)‘(𝑀 + 1)) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘(𝑀 + 1))) = (0 + 0))
221 00id 11150 . . . . . . . . . . . . . . . . . . . . . 22 (0 + 0) = 0
222220, 221eqtrdi 2794 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → (((1st𝑘)‘(𝑀 + 1)) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘(𝑀 + 1))) = 0)
223178, 222sylan9eqr 2800 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) ∧ 𝑛 = (𝑀 + 1)) → (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛)) = 0)
224172, 173, 175, 223fmptapd 7043 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → ((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ {⟨(𝑀 + 1), 0⟩}) = (𝑛 ∈ (1...(𝑀 + 1)) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))))
225224uneq1d 4096 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → (((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ {⟨(𝑀 + 1), 0⟩}) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) = ((𝑛 ∈ (1...(𝑀 + 1)) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})))
226171, 225eqtrd 2778 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → ((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ (((𝑀 + 1)...𝑁) × {0})) = ((𝑛 ∈ (1...(𝑀 + 1)) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})))
227 elmapfn 8653 . . . . . . . . . . . . . . . . . . . . . . 23 ((1st𝑘) ∈ ((0..^𝐾) ↑m (1...(𝑀 + 1))) → (1st𝑘) Fn (1...(𝑀 + 1)))
22861, 227syl 17 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → (1st𝑘) Fn (1...(𝑀 + 1)))
229 fnssres 6555 . . . . . . . . . . . . . . . . . . . . . 22 (((1st𝑘) Fn (1...(𝑀 + 1)) ∧ (1...𝑀) ⊆ (1...(𝑀 + 1))) → ((1st𝑘) ↾ (1...𝑀)) Fn (1...𝑀))
230228, 64, 229sylancl 586 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → ((1st𝑘) ↾ (1...𝑀)) Fn (1...𝑀))
231230ad3antlr 728 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → ((1st𝑘) ↾ (1...𝑀)) Fn (1...𝑀))
232 fnconstg 6662 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (0 ∈ V → (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0}) Fn ((2nd𝑘) “ ((𝑗 + 1)...𝑀)))
233163, 232ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0}) Fn ((2nd𝑘) “ ((𝑗 + 1)...𝑀))
234210, 233pm3.2i 471 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((2nd𝑘) “ (1...𝑗)) × {1}) Fn ((2nd𝑘) “ (1...𝑗)) ∧ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0}) Fn ((2nd𝑘) “ ((𝑗 + 1)...𝑀)))
235 imain 6519 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (Fun (2nd𝑘) → ((2nd𝑘) “ ((1...𝑗) ∩ ((𝑗 + 1)...𝑀))) = (((2nd𝑘) “ (1...𝑗)) ∩ ((2nd𝑘) “ ((𝑗 + 1)...𝑀))))
23676, 83, 2353syl 18 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → ((2nd𝑘) “ ((1...𝑗) ∩ ((𝑗 + 1)...𝑀))) = (((2nd𝑘) “ (1...𝑗)) ∩ ((2nd𝑘) “ ((𝑗 + 1)...𝑀))))
237 fzdisj 13283 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 < (𝑗 + 1) → ((1...𝑗) ∩ ((𝑗 + 1)...𝑀)) = ∅)
238185, 237syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 ∈ (0...𝑀) → ((1...𝑗) ∩ ((𝑗 + 1)...𝑀)) = ∅)
239238imaeq2d 5969 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 ∈ (0...𝑀) → ((2nd𝑘) “ ((1...𝑗) ∩ ((𝑗 + 1)...𝑀))) = ((2nd𝑘) “ ∅))
240239, 189eqtrdi 2794 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 ∈ (0...𝑀) → ((2nd𝑘) “ ((1...𝑗) ∩ ((𝑗 + 1)...𝑀))) = ∅)
241236, 240sylan9req 2799 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∧ 𝑗 ∈ (0...𝑀)) → (((2nd𝑘) “ (1...𝑗)) ∩ ((2nd𝑘) “ ((𝑗 + 1)...𝑀))) = ∅)
242 fnun 6545 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((2nd𝑘) “ (1...𝑗)) × {1}) Fn ((2nd𝑘) “ (1...𝑗)) ∧ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0}) Fn ((2nd𝑘) “ ((𝑗 + 1)...𝑀))) ∧ (((2nd𝑘) “ (1...𝑗)) ∩ ((2nd𝑘) “ ((𝑗 + 1)...𝑀))) = ∅) → ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) Fn (((2nd𝑘) “ (1...𝑗)) ∪ ((2nd𝑘) “ ((𝑗 + 1)...𝑀))))
243234, 241, 242sylancr 587 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∧ 𝑗 ∈ (0...𝑀)) → ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) Fn (((2nd𝑘) “ (1...𝑗)) ∪ ((2nd𝑘) “ ((𝑗 + 1)...𝑀))))
244243ad4ant24 751 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) Fn (((2nd𝑘) “ (1...𝑗)) ∪ ((2nd𝑘) “ ((𝑗 + 1)...𝑀))))
245101adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → (((2nd𝑘) “ (1...(𝑀 + 1))) ∖ ((2nd𝑘) “ {(𝑀 + 1)})) = ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)}))
24685ad3antlr 728 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → ((2nd𝑘) “ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) = (((2nd𝑘) “ (1...(𝑀 + 1))) ∖ ((2nd𝑘) “ {(𝑀 + 1)})))
247183, 194syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑗 ∈ (0...𝑀) → (𝑗 + 1) ∈ ℕ)
248247, 195eleqtrdi 2849 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑗 ∈ (0...𝑀) → (𝑗 + 1) ∈ (ℤ‘1))
249 fzsplit2 13281 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝑗 + 1) ∈ (ℤ‘1) ∧ 𝑀 ∈ (ℤ𝑗)) → (1...𝑀) = ((1...𝑗) ∪ ((𝑗 + 1)...𝑀)))
250248, 199, 249syl2anc 584 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 ∈ (0...𝑀) → (1...𝑀) = ((1...𝑗) ∪ ((𝑗 + 1)...𝑀)))
251128, 250sylan9eq 2798 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)}) = ((1...𝑗) ∪ ((𝑗 + 1)...𝑀)))
252251imaeq2d 5969 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → ((2nd𝑘) “ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) = ((2nd𝑘) “ ((1...𝑗) ∪ ((𝑗 + 1)...𝑀))))
253246, 252eqtr3d 2780 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → (((2nd𝑘) “ (1...(𝑀 + 1))) ∖ ((2nd𝑘) “ {(𝑀 + 1)})) = ((2nd𝑘) “ ((1...𝑗) ∪ ((𝑗 + 1)...𝑀))))
254125ad3antrrr 727 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)}) = (1...𝑀))
255245, 253, 2543eqtr3rd 2787 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → (1...𝑀) = ((2nd𝑘) “ ((1...𝑗) ∪ ((𝑗 + 1)...𝑀))))
256 imaundi 6053 . . . . . . . . . . . . . . . . . . . . . . . 24 ((2nd𝑘) “ ((1...𝑗) ∪ ((𝑗 + 1)...𝑀))) = (((2nd𝑘) “ (1...𝑗)) ∪ ((2nd𝑘) “ ((𝑗 + 1)...𝑀)))
257255, 256eqtrdi 2794 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → (1...𝑀) = (((2nd𝑘) “ (1...𝑗)) ∪ ((2nd𝑘) “ ((𝑗 + 1)...𝑀))))
258257fneq2d 6527 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) Fn (1...𝑀) ↔ ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) Fn (((2nd𝑘) “ (1...𝑗)) ∪ ((2nd𝑘) “ ((𝑗 + 1)...𝑀)))))
259244, 258mpbird 256 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) Fn (1...𝑀))
260 fzss2 13296 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑀 ∈ (ℤ𝑗) → (1...𝑗) ⊆ (1...𝑀))
261 resima2 5926 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((1...𝑗) ⊆ (1...𝑀) → (((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) = ((2nd𝑘) “ (1...𝑗)))
262199, 260, 2613syl 18 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 ∈ (0...𝑀) → (((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) = ((2nd𝑘) “ (1...𝑗)))
263262xpeq1d 5618 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑗 ∈ (0...𝑀) → ((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) = (((2nd𝑘) “ (1...𝑗)) × {1}))
264183, 196syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 ∈ (0...𝑀) → (𝑗 + 1) ∈ (ℤ‘1))
265 fzss1 13295 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑗 + 1) ∈ (ℤ‘1) → ((𝑗 + 1)...𝑀) ⊆ (1...𝑀))
266 resima2 5926 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑗 + 1)...𝑀) ⊆ (1...𝑀) → (((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) = ((2nd𝑘) “ ((𝑗 + 1)...𝑀)))
267264, 265, 2663syl 18 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 ∈ (0...𝑀) → (((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) = ((2nd𝑘) “ ((𝑗 + 1)...𝑀)))
268267xpeq1d 5618 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑗 ∈ (0...𝑀) → ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}) = (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0}))
269263, 268uneq12d 4098 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 ∈ (0...𝑀) → (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0})) = ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})))
270269adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0})) = ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})))
271270fneq1d 6526 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → ((((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0})) Fn (1...𝑀) ↔ ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) Fn (1...𝑀)))
272259, 271mpbird 256 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0})) Fn (1...𝑀))
273 fzfid 13693 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → (1...𝑀) ∈ Fin)
274 inidm 4152 . . . . . . . . . . . . . . . . . . . 20 ((1...𝑀) ∩ (1...𝑀)) = (1...𝑀)
275 fvres 6793 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ (1...𝑀) → (((1st𝑘) ↾ (1...𝑀))‘𝑛) = ((1st𝑘)‘𝑛))
276275adantl 482 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) ∧ 𝑛 ∈ (1...𝑀)) → (((1st𝑘) ↾ (1...𝑀))‘𝑛) = ((1st𝑘)‘𝑛))
277 disjsn 4647 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((1...𝑀) ∩ {(𝑀 + 1)}) = ∅ ↔ ¬ (𝑀 + 1) ∈ (1...𝑀))
278122, 277sylibr 233 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → ((1...𝑀) ∩ {(𝑀 + 1)}) = ∅)
279278ad3antrrr 727 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → ((1...𝑀) ∩ {(𝑀 + 1)}) = ∅)
280259, 279jca 512 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) Fn (1...𝑀) ∧ ((1...𝑀) ∩ {(𝑀 + 1)}) = ∅))
281 fnconstg 6662 . . . . . . . . . . . . . . . . . . . . . . . . 25 (0 ∈ V → ({(𝑀 + 1)} × {0}) Fn {(𝑀 + 1)})
282163, 281ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . 24 ({(𝑀 + 1)} × {0}) Fn {(𝑀 + 1)}
283 fvun1 6859 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) Fn (1...𝑀) ∧ ({(𝑀 + 1)} × {0}) Fn {(𝑀 + 1)} ∧ (((1...𝑀) ∩ {(𝑀 + 1)}) = ∅ ∧ 𝑛 ∈ (1...𝑀))) → ((((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ ({(𝑀 + 1)} × {0}))‘𝑛) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0}))‘𝑛))
284282, 283mp3an2 1448 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) Fn (1...𝑀) ∧ (((1...𝑀) ∩ {(𝑀 + 1)}) = ∅ ∧ 𝑛 ∈ (1...𝑀))) → ((((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ ({(𝑀 + 1)} × {0}))‘𝑛) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0}))‘𝑛))
285284anassrs 468 . . . . . . . . . . . . . . . . . . . . . 22 (((((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) Fn (1...𝑀) ∧ ((1...𝑀) ∩ {(𝑀 + 1)}) = ∅) ∧ 𝑛 ∈ (1...𝑀)) → ((((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ ({(𝑀 + 1)} × {0}))‘𝑛) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0}))‘𝑛))
286280, 285sylan 580 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) ∧ 𝑛 ∈ (1...𝑀)) → ((((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ ({(𝑀 + 1)} × {0}))‘𝑛) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0}))‘𝑛))
287247nnzd 12425 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑗 ∈ (0...𝑀) → (𝑗 + 1) ∈ ℤ)
288183nn0cnd 12295 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℂ)
289 pncan1 11399 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 (𝑗 ∈ ℂ → ((𝑗 + 1) − 1) = 𝑗)
290288, 289syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 (𝑗 ∈ (0...𝑀) → ((𝑗 + 1) − 1) = 𝑗)
291290fveq2d 6778 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (𝑗 ∈ (0...𝑀) → (ℤ‘((𝑗 + 1) − 1)) = (ℤ𝑗))
292199, 291eleqtrrd 2842 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑗 ∈ (0...𝑀) → 𝑀 ∈ (ℤ‘((𝑗 + 1) − 1)))
293 fzsuc2 13314 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝑗 + 1) ∈ ℤ ∧ 𝑀 ∈ (ℤ‘((𝑗 + 1) − 1))) → ((𝑗 + 1)...(𝑀 + 1)) = (((𝑗 + 1)...𝑀) ∪ {(𝑀 + 1)}))
294287, 292, 293syl2anc 584 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑗 ∈ (0...𝑀) → ((𝑗 + 1)...(𝑀 + 1)) = (((𝑗 + 1)...𝑀) ∪ {(𝑀 + 1)}))
295294imaeq2d 5969 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑗 ∈ (0...𝑀) → ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) = ((2nd𝑘) “ (((𝑗 + 1)...𝑀) ∪ {(𝑀 + 1)})))
296 imaundi 6053 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((2nd𝑘) “ (((𝑗 + 1)...𝑀) ∪ {(𝑀 + 1)})) = (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) ∪ ((2nd𝑘) “ {(𝑀 + 1)}))
297295, 296eqtrdi 2794 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑗 ∈ (0...𝑀) → ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) = (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) ∪ ((2nd𝑘) “ {(𝑀 + 1)})))
298297xpeq1d 5618 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑗 ∈ (0...𝑀) → (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}) = ((((2nd𝑘) “ ((𝑗 + 1)...𝑀)) ∪ ((2nd𝑘) “ {(𝑀 + 1)})) × {0}))
299 xpundir 5656 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((((2nd𝑘) “ ((𝑗 + 1)...𝑀)) ∪ ((2nd𝑘) “ {(𝑀 + 1)})) × {0}) = ((((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0}) ∪ (((2nd𝑘) “ {(𝑀 + 1)}) × {0}))
300298, 299eqtrdi 2794 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑗 ∈ (0...𝑀) → (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}) = ((((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0}) ∪ (((2nd𝑘) “ {(𝑀 + 1)}) × {0})))
301300uneq2d 4097 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 ∈ (0...𝑀) → ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})) = ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0}) ∪ (((2nd𝑘) “ {(𝑀 + 1)}) × {0}))))
302 unass 4100 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ (((2nd𝑘) “ {(𝑀 + 1)}) × {0})) = ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0}) ∪ (((2nd𝑘) “ {(𝑀 + 1)}) × {0})))
303301, 302eqtr4di 2796 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 ∈ (0...𝑀) → ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ (((2nd𝑘) “ {(𝑀 + 1)}) × {0})))
304303adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ 𝑗 ∈ (0...𝑀)) → ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ (((2nd𝑘) “ {(𝑀 + 1)}) × {0})))
30598xpeq1d 5618 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) → ({((2nd𝑘)‘(𝑀 + 1))} × {0}) = (((2nd𝑘) “ {(𝑀 + 1)}) × {0}))
306305uneq2d 4097 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) → (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ ({((2nd𝑘)‘(𝑀 + 1))} × {0})) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ (((2nd𝑘) “ {(𝑀 + 1)}) × {0})))
307306adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ 𝑗 ∈ (0...𝑀)) → (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ ({((2nd𝑘)‘(𝑀 + 1))} × {0})) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ (((2nd𝑘) “ {(𝑀 + 1)}) × {0})))
308304, 307eqtr4d 2781 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ 𝑗 ∈ (0...𝑀)) → ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ ({((2nd𝑘)‘(𝑀 + 1))} × {0})))
30999xpeq1d 5618 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1) → ({((2nd𝑘)‘(𝑀 + 1))} × {0}) = ({(𝑀 + 1)} × {0}))
310309uneq2d 4097 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1) → (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ ({((2nd𝑘)‘(𝑀 + 1))} × {0})) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ ({(𝑀 + 1)} × {0})))
311308, 310sylan9eq 2798 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ 𝑗 ∈ (0...𝑀)) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ ({(𝑀 + 1)} × {0})))
312311an32s 649 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ ({(𝑀 + 1)} × {0})))
313312fveq1d 6776 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛) = ((((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ ({(𝑀 + 1)} × {0}))‘𝑛))
314313adantr 481 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) ∧ 𝑛 ∈ (1...𝑀)) → (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛) = ((((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0})) ∪ ({(𝑀 + 1)} × {0}))‘𝑛))
315269fveq1d 6776 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 ∈ (0...𝑀) → ((((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))‘𝑛) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0}))‘𝑛))
316315ad2antlr 724 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) ∧ 𝑛 ∈ (1...𝑀)) → ((((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))‘𝑛) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...𝑀)) × {0}))‘𝑛))
317286, 314, 3163eqtr4rd 2789 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) ∧ 𝑛 ∈ (1...𝑀)) → ((((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))‘𝑛) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))
318231, 272, 273, 273, 274, 276, 317offval 7542 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → (((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) = (𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))))
319318uneq1d 4096 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ 𝑗 ∈ (0...𝑀)) → ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) = ((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ (((𝑀 + 1)...𝑁) × {0})))
320319adantlrl 717 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) = ((𝑛 ∈ (1...𝑀) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ (((𝑀 + 1)...𝑁) × {0})))
321228adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∧ 𝑗 ∈ (0...𝑀)) → (1st𝑘) Fn (1...(𝑀 + 1)))
322210, 212pm3.2i 471 . . . . . . . . . . . . . . . . . . . . . 22 ((((2nd𝑘) “ (1...𝑗)) × {1}) Fn ((2nd𝑘) “ (1...𝑗)) ∧ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}) Fn ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))))
323181, 190sylan9req 2799 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∧ 𝑗 ∈ (0...𝑀)) → (((2nd𝑘) “ (1...𝑗)) ∩ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))) = ∅)
324 fnun 6545 . . . . . . . . . . . . . . . . . . . . . 22 ((((((2nd𝑘) “ (1...𝑗)) × {1}) Fn ((2nd𝑘) “ (1...𝑗)) ∧ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}) Fn ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))) ∧ (((2nd𝑘) “ (1...𝑗)) ∩ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))) = ∅) → ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})) Fn (((2nd𝑘) “ (1...𝑗)) ∪ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))))
325322, 323, 324sylancr 587 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∧ 𝑗 ∈ (0...𝑀)) → ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})) Fn (((2nd𝑘) “ (1...𝑗)) ∪ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))))
326 peano2uz 12641 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑀 ∈ (ℤ𝑗) → (𝑀 + 1) ∈ (ℤ𝑗))
327199, 326syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 ∈ (0...𝑀) → (𝑀 + 1) ∈ (ℤ𝑗))
328 fzsplit2 13281 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑗 + 1) ∈ (ℤ‘1) ∧ (𝑀 + 1) ∈ (ℤ𝑗)) → (1...(𝑀 + 1)) = ((1...𝑗) ∪ ((𝑗 + 1)...(𝑀 + 1))))
329264, 327, 328syl2anc 584 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 ∈ (0...𝑀) → (1...(𝑀 + 1)) = ((1...𝑗) ∪ ((𝑗 + 1)...(𝑀 + 1))))
330329imaeq2d 5969 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑗 ∈ (0...𝑀) → ((2nd𝑘) “ (1...(𝑀 + 1))) = ((2nd𝑘) “ ((1...𝑗) ∪ ((𝑗 + 1)...(𝑀 + 1)))))
331 imaundi 6053 . . . . . . . . . . . . . . . . . . . . . . . 24 ((2nd𝑘) “ ((1...𝑗) ∪ ((𝑗 + 1)...(𝑀 + 1)))) = (((2nd𝑘) “ (1...𝑗)) ∪ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))))
332330, 331eqtr2di 2795 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 ∈ (0...𝑀) → (((2nd𝑘) “ (1...𝑗)) ∪ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))) = ((2nd𝑘) “ (1...(𝑀 + 1))))
333332, 89sylan9eqr 2800 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∧ 𝑗 ∈ (0...𝑀)) → (((2nd𝑘) “ (1...𝑗)) ∪ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))) = (1...(𝑀 + 1)))
334333fneq2d 6527 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∧ 𝑗 ∈ (0...𝑀)) → (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})) Fn (((2nd𝑘) “ (1...𝑗)) ∪ ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1)))) ↔ ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})) Fn (1...(𝑀 + 1))))
335325, 334mpbid 231 . . . . . . . . . . . . . . . . . . . 20 ((𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∧ 𝑗 ∈ (0...𝑀)) → ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})) Fn (1...(𝑀 + 1)))
336 fzfid 13693 . . . . . . . . . . . . . . . . . . . 20 ((𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∧ 𝑗 ∈ (0...𝑀)) → (1...(𝑀 + 1)) ∈ Fin)
337 inidm 4152 . . . . . . . . . . . . . . . . . . . 20 ((1...(𝑀 + 1)) ∩ (1...(𝑀 + 1))) = (1...(𝑀 + 1))
338 eqidd 2739 . . . . . . . . . . . . . . . . . . . 20 (((𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∧ 𝑗 ∈ (0...𝑀)) ∧ 𝑛 ∈ (1...(𝑀 + 1))) → ((1st𝑘)‘𝑛) = ((1st𝑘)‘𝑛))
339 eqidd 2739 . . . . . . . . . . . . . . . . . . . 20 (((𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∧ 𝑗 ∈ (0...𝑀)) ∧ 𝑛 ∈ (1...(𝑀 + 1))) → (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛) = (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))
340321, 335, 336, 336, 337, 338, 339offval 7542 . . . . . . . . . . . . . . . . . . 19 ((𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∧ 𝑗 ∈ (0...𝑀)) → ((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) = (𝑛 ∈ (1...(𝑀 + 1)) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))))
341340uneq1d 4096 . . . . . . . . . . . . . . . . . 18 ((𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∧ 𝑗 ∈ (0...𝑀)) → (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) = ((𝑛 ∈ (1...(𝑀 + 1)) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})))
342341ad4ant24 751 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) = ((𝑛 ∈ (1...(𝑀 + 1)) ↦ (((1st𝑘)‘𝑛) + (((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))‘𝑛))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})))
343226, 320, 3423eqtr4rd 2789 . . . . . . . . . . . . . . . 16 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) = ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})))
344343csbeq1d 3836 . . . . . . . . . . . . . . 15 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 = ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵)
345344eqeq2d 2749 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) ∧ 𝑗 ∈ (0...𝑀)) → (𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵𝑖 = ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵))
346345rexbidva 3225 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) → (∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∃𝑗 ∈ (0...𝑀)𝑖 = ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵))
347346ralbidv 3112 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) → (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵))
348347biimpd 228 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) → (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 → ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵))
349348impr 455 . . . . . . . . . 10 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) ∧ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵)) → ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵)
350139, 349sylan2b 594 . . . . . . . . 9 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) → ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵)
351 1st2nd2 7870 . . . . . . . . . . . 12 (𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) → 𝑘 = ⟨(1st𝑘), (2nd𝑘)⟩)
352351ad2antlr 724 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) → 𝑘 = ⟨(1st𝑘), (2nd𝑘)⟩)
353 fnsnsplit 7056 . . . . . . . . . . . . . . . 16 (((1st𝑘) Fn (1...(𝑀 + 1)) ∧ (𝑀 + 1) ∈ (1...(𝑀 + 1))) → (1st𝑘) = (((1st𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) ∪ {⟨(𝑀 + 1), ((1st𝑘)‘(𝑀 + 1))⟩}))
354228, 96, 353syl2anr 597 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) → (1st𝑘) = (((1st𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) ∪ {⟨(𝑀 + 1), ((1st𝑘)‘(𝑀 + 1))⟩}))
355354adantr 481 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((1st𝑘)‘(𝑀 + 1)) = 0) → (1st𝑘) = (((1st𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) ∪ {⟨(𝑀 + 1), ((1st𝑘)‘(𝑀 + 1))⟩}))
356125reseq2d 5891 . . . . . . . . . . . . . . . 16 (𝜑 → ((1st𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) = ((1st𝑘) ↾ (1...𝑀)))
357356adantr 481 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) → ((1st𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) = ((1st𝑘) ↾ (1...𝑀)))
358 opeq2 4805 . . . . . . . . . . . . . . . 16 (((1st𝑘)‘(𝑀 + 1)) = 0 → ⟨(𝑀 + 1), ((1st𝑘)‘(𝑀 + 1))⟩ = ⟨(𝑀 + 1), 0⟩)
359358sneqd 4573 . . . . . . . . . . . . . . 15 (((1st𝑘)‘(𝑀 + 1)) = 0 → {⟨(𝑀 + 1), ((1st𝑘)‘(𝑀 + 1))⟩} = {⟨(𝑀 + 1), 0⟩})
360 uneq12 4092 . . . . . . . . . . . . . . 15 ((((1st𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) = ((1st𝑘) ↾ (1...𝑀)) ∧ {⟨(𝑀 + 1), ((1st𝑘)‘(𝑀 + 1))⟩} = {⟨(𝑀 + 1), 0⟩}) → (((1st𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) ∪ {⟨(𝑀 + 1), ((1st𝑘)‘(𝑀 + 1))⟩}) = (((1st𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), 0⟩}))
361357, 359, 360syl2an 596 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((1st𝑘)‘(𝑀 + 1)) = 0) → (((1st𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) ∪ {⟨(𝑀 + 1), ((1st𝑘)‘(𝑀 + 1))⟩}) = (((1st𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), 0⟩}))
362355, 361eqtrd 2778 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((1st𝑘)‘(𝑀 + 1)) = 0) → (1st𝑘) = (((1st𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), 0⟩}))
363362adantrr 714 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) → (1st𝑘) = (((1st𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), 0⟩}))
364 fnsnsplit 7056 . . . . . . . . . . . . . . . 16 (((2nd𝑘) Fn (1...(𝑀 + 1)) ∧ (𝑀 + 1) ∈ (1...(𝑀 + 1))) → (2nd𝑘) = (((2nd𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) ∪ {⟨(𝑀 + 1), ((2nd𝑘)‘(𝑀 + 1))⟩}))
36592, 96, 364syl2anr 597 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) → (2nd𝑘) = (((2nd𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) ∪ {⟨(𝑀 + 1), ((2nd𝑘)‘(𝑀 + 1))⟩}))
366365adantr 481 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → (2nd𝑘) = (((2nd𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) ∪ {⟨(𝑀 + 1), ((2nd𝑘)‘(𝑀 + 1))⟩}))
367125reseq2d 5891 . . . . . . . . . . . . . . . 16 (𝜑 → ((2nd𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) = ((2nd𝑘) ↾ (1...𝑀)))
368367adantr 481 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) → ((2nd𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) = ((2nd𝑘) ↾ (1...𝑀)))
369 opeq2 4805 . . . . . . . . . . . . . . . 16 (((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1) → ⟨(𝑀 + 1), ((2nd𝑘)‘(𝑀 + 1))⟩ = ⟨(𝑀 + 1), (𝑀 + 1)⟩)
370369sneqd 4573 . . . . . . . . . . . . . . 15 (((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1) → {⟨(𝑀 + 1), ((2nd𝑘)‘(𝑀 + 1))⟩} = {⟨(𝑀 + 1), (𝑀 + 1)⟩})
371 uneq12 4092 . . . . . . . . . . . . . . 15 ((((2nd𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) = ((2nd𝑘) ↾ (1...𝑀)) ∧ {⟨(𝑀 + 1), ((2nd𝑘)‘(𝑀 + 1))⟩} = {⟨(𝑀 + 1), (𝑀 + 1)⟩}) → (((2nd𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) ∪ {⟨(𝑀 + 1), ((2nd𝑘)‘(𝑀 + 1))⟩}) = (((2nd𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}))
372368, 370, 371syl2an 596 . . . . . . . . . . . . . 14 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → (((2nd𝑘) ↾ ((1...(𝑀 + 1)) ∖ {(𝑀 + 1)})) ∪ {⟨(𝑀 + 1), ((2nd𝑘)‘(𝑀 + 1))⟩}) = (((2nd𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}))
373366, 372eqtrd 2778 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → (2nd𝑘) = (((2nd𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}))
374373adantrl 713 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) → (2nd𝑘) = (((2nd𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}))
375363, 374opeq12d 4812 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) → ⟨(1st𝑘), (2nd𝑘)⟩ = ⟨(((1st𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), 0⟩}), (((2nd𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩)
376352, 375eqtrd 2778 . . . . . . . . . 10 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) → 𝑘 = ⟨(((1st𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), 0⟩}), (((2nd𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩)
3773763adantr1 1168 . . . . . . . . 9 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) → 𝑘 = ⟨(((1st𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), 0⟩}), (((2nd𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩)
378 fvex 6787 . . . . . . . . . . . . . . . . . . 19 (1st𝑘) ∈ V
379378resex 5939 . . . . . . . . . . . . . . . . . 18 ((1st𝑘) ↾ (1...𝑀)) ∈ V
380379, 132op1std 7841 . . . . . . . . . . . . . . . . 17 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → (1st𝑡) = ((1st𝑘) ↾ (1...𝑀)))
381379, 132op2ndd 7842 . . . . . . . . . . . . . . . . . . . 20 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → (2nd𝑡) = ((2nd𝑘) ↾ (1...𝑀)))
382381imaeq1d 5968 . . . . . . . . . . . . . . . . . . 19 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → ((2nd𝑡) “ (1...𝑗)) = (((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)))
383382xpeq1d 5618 . . . . . . . . . . . . . . . . . 18 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → (((2nd𝑡) “ (1...𝑗)) × {1}) = ((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}))
384381imaeq1d 5968 . . . . . . . . . . . . . . . . . . 19 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → ((2nd𝑡) “ ((𝑗 + 1)...𝑀)) = (((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)))
385384xpeq1d 5618 . . . . . . . . . . . . . . . . . 18 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}) = ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))
386383, 385uneq12d 4098 . . . . . . . . . . . . . . . . 17 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0})) = (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0})))
387380, 386oveq12d 7293 . . . . . . . . . . . . . . . 16 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → ((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) = (((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))))
388387uneq1d 4096 . . . . . . . . . . . . . . 15 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) = ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})))
389388csbeq1d 3836 . . . . . . . . . . . . . 14 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵 = ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵)
390389eqeq2d 2749 . . . . . . . . . . . . 13 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → (𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵𝑖 = ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵))
391390rexbidv 3226 . . . . . . . . . . . 12 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → (∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∃𝑗 ∈ (0...𝑀)𝑖 = ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵))
392391ralbidv 3112 . . . . . . . . . . 11 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵))
393380uneq1d 4096 . . . . . . . . . . . . 13 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → ((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) = (((1st𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), 0⟩}))
394381uneq1d 4096 . . . . . . . . . . . . 13 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = (((2nd𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}))
395393, 394opeq12d 4812 . . . . . . . . . . . 12 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ = ⟨(((1st𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), 0⟩}), (((2nd𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩)
396395eqeq2d 2749 . . . . . . . . . . 11 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → (𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ↔ 𝑘 = ⟨(((1st𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), 0⟩}), (((2nd𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩))
397392, 396anbi12d 631 . . . . . . . . . 10 (𝑡 = ⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ → ((∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) ↔ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵𝑘 = ⟨(((1st𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), 0⟩}), (((2nd𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩)))
398397rspcev 3561 . . . . . . . . 9 ((⟨((1st𝑘) ↾ (1...𝑀)), ((2nd𝑘) ↾ (1...𝑀))⟩ ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∧ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = ((((1st𝑘) ↾ (1...𝑀)) ∘f + (((((2nd𝑘) ↾ (1...𝑀)) “ (1...𝑗)) × {1}) ∪ ((((2nd𝑘) ↾ (1...𝑀)) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵𝑘 = ⟨(((1st𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), 0⟩}), (((2nd𝑘) ↾ (1...𝑀)) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩)) → ∃𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})(∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩))
399137, 350, 377, 398syl12anc 834 . . . . . . . 8 (((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) ∧ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))) → ∃𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})(∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩))
400399ex 413 . . . . . . 7 ((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) → ((∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ∃𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})(∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩)))
401 elrabi 3618 . . . . . . . . . . 11 (𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} → 𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}))
402 elrabi 3618 . . . . . . . . . . 11 (𝑛 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} → 𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}))
403401, 402anim12i 613 . . . . . . . . . 10 ((𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ∧ 𝑛 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}) → (𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∧ 𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})))
404 eqtr2 2762 . . . . . . . . . . . 12 ((𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∧ 𝑘 = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) → ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩)
40522, 24opth 5391 . . . . . . . . . . . . 13 (⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ↔ (((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) = ((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}) ∧ ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})))
406 difeq1 4050 . . . . . . . . . . . . . . 15 (((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) = ((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}) → (((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) ∖ {⟨(𝑀 + 1), 0⟩}) = (((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}) ∖ {⟨(𝑀 + 1), 0⟩}))
407 difun2 4414 . . . . . . . . . . . . . . 15 (((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) ∖ {⟨(𝑀 + 1), 0⟩}) = ((1st𝑡) ∖ {⟨(𝑀 + 1), 0⟩})
408 difun2 4414 . . . . . . . . . . . . . . 15 (((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}) ∖ {⟨(𝑀 + 1), 0⟩}) = ((1st𝑛) ∖ {⟨(𝑀 + 1), 0⟩})
409406, 407, 4083eqtr3g 2801 . . . . . . . . . . . . . 14 (((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) = ((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}) → ((1st𝑡) ∖ {⟨(𝑀 + 1), 0⟩}) = ((1st𝑛) ∖ {⟨(𝑀 + 1), 0⟩}))
410 difeq1 4050 . . . . . . . . . . . . . . 15 (((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) → (((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = (((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}))
411 difun2 4414 . . . . . . . . . . . . . . 15 (((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = ((2nd𝑡) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩})
412 difun2 4414 . . . . . . . . . . . . . . 15 (((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = ((2nd𝑛) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩})
413410, 411, 4123eqtr3g 2801 . . . . . . . . . . . . . 14 (((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) → ((2nd𝑡) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = ((2nd𝑛) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}))
414409, 413anim12i 613 . . . . . . . . . . . . 13 ((((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) = ((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}) ∧ ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})) → (((1st𝑡) ∖ {⟨(𝑀 + 1), 0⟩}) = ((1st𝑛) ∖ {⟨(𝑀 + 1), 0⟩}) ∧ ((2nd𝑡) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = ((2nd𝑛) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩})))
415405, 414sylbi 216 . . . . . . . . . . . 12 (⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ → (((1st𝑡) ∖ {⟨(𝑀 + 1), 0⟩}) = ((1st𝑛) ∖ {⟨(𝑀 + 1), 0⟩}) ∧ ((2nd𝑡) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = ((2nd𝑛) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩})))
416404, 415syl 17 . . . . . . . . . . 11 ((𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∧ 𝑘 = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) → (((1st𝑡) ∖ {⟨(𝑀 + 1), 0⟩}) = ((1st𝑛) ∖ {⟨(𝑀 + 1), 0⟩}) ∧ ((2nd𝑡) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = ((2nd𝑛) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩})))
417 elmapfn 8653 . . . . . . . . . . . . . . . . . . 19 ((1st𝑡) ∈ ((0..^𝐾) ↑m (1...𝑀)) → (1st𝑡) Fn (1...𝑀))
418 fnop 6542 . . . . . . . . . . . . . . . . . . . 20 (((1st𝑡) Fn (1...𝑀) ∧ ⟨(𝑀 + 1), 0⟩ ∈ (1st𝑡)) → (𝑀 + 1) ∈ (1...𝑀))
419418ex 413 . . . . . . . . . . . . . . . . . . 19 ((1st𝑡) Fn (1...𝑀) → (⟨(𝑀 + 1), 0⟩ ∈ (1st𝑡) → (𝑀 + 1) ∈ (1...𝑀)))
4209, 417, 4193syl 18 . . . . . . . . . . . . . . . . . 18 (𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) → (⟨(𝑀 + 1), 0⟩ ∈ (1st𝑡) → (𝑀 + 1) ∈ (1...𝑀)))
421420, 122nsyli 157 . . . . . . . . . . . . . . . . 17 (𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) → (𝜑 → ¬ ⟨(𝑀 + 1), 0⟩ ∈ (1st𝑡)))
422421impcom 408 . . . . . . . . . . . . . . . 16 ((𝜑𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → ¬ ⟨(𝑀 + 1), 0⟩ ∈ (1st𝑡))
423 difsn 4731 . . . . . . . . . . . . . . . 16 (¬ ⟨(𝑀 + 1), 0⟩ ∈ (1st𝑡) → ((1st𝑡) ∖ {⟨(𝑀 + 1), 0⟩}) = (1st𝑡))
424422, 423syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → ((1st𝑡) ∖ {⟨(𝑀 + 1), 0⟩}) = (1st𝑡))
425 xp1st 7863 . . . . . . . . . . . . . . . . . . 19 (𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) → (1st𝑛) ∈ ((0..^𝐾) ↑m (1...𝑀)))
426 elmapfn 8653 . . . . . . . . . . . . . . . . . . 19 ((1st𝑛) ∈ ((0..^𝐾) ↑m (1...𝑀)) → (1st𝑛) Fn (1...𝑀))
427 fnop 6542 . . . . . . . . . . . . . . . . . . . 20 (((1st𝑛) Fn (1...𝑀) ∧ ⟨(𝑀 + 1), 0⟩ ∈ (1st𝑛)) → (𝑀 + 1) ∈ (1...𝑀))
428427ex 413 . . . . . . . . . . . . . . . . . . 19 ((1st𝑛) Fn (1...𝑀) → (⟨(𝑀 + 1), 0⟩ ∈ (1st𝑛) → (𝑀 + 1) ∈ (1...𝑀)))
429425, 426, 4283syl 18 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) → (⟨(𝑀 + 1), 0⟩ ∈ (1st𝑛) → (𝑀 + 1) ∈ (1...𝑀)))
430429, 122nsyli 157 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) → (𝜑 → ¬ ⟨(𝑀 + 1), 0⟩ ∈ (1st𝑛)))
431430impcom 408 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → ¬ ⟨(𝑀 + 1), 0⟩ ∈ (1st𝑛))
432 difsn 4731 . . . . . . . . . . . . . . . 16 (¬ ⟨(𝑀 + 1), 0⟩ ∈ (1st𝑛) → ((1st𝑛) ∖ {⟨(𝑀 + 1), 0⟩}) = (1st𝑛))
433431, 432syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → ((1st𝑛) ∖ {⟨(𝑀 + 1), 0⟩}) = (1st𝑛))
434424, 433eqeqan12d 2752 . . . . . . . . . . . . . 14 (((𝜑𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) ∧ (𝜑𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}))) → (((1st𝑡) ∖ {⟨(𝑀 + 1), 0⟩}) = ((1st𝑛) ∖ {⟨(𝑀 + 1), 0⟩}) ↔ (1st𝑡) = (1st𝑛)))
435434anandis 675 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∧ 𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}))) → (((1st𝑡) ∖ {⟨(𝑀 + 1), 0⟩}) = ((1st𝑛) ∖ {⟨(𝑀 + 1), 0⟩}) ↔ (1st𝑡) = (1st𝑛)))
436 f1ofn 6717 . . . . . . . . . . . . . . . . . . 19 ((2nd𝑡):(1...𝑀)–1-1-onto→(1...𝑀) → (2nd𝑡) Fn (1...𝑀))
437 fnop 6542 . . . . . . . . . . . . . . . . . . . 20 (((2nd𝑡) Fn (1...𝑀) ∧ ⟨(𝑀 + 1), (𝑀 + 1)⟩ ∈ (2nd𝑡)) → (𝑀 + 1) ∈ (1...𝑀))
438437ex 413 . . . . . . . . . . . . . . . . . . 19 ((2nd𝑡) Fn (1...𝑀) → (⟨(𝑀 + 1), (𝑀 + 1)⟩ ∈ (2nd𝑡) → (𝑀 + 1) ∈ (1...𝑀)))
43917, 436, 4383syl 18 . . . . . . . . . . . . . . . . . 18 (𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) → (⟨(𝑀 + 1), (𝑀 + 1)⟩ ∈ (2nd𝑡) → (𝑀 + 1) ∈ (1...𝑀)))
440439, 122nsyli 157 . . . . . . . . . . . . . . . . 17 (𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) → (𝜑 → ¬ ⟨(𝑀 + 1), (𝑀 + 1)⟩ ∈ (2nd𝑡)))
441440impcom 408 . . . . . . . . . . . . . . . 16 ((𝜑𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → ¬ ⟨(𝑀 + 1), (𝑀 + 1)⟩ ∈ (2nd𝑡))
442 difsn 4731 . . . . . . . . . . . . . . . 16 (¬ ⟨(𝑀 + 1), (𝑀 + 1)⟩ ∈ (2nd𝑡) → ((2nd𝑡) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = (2nd𝑡))
443441, 442syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → ((2nd𝑡) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = (2nd𝑡))
444 xp2nd 7864 . . . . . . . . . . . . . . . . . . . 20 (𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) → (2nd𝑛) ∈ {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})
445 fvex 6787 . . . . . . . . . . . . . . . . . . . . 21 (2nd𝑛) ∈ V
446 f1oeq1 6704 . . . . . . . . . . . . . . . . . . . . 21 (𝑓 = (2nd𝑛) → (𝑓:(1...𝑀)–1-1-onto→(1...𝑀) ↔ (2nd𝑛):(1...𝑀)–1-1-onto→(1...𝑀)))
447445, 446elab 3609 . . . . . . . . . . . . . . . . . . . 20 ((2nd𝑛) ∈ {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)} ↔ (2nd𝑛):(1...𝑀)–1-1-onto→(1...𝑀))
448444, 447sylib 217 . . . . . . . . . . . . . . . . . . 19 (𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) → (2nd𝑛):(1...𝑀)–1-1-onto→(1...𝑀))
449 f1ofn 6717 . . . . . . . . . . . . . . . . . . 19 ((2nd𝑛):(1...𝑀)–1-1-onto→(1...𝑀) → (2nd𝑛) Fn (1...𝑀))
450 fnop 6542 . . . . . . . . . . . . . . . . . . . 20 (((2nd𝑛) Fn (1...𝑀) ∧ ⟨(𝑀 + 1), (𝑀 + 1)⟩ ∈ (2nd𝑛)) → (𝑀 + 1) ∈ (1...𝑀))
451450ex 413 . . . . . . . . . . . . . . . . . . 19 ((2nd𝑛) Fn (1...𝑀) → (⟨(𝑀 + 1), (𝑀 + 1)⟩ ∈ (2nd𝑛) → (𝑀 + 1) ∈ (1...𝑀)))
452448, 449, 4513syl 18 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) → (⟨(𝑀 + 1), (𝑀 + 1)⟩ ∈ (2nd𝑛) → (𝑀 + 1) ∈ (1...𝑀)))
453452, 122nsyli 157 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) → (𝜑 → ¬ ⟨(𝑀 + 1), (𝑀 + 1)⟩ ∈ (2nd𝑛)))
454453impcom 408 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → ¬ ⟨(𝑀 + 1), (𝑀 + 1)⟩ ∈ (2nd𝑛))
455 difsn 4731 . . . . . . . . . . . . . . . 16 (¬ ⟨(𝑀 + 1), (𝑀 + 1)⟩ ∈ (2nd𝑛) → ((2nd𝑛) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = (2nd𝑛))
456454, 455syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → ((2nd𝑛) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = (2nd𝑛))
457443, 456eqeqan12d 2752 . . . . . . . . . . . . . 14 (((𝜑𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) ∧ (𝜑𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}))) → (((2nd𝑡) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = ((2nd𝑛) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) ↔ (2nd𝑡) = (2nd𝑛)))
458457anandis 675 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∧ 𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}))) → (((2nd𝑡) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = ((2nd𝑛) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) ↔ (2nd𝑡) = (2nd𝑛)))
459435, 458anbi12d 631 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∧ 𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}))) → ((((1st𝑡) ∖ {⟨(𝑀 + 1), 0⟩}) = ((1st𝑛) ∖ {⟨(𝑀 + 1), 0⟩}) ∧ ((2nd𝑡) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = ((2nd𝑛) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩})) ↔ ((1st𝑡) = (1st𝑛) ∧ (2nd𝑡) = (2nd𝑛))))
460 xpopth 7872 . . . . . . . . . . . . 13 ((𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∧ 𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})) → (((1st𝑡) = (1st𝑛) ∧ (2nd𝑡) = (2nd𝑛)) ↔ 𝑡 = 𝑛))
461460adantl 482 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∧ 𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}))) → (((1st𝑡) = (1st𝑛) ∧ (2nd𝑡) = (2nd𝑛)) ↔ 𝑡 = 𝑛))
462459, 461bitrd 278 . . . . . . . . . . 11 ((𝜑 ∧ (𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∧ 𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}))) → ((((1st𝑡) ∖ {⟨(𝑀 + 1), 0⟩}) = ((1st𝑛) ∖ {⟨(𝑀 + 1), 0⟩}) ∧ ((2nd𝑡) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = ((2nd𝑛) ∖ {⟨(𝑀 + 1), (𝑀 + 1)⟩})) ↔ 𝑡 = 𝑛))
463416, 462syl5ib 243 . . . . . . . . . 10 ((𝜑 ∧ (𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∧ 𝑛 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}))) → ((𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∧ 𝑘 = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) → 𝑡 = 𝑛))
464403, 463sylan2 593 . . . . . . . . 9 ((𝜑 ∧ (𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ∧ 𝑛 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵})) → ((𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∧ 𝑘 = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) → 𝑡 = 𝑛))
465464ralrimivva 3123 . . . . . . . 8 (𝜑 → ∀𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}∀𝑛 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ((𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∧ 𝑘 = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) → 𝑡 = 𝑛))
466465adantr 481 . . . . . . 7 ((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) → ∀𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}∀𝑛 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ((𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∧ 𝑘 = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) → 𝑡 = 𝑛))
467400, 466jctird 527 . . . . . 6 ((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) → ((∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → (∃𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})(∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) ∧ ∀𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}∀𝑛 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ((𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∧ 𝑘 = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) → 𝑡 = 𝑛))))
468 fveq2 6774 . . . . . . . . . . 11 (𝑡 = 𝑛 → (1st𝑡) = (1st𝑛))
469468uneq1d 4096 . . . . . . . . . 10 (𝑡 = 𝑛 → ((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}) = ((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}))
470 fveq2 6774 . . . . . . . . . . 11 (𝑡 = 𝑛 → (2nd𝑡) = (2nd𝑛))
471470uneq1d 4096 . . . . . . . . . 10 (𝑡 = 𝑛 → ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}) = ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩}))
472469, 471opeq12d 4812 . . . . . . . . 9 (𝑡 = 𝑛 → ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩)
473472eqeq2d 2749 . . . . . . . 8 (𝑡 = 𝑛 → (𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ↔ 𝑘 = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩))
474473reu4 3666 . . . . . . 7 (∃!𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ↔ (∃𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∧ ∀𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}∀𝑛 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ((𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∧ 𝑘 = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) → 𝑡 = 𝑛)))
47558rexrab 3633 . . . . . . . 8 (∃𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ↔ ∃𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})(∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩))
476475anbi1i 624 . . . . . . 7 ((∃𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∧ ∀𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}∀𝑛 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ((𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∧ 𝑘 = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) → 𝑡 = 𝑛)) ↔ (∃𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})(∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) ∧ ∀𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}∀𝑛 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ((𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∧ 𝑘 = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) → 𝑡 = 𝑛)))
477474, 476bitri 274 . . . . . 6 (∃!𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ↔ (∃𝑡 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)})(∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑡) ∘f + ((((2nd𝑡) “ (1...𝑗)) × {1}) ∪ (((2nd𝑡) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) ∧ ∀𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}∀𝑛 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ((𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∧ 𝑘 = ⟨((1st𝑛) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑛) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) → 𝑡 = 𝑛)))
478467, 477syl6ibr 251 . . . . 5 ((𝜑𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})) → ((∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ∃!𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩))
479478ralrimiva 3103 . . . 4 (𝜑 → ∀𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})((∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ∃!𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩))
480 fveq2 6774 . . . . . . . . . . . 12 (𝑠 = 𝑘 → (1st𝑠) = (1st𝑘))
481 fveq2 6774 . . . . . . . . . . . . . . 15 (𝑠 = 𝑘 → (2nd𝑠) = (2nd𝑘))
482481imaeq1d 5968 . . . . . . . . . . . . . 14 (𝑠 = 𝑘 → ((2nd𝑠) “ (1...𝑗)) = ((2nd𝑘) “ (1...𝑗)))
483482xpeq1d 5618 . . . . . . . . . . . . 13 (𝑠 = 𝑘 → (((2nd𝑠) “ (1...𝑗)) × {1}) = (((2nd𝑘) “ (1...𝑗)) × {1}))
484481imaeq1d 5968 . . . . . . . . . . . . . 14 (𝑠 = 𝑘 → ((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) = ((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))))
485484xpeq1d 5618 . . . . . . . . . . . . 13 (𝑠 = 𝑘 → (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}) = (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))
486483, 485uneq12d 4098 . . . . . . . . . . . 12 (𝑠 = 𝑘 → ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})) = ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0})))
487480, 486oveq12d 7293 . . . . . . . . . . 11 (𝑠 = 𝑘 → ((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) = ((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))))
488487uneq1d 4096 . . . . . . . . . 10 (𝑠 = 𝑘 → (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})))
489488csbeq1d 3836 . . . . . . . . 9 (𝑠 = 𝑘(((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵)
490489eqeq2d 2749 . . . . . . . 8 (𝑠 = 𝑘 → (𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵))
491490rexbidv 3226 . . . . . . 7 (𝑠 = 𝑘 → (∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵))
492491ralbidv 3112 . . . . . 6 (𝑠 = 𝑘 → (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ↔ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵))
493480fveq1d 6776 . . . . . . 7 (𝑠 = 𝑘 → ((1st𝑠)‘(𝑀 + 1)) = ((1st𝑘)‘(𝑀 + 1)))
494493eqeq1d 2740 . . . . . 6 (𝑠 = 𝑘 → (((1st𝑠)‘(𝑀 + 1)) = 0 ↔ ((1st𝑘)‘(𝑀 + 1)) = 0))
495481fveq1d 6776 . . . . . . 7 (𝑠 = 𝑘 → ((2nd𝑠)‘(𝑀 + 1)) = ((2nd𝑘)‘(𝑀 + 1)))
496495eqeq1d 2740 . . . . . 6 (𝑠 = 𝑘 → (((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1) ↔ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)))
497492, 494, 4963anbi123d 1435 . . . . 5 (𝑠 = 𝑘 → ((∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1)) ↔ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1))))
498497ralrab 3630 . . . 4 (∀𝑘 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))}∃!𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ↔ ∀𝑘 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))})((∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑘) ∘f + ((((2nd𝑘) “ (1...𝑗)) × {1}) ∪ (((2nd𝑘) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑘)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑘)‘(𝑀 + 1)) = (𝑀 + 1)) → ∃!𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩))
499479, 498sylibr 233 . . 3 (𝜑 → ∀𝑘 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))}∃!𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩)
500 eqid 2738 . . . 4 (𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ↦ ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩) = (𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ↦ ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩)
501500f1ompt 6985 . . 3 ((𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ↦ ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩):{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}–1-1-onto→{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))} ↔ (∀𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩ ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))} ∧ ∀𝑘 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))}∃!𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}𝑘 = ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩))
50260, 499, 501sylanbrc 583 . 2 (𝜑 → (𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ↦ ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩):{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}–1-1-onto→{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))})
503 ovex 7308 . . . . 5 ((0..^𝐾) ↑m (1...𝑀)) ∈ V
504 ovex 7308 . . . . . 6 ((1...𝑀) ↑m (1...𝑀)) ∈ V
505 f1of 6716 . . . . . . . 8 (𝑓:(1...𝑀)–1-1-onto→(1...𝑀) → 𝑓:(1...𝑀)⟶(1...𝑀))
506505ss2abi 4000 . . . . . . 7 {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)} ⊆ {𝑓𝑓:(1...𝑀)⟶(1...𝑀)}
50768, 68mapval 8627 . . . . . . 7 ((1...𝑀) ↑m (1...𝑀)) = {𝑓𝑓:(1...𝑀)⟶(1...𝑀)}
508506, 507sseqtrri 3958 . . . . . 6 {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)} ⊆ ((1...𝑀) ↑m (1...𝑀))
509504, 508ssexi 5246 . . . . 5 {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)} ∈ V
510503, 509xpex 7603 . . . 4 (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∈ V
511510rabex 5256 . . 3 {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ∈ V
512511f1oen 8761 . 2 ((𝑡 ∈ {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ↦ ⟨((1st𝑡) ∪ {⟨(𝑀 + 1), 0⟩}), ((2nd𝑡) ∪ {⟨(𝑀 + 1), (𝑀 + 1)⟩})⟩):{𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵}–1-1-onto→{𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))} → {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ≈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))})
513502, 512syl 17 1 (𝜑 → {𝑠 ∈ (((0..^𝐾) ↑m (1...𝑀)) × {𝑓𝑓:(1...𝑀)–1-1-onto→(1...𝑀)}) ∣ ∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...𝑀)) × {0}))) ∪ (((𝑀 + 1)...𝑁) × {0})) / 𝑝𝐵} ≈ {𝑠 ∈ (((0..^𝐾) ↑m (1...(𝑀 + 1))) × {𝑓𝑓:(1...(𝑀 + 1))–1-1-onto→(1...(𝑀 + 1))}) ∣ (∀𝑖 ∈ (0...𝑀)∃𝑗 ∈ (0...𝑀)𝑖 = (((1st𝑠) ∘f + ((((2nd𝑠) “ (1...𝑗)) × {1}) ∪ (((2nd𝑠) “ ((𝑗 + 1)...(𝑀 + 1))) × {0}))) ∪ ((((𝑀 + 1) + 1)...𝑁) × {0})) / 𝑝𝐵 ∧ ((1st𝑠)‘(𝑀 + 1)) = 0 ∧ ((2nd𝑠)‘(𝑀 + 1)) = (𝑀 + 1))})
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 396  w3a 1086   = wceq 1539  wcel 2106  {cab 2715  wral 3064  wrex 3065  ∃!wreu 3066  {crab 3068  Vcvv 3432  csb 3832  cdif 3884  cun 3885  cin 3886  wss 3887  c0 4256  {csn 4561  cop 4567   class class class wbr 5074  cmpt 5157   × cxp 5587  ccnv 5588  cres 5591  cima 5592  Fun wfun 6427   Fn wfn 6428  wf 6429  1-1wf1 6430  ontowfo 6431  1-1-ontowf1o 6432  cfv 6433  (class class class)co 7275  f cof 7531  1st c1st 7829  2nd c2nd 7830  m cmap 8615  cen 8730  Fincfn 8733  cc 10869  cr 10870  0cc0 10871  1c1 10872   + caddc 10874   < clt 11009  cle 11010  cmin 11205  cn 11973  0cn0 12233  cz 12319  cuz 12582  ...cfz 13239  ..^cfzo 13382
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2709  ax-rep 5209  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7588  ax-cnex 10927  ax-resscn 10928  ax-1cn 10929  ax-icn 10930  ax-addcl 10931  ax-addrcl 10932  ax-mulcl 10933  ax-mulrcl 10934  ax-mulcom 10935  ax-addass 10936  ax-mulass 10937  ax-distr 10938  ax-i2m1 10939  ax-1ne0 10940  ax-1rid 10941  ax-rnegex 10942  ax-rrecex 10943  ax-cnre 10944  ax-pre-lttri 10945  ax-pre-lttrn 10946  ax-pre-ltadd 10947  ax-pre-mulgt0 10948
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-nel 3050  df-ral 3069  df-rex 3070  df-rmo 3071  df-reu 3072  df-rab 3073  df-v 3434  df-sbc 3717  df-csb 3833  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-pss 3906  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4840  df-iun 4926  df-br 5075  df-opab 5137  df-mpt 5158  df-tr 5192  df-id 5489  df-eprel 5495  df-po 5503  df-so 5504  df-fr 5544  df-we 5546  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-pred 6202  df-ord 6269  df-on 6270  df-lim 6271  df-suc 6272  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-riota 7232  df-ov 7278  df-oprab 7279  df-mpo 7280  df-of 7533  df-om 7713  df-1st 7831  df-2nd 7832  df-frecs 8097  df-wrecs 8128  df-recs 8202  df-rdg 8241  df-1o 8297  df-er 8498  df-map 8617  df-en 8734  df-dom 8735  df-sdom 8736  df-fin 8737  df-pnf 11011  df-mnf 11012  df-xr 11013  df-ltxr 11014  df-le 11015  df-sub 11207  df-neg 11208  df-nn 11974  df-n0 12234  df-z 12320  df-uz 12583  df-fz 13240  df-fzo 13383
This theorem is referenced by:  poimirlem28  35805
  Copyright terms: Public domain W3C validator