Step | Hyp | Ref
| Expression |
1 | | psrbag.d |
. . . 4
⊢ 𝐷 = {𝑓 ∈ (ℕ0
↑𝑚 𝐼) ∣ (◡𝑓 “ ℕ) ∈
Fin} |
2 | | psrbagconf1o.1 |
. . . 4
⊢ 𝑆 = {𝑦 ∈ 𝐷 ∣ 𝑦 ∘𝑟 ≤ 𝐹} |
3 | | gsumbagdiag.i |
. . . 4
⊢ (𝜑 → 𝐼 ∈ 𝑉) |
4 | | gsumbagdiag.f |
. . . 4
⊢ (𝜑 → 𝐹 ∈ 𝐷) |
5 | | gsumbagdiag.b |
. . . 4
⊢ 𝐵 = (Base‘𝐺) |
6 | | gsumbagdiag.g |
. . . 4
⊢ (𝜑 → 𝐺 ∈ CMnd) |
7 | 1, 2, 3, 4 | gsumbagdiaglem 19577 |
. . . . 5
⊢ ((𝜑 ∧ (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)})) → (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) |
8 | | gsumbagdiag.x |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ (𝑗 ∈ 𝑆 ∧ 𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) → 𝑋 ∈ 𝐵) |
9 | 8 | anassrs 683 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑋 ∈ 𝐵) |
10 | | eqid 2760 |
. . . . . . . . . . 11
⊢ (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) = (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) |
11 | 9, 10 | fmptd 6548 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶𝐵) |
12 | 3 | adantr 472 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → 𝐼 ∈ 𝑉) |
13 | | ssrab2 3828 |
. . . . . . . . . . . . . 14
⊢ {𝑦 ∈ 𝐷 ∣ 𝑦 ∘𝑟 ≤ 𝐹} ⊆ 𝐷 |
14 | 2, 13 | eqsstri 3776 |
. . . . . . . . . . . . 13
⊢ 𝑆 ⊆ 𝐷 |
15 | 4 | adantr 472 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → 𝐹 ∈ 𝐷) |
16 | | simpr 479 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → 𝑗 ∈ 𝑆) |
17 | 1, 2 | psrbagconcl 19575 |
. . . . . . . . . . . . . 14
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝐷 ∧ 𝑗 ∈ 𝑆) → (𝐹 ∘𝑓 − 𝑗) ∈ 𝑆) |
18 | 12, 15, 16, 17 | syl3anc 1477 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝐹 ∘𝑓 − 𝑗) ∈ 𝑆) |
19 | 14, 18 | sseldi 3742 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝐹 ∘𝑓 − 𝑗) ∈ 𝐷) |
20 | | eqid 2760 |
. . . . . . . . . . . . 13
⊢ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} = {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} |
21 | 1, 20 | psrbagconf1o 19576 |
. . . . . . . . . . . 12
⊢ ((𝐼 ∈ 𝑉 ∧ (𝐹 ∘𝑓 − 𝑗) ∈ 𝐷) → (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚)):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}–1-1-onto→{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
22 | 12, 19, 21 | syl2anc 696 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚)):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}–1-1-onto→{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
23 | | f1of 6298 |
. . . . . . . . . . 11
⊢ ((𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚)):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}–1-1-onto→{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} → (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚)):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
24 | 22, 23 | syl 17 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚)):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
25 | | fco 6219 |
. . . . . . . . . 10
⊢ (((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶𝐵 ∧ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚)):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → ((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ∘ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚))):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶𝐵) |
26 | 11, 24, 25 | syl2anc 696 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → ((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ∘ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚))):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶𝐵) |
27 | 12 | adantr 472 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝐼 ∈ 𝑉) |
28 | 15 | adantr 472 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝐹 ∈ 𝐷) |
29 | 1 | psrbagf 19567 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝐷) → 𝐹:𝐼⟶ℕ0) |
30 | 27, 28, 29 | syl2anc 696 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝐹:𝐼⟶ℕ0) |
31 | 30 | ffvelrnda 6522 |
. . . . . . . . . . . . . . 15
⊢ ((((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ 𝑧 ∈ 𝐼) → (𝐹‘𝑧) ∈
ℕ0) |
32 | 16 | adantr 472 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑗 ∈ 𝑆) |
33 | 14, 32 | sseldi 3742 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑗 ∈ 𝐷) |
34 | 1 | psrbagf 19567 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝐼 ∈ 𝑉 ∧ 𝑗 ∈ 𝐷) → 𝑗:𝐼⟶ℕ0) |
35 | 27, 33, 34 | syl2anc 696 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑗:𝐼⟶ℕ0) |
36 | 35 | ffvelrnda 6522 |
. . . . . . . . . . . . . . 15
⊢ ((((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ 𝑧 ∈ 𝐼) → (𝑗‘𝑧) ∈
ℕ0) |
37 | | ssrab2 3828 |
. . . . . . . . . . . . . . . . . 18
⊢ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ⊆ 𝐷 |
38 | | simpr 479 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
39 | 37, 38 | sseldi 3742 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑚 ∈ 𝐷) |
40 | 1 | psrbagf 19567 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝐼 ∈ 𝑉 ∧ 𝑚 ∈ 𝐷) → 𝑚:𝐼⟶ℕ0) |
41 | 27, 39, 40 | syl2anc 696 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑚:𝐼⟶ℕ0) |
42 | 41 | ffvelrnda 6522 |
. . . . . . . . . . . . . . 15
⊢ ((((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ 𝑧 ∈ 𝐼) → (𝑚‘𝑧) ∈
ℕ0) |
43 | | nn0cn 11494 |
. . . . . . . . . . . . . . . 16
⊢ ((𝐹‘𝑧) ∈ ℕ0 → (𝐹‘𝑧) ∈ ℂ) |
44 | | nn0cn 11494 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑗‘𝑧) ∈ ℕ0 → (𝑗‘𝑧) ∈ ℂ) |
45 | | nn0cn 11494 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑚‘𝑧) ∈ ℕ0 → (𝑚‘𝑧) ∈ ℂ) |
46 | | sub32 10507 |
. . . . . . . . . . . . . . . 16
⊢ (((𝐹‘𝑧) ∈ ℂ ∧ (𝑗‘𝑧) ∈ ℂ ∧ (𝑚‘𝑧) ∈ ℂ) → (((𝐹‘𝑧) − (𝑗‘𝑧)) − (𝑚‘𝑧)) = (((𝐹‘𝑧) − (𝑚‘𝑧)) − (𝑗‘𝑧))) |
47 | 43, 44, 45, 46 | syl3an 1164 |
. . . . . . . . . . . . . . 15
⊢ (((𝐹‘𝑧) ∈ ℕ0 ∧ (𝑗‘𝑧) ∈ ℕ0 ∧ (𝑚‘𝑧) ∈ ℕ0) → (((𝐹‘𝑧) − (𝑗‘𝑧)) − (𝑚‘𝑧)) = (((𝐹‘𝑧) − (𝑚‘𝑧)) − (𝑗‘𝑧))) |
48 | 31, 36, 42, 47 | syl3anc 1477 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ 𝑧 ∈ 𝐼) → (((𝐹‘𝑧) − (𝑗‘𝑧)) − (𝑚‘𝑧)) = (((𝐹‘𝑧) − (𝑚‘𝑧)) − (𝑗‘𝑧))) |
49 | 48 | mpteq2dva 4896 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → (𝑧 ∈ 𝐼 ↦ (((𝐹‘𝑧) − (𝑗‘𝑧)) − (𝑚‘𝑧))) = (𝑧 ∈ 𝐼 ↦ (((𝐹‘𝑧) − (𝑚‘𝑧)) − (𝑗‘𝑧)))) |
50 | | ovexd 6843 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ 𝑧 ∈ 𝐼) → ((𝐹‘𝑧) − (𝑗‘𝑧)) ∈ V) |
51 | 30 | feqmptd 6411 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝐹 = (𝑧 ∈ 𝐼 ↦ (𝐹‘𝑧))) |
52 | 35 | feqmptd 6411 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑗 = (𝑧 ∈ 𝐼 ↦ (𝑗‘𝑧))) |
53 | 27, 31, 36, 51, 52 | offval2 7079 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → (𝐹 ∘𝑓
− 𝑗) = (𝑧 ∈ 𝐼 ↦ ((𝐹‘𝑧) − (𝑗‘𝑧)))) |
54 | 41 | feqmptd 6411 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → 𝑚 = (𝑧 ∈ 𝐼 ↦ (𝑚‘𝑧))) |
55 | 27, 50, 42, 53, 54 | offval2 7079 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚) = (𝑧 ∈ 𝐼 ↦ (((𝐹‘𝑧) − (𝑗‘𝑧)) − (𝑚‘𝑧)))) |
56 | | ovexd 6843 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ 𝑧 ∈ 𝐼) → ((𝐹‘𝑧) − (𝑚‘𝑧)) ∈ V) |
57 | 27, 31, 42, 51, 54 | offval2 7079 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → (𝐹 ∘𝑓
− 𝑚) = (𝑧 ∈ 𝐼 ↦ ((𝐹‘𝑧) − (𝑚‘𝑧)))) |
58 | 27, 56, 36, 57, 52 | offval2 7079 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → ((𝐹 ∘𝑓
− 𝑚)
∘𝑓 − 𝑗) = (𝑧 ∈ 𝐼 ↦ (((𝐹‘𝑧) − (𝑚‘𝑧)) − (𝑗‘𝑧)))) |
59 | 49, 55, 58 | 3eqtr4d 2804 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚) = ((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗)) |
60 | 19 | adantr 472 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → (𝐹 ∘𝑓
− 𝑗) ∈ 𝐷) |
61 | 1, 20 | psrbagconcl 19575 |
. . . . . . . . . . . . 13
⊢ ((𝐼 ∈ 𝑉 ∧ (𝐹 ∘𝑓 − 𝑗) ∈ 𝐷 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚) ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
62 | 27, 60, 38, 61 | syl3anc 1477 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚) ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
63 | 59, 62 | eqeltrrd 2840 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) → ((𝐹 ∘𝑓
− 𝑚)
∘𝑓 − 𝑗) ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
64 | 59 | mpteq2dva 4896 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚)) = (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑚)
∘𝑓 − 𝑗))) |
65 | | nfcv 2902 |
. . . . . . . . . . . . 13
⊢
Ⅎ𝑛𝑋 |
66 | | nfcsb1v 3690 |
. . . . . . . . . . . . 13
⊢
Ⅎ𝑘⦋𝑛 / 𝑘⦌𝑋 |
67 | | csbeq1a 3683 |
. . . . . . . . . . . . 13
⊢ (𝑘 = 𝑛 → 𝑋 = ⦋𝑛 / 𝑘⦌𝑋) |
68 | 65, 66, 67 | cbvmpt 4901 |
. . . . . . . . . . . 12
⊢ (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) = (𝑛 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋𝑛 / 𝑘⦌𝑋) |
69 | 68 | a1i 11 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) = (𝑛 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋𝑛 / 𝑘⦌𝑋)) |
70 | | csbeq1 3677 |
. . . . . . . . . . 11
⊢ (𝑛 = ((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) →
⦋𝑛 / 𝑘⦌𝑋 = ⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋) |
71 | 63, 64, 69, 70 | fmptco 6559 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → ((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ∘ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚))) = (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)) |
72 | 71 | feq1d 6191 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ∘ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚))):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶𝐵 ↔ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶𝐵)) |
73 | 26, 72 | mpbid 222 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶𝐵) |
74 | | eqid 2760 |
. . . . . . . . 9
⊢ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) = (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) |
75 | 74 | fmpt 6544 |
. . . . . . . 8
⊢
(∀𝑚 ∈
{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋 ∈ 𝐵 ↔ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⟶𝐵) |
76 | 73, 75 | sylibr 224 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → ∀𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋 ∈ 𝐵) |
77 | 76 | r19.21bi 3070 |
. . . . . 6
⊢ (((𝜑 ∧ 𝑗 ∈ 𝑆) ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) →
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋 ∈ 𝐵) |
78 | 77 | anasss 682 |
. . . . 5
⊢ ((𝜑 ∧ (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) →
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋 ∈ 𝐵) |
79 | 7, 78 | syldan 488 |
. . . 4
⊢ ((𝜑 ∧ (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)})) →
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋 ∈ 𝐵) |
80 | 1, 2, 3, 4, 5, 6, 79 | gsumbagdiag 19578 |
. . 3
⊢ (𝜑 → (𝐺 Σg (𝑚 ∈ 𝑆, 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)) = (𝐺 Σg (𝑗 ∈ 𝑆, 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) |
81 | | eqid 2760 |
. . . 4
⊢
(0g‘𝐺) = (0g‘𝐺) |
82 | 1 | psrbaglefi 19574 |
. . . . . 6
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝐷) → {𝑦 ∈ 𝐷 ∣ 𝑦 ∘𝑟 ≤ 𝐹} ∈ Fin) |
83 | 3, 4, 82 | syl2anc 696 |
. . . . 5
⊢ (𝜑 → {𝑦 ∈ 𝐷 ∣ 𝑦 ∘𝑟 ≤ 𝐹} ∈ Fin) |
84 | 2, 83 | syl5eqel 2843 |
. . . 4
⊢ (𝜑 → 𝑆 ∈ Fin) |
85 | 3 | adantr 472 |
. . . . 5
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → 𝐼 ∈ 𝑉) |
86 | 4 | adantr 472 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → 𝐹 ∈ 𝐷) |
87 | | simpr 479 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → 𝑚 ∈ 𝑆) |
88 | 1, 2 | psrbagconcl 19575 |
. . . . . . 7
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝐷 ∧ 𝑚 ∈ 𝑆) → (𝐹 ∘𝑓 − 𝑚) ∈ 𝑆) |
89 | 85, 86, 87, 88 | syl3anc 1477 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → (𝐹 ∘𝑓 − 𝑚) ∈ 𝑆) |
90 | 14, 89 | sseldi 3742 |
. . . . 5
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → (𝐹 ∘𝑓 − 𝑚) ∈ 𝐷) |
91 | 1 | psrbaglefi 19574 |
. . . . 5
⊢ ((𝐼 ∈ 𝑉 ∧ (𝐹 ∘𝑓 − 𝑚) ∈ 𝐷) → {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ∈
Fin) |
92 | 85, 90, 91 | syl2anc 696 |
. . . 4
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ∈
Fin) |
93 | | xpfi 8396 |
. . . . 5
⊢ ((𝑆 ∈ Fin ∧ 𝑆 ∈ Fin) → (𝑆 × 𝑆) ∈ Fin) |
94 | 84, 84, 93 | syl2anc 696 |
. . . 4
⊢ (𝜑 → (𝑆 × 𝑆) ∈ Fin) |
95 | | simprl 811 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)})) → 𝑚 ∈ 𝑆) |
96 | 7 | simpld 477 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)})) → 𝑗 ∈ 𝑆) |
97 | | brxp 5304 |
. . . . . . 7
⊢ (𝑚(𝑆 × 𝑆)𝑗 ↔ (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ 𝑆)) |
98 | 95, 96, 97 | sylanbrc 701 |
. . . . . 6
⊢ ((𝜑 ∧ (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)})) → 𝑚(𝑆 × 𝑆)𝑗) |
99 | 98 | pm2.24d 147 |
. . . . 5
⊢ ((𝜑 ∧ (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)})) → (¬
𝑚(𝑆 × 𝑆)𝑗 → ⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋 = (0g‘𝐺))) |
100 | 99 | impr 650 |
. . . 4
⊢ ((𝜑 ∧ ((𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)}) ∧ ¬
𝑚(𝑆 × 𝑆)𝑗)) → ⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋 = (0g‘𝐺)) |
101 | 5, 81, 6, 84, 92, 79, 94, 100 | gsum2d2 18573 |
. . 3
⊢ (𝜑 → (𝐺 Σg (𝑚 ∈ 𝑆, 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)) = (𝐺 Σg (𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))))) |
102 | 1 | psrbaglefi 19574 |
. . . . 5
⊢ ((𝐼 ∈ 𝑉 ∧ (𝐹 ∘𝑓 − 𝑗) ∈ 𝐷) → {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ∈
Fin) |
103 | 12, 19, 102 | syl2anc 696 |
. . . 4
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ∈
Fin) |
104 | | simprl 811 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) → 𝑗 ∈ 𝑆) |
105 | 1, 2, 3, 4 | gsumbagdiaglem 19577 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) → (𝑚 ∈ 𝑆 ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)})) |
106 | 105 | simpld 477 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) → 𝑚 ∈ 𝑆) |
107 | | brxp 5304 |
. . . . . . 7
⊢ (𝑗(𝑆 × 𝑆)𝑚 ↔ (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ 𝑆)) |
108 | 104, 106,
107 | sylanbrc 701 |
. . . . . 6
⊢ ((𝜑 ∧ (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) → 𝑗(𝑆 × 𝑆)𝑚) |
109 | 108 | pm2.24d 147 |
. . . . 5
⊢ ((𝜑 ∧ (𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) → (¬
𝑗(𝑆 × 𝑆)𝑚 → ⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋 = (0g‘𝐺))) |
110 | 109 | impr 650 |
. . . 4
⊢ ((𝜑 ∧ ((𝑗 ∈ 𝑆 ∧ 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) ∧ ¬
𝑗(𝑆 × 𝑆)𝑚)) → ⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋 = (0g‘𝐺)) |
111 | 5, 81, 6, 84, 103, 78, 94, 110 | gsum2d2 18573 |
. . 3
⊢ (𝜑 → (𝐺 Σg (𝑗 ∈ 𝑆, 𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)) = (𝐺 Σg (𝑗 ∈ 𝑆 ↦ (𝐺 Σg (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))))) |
112 | 80, 101, 111 | 3eqtr3d 2802 |
. 2
⊢ (𝜑 → (𝐺 Σg (𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)))) = (𝐺 Σg (𝑗 ∈ 𝑆 ↦ (𝐺 Σg (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))))) |
113 | 6 | adantr 472 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → 𝐺 ∈ CMnd) |
114 | 79 | anassrs 683 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑚 ∈ 𝑆) ∧ 𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)}) →
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋 ∈ 𝐵) |
115 | | eqid 2760 |
. . . . . . . . 9
⊢ (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) = (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) |
116 | 114, 115 | fmptd 6548 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋):{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)}⟶𝐵) |
117 | | ovex 6841 |
. . . . . . . . . . . 12
⊢
(ℕ0 ↑𝑚 𝐼) ∈ V |
118 | 1, 117 | rabex2 4966 |
. . . . . . . . . . 11
⊢ 𝐷 ∈ V |
119 | 118 | a1i 11 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → 𝐷 ∈ V) |
120 | | rabexg 4963 |
. . . . . . . . . 10
⊢ (𝐷 ∈ V → {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ∈
V) |
121 | | mptexg 6648 |
. . . . . . . . . 10
⊢ ({𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ∈ V →
(𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) ∈ V) |
122 | 119, 120,
121 | 3syl 18 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) ∈ V) |
123 | | funmpt 6087 |
. . . . . . . . . 10
⊢ Fun
(𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) |
124 | 123 | a1i 11 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → Fun (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)) |
125 | | fvexd 6364 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → (0g‘𝐺) ∈ V) |
126 | | suppssdm 7476 |
. . . . . . . . . . 11
⊢ ((𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) supp (0g‘𝐺)) ⊆ dom (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) |
127 | 115 | dmmptss 5792 |
. . . . . . . . . . 11
⊢ dom
(𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) ⊆ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} |
128 | 126, 127 | sstri 3753 |
. . . . . . . . . 10
⊢ ((𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) supp (0g‘𝐺)) ⊆ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} |
129 | 128 | a1i 11 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → ((𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) supp (0g‘𝐺)) ⊆ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)}) |
130 | | suppssfifsupp 8455 |
. . . . . . . . 9
⊢ ((((𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) ∈ V ∧ Fun (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) ∧ (0g‘𝐺) ∈ V) ∧ ({𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ∈ Fin
∧ ((𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) supp (0g‘𝐺)) ⊆ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)})) → (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) finSupp (0g‘𝐺)) |
131 | 122, 124,
125, 92, 129, 130 | syl32anc 1485 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋) finSupp (0g‘𝐺)) |
132 | 5, 81, 113, 92, 116, 131 | gsumcl 18516 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ 𝑆) → (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)) ∈ 𝐵) |
133 | | eqid 2760 |
. . . . . . 7
⊢ (𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) = (𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) |
134 | 132, 133 | fmptd 6548 |
. . . . . 6
⊢ (𝜑 → (𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))):𝑆⟶𝐵) |
135 | 1, 2 | psrbagconf1o 19576 |
. . . . . . . 8
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐹 ∈ 𝐷) → (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆–1-1-onto→𝑆) |
136 | 3, 4, 135 | syl2anc 696 |
. . . . . . 7
⊢ (𝜑 → (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆–1-1-onto→𝑆) |
137 | | f1ocnv 6310 |
. . . . . . 7
⊢ ((𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆–1-1-onto→𝑆 → ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆–1-1-onto→𝑆) |
138 | | f1of 6298 |
. . . . . . 7
⊢ (◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆–1-1-onto→𝑆 → ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆⟶𝑆) |
139 | 136, 137,
138 | 3syl 18 |
. . . . . 6
⊢ (𝜑 → ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆⟶𝑆) |
140 | | fco 6219 |
. . . . . 6
⊢ (((𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))):𝑆⟶𝐵 ∧ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆⟶𝑆) → ((𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))):𝑆⟶𝐵) |
141 | 134, 139,
140 | syl2anc 696 |
. . . . 5
⊢ (𝜑 → ((𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))):𝑆⟶𝐵) |
142 | | coass 5815 |
. . . . . . . 8
⊢ (((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) = ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ ((𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)))) |
143 | | f1ococnv2 6324 |
. . . . . . . . . 10
⊢ ((𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)):𝑆–1-1-onto→𝑆 → ((𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) = ( I ↾ 𝑆)) |
144 | 136, 143 | syl 17 |
. . . . . . . . 9
⊢ (𝜑 → ((𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) = ( I ↾ 𝑆)) |
145 | 144 | coeq2d 5440 |
. . . . . . . 8
⊢ (𝜑 → ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ ((𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)))) = ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ ( I ↾ 𝑆))) |
146 | 142, 145 | syl5eq 2806 |
. . . . . . 7
⊢ (𝜑 → (((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) = ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ ( I ↾ 𝑆))) |
147 | | eqidd 2761 |
. . . . . . . . 9
⊢ (𝜑 → (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)) = (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) |
148 | | eqidd 2761 |
. . . . . . . . 9
⊢ (𝜑 → (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) = (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)))) |
149 | | breq2 4808 |
. . . . . . . . . . . 12
⊢ (𝑛 = (𝐹 ∘𝑓 − 𝑚) → (𝑥 ∘𝑟 ≤ 𝑛 ↔ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚))) |
150 | 149 | rabbidv 3329 |
. . . . . . . . . . 11
⊢ (𝑛 = (𝐹 ∘𝑓 − 𝑚) → {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} = {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)}) |
151 | | ovex 6841 |
. . . . . . . . . . . . 13
⊢ (𝑛 ∘𝑓
− 𝑗) ∈
V |
152 | | psrass1lem.y |
. . . . . . . . . . . . 13
⊢ (𝑘 = (𝑛 ∘𝑓 − 𝑗) → 𝑋 = 𝑌) |
153 | 151, 152 | csbie 3700 |
. . . . . . . . . . . 12
⊢
⦋(𝑛
∘𝑓 − 𝑗) / 𝑘⦌𝑋 = 𝑌 |
154 | | oveq1 6820 |
. . . . . . . . . . . . 13
⊢ (𝑛 = (𝐹 ∘𝑓 − 𝑚) → (𝑛 ∘𝑓 − 𝑗) = ((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗)) |
155 | 154 | csbeq1d 3681 |
. . . . . . . . . . . 12
⊢ (𝑛 = (𝐹 ∘𝑓 − 𝑚) → ⦋(𝑛 ∘𝑓
− 𝑗) / 𝑘⦌𝑋 = ⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋) |
156 | 153, 155 | syl5eqr 2808 |
. . . . . . . . . . 11
⊢ (𝑛 = (𝐹 ∘𝑓 − 𝑚) → 𝑌 = ⦋((𝐹 ∘𝑓 − 𝑚) ∘𝑓
− 𝑗) / 𝑘⦌𝑋) |
157 | 150, 156 | mpteq12dv 4885 |
. . . . . . . . . 10
⊢ (𝑛 = (𝐹 ∘𝑓 − 𝑚) → (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌) = (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)) |
158 | 157 | oveq2d 6829 |
. . . . . . . . 9
⊢ (𝑛 = (𝐹 ∘𝑓 − 𝑚) → (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)) = (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) |
159 | 89, 147, 148, 158 | fmptco 6559 |
. . . . . . . 8
⊢ (𝜑 → ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) = (𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)))) |
160 | 159 | coeq1d 5439 |
. . . . . . 7
⊢ (𝜑 → (((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) = ((𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)))) |
161 | | coires1 5814 |
. . . . . . . . 9
⊢ ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ ( I ↾ 𝑆)) = ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ↾ 𝑆) |
162 | | ssid 3765 |
. . . . . . . . . 10
⊢ 𝑆 ⊆ 𝑆 |
163 | | resmpt 5607 |
. . . . . . . . . 10
⊢ (𝑆 ⊆ 𝑆 → ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ↾ 𝑆) = (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)))) |
164 | 162, 163 | ax-mp 5 |
. . . . . . . . 9
⊢ ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ↾ 𝑆) = (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) |
165 | 161, 164 | eqtri 2782 |
. . . . . . . 8
⊢ ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ ( I ↾ 𝑆)) = (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) |
166 | 165 | a1i 11 |
. . . . . . 7
⊢ (𝜑 → ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ ( I ↾ 𝑆)) = (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)))) |
167 | 146, 160,
166 | 3eqtr3d 2802 |
. . . . . 6
⊢ (𝜑 → ((𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))) = (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)))) |
168 | 167 | feq1d 6191 |
. . . . 5
⊢ (𝜑 → (((𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) ∘ ◡(𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))):𝑆⟶𝐵 ↔ (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))):𝑆⟶𝐵)) |
169 | 141, 168 | mpbid 222 |
. . . 4
⊢ (𝜑 → (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))):𝑆⟶𝐵) |
170 | | rabexg 4963 |
. . . . . . . 8
⊢ (𝐷 ∈ V → {𝑦 ∈ 𝐷 ∣ 𝑦 ∘𝑟 ≤ 𝐹} ∈ V) |
171 | 118, 170 | mp1i 13 |
. . . . . . 7
⊢ (𝜑 → {𝑦 ∈ 𝐷 ∣ 𝑦 ∘𝑟 ≤ 𝐹} ∈ V) |
172 | 2, 171 | syl5eqel 2843 |
. . . . . 6
⊢ (𝜑 → 𝑆 ∈ V) |
173 | | mptexg 6648 |
. . . . . 6
⊢ (𝑆 ∈ V → (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∈ V) |
174 | 172, 173 | syl 17 |
. . . . 5
⊢ (𝜑 → (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∈ V) |
175 | | funmpt 6087 |
. . . . . 6
⊢ Fun
(𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) |
176 | 175 | a1i 11 |
. . . . 5
⊢ (𝜑 → Fun (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)))) |
177 | | fvexd 6364 |
. . . . 5
⊢ (𝜑 → (0g‘𝐺) ∈ V) |
178 | | suppssdm 7476 |
. . . . . . 7
⊢ ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) supp (0g‘𝐺)) ⊆ dom (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) |
179 | | eqid 2760 |
. . . . . . . 8
⊢ (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) = (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) |
180 | 179 | dmmptss 5792 |
. . . . . . 7
⊢ dom
(𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ⊆ 𝑆 |
181 | 178, 180 | sstri 3753 |
. . . . . 6
⊢ ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) supp (0g‘𝐺)) ⊆ 𝑆 |
182 | 181 | a1i 11 |
. . . . 5
⊢ (𝜑 → ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) supp (0g‘𝐺)) ⊆ 𝑆) |
183 | | suppssfifsupp 8455 |
. . . . 5
⊢ ((((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∈ V ∧ Fun (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∧ (0g‘𝐺) ∈ V) ∧ (𝑆 ∈ Fin ∧ ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) supp (0g‘𝐺)) ⊆ 𝑆)) → (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) finSupp (0g‘𝐺)) |
184 | 174, 176,
177, 84, 182, 183 | syl32anc 1485 |
. . . 4
⊢ (𝜑 → (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) finSupp (0g‘𝐺)) |
185 | 5, 81, 6, 84, 169, 184, 136 | gsumf1o 18517 |
. . 3
⊢ (𝜑 → (𝐺 Σg (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)))) = (𝐺 Σg ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚))))) |
186 | 159 | oveq2d 6829 |
. . 3
⊢ (𝜑 → (𝐺 Σg ((𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌))) ∘ (𝑚 ∈ 𝑆 ↦ (𝐹 ∘𝑓 − 𝑚)))) = (𝐺 Σg (𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))))) |
187 | 185, 186 | eqtrd 2794 |
. 2
⊢ (𝜑 → (𝐺 Σg (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)))) = (𝐺 Σg (𝑚 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑚)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))))) |
188 | 6 | adantr 472 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → 𝐺 ∈ CMnd) |
189 | 118 | a1i 11 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → 𝐷 ∈ V) |
190 | | rabexg 4963 |
. . . . . . . 8
⊢ (𝐷 ∈ V → {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ∈
V) |
191 | | mptexg 6648 |
. . . . . . . 8
⊢ ({𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ∈ V →
(𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ∈ V) |
192 | 189, 190,
191 | 3syl 18 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ∈ V) |
193 | | funmpt 6087 |
. . . . . . . 8
⊢ Fun
(𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) |
194 | 193 | a1i 11 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → Fun (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋)) |
195 | | fvexd 6364 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (0g‘𝐺) ∈ V) |
196 | | suppssdm 7476 |
. . . . . . . . 9
⊢ ((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) supp
(0g‘𝐺))
⊆ dom (𝑘 ∈
{𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) |
197 | 10 | dmmptss 5792 |
. . . . . . . . 9
⊢ dom
(𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ⊆ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} |
198 | 196, 197 | sstri 3753 |
. . . . . . . 8
⊢ ((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) supp
(0g‘𝐺))
⊆ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} |
199 | 198 | a1i 11 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → ((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) supp
(0g‘𝐺))
⊆ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)}) |
200 | | suppssfifsupp 8455 |
. . . . . . 7
⊢ ((((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ∈ V ∧ Fun (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ∧
(0g‘𝐺)
∈ V) ∧ ({𝑥 ∈
𝐷 ∣ 𝑥 ∘𝑟
≤ (𝐹
∘𝑓 − 𝑗)} ∈ Fin ∧ ((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) supp
(0g‘𝐺))
⊆ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)})) → (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) finSupp
(0g‘𝐺)) |
201 | 192, 194,
195, 103, 199, 200 | syl32anc 1485 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) finSupp
(0g‘𝐺)) |
202 | 5, 81, 188, 103, 11, 201, 22 | gsumf1o 18517 |
. . . . 5
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝐺 Σg (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋)) = (𝐺 Σg ((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ∘ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚))))) |
203 | 71 | oveq2d 6829 |
. . . . 5
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝐺 Σg ((𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋) ∘ (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ ((𝐹 ∘𝑓
− 𝑗)
∘𝑓 − 𝑚)))) = (𝐺 Σg (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) |
204 | 202, 203 | eqtrd 2794 |
. . . 4
⊢ ((𝜑 ∧ 𝑗 ∈ 𝑆) → (𝐺 Σg (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋)) = (𝐺 Σg (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))) |
205 | 204 | mpteq2dva 4896 |
. . 3
⊢ (𝜑 → (𝑗 ∈ 𝑆 ↦ (𝐺 Σg (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋))) = (𝑗 ∈ 𝑆 ↦ (𝐺 Σg (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋)))) |
206 | 205 | oveq2d 6829 |
. 2
⊢ (𝜑 → (𝐺 Σg (𝑗 ∈ 𝑆 ↦ (𝐺 Σg (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋)))) = (𝐺 Σg (𝑗 ∈ 𝑆 ↦ (𝐺 Σg (𝑚 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦
⦋((𝐹
∘𝑓 − 𝑚) ∘𝑓 − 𝑗) / 𝑘⦌𝑋))))) |
207 | 112, 187,
206 | 3eqtr4d 2804 |
1
⊢ (𝜑 → (𝐺 Σg (𝑛 ∈ 𝑆 ↦ (𝐺 Σg (𝑗 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ 𝑛} ↦ 𝑌)))) = (𝐺 Σg (𝑗 ∈ 𝑆 ↦ (𝐺 Σg (𝑘 ∈ {𝑥 ∈ 𝐷 ∣ 𝑥 ∘𝑟 ≤ (𝐹 ∘𝑓
− 𝑗)} ↦ 𝑋))))) |