MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  sumeq2ii Structured version   Visualization version   GIF version

Theorem sumeq2ii 14831
Description: Equality theorem for sum, with the class expressions 𝐵 and 𝐶 guarded by I to be always sets. (Contributed by Mario Carneiro, 13-Jun-2019.)
Assertion
Ref Expression
sumeq2ii (∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) → Σ𝑘𝐴 𝐵 = Σ𝑘𝐴 𝐶)
Distinct variable group:   𝐴,𝑘
Allowed substitution hints:   𝐵(𝑘)   𝐶(𝑘)

Proof of Theorem sumeq2ii
Dummy variables 𝑓 𝑚 𝑛 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simpr 479 . . . . . . . 8 ((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℤ) → 𝑚 ∈ ℤ)
2 simpr 479 . . . . . . . . . . . . . 14 ((((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℤ) ∧ 𝑥 ∈ (ℤ𝑚)) ∧ 𝑛𝐴) → 𝑛𝐴)
3 simplll 765 . . . . . . . . . . . . . 14 ((((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℤ) ∧ 𝑥 ∈ (ℤ𝑚)) ∧ 𝑛𝐴) → ∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶))
4 nfcv 2934 . . . . . . . . . . . . . . . . 17 𝑘 I
5 nfcsb1v 3767 . . . . . . . . . . . . . . . . 17 𝑘𝑛 / 𝑘𝐵
64, 5nffv 6456 . . . . . . . . . . . . . . . 16 𝑘( I ‘𝑛 / 𝑘𝐵)
7 nfcsb1v 3767 . . . . . . . . . . . . . . . . 17 𝑘𝑛 / 𝑘𝐶
84, 7nffv 6456 . . . . . . . . . . . . . . . 16 𝑘( I ‘𝑛 / 𝑘𝐶)
96, 8nfeq 2945 . . . . . . . . . . . . . . 15 𝑘( I ‘𝑛 / 𝑘𝐵) = ( I ‘𝑛 / 𝑘𝐶)
10 csbeq1a 3760 . . . . . . . . . . . . . . . . 17 (𝑘 = 𝑛𝐵 = 𝑛 / 𝑘𝐵)
1110fveq2d 6450 . . . . . . . . . . . . . . . 16 (𝑘 = 𝑛 → ( I ‘𝐵) = ( I ‘𝑛 / 𝑘𝐵))
12 csbeq1a 3760 . . . . . . . . . . . . . . . . 17 (𝑘 = 𝑛𝐶 = 𝑛 / 𝑘𝐶)
1312fveq2d 6450 . . . . . . . . . . . . . . . 16 (𝑘 = 𝑛 → ( I ‘𝐶) = ( I ‘𝑛 / 𝑘𝐶))
1411, 13eqeq12d 2793 . . . . . . . . . . . . . . 15 (𝑘 = 𝑛 → (( I ‘𝐵) = ( I ‘𝐶) ↔ ( I ‘𝑛 / 𝑘𝐵) = ( I ‘𝑛 / 𝑘𝐶)))
159, 14rspc 3505 . . . . . . . . . . . . . 14 (𝑛𝐴 → (∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) → ( I ‘𝑛 / 𝑘𝐵) = ( I ‘𝑛 / 𝑘𝐶)))
162, 3, 15sylc 65 . . . . . . . . . . . . 13 ((((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℤ) ∧ 𝑥 ∈ (ℤ𝑚)) ∧ 𝑛𝐴) → ( I ‘𝑛 / 𝑘𝐵) = ( I ‘𝑛 / 𝑘𝐶))
1716ifeq1da 4337 . . . . . . . . . . . 12 (((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℤ) ∧ 𝑥 ∈ (ℤ𝑚)) → if(𝑛𝐴, ( I ‘𝑛 / 𝑘𝐵), ( I ‘0)) = if(𝑛𝐴, ( I ‘𝑛 / 𝑘𝐶), ( I ‘0)))
18 fvif 6462 . . . . . . . . . . . 12 ( I ‘if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0)) = if(𝑛𝐴, ( I ‘𝑛 / 𝑘𝐵), ( I ‘0))
19 fvif 6462 . . . . . . . . . . . 12 ( I ‘if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0)) = if(𝑛𝐴, ( I ‘𝑛 / 𝑘𝐶), ( I ‘0))
2017, 18, 193eqtr4g 2839 . . . . . . . . . . 11 (((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℤ) ∧ 𝑥 ∈ (ℤ𝑚)) → ( I ‘if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0)) = ( I ‘if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0)))
2120mpteq2dv 4980 . . . . . . . . . 10 (((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℤ) ∧ 𝑥 ∈ (ℤ𝑚)) → (𝑛 ∈ ℤ ↦ ( I ‘if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0))) = (𝑛 ∈ ℤ ↦ ( I ‘if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0))))
2221fveq1d 6448 . . . . . . . . 9 (((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℤ) ∧ 𝑥 ∈ (ℤ𝑚)) → ((𝑛 ∈ ℤ ↦ ( I ‘if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0)))‘𝑥) = ((𝑛 ∈ ℤ ↦ ( I ‘if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0)))‘𝑥))
23 eqid 2778 . . . . . . . . . 10 (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0)) = (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0))
24 eqid 2778 . . . . . . . . . 10 (𝑛 ∈ ℤ ↦ ( I ‘if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0))) = (𝑛 ∈ ℤ ↦ ( I ‘if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0)))
2523, 24fvmptex 6555 . . . . . . . . 9 ((𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0))‘𝑥) = ((𝑛 ∈ ℤ ↦ ( I ‘if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0)))‘𝑥)
26 eqid 2778 . . . . . . . . . 10 (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0)) = (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0))
27 eqid 2778 . . . . . . . . . 10 (𝑛 ∈ ℤ ↦ ( I ‘if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0))) = (𝑛 ∈ ℤ ↦ ( I ‘if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0)))
2826, 27fvmptex 6555 . . . . . . . . 9 ((𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0))‘𝑥) = ((𝑛 ∈ ℤ ↦ ( I ‘if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0)))‘𝑥)
2922, 25, 283eqtr4g 2839 . . . . . . . 8 (((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℤ) ∧ 𝑥 ∈ (ℤ𝑚)) → ((𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0))‘𝑥) = ((𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0))‘𝑥))
301, 29seqfeq 13144 . . . . . . 7 ((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℤ) → seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0))) = seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0))))
3130breq1d 4896 . . . . . 6 ((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℤ) → (seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0))) ⇝ 𝑥 ↔ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0))) ⇝ 𝑥))
3231anbi2d 622 . . . . 5 ((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℤ) → ((𝐴 ⊆ (ℤ𝑚) ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0))) ⇝ 𝑥) ↔ (𝐴 ⊆ (ℤ𝑚) ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0))) ⇝ 𝑥)))
3332rexbidva 3234 . . . 4 (∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) → (∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ𝑚) ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0))) ⇝ 𝑥) ↔ ∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ𝑚) ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0))) ⇝ 𝑥)))
34 simplr 759 . . . . . . . . . 10 (((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto𝐴) → 𝑚 ∈ ℕ)
35 nnuz 12029 . . . . . . . . . 10 ℕ = (ℤ‘1)
3634, 35syl6eleq 2869 . . . . . . . . 9 (((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto𝐴) → 𝑚 ∈ (ℤ‘1))
37 f1of 6391 . . . . . . . . . . . . . 14 (𝑓:(1...𝑚)–1-1-onto𝐴𝑓:(1...𝑚)⟶𝐴)
3837ad2antlr 717 . . . . . . . . . . . . 13 ((((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto𝐴) ∧ 𝑥 ∈ (1...𝑚)) → 𝑓:(1...𝑚)⟶𝐴)
39 ffvelrn 6621 . . . . . . . . . . . . 13 ((𝑓:(1...𝑚)⟶𝐴𝑥 ∈ (1...𝑚)) → (𝑓𝑥) ∈ 𝐴)
4038, 39sylancom 582 . . . . . . . . . . . 12 ((((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto𝐴) ∧ 𝑥 ∈ (1...𝑚)) → (𝑓𝑥) ∈ 𝐴)
41 simplll 765 . . . . . . . . . . . 12 ((((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto𝐴) ∧ 𝑥 ∈ (1...𝑚)) → ∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶))
42 nfcsb1v 3767 . . . . . . . . . . . . . 14 𝑘(𝑓𝑥) / 𝑘( I ‘𝐵)
43 nfcsb1v 3767 . . . . . . . . . . . . . 14 𝑘(𝑓𝑥) / 𝑘( I ‘𝐶)
4442, 43nfeq 2945 . . . . . . . . . . . . 13 𝑘(𝑓𝑥) / 𝑘( I ‘𝐵) = (𝑓𝑥) / 𝑘( I ‘𝐶)
45 csbeq1a 3760 . . . . . . . . . . . . . 14 (𝑘 = (𝑓𝑥) → ( I ‘𝐵) = (𝑓𝑥) / 𝑘( I ‘𝐵))
46 csbeq1a 3760 . . . . . . . . . . . . . 14 (𝑘 = (𝑓𝑥) → ( I ‘𝐶) = (𝑓𝑥) / 𝑘( I ‘𝐶))
4745, 46eqeq12d 2793 . . . . . . . . . . . . 13 (𝑘 = (𝑓𝑥) → (( I ‘𝐵) = ( I ‘𝐶) ↔ (𝑓𝑥) / 𝑘( I ‘𝐵) = (𝑓𝑥) / 𝑘( I ‘𝐶)))
4844, 47rspc 3505 . . . . . . . . . . . 12 ((𝑓𝑥) ∈ 𝐴 → (∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) → (𝑓𝑥) / 𝑘( I ‘𝐵) = (𝑓𝑥) / 𝑘( I ‘𝐶)))
4940, 41, 48sylc 65 . . . . . . . . . . 11 ((((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto𝐴) ∧ 𝑥 ∈ (1...𝑚)) → (𝑓𝑥) / 𝑘( I ‘𝐵) = (𝑓𝑥) / 𝑘( I ‘𝐶))
50 fvex 6459 . . . . . . . . . . . 12 (𝑓𝑥) ∈ V
51 csbfv2g 6491 . . . . . . . . . . . 12 ((𝑓𝑥) ∈ V → (𝑓𝑥) / 𝑘( I ‘𝐵) = ( I ‘(𝑓𝑥) / 𝑘𝐵))
5250, 51ax-mp 5 . . . . . . . . . . 11 (𝑓𝑥) / 𝑘( I ‘𝐵) = ( I ‘(𝑓𝑥) / 𝑘𝐵)
53 csbfv2g 6491 . . . . . . . . . . . 12 ((𝑓𝑥) ∈ V → (𝑓𝑥) / 𝑘( I ‘𝐶) = ( I ‘(𝑓𝑥) / 𝑘𝐶))
5450, 53ax-mp 5 . . . . . . . . . . 11 (𝑓𝑥) / 𝑘( I ‘𝐶) = ( I ‘(𝑓𝑥) / 𝑘𝐶)
5549, 52, 543eqtr3g 2837 . . . . . . . . . 10 ((((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto𝐴) ∧ 𝑥 ∈ (1...𝑚)) → ( I ‘(𝑓𝑥) / 𝑘𝐵) = ( I ‘(𝑓𝑥) / 𝑘𝐶))
56 elfznn 12687 . . . . . . . . . . . 12 (𝑥 ∈ (1...𝑚) → 𝑥 ∈ ℕ)
5756adantl 475 . . . . . . . . . . 11 ((((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto𝐴) ∧ 𝑥 ∈ (1...𝑚)) → 𝑥 ∈ ℕ)
58 fveq2 6446 . . . . . . . . . . . . 13 (𝑛 = 𝑥 → (𝑓𝑛) = (𝑓𝑥))
5958csbeq1d 3758 . . . . . . . . . . . 12 (𝑛 = 𝑥(𝑓𝑛) / 𝑘𝐵 = (𝑓𝑥) / 𝑘𝐵)
60 eqid 2778 . . . . . . . . . . . 12 (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐵) = (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐵)
6159, 60fvmpti 6541 . . . . . . . . . . 11 (𝑥 ∈ ℕ → ((𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐵)‘𝑥) = ( I ‘(𝑓𝑥) / 𝑘𝐵))
6257, 61syl 17 . . . . . . . . . 10 ((((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto𝐴) ∧ 𝑥 ∈ (1...𝑚)) → ((𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐵)‘𝑥) = ( I ‘(𝑓𝑥) / 𝑘𝐵))
6358csbeq1d 3758 . . . . . . . . . . . 12 (𝑛 = 𝑥(𝑓𝑛) / 𝑘𝐶 = (𝑓𝑥) / 𝑘𝐶)
64 eqid 2778 . . . . . . . . . . . 12 (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐶) = (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐶)
6563, 64fvmpti 6541 . . . . . . . . . . 11 (𝑥 ∈ ℕ → ((𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐶)‘𝑥) = ( I ‘(𝑓𝑥) / 𝑘𝐶))
6657, 65syl 17 . . . . . . . . . 10 ((((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto𝐴) ∧ 𝑥 ∈ (1...𝑚)) → ((𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐶)‘𝑥) = ( I ‘(𝑓𝑥) / 𝑘𝐶))
6755, 62, 663eqtr4d 2824 . . . . . . . . 9 ((((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto𝐴) ∧ 𝑥 ∈ (1...𝑚)) → ((𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐵)‘𝑥) = ((𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐶)‘𝑥))
6836, 67seqfveq 13143 . . . . . . . 8 (((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto𝐴) → (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐵))‘𝑚) = (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐶))‘𝑚))
6968eqeq2d 2788 . . . . . . 7 (((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto𝐴) → (𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐵))‘𝑚) ↔ 𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐶))‘𝑚)))
7069pm5.32da 574 . . . . . 6 ((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℕ) → ((𝑓:(1...𝑚)–1-1-onto𝐴𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐵))‘𝑚)) ↔ (𝑓:(1...𝑚)–1-1-onto𝐴𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐶))‘𝑚))))
7170exbidv 1964 . . . . 5 ((∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) ∧ 𝑚 ∈ ℕ) → (∃𝑓(𝑓:(1...𝑚)–1-1-onto𝐴𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐵))‘𝑚)) ↔ ∃𝑓(𝑓:(1...𝑚)–1-1-onto𝐴𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐶))‘𝑚))))
7271rexbidva 3234 . . . 4 (∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) → (∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto𝐴𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐵))‘𝑚)) ↔ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto𝐴𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐶))‘𝑚))))
7333, 72orbi12d 905 . . 3 (∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) → ((∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ𝑚) ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0))) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto𝐴𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐵))‘𝑚))) ↔ (∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ𝑚) ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0))) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto𝐴𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐶))‘𝑚)))))
7473iotabidv 6120 . 2 (∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) → (℩𝑥(∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ𝑚) ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0))) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto𝐴𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐵))‘𝑚)))) = (℩𝑥(∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ𝑚) ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0))) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto𝐴𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐶))‘𝑚)))))
75 df-sum 14825 . 2 Σ𝑘𝐴 𝐵 = (℩𝑥(∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ𝑚) ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐵, 0))) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto𝐴𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐵))‘𝑚))))
76 df-sum 14825 . 2 Σ𝑘𝐴 𝐶 = (℩𝑥(∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ𝑚) ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛𝐴, 𝑛 / 𝑘𝐶, 0))) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto𝐴𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ (𝑓𝑛) / 𝑘𝐶))‘𝑚))))
7774, 75, 763eqtr4g 2839 1 (∀𝑘𝐴 ( I ‘𝐵) = ( I ‘𝐶) → Σ𝑘𝐴 𝐵 = Σ𝑘𝐴 𝐶)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 386  wo 836   = wceq 1601  wex 1823  wcel 2107  wral 3090  wrex 3091  Vcvv 3398  csb 3751  wss 3792  ifcif 4307   class class class wbr 4886  cmpt 4965   I cid 5260  cio 6097  wf 6131  1-1-ontowf1o 6134  cfv 6135  (class class class)co 6922  0cc0 10272  1c1 10273   + caddc 10275  cn 11374  cz 11728  cuz 11992  ...cfz 12643  seqcseq 13119  cli 14623  Σcsu 14824
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1839  ax-4 1853  ax-5 1953  ax-6 2021  ax-7 2055  ax-8 2109  ax-9 2116  ax-10 2135  ax-11 2150  ax-12 2163  ax-13 2334  ax-ext 2754  ax-sep 5017  ax-nul 5025  ax-pow 5077  ax-pr 5138  ax-un 7226  ax-cnex 10328  ax-resscn 10329  ax-1cn 10330  ax-icn 10331  ax-addcl 10332  ax-addrcl 10333  ax-mulcl 10334  ax-mulrcl 10335  ax-mulcom 10336  ax-addass 10337  ax-mulass 10338  ax-distr 10339  ax-i2m1 10340  ax-1ne0 10341  ax-1rid 10342  ax-rnegex 10343  ax-rrecex 10344  ax-cnre 10345  ax-pre-lttri 10346  ax-pre-lttrn 10347  ax-pre-ltadd 10348  ax-pre-mulgt0 10349
This theorem depends on definitions:  df-bi 199  df-an 387  df-or 837  df-3or 1072  df-3an 1073  df-tru 1605  df-fal 1615  df-ex 1824  df-nf 1828  df-sb 2012  df-mo 2551  df-eu 2587  df-clab 2764  df-cleq 2770  df-clel 2774  df-nfc 2921  df-ne 2970  df-nel 3076  df-ral 3095  df-rex 3096  df-reu 3097  df-rab 3099  df-v 3400  df-sbc 3653  df-csb 3752  df-dif 3795  df-un 3797  df-in 3799  df-ss 3806  df-pss 3808  df-nul 4142  df-if 4308  df-pw 4381  df-sn 4399  df-pr 4401  df-tp 4403  df-op 4405  df-uni 4672  df-iun 4755  df-br 4887  df-opab 4949  df-mpt 4966  df-tr 4988  df-id 5261  df-eprel 5266  df-po 5274  df-so 5275  df-fr 5314  df-we 5316  df-xp 5361  df-rel 5362  df-cnv 5363  df-co 5364  df-dm 5365  df-rn 5366  df-res 5367  df-ima 5368  df-pred 5933  df-ord 5979  df-on 5980  df-lim 5981  df-suc 5982  df-iota 6099  df-fun 6137  df-fn 6138  df-f 6139  df-f1 6140  df-fo 6141  df-f1o 6142  df-fv 6143  df-riota 6883  df-ov 6925  df-oprab 6926  df-mpt2 6927  df-om 7344  df-1st 7445  df-2nd 7446  df-wrecs 7689  df-recs 7751  df-rdg 7789  df-er 8026  df-en 8242  df-dom 8243  df-sdom 8244  df-pnf 10413  df-mnf 10414  df-xr 10415  df-ltxr 10416  df-le 10417  df-sub 10608  df-neg 10609  df-nn 11375  df-n0 11643  df-z 11729  df-uz 11993  df-fz 12644  df-seq 13120  df-sum 14825
This theorem is referenced by:  sumeq2  14832  sum2id  14846
  Copyright terms: Public domain W3C validator