| Step | Hyp | Ref
| Expression |
| 1 | | gsumbagdiag.d |
. . . 4
⊢ 𝐷 = {𝑓 ∈ (ℕ0
↑𝑚 𝐼) ∣ (◡𝑓 “ ℕ) ∈
Fin} |
| 2 | | gsumbagdiag.s |
. . . 4
⊢ 𝑆 = {𝑦 ∈ 𝐷 ∣ 𝑦 ∘𝑟 ≤ 𝐹} |
| 3 | | gsumbagdiag.f |
. . . 4
⊢ (𝜑 → 𝐹 ∈ 𝐷) |
| 4 | | gsumbagdiag.b |
. . . 4
⊢ 𝐵 = (Base‘𝐺) |
| 5 | | gsumbagdiag.g |
. . . 4
⊢ (𝜑 → 𝐺 ∈ CMnd) |
| 6 | | gsumbagdiagfi.i |
. . . 4
⊢ (𝜑 → 𝐼 ∈ Fin) |
| 7 | 1, 2, 3 | gsumbagdiaglem 15175 |
. . . . 5
⊢ ((𝜑 ∧ (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)})) → (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) |
| 8 | | gsumbagdiag.x |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑗 ∈ 𝑆 ∧ 𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) → 𝑋 ∈ 𝐵) |
| 9 | 8 | anassrs 404 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑋 ∈ 𝐵) |
| 10 | 9 | fmpttd 5866 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶𝐵) |
| 11 | 2 | ssrab3 3334 |
. . . . . . . . . . . 12
⊢ 𝑆 ⊆ 𝐷 |
| 12 | 1, 2 | psrbagconcl 15173 |
. . . . . . . . . . . . 13
⊢ ((𝐹 ∈ 𝐷 ∧ 𝑗 ∈ 𝑆) → (𝐹 ∘𝑓 − 𝑗) ∈ 𝑆) |
| 13 | 3, 12 | sylan 283 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝐹 ∘𝑓 − 𝑗) ∈ 𝑆) |
| 14 | 11, 13 | sselid 3246 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝐹 ∘𝑓 − 𝑗) ∈ 𝐷) |
| 15 | | eqid 2238 |
. . . . . . . . . . . 12
⊢ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} = {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} |
| 16 | 1, 15 | psrbagconf1o 15174 |
. . . . . . . . . . 11
⊢ ((𝐹 ∘𝑓
− 𝑗) ∈ 𝐷 → (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚)):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}–1-1-onto→{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
| 17 | 14, 16 | syl 14 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚)):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}–1-1-onto→{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
| 18 | | f1of 5642 |
. . . . . . . . . 10
⊢ ((𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚)):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}–1-1-onto→{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} → (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚)):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
| 19 | 17, 18 | syl 14 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚)):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
| 20 | 10, 19 | fcod 5556 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → ((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ∘ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚))):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶𝐵) |
| 21 | 3 | adantr 276 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → 𝐹 ∈ 𝐷) |
| 22 | 21 | adantr 276 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝐹 ∈ 𝐷) |
| 23 | 1 | psrbagf 15163 |
. . . . . . . . . . . . . . . 16
⊢ (𝐹 ∈ 𝐷 → 𝐹:𝐼⟶ℕ0) |
| 24 | 22, 23 | syl 14 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝐹:𝐼⟶ℕ0) |
| 25 | 24 | ffvelcdmda 5846 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ 𝑧 ∈ 𝐼) → (𝐹‘𝑧) ∈
ℕ0) |
| 26 | | simplr 533 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑗 ∈ 𝑆) |
| 27 | 11, 26 | sselid 3246 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑗 ∈ 𝐷) |
| 28 | 1 | psrbagf 15163 |
. . . . . . . . . . . . . . . 16
⊢ (𝑗 ∈ 𝐷 → 𝑗:𝐼⟶ℕ0) |
| 29 | 27, 28 | syl 14 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑗:𝐼⟶ℕ0) |
| 30 | 29 | ffvelcdmda 5846 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ 𝑧 ∈ 𝐼) → (𝑗‘𝑧) ∈
ℕ0) |
| 31 | | ssrab2 3333 |
. . . . . . . . . . . . . . . . 17
⊢ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ⊆ 𝐷 |
| 32 | | simpr 110 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
| 33 | 31, 32 | sselid 3246 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑚 ∈ 𝐷) |
| 34 | 1 | psrbagf 15163 |
. . . . . . . . . . . . . . . 16
⊢ (𝑚 ∈ 𝐷 → 𝑚:𝐼⟶ℕ0) |
| 35 | 33, 34 | syl 14 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑚:𝐼⟶ℕ0) |
| 36 | 35 | ffvelcdmda 5846 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ 𝑧 ∈ 𝐼) → (𝑚‘𝑧) ∈
ℕ0) |
| 37 | | nn0cn 9584 |
. . . . . . . . . . . . . . 15
⊢ ((𝐹‘𝑧) ∈ ℕ0 → (𝐹‘𝑧) ∈ ℂ) |
| 38 | | nn0cn 9584 |
. . . . . . . . . . . . . . 15
⊢ ((𝑗‘𝑧) ∈ ℕ0 → (𝑗‘𝑧) ∈ ℂ) |
| 39 | | nn0cn 9584 |
. . . . . . . . . . . . . . 15
⊢ ((𝑚‘𝑧) ∈ ℕ0 → (𝑚‘𝑧) ∈ ℂ) |
| 40 | | sub32 8567 |
. . . . . . . . . . . . . . 15
⊢ (((𝐹‘𝑧) ∈ ℂ ∧ (𝑗‘𝑧) ∈ ℂ ∧ (𝑚‘𝑧) ∈ ℂ) → (((𝐹‘𝑧) − (𝑗‘𝑧)) − (𝑚‘𝑧)) = (((𝐹‘𝑧) − (𝑚‘𝑧)) − (𝑗‘𝑧))) |
| 41 | 37, 38, 39, 40 | syl3an 1320 |
. . . . . . . . . . . . . 14
⊢ (((𝐹‘𝑧) ∈ ℕ0 ∧ (𝑗‘𝑧) ∈ ℕ0 ∧ (𝑚‘𝑧) ∈ ℕ0) → (((𝐹‘𝑧) − (𝑗‘𝑧)) − (𝑚‘𝑧)) = (((𝐹‘𝑧) − (𝑚‘𝑧)) − (𝑗‘𝑧))) |
| 42 | 25, 30, 36, 41 | syl3anc 1278 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ 𝑧 ∈ 𝐼) → (((𝐹‘𝑧) − (𝑗‘𝑧)) − (𝑚‘𝑧)) = (((𝐹‘𝑧) − (𝑚‘𝑧)) − (𝑗‘𝑧))) |
| 43 | 42 | mpteq2dva 4223 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → (𝑧 ∈ 𝐼 ↦ (((𝐹‘𝑧) − (𝑗‘𝑧)) − (𝑚‘𝑧))) = (𝑧 ∈ 𝐼 ↦ (((𝐹‘𝑧) − (𝑚‘𝑧)) − (𝑗‘𝑧)))) |
| 44 | 35 | ffnd 5537 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑚 Fn 𝐼) |
| 45 | 32, 44 | fndmexd 5584 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝐼 ∈ V) |
| 46 | 25 | nn0zd 9777 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ 𝑧 ∈ 𝐼) → (𝐹‘𝑧) ∈ ℤ) |
| 47 | 30 | nn0zd 9777 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ 𝑧 ∈ 𝐼) → (𝑗‘𝑧) ∈ ℤ) |
| 48 | 46, 47 | zsubcld 9784 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ 𝑧 ∈ 𝐼) → ((𝐹‘𝑧) − (𝑗‘𝑧)) ∈ ℤ) |
| 49 | 24 | feqmptd 5759 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝐹 = (𝑧 ∈ 𝐼 ↦ (𝐹‘𝑧))) |
| 50 | 29 | feqmptd 5759 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑗 = (𝑧 ∈ 𝐼 ↦ (𝑗‘𝑧))) |
| 51 | 45, 25, 30, 49, 50 | offval2 6322 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → (𝐹 ∘𝑓
− 𝑗) = (𝑧 ∈ 𝐼 ↦ ((𝐹‘𝑧) − (𝑗‘𝑧)))) |
| 52 | 35 | feqmptd 5759 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑚 = (𝑧 ∈ 𝐼 ↦ (𝑚‘𝑧))) |
| 53 | 45, 48, 36, 51, 52 | offval2 6322 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚) = (𝑧 ∈ 𝐼 ↦ (((𝐹‘𝑧) − (𝑗‘𝑧)) − (𝑚‘𝑧)))) |
| 54 | 36 | nn0zd 9777 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ 𝑧 ∈ 𝐼) → (𝑚‘𝑧) ∈ ℤ) |
| 55 | 46, 54 | zsubcld 9784 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ 𝑧 ∈ 𝐼) → ((𝐹‘𝑧) − (𝑚‘𝑧)) ∈ ℤ) |
| 56 | 45, 25, 36, 49, 52 | offval2 6322 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → (𝐹 ∘𝑓
− 𝑚) = (𝑧 ∈ 𝐼 ↦ ((𝐹‘𝑧) − (𝑚‘𝑧)))) |
| 57 | 45, 55, 30, 56, 50 | offval2 6322 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → ((𝐹 ∘𝑓
− 𝑚)
∘𝑓 − 𝑗) = (𝑧 ∈ 𝐼 ↦ (((𝐹‘𝑧) − (𝑚‘𝑧)) − (𝑗‘𝑧)))) |
| 58 | 43, 53, 57 | 3eqtr4d 2281 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚) = ((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗)) |
| 59 | 1, 15 | psrbagconcl 15173 |
. . . . . . . . . . . 12
⊢ (((𝐹 ∘𝑓
− 𝑗) ∈ 𝐷 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚) ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
| 60 | 14, 59 | sylan 283 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚) ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
| 61 | 58, 60 | eqeltrrd 2316 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → ((𝐹 ∘𝑓
− 𝑚)
∘𝑓 − 𝑗) ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
| 62 | 58 | mpteq2dva 4223 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚)) = (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑚)
∘𝑓 − 𝑗))) |
| 63 | | nfcv 2392 |
. . . . . . . . . . . 12
⊢
Ⅎ𝑛𝑋 |
| 64 | | nfcsb1v 3180 |
. . . . . . . . . . . 12
⊢
Ⅎ𝑘⦋𝑛 / 𝑘⦌𝑋 |
| 65 | | csbeq1a 3156 |
. . . . . . . . . . . 12
⊢ (𝑘 = 𝑛 → 𝑋 = ⦋𝑛 / 𝑘⦌𝑋) |
| 66 | 63, 64, 65 | cbvmpt 4228 |
. . . . . . . . . . 11
⊢ (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) = (𝑛 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋𝑛 / 𝑘⦌𝑋) |
| 67 | 66 | a1i 9 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) = (𝑛 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋𝑛 / 𝑘⦌𝑋)) |
| 68 | | csbeq1 3150 |
. . . . . . . . . 10
⊢ (𝑛 = ((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) →
⦋𝑛 / 𝑘⦌𝑋 = ⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋) |
| 69 | 61, 62, 67, 68 | fmptco 5877 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → ((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ∘ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚))) = (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)) |
| 70 | 69 | feq1d 5523 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ∘ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚))):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶𝐵 ↔ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶𝐵)) |
| 71 | 20, 70 | mpbid 147 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶𝐵) |
| 72 | 71 | fvmptelcdm 5864 |
. . . . . 6
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) →
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋 ∈ 𝐵) |
| 73 | 72 | anasss 403 |
. . . . 5
⊢ ((𝜑 ∧ (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) →
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋 ∈ 𝐵) |
| 74 | 7, 73 | syldan 282 |
. . . 4
⊢ ((𝜑 ∧ (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)})) →
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋 ∈ 𝐵) |
| 75 | 1, 2, 3, 4, 5, 6, 74 | gsumbagdiagfi 15176 |
. . 3
⊢ (𝜑 → (𝐺 Σg (𝑚 ∈ 𝑆, 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)) = (𝐺 Σg (𝑗 ∈ 𝑆, 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) |
| 76 | | eqid 2238 |
. . . 4
⊢
(0g‘𝐺) = (0g‘𝐺) |
| 77 | 1 | psrbaglefifi 15172 |
. . . . . 6
⊢ ((𝐹 ∈ 𝐷 ∧ 𝐼 ∈ Fin) → {𝑦 ∈ 𝐷 ∣ 𝑦 ∘𝑟 ≤ 𝐹} ∈ Fin) |
| 78 | 3, 6, 77 | syl2anc 415 |
. . . . 5
⊢ (𝜑 → {𝑦 ∈ 𝐷 ∣ 𝑦 ∘𝑟 ≤ 𝐹} ∈ Fin) |
| 79 | 2, 78 | eqeltrid 2325 |
. . . 4
⊢ (𝜑 → 𝑆 ∈ Fin) |
| 80 | 1, 2 | psrbagconcl 15173 |
. . . . . . 7
⊢ ((𝐹 ∈ 𝐷 ∧ 𝑚 ∈ 𝑆) → (𝐹 ∘𝑓 − 𝑚) ∈ 𝑆) |
| 81 | 3, 80 | sylan 283 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → (𝐹 ∘𝑓 − 𝑚) ∈ 𝑆) |
| 82 | 11, 81 | sselid 3246 |
. . . . 5
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → (𝐹 ∘𝑓 − 𝑚) ∈ 𝐷) |
| 83 | 6 | adantr 276 |
. . . . 5
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → 𝐼 ∈ Fin) |
| 84 | 1 | psrbaglefifi 15172 |
. . . . 5
⊢ (((𝐹 ∘𝑓
− 𝑚) ∈ 𝐷 ∧ 𝐼 ∈ Fin) → {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ∈
Fin) |
| 85 | 82, 83, 84 | syl2anc 415 |
. . . 4
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ∈
Fin) |
| 86 | | xpfi 7243 |
. . . . 5
⊢ ((𝑆 ∈ Fin ∧ 𝑆 ∈ Fin) → (𝑆 × 𝑆) ∈ Fin) |
| 87 | 79, 79, 86 | syl2anc 415 |
. . . 4
⊢ (𝜑 → (𝑆 × 𝑆) ∈ Fin) |
| 88 | | simprl 535 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)})) → 𝑚 ∈ 𝑆) |
| 89 | 7 | simpld 112 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)})) → 𝑗 ∈ 𝑆) |
| 90 | | brxp 4807 |
. . . . . . 7
⊢ (𝑚(𝑆 × 𝑆)𝑗 ↔ (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ 𝑆)) |
| 91 | 88, 89, 90 | sylanbrc 421 |
. . . . . 6
⊢ ((𝜑 ∧ (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)})) → 𝑚(𝑆 × 𝑆)𝑗) |
| 92 | 91 | pm2.24d 631 |
. . . . 5
⊢ ((𝜑 ∧ (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)})) → (¬
𝑚(𝑆 × 𝑆)𝑗 → ⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋 = (0g‘𝐺))) |
| 93 | 92 | impr 379 |
. . . 4
⊢ ((𝜑 ∧ ((𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)}) ∧ ¬
𝑚(𝑆 × 𝑆)𝑗)) → ⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋 = (0g‘𝐺)) |
| 94 | 4, 76, 5, 79, 85, 74, 87, 93 | gsum2d2fi 14274 |
. . 3
⊢ (𝜑 → (𝐺 Σg (𝑚 ∈ 𝑆, 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)) = (𝐺 Σg (𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))))) |
| 95 | 6 | adantr 276 |
. . . . 5
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → 𝐼 ∈ Fin) |
| 96 | 1 | psrbaglefifi 15172 |
. . . . 5
⊢ (((𝐹 ∘𝑓
− 𝑗) ∈ 𝐷 ∧ 𝐼 ∈ Fin) → {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ∈
Fin) |
| 97 | 14, 95, 96 | syl2anc 415 |
. . . 4
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ∈
Fin) |
| 98 | | simprl 535 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) → 𝑗 ∈ 𝑆) |
| 99 | 1, 2, 3 | gsumbagdiaglem 15175 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) → (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)})) |
| 100 | 99 | simpld 112 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) → 𝑚 ∈ 𝑆) |
| 101 | | brxp 4807 |
. . . . . . 7
⊢ (𝑗(𝑆 × 𝑆)𝑚 ↔ (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ 𝑆)) |
| 102 | 98, 100, 101 | sylanbrc 421 |
. . . . . 6
⊢ ((𝜑 ∧ (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) → 𝑗(𝑆 × 𝑆)𝑚) |
| 103 | 102 | pm2.24d 631 |
. . . . 5
⊢ ((𝜑 ∧ (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) → (¬
𝑗(𝑆 × 𝑆)𝑚 → ⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋 = (0g‘𝐺))) |
| 104 | 103 | impr 379 |
. . . 4
⊢ ((𝜑 ∧ ((𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ ¬
𝑗(𝑆 × 𝑆)𝑚)) → ⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋 = (0g‘𝐺)) |
| 105 | 4, 76, 5, 79, 97, 73, 87, 104 | gsum2d2fi 14274 |
. . 3
⊢ (𝜑 → (𝐺 Σg (𝑗 ∈ 𝑆, 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)) = (𝐺 Σg (𝑗 ∈ 𝑆 ↦ (𝐺 Σg (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))))) |
| 106 | 75, 94, 105 | 3eqtr3d 2279 |
. 2
⊢ (𝜑 → (𝐺 Σg (𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)))) = (𝐺 Σg (𝑗 ∈ 𝑆 ↦ (𝐺 Σg (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))))) |
| 107 | 5 | adantr 276 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → 𝐺 ∈ CMnd) |
| 108 | 74 | anassrs 404 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑚 ∈ 𝑆) ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)}) →
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋 ∈ 𝐵) |
| 109 | 108 | fmpttd 5866 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)}⟶𝐵) |
| 110 | 4, 76, 107, 85, 109 | gsumclfi 14249 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)) ∈ 𝐵) |
| 111 | 110 | fmpttd 5866 |
. . . . . 6
⊢ (𝜑 → (𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))):𝑆⟶𝐵) |
| 112 | 1, 2 | psrbagconf1o 15174 |
. . . . . . . 8
⊢ (𝐹 ∈ 𝐷 → (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆–1-1-onto→𝑆) |
| 113 | 3, 112 | syl 14 |
. . . . . . 7
⊢ (𝜑 → (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆–1-1-onto→𝑆) |
| 114 | | f1ocnv 5655 |
. . . . . . 7
⊢ ((𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆–1-1-onto→𝑆 → ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆–1-1-onto→𝑆) |
| 115 | | f1of 5642 |
. . . . . . 7
⊢ (◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆–1-1-onto→𝑆 → ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆⟶𝑆) |
| 116 | 113, 114,
115 | 3syl 17 |
. . . . . 6
⊢ (𝜑 → ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆⟶𝑆) |
| 117 | 111, 116 | fcod 5556 |
. . . . 5
⊢ (𝜑 → ((𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))):𝑆⟶𝐵) |
| 118 | | coass 5309 |
. . . . . . . 8
⊢ (((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) = ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ ((𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)))) |
| 119 | | f1ococnv2 5669 |
. . . . . . . . . 10
⊢ ((𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆–1-1-onto→𝑆 → ((𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) = ( I ↾ 𝑆)) |
| 120 | 113, 119 | syl 14 |
. . . . . . . . 9
⊢ (𝜑 → ((𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) = ( I ↾ 𝑆)) |
| 121 | 120 | coeq2d 4944 |
. . . . . . . 8
⊢ (𝜑 → ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ ((𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)))) = ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ ( I ↾ 𝑆))) |
| 122 | 118, 121 | eqtrid 2283 |
. . . . . . 7
⊢ (𝜑 → (((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) = ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ ( I ↾ 𝑆))) |
| 123 | | eqidd 2239 |
. . . . . . . . 9
⊢ (𝜑 → (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)) = (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) |
| 124 | | eqidd 2239 |
. . . . . . . . 9
⊢ (𝜑 → (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) = (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)))) |
| 125 | | breq2 4135 |
. . . . . . . . . . . 12
⊢ (𝑛 = (𝐹 ∘𝑓 − 𝑚) → (𝑥 ∘𝑟 ≤ 𝑛 ↔ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚))) |
| 126 | 125 | rabbidv 2810 |
. . . . . . . . . . 11
⊢ (𝑛 = (𝐹 ∘𝑓 − 𝑚) → {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} = {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)}) |
| 127 | | ofovex 6311 |
. . . . . . . . . . . . . 14
⊢ ((𝑛 ∈ V ∧ 𝑗 ∈ V) → (𝑛 ∘𝑓
− 𝑗) ∈
V) |
| 128 | 127 | el2v 2827 |
. . . . . . . . . . . . 13
⊢ (𝑛 ∘𝑓
− 𝑗) ∈
V |
| 129 | | psrass1lem.y |
. . . . . . . . . . . . 13
⊢ (𝑘 = (𝑛 ∘𝑓 − 𝑗) → 𝑋 = 𝑌) |
| 130 | 128, 129 | csbie 3193 |
. . . . . . . . . . . 12
⊢
⦋(𝑛
∘𝑓 − 𝑗) / 𝑘⦌𝑋 = 𝑌 |
| 131 | | oveq1 6095 |
. . . . . . . . . . . . 13
⊢ (𝑛 = (𝐹 ∘𝑓 − 𝑚) → (𝑛 ∘𝑓 − 𝑗) = ((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗)) |
| 132 | 131 | csbeq1d 3154 |
. . . . . . . . . . . 12
⊢ (𝑛 = (𝐹 ∘𝑓 − 𝑚) → ⦋(𝑛 ∘𝑓
− 𝑗) / 𝑘⦌𝑋 = ⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋) |
| 133 | 130, 132 | eqtr3id 2285 |
. . . . . . . . . . 11
⊢ (𝑛 = (𝐹 ∘𝑓 − 𝑚) → 𝑌 = ⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋) |
| 134 | 126, 133 | mpteq12dv 4214 |
. . . . . . . . . 10
⊢ (𝑛 = (𝐹 ∘𝑓 − 𝑚) → (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌) = (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)) |
| 135 | 134 | oveq2d 6104 |
. . . . . . . . 9
⊢ (𝑛 = (𝐹 ∘𝑓 − 𝑚) → (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)) = (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) |
| 136 | 81, 123, 124, 135 | fmptco 5877 |
. . . . . . . 8
⊢ (𝜑 → ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) = (𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)))) |
| 137 | 136 | coeq1d 4943 |
. . . . . . 7
⊢ (𝜑 → (((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) = ((𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)))) |
| 138 | | coires1 5308 |
. . . . . . . . 9
⊢ ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ ( I ↾ 𝑆)) = ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ↾ 𝑆) |
| 139 | | ssid 3268 |
. . . . . . . . . 10
⊢ 𝑆 ⊆ 𝑆 |
| 140 | | resmpt 5114 |
. . . . . . . . . 10
⊢ (𝑆 ⊆ 𝑆 → ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ↾ 𝑆) = (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)))) |
| 141 | 139, 140 | ax-mp 5 |
. . . . . . . . 9
⊢ ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ↾ 𝑆) = (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) |
| 142 | 138, 141 | eqtri 2259 |
. . . . . . . 8
⊢ ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ ( I ↾ 𝑆)) = (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) |
| 143 | 142 | a1i 9 |
. . . . . . 7
⊢ (𝜑 → ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ ( I ↾ 𝑆)) = (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)))) |
| 144 | 122, 137,
143 | 3eqtr3d 2279 |
. . . . . 6
⊢ (𝜑 → ((𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) = (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)))) |
| 145 | 144 | feq1d 5523 |
. . . . 5
⊢ (𝜑 → (((𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))):𝑆⟶𝐵 ↔ (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))):𝑆⟶𝐵)) |
| 146 | 117, 145 | mpbid 147 |
. . . 4
⊢ (𝜑 → (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))):𝑆⟶𝐵) |
| 147 | 4, 76, 5, 79, 146, 113 | gsumf1ofi 14250 |
. . 3
⊢ (𝜑 → (𝐺 Σg (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)))) = (𝐺 Σg ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))))) |
| 148 | 136 | oveq2d 6104 |
. . 3
⊢ (𝜑 → (𝐺 Σg ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)))) = (𝐺 Σg (𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))))) |
| 149 | 147, 148 | eqtrd 2271 |
. 2
⊢ (𝜑 → (𝐺 Σg (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)))) = (𝐺 Σg (𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))))) |
| 150 | 5 | adantr 276 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → 𝐺 ∈ CMnd) |
| 151 | 4, 76, 150, 97, 10, 17 | gsumf1ofi 14250 |
. . . . 5
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝐺 Σg (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋)) = (𝐺 Σg ((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ∘ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚))))) |
| 152 | 69 | oveq2d 6104 |
. . . . 5
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝐺 Σg ((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ∘ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚)))) = (𝐺 Σg (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) |
| 153 | 151, 152 | eqtrd 2271 |
. . . 4
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝐺 Σg (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋)) = (𝐺 Σg (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) |
| 154 | 153 | mpteq2dva 4223 |
. . 3
⊢ (𝜑 → (𝑗 ∈ 𝑆 ↦ (𝐺 Σg (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋))) = (𝑗 ∈ 𝑆 ↦ (𝐺 Σg (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)))) |
| 155 | 154 | oveq2d 6104 |
. 2
⊢ (𝜑 → (𝐺 Σg (𝑗 ∈ 𝑆 ↦ (𝐺 Σg (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋)))) = (𝐺 Σg (𝑗 ∈ 𝑆 ↦ (𝐺 Σg (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))))) |
| 156 | 106, 149,
155 | 3eqtr4d 2281 |
1
⊢ (𝜑 → (𝐺 Σg (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)))) = (𝐺 Σg (𝑗 ∈ 𝑆 ↦ (𝐺 Σg (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋))))) |