Metamath Proof Explorer


Theorem sge0fodjrnlem

Description: Re-index a nonnegative extended sum using an onto function with disjoint range, when the empty set is assigned 0 in the sum (this is true, for example, both for measures and outer measures). (Contributed by Glauco Siliprandi, 17-Aug-2020)

Ref Expression
Hypotheses sge0fodjrnlem.k 𝑘 𝜑
sge0fodjrnlem.n 𝑛 𝜑
sge0fodjrnlem.bd ( 𝑘 = 𝐺𝐵 = 𝐷 )
sge0fodjrnlem.c ( 𝜑𝐶𝑉 )
sge0fodjrnlem.f ( 𝜑𝐹 : 𝐶onto𝐴 )
sge0fodjrnlem.dj ( 𝜑Disj 𝑛𝐶 ( 𝐹𝑛 ) )
sge0fodjrnlem.fng ( ( 𝜑𝑛𝐶 ) → ( 𝐹𝑛 ) = 𝐺 )
sge0fodjrnlem.b ( ( 𝜑𝑘𝐴 ) → 𝐵 ∈ ( 0 [,] +∞ ) )
sge0fodjrnlem.b0 ( ( 𝜑𝑘 = ∅ ) → 𝐵 = 0 )
sge0fodjrnlem.z 𝑍 = ( 𝐹 “ { ∅ } )
Assertion sge0fodjrnlem ( 𝜑 → ( Σ^ ‘ ( 𝑘𝐴𝐵 ) ) = ( Σ^ ‘ ( 𝑛𝐶𝐷 ) ) )

Proof

Step Hyp Ref Expression
1 sge0fodjrnlem.k 𝑘 𝜑
2 sge0fodjrnlem.n 𝑛 𝜑
3 sge0fodjrnlem.bd ( 𝑘 = 𝐺𝐵 = 𝐷 )
4 sge0fodjrnlem.c ( 𝜑𝐶𝑉 )
5 sge0fodjrnlem.f ( 𝜑𝐹 : 𝐶onto𝐴 )
6 sge0fodjrnlem.dj ( 𝜑Disj 𝑛𝐶 ( 𝐹𝑛 ) )
7 sge0fodjrnlem.fng ( ( 𝜑𝑛𝐶 ) → ( 𝐹𝑛 ) = 𝐺 )
8 sge0fodjrnlem.b ( ( 𝜑𝑘𝐴 ) → 𝐵 ∈ ( 0 [,] +∞ ) )
9 sge0fodjrnlem.b0 ( ( 𝜑𝑘 = ∅ ) → 𝐵 = 0 )
10 sge0fodjrnlem.z 𝑍 = ( 𝐹 “ { ∅ } )
11 focdmex ( 𝐶𝑉 → ( 𝐹 : 𝐶onto𝐴𝐴 ∈ V ) )
12 4 5 11 sylc ( 𝜑𝐴 ∈ V )
13 difssd ( 𝜑 → ( 𝐴 ∖ { ∅ } ) ⊆ 𝐴 )
14 simpl ( ( 𝜑𝑘 ∈ ( 𝐴 ∖ { ∅ } ) ) → 𝜑 )
15 13 sselda ( ( 𝜑𝑘 ∈ ( 𝐴 ∖ { ∅ } ) ) → 𝑘𝐴 )
16 14 15 8 syl2anc ( ( 𝜑𝑘 ∈ ( 𝐴 ∖ { ∅ } ) ) → 𝐵 ∈ ( 0 [,] +∞ ) )
17 simpl ( ( 𝜑𝑘 ∈ ( 𝐴 ∖ ( 𝐴 ∖ { ∅ } ) ) ) → 𝜑 )
18 dfin4 ( 𝐴 ∩ { ∅ } ) = ( 𝐴 ∖ ( 𝐴 ∖ { ∅ } ) )
19 18 eqcomi ( 𝐴 ∖ ( 𝐴 ∖ { ∅ } ) ) = ( 𝐴 ∩ { ∅ } )
20 inss2 ( 𝐴 ∩ { ∅ } ) ⊆ { ∅ }
21 19 20 eqsstri ( 𝐴 ∖ ( 𝐴 ∖ { ∅ } ) ) ⊆ { ∅ }
22 id ( 𝑘 ∈ ( 𝐴 ∖ ( 𝐴 ∖ { ∅ } ) ) → 𝑘 ∈ ( 𝐴 ∖ ( 𝐴 ∖ { ∅ } ) ) )
23 21 22 sselid ( 𝑘 ∈ ( 𝐴 ∖ ( 𝐴 ∖ { ∅ } ) ) → 𝑘 ∈ { ∅ } )
24 elsni ( 𝑘 ∈ { ∅ } → 𝑘 = ∅ )
25 23 24 syl ( 𝑘 ∈ ( 𝐴 ∖ ( 𝐴 ∖ { ∅ } ) ) → 𝑘 = ∅ )
26 25 adantl ( ( 𝜑𝑘 ∈ ( 𝐴 ∖ ( 𝐴 ∖ { ∅ } ) ) ) → 𝑘 = ∅ )
27 17 26 9 syl2anc ( ( 𝜑𝑘 ∈ ( 𝐴 ∖ ( 𝐴 ∖ { ∅ } ) ) ) → 𝐵 = 0 )
28 1 12 13 16 27 sge0ss ( 𝜑 → ( Σ^ ‘ ( 𝑘 ∈ ( 𝐴 ∖ { ∅ } ) ↦ 𝐵 ) ) = ( Σ^ ‘ ( 𝑘𝐴𝐵 ) ) )
29 28 eqcomd ( 𝜑 → ( Σ^ ‘ ( 𝑘𝐴𝐵 ) ) = ( Σ^ ‘ ( 𝑘 ∈ ( 𝐴 ∖ { ∅ } ) ↦ 𝐵 ) ) )
30 4 difexd ( 𝜑 → ( 𝐶𝑍 ) ∈ V )
31 eqid ( 𝑛𝐶 ↦ ( 𝐹𝑛 ) ) = ( 𝑛𝐶 ↦ ( 𝐹𝑛 ) )
32 fof ( 𝐹 : 𝐶onto𝐴𝐹 : 𝐶𝐴 )
33 5 32 syl ( 𝜑𝐹 : 𝐶𝐴 )
34 33 ffvelcdmda ( ( 𝜑𝑛𝐶 ) → ( 𝐹𝑛 ) ∈ 𝐴 )
35 fveq2 ( 𝑚 = 𝑛 → ( 𝐹𝑚 ) = ( 𝐹𝑛 ) )
36 35 neeq1d ( 𝑚 = 𝑛 → ( ( 𝐹𝑚 ) ≠ ∅ ↔ ( 𝐹𝑛 ) ≠ ∅ ) )
37 36 cbvrabv { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } = { 𝑛𝐶 ∣ ( 𝐹𝑛 ) ≠ ∅ }
38 35 cbvmptv ( 𝑚𝐶 ↦ ( 𝐹𝑚 ) ) = ( 𝑛𝐶 ↦ ( 𝐹𝑛 ) )
39 38 rneqi ran ( 𝑚𝐶 ↦ ( 𝐹𝑚 ) ) = ran ( 𝑛𝐶 ↦ ( 𝐹𝑛 ) )
40 39 difeq1i ( ran ( 𝑚𝐶 ↦ ( 𝐹𝑚 ) ) ∖ { ∅ } ) = ( ran ( 𝑛𝐶 ↦ ( 𝐹𝑛 ) ) ∖ { ∅ } )
41 2 31 34 6 37 40 disjf1o ( 𝜑 → ( ( 𝑛𝐶 ↦ ( 𝐹𝑛 ) ) ↾ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ) : { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } –1-1-onto→ ( ran ( 𝑚𝐶 ↦ ( 𝐹𝑚 ) ) ∖ { ∅ } ) )
42 33 feqmptd ( 𝜑𝐹 = ( 𝑛𝐶 ↦ ( 𝐹𝑛 ) ) )
43 difssd ( 𝜑 → ( 𝐶𝑍 ) ⊆ 𝐶 )
44 43 sselda ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) → 𝑛𝐶 )
45 eldifi ( 𝑛 ∈ ( 𝐶𝑍 ) → 𝑛𝐶 )
46 45 adantr ( ( 𝑛 ∈ ( 𝐶𝑍 ) ∧ ( 𝐹𝑛 ) = ∅ ) → 𝑛𝐶 )
47 fvex ( 𝐹𝑛 ) ∈ V
48 47 elsn ( ( 𝐹𝑛 ) ∈ { ∅ } ↔ ( 𝐹𝑛 ) = ∅ )
49 48 bilanri ( ( 𝑛 ∈ ( 𝐶𝑍 ) ∧ ( 𝐹𝑛 ) = ∅ ) → ( 𝐹𝑛 ) ∈ { ∅ } )
50 46 49 jca ( ( 𝑛 ∈ ( 𝐶𝑍 ) ∧ ( 𝐹𝑛 ) = ∅ ) → ( 𝑛𝐶 ∧ ( 𝐹𝑛 ) ∈ { ∅ } ) )
51 50 adantll ( ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) ∧ ( 𝐹𝑛 ) = ∅ ) → ( 𝑛𝐶 ∧ ( 𝐹𝑛 ) ∈ { ∅ } ) )
52 33 ffnd ( 𝜑𝐹 Fn 𝐶 )
53 elpreima ( 𝐹 Fn 𝐶 → ( 𝑛 ∈ ( 𝐹 “ { ∅ } ) ↔ ( 𝑛𝐶 ∧ ( 𝐹𝑛 ) ∈ { ∅ } ) ) )
54 52 53 syl ( 𝜑 → ( 𝑛 ∈ ( 𝐹 “ { ∅ } ) ↔ ( 𝑛𝐶 ∧ ( 𝐹𝑛 ) ∈ { ∅ } ) ) )
55 54 ad2antrr ( ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) ∧ ( 𝐹𝑛 ) = ∅ ) → ( 𝑛 ∈ ( 𝐹 “ { ∅ } ) ↔ ( 𝑛𝐶 ∧ ( 𝐹𝑛 ) ∈ { ∅ } ) ) )
56 51 55 mpbird ( ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) ∧ ( 𝐹𝑛 ) = ∅ ) → 𝑛 ∈ ( 𝐹 “ { ∅ } ) )
57 56 10 eleqtrrdi ( ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) ∧ ( 𝐹𝑛 ) = ∅ ) → 𝑛𝑍 )
58 eldifn ( 𝑛 ∈ ( 𝐶𝑍 ) → ¬ 𝑛𝑍 )
59 58 ad2antlr ( ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) ∧ ( 𝐹𝑛 ) = ∅ ) → ¬ 𝑛𝑍 )
60 57 59 pm2.65da ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) → ¬ ( 𝐹𝑛 ) = ∅ )
61 60 neqned ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) → ( 𝐹𝑛 ) ≠ ∅ )
62 44 61 jca ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) → ( 𝑛𝐶 ∧ ( 𝐹𝑛 ) ≠ ∅ ) )
63 36 elrab ( 𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ↔ ( 𝑛𝐶 ∧ ( 𝐹𝑛 ) ≠ ∅ ) )
64 62 63 sylibr ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) → 𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } )
65 64 ex ( 𝜑 → ( 𝑛 ∈ ( 𝐶𝑍 ) → 𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ) )
66 63 simplbi ( 𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } → 𝑛𝐶 )
67 66 adantl ( ( 𝜑𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ) → 𝑛𝐶 )
68 10 eleq2i ( 𝑛𝑍𝑛 ∈ ( 𝐹 “ { ∅ } ) )
69 68 bilani ( ( 𝜑𝑛𝑍 ) → 𝑛 ∈ ( 𝐹 “ { ∅ } ) )
70 54 adantr ( ( 𝜑𝑛𝑍 ) → ( 𝑛 ∈ ( 𝐹 “ { ∅ } ) ↔ ( 𝑛𝐶 ∧ ( 𝐹𝑛 ) ∈ { ∅ } ) ) )
71 69 70 mpbid ( ( 𝜑𝑛𝑍 ) → ( 𝑛𝐶 ∧ ( 𝐹𝑛 ) ∈ { ∅ } ) )
72 71 simprd ( ( 𝜑𝑛𝑍 ) → ( 𝐹𝑛 ) ∈ { ∅ } )
73 elsni ( ( 𝐹𝑛 ) ∈ { ∅ } → ( 𝐹𝑛 ) = ∅ )
74 72 73 syl ( ( 𝜑𝑛𝑍 ) → ( 𝐹𝑛 ) = ∅ )
75 74 adantlr ( ( ( 𝜑𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ) ∧ 𝑛𝑍 ) → ( 𝐹𝑛 ) = ∅ )
76 63 simprbi ( 𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } → ( 𝐹𝑛 ) ≠ ∅ )
77 76 ad2antlr ( ( ( 𝜑𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ) ∧ 𝑛𝑍 ) → ( 𝐹𝑛 ) ≠ ∅ )
78 77 neneqd ( ( ( 𝜑𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ) ∧ 𝑛𝑍 ) → ¬ ( 𝐹𝑛 ) = ∅ )
79 75 78 pm2.65da ( ( 𝜑𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ) → ¬ 𝑛𝑍 )
80 67 79 eldifd ( ( 𝜑𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ) → 𝑛 ∈ ( 𝐶𝑍 ) )
81 80 ex ( 𝜑 → ( 𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } → 𝑛 ∈ ( 𝐶𝑍 ) ) )
82 2 81 ralrimi ( 𝜑 → ∀ 𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } 𝑛 ∈ ( 𝐶𝑍 ) )
83 dfss3 ( { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ⊆ ( 𝐶𝑍 ) ↔ ∀ 𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } 𝑛 ∈ ( 𝐶𝑍 ) )
84 82 83 sylibr ( 𝜑 → { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ⊆ ( 𝐶𝑍 ) )
85 84 sseld ( 𝜑 → ( 𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } → 𝑛 ∈ ( 𝐶𝑍 ) ) )
86 65 85 impbid ( 𝜑 → ( 𝑛 ∈ ( 𝐶𝑍 ) ↔ 𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ) )
87 2 86 alrimi ( 𝜑 → ∀ 𝑛 ( 𝑛 ∈ ( 𝐶𝑍 ) ↔ 𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ) )
88 dfcleq ( ( 𝐶𝑍 ) = { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ↔ ∀ 𝑛 ( 𝑛 ∈ ( 𝐶𝑍 ) ↔ 𝑛 ∈ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ) )
89 87 88 sylibr ( 𝜑 → ( 𝐶𝑍 ) = { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } )
90 42 89 reseq12d ( 𝜑 → ( 𝐹 ↾ ( 𝐶𝑍 ) ) = ( ( 𝑛𝐶 ↦ ( 𝐹𝑛 ) ) ↾ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ) )
91 42 38 eqtr4di ( 𝜑𝐹 = ( 𝑚𝐶 ↦ ( 𝐹𝑚 ) ) )
92 91 eqcomd ( 𝜑 → ( 𝑚𝐶 ↦ ( 𝐹𝑚 ) ) = 𝐹 )
93 92 rneqd ( 𝜑 → ran ( 𝑚𝐶 ↦ ( 𝐹𝑚 ) ) = ran 𝐹 )
94 forn ( 𝐹 : 𝐶onto𝐴 → ran 𝐹 = 𝐴 )
95 5 94 syl ( 𝜑 → ran 𝐹 = 𝐴 )
96 93 95 eqtr2d ( 𝜑𝐴 = ran ( 𝑚𝐶 ↦ ( 𝐹𝑚 ) ) )
97 96 difeq1d ( 𝜑 → ( 𝐴 ∖ { ∅ } ) = ( ran ( 𝑚𝐶 ↦ ( 𝐹𝑚 ) ) ∖ { ∅ } ) )
98 90 89 97 f1oeq123d ( 𝜑 → ( ( 𝐹 ↾ ( 𝐶𝑍 ) ) : ( 𝐶𝑍 ) –1-1-onto→ ( 𝐴 ∖ { ∅ } ) ↔ ( ( 𝑛𝐶 ↦ ( 𝐹𝑛 ) ) ↾ { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } ) : { 𝑚𝐶 ∣ ( 𝐹𝑚 ) ≠ ∅ } –1-1-onto→ ( ran ( 𝑚𝐶 ↦ ( 𝐹𝑚 ) ) ∖ { ∅ } ) ) )
99 41 98 mpbird ( 𝜑 → ( 𝐹 ↾ ( 𝐶𝑍 ) ) : ( 𝐶𝑍 ) –1-1-onto→ ( 𝐴 ∖ { ∅ } ) )
100 fvres ( 𝑛 ∈ ( 𝐶𝑍 ) → ( ( 𝐹 ↾ ( 𝐶𝑍 ) ) ‘ 𝑛 ) = ( 𝐹𝑛 ) )
101 100 adantl ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) → ( ( 𝐹 ↾ ( 𝐶𝑍 ) ) ‘ 𝑛 ) = ( 𝐹𝑛 ) )
102 simpl ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) → 𝜑 )
103 102 44 7 syl2anc ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) → ( 𝐹𝑛 ) = 𝐺 )
104 101 103 eqtrd ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) → ( ( 𝐹 ↾ ( 𝐶𝑍 ) ) ‘ 𝑛 ) = 𝐺 )
105 1 2 3 30 99 104 16 sge0f1o ( 𝜑 → ( Σ^ ‘ ( 𝑘 ∈ ( 𝐴 ∖ { ∅ } ) ↦ 𝐵 ) ) = ( Σ^ ‘ ( 𝑛 ∈ ( 𝐶𝑍 ) ↦ 𝐷 ) ) )
106 7 eqcomd ( ( 𝜑𝑛𝐶 ) → 𝐺 = ( 𝐹𝑛 ) )
107 106 34 eqeltrd ( ( 𝜑𝑛𝐶 ) → 𝐺𝐴 )
108 102 44 107 syl2anc ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) → 𝐺𝐴 )
109 108 ex ( 𝜑 → ( 𝑛 ∈ ( 𝐶𝑍 ) → 𝐺𝐴 ) )
110 109 imdistani ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) → ( 𝜑𝐺𝐴 ) )
111 nfcv 𝑘 𝐺
112 nfv 𝑘 𝐺𝐴
113 1 112 nfan 𝑘 ( 𝜑𝐺𝐴 )
114 nfv 𝑘 𝐷 ∈ ( 0 [,] +∞ )
115 113 114 nfim 𝑘 ( ( 𝜑𝐺𝐴 ) → 𝐷 ∈ ( 0 [,] +∞ ) )
116 eleq1 ( 𝑘 = 𝐺 → ( 𝑘𝐴𝐺𝐴 ) )
117 116 anbi2d ( 𝑘 = 𝐺 → ( ( 𝜑𝑘𝐴 ) ↔ ( 𝜑𝐺𝐴 ) ) )
118 3 eleq1d ( 𝑘 = 𝐺 → ( 𝐵 ∈ ( 0 [,] +∞ ) ↔ 𝐷 ∈ ( 0 [,] +∞ ) ) )
119 117 118 imbi12d ( 𝑘 = 𝐺 → ( ( ( 𝜑𝑘𝐴 ) → 𝐵 ∈ ( 0 [,] +∞ ) ) ↔ ( ( 𝜑𝐺𝐴 ) → 𝐷 ∈ ( 0 [,] +∞ ) ) ) )
120 111 115 119 8 vtoclgf ( 𝐺𝐴 → ( ( 𝜑𝐺𝐴 ) → 𝐷 ∈ ( 0 [,] +∞ ) ) )
121 108 110 120 sylc ( ( 𝜑𝑛 ∈ ( 𝐶𝑍 ) ) → 𝐷 ∈ ( 0 [,] +∞ ) )
122 simpl ( ( 𝜑𝑛 ∈ ( 𝐶 ∖ ( 𝐶𝑍 ) ) ) → 𝜑 )
123 eldifi ( 𝑛 ∈ ( 𝐶 ∖ ( 𝐶𝑍 ) ) → 𝑛𝐶 )
124 123 adantl ( ( 𝜑𝑛 ∈ ( 𝐶 ∖ ( 𝐶𝑍 ) ) ) → 𝑛𝐶 )
125 122 124 107 syl2anc ( ( 𝜑𝑛 ∈ ( 𝐶 ∖ ( 𝐶𝑍 ) ) ) → 𝐺𝐴 )
126 dfin4 ( 𝑍𝐶 ) = ( 𝑍 ∖ ( 𝑍𝐶 ) )
127 difss ( 𝑍 ∖ ( 𝑍𝐶 ) ) ⊆ 𝑍
128 126 127 eqsstri ( 𝑍𝐶 ) ⊆ 𝑍
129 inss2 ( 𝐶𝑍 ) ⊆ 𝑍
130 id ( 𝑛 ∈ ( 𝐶 ∖ ( 𝐶𝑍 ) ) → 𝑛 ∈ ( 𝐶 ∖ ( 𝐶𝑍 ) ) )
131 dfin4 ( 𝐶𝑍 ) = ( 𝐶 ∖ ( 𝐶𝑍 ) )
132 131 eqcomi ( 𝐶 ∖ ( 𝐶𝑍 ) ) = ( 𝐶𝑍 )
133 130 132 eleqtrdi ( 𝑛 ∈ ( 𝐶 ∖ ( 𝐶𝑍 ) ) → 𝑛 ∈ ( 𝐶𝑍 ) )
134 129 133 sselid ( 𝑛 ∈ ( 𝐶 ∖ ( 𝐶𝑍 ) ) → 𝑛𝑍 )
135 134 123 elind ( 𝑛 ∈ ( 𝐶 ∖ ( 𝐶𝑍 ) ) → 𝑛 ∈ ( 𝑍𝐶 ) )
136 128 135 sselid ( 𝑛 ∈ ( 𝐶 ∖ ( 𝐶𝑍 ) ) → 𝑛𝑍 )
137 136 adantl ( ( 𝜑𝑛 ∈ ( 𝐶 ∖ ( 𝐶𝑍 ) ) ) → 𝑛𝑍 )
138 74 eqcomd ( ( 𝜑𝑛𝑍 ) → ∅ = ( 𝐹𝑛 ) )
139 simpl ( ( 𝜑𝑛𝑍 ) → 𝜑 )
140 71 simpld ( ( 𝜑𝑛𝑍 ) → 𝑛𝐶 )
141 139 140 7 syl2anc ( ( 𝜑𝑛𝑍 ) → ( 𝐹𝑛 ) = 𝐺 )
142 138 141 eqtr2d ( ( 𝜑𝑛𝑍 ) → 𝐺 = ∅ )
143 122 137 142 syl2anc ( ( 𝜑𝑛 ∈ ( 𝐶 ∖ ( 𝐶𝑍 ) ) ) → 𝐺 = ∅ )
144 122 143 jca ( ( 𝜑𝑛 ∈ ( 𝐶 ∖ ( 𝐶𝑍 ) ) ) → ( 𝜑𝐺 = ∅ ) )
145 nfv 𝑘 𝐺 = ∅
146 1 145 nfan 𝑘 ( 𝜑𝐺 = ∅ )
147 nfv 𝑘 𝐷 = 0
148 146 147 nfim 𝑘 ( ( 𝜑𝐺 = ∅ ) → 𝐷 = 0 )
149 eqeq1 ( 𝑘 = 𝐺 → ( 𝑘 = ∅ ↔ 𝐺 = ∅ ) )
150 149 anbi2d ( 𝑘 = 𝐺 → ( ( 𝜑𝑘 = ∅ ) ↔ ( 𝜑𝐺 = ∅ ) ) )
151 3 eqeq1d ( 𝑘 = 𝐺 → ( 𝐵 = 0 ↔ 𝐷 = 0 ) )
152 150 151 imbi12d ( 𝑘 = 𝐺 → ( ( ( 𝜑𝑘 = ∅ ) → 𝐵 = 0 ) ↔ ( ( 𝜑𝐺 = ∅ ) → 𝐷 = 0 ) ) )
153 111 148 152 9 vtoclgf ( 𝐺𝐴 → ( ( 𝜑𝐺 = ∅ ) → 𝐷 = 0 ) )
154 125 144 153 sylc ( ( 𝜑𝑛 ∈ ( 𝐶 ∖ ( 𝐶𝑍 ) ) ) → 𝐷 = 0 )
155 2 4 43 121 154 sge0ss ( 𝜑 → ( Σ^ ‘ ( 𝑛 ∈ ( 𝐶𝑍 ) ↦ 𝐷 ) ) = ( Σ^ ‘ ( 𝑛𝐶𝐷 ) ) )
156 29 105 155 3eqtrd ( 𝜑 → ( Σ^ ‘ ( 𝑘𝐴𝐵 ) ) = ( Σ^ ‘ ( 𝑛𝐶𝐷 ) ) )