| Step | Hyp | Ref
| Expression |
| 1 | | 3simpb 997 |
. . . . . . . 8
⊢ ((𝐴 ⊆
(ℤ≥‘𝑚) ∧ ∀𝑗 ∈ (ℤ≥‘𝑚)DECID 𝑗 ∈ 𝐴 ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) → (𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) |
| 2 | | eleq1w 2257 |
. . . . . . . . . . . . 13
⊢ (𝑛 = 𝑖 → (𝑛 ∈ 𝐴 ↔ 𝑖 ∈ 𝐴)) |
| 3 | | csbeq1 3087 |
. . . . . . . . . . . . 13
⊢ (𝑛 = 𝑖 → ⦋𝑛 / 𝑘⦌𝐵 = ⦋𝑖 / 𝑘⦌𝐵) |
| 4 | 2, 3 | ifbieq1d 3583 |
. . . . . . . . . . . 12
⊢ (𝑛 = 𝑖 → if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0) = if(𝑖 ∈ 𝐴, ⦋𝑖 / 𝑘⦌𝐵, 0)) |
| 5 | 4 | cbvmptv 4129 |
. . . . . . . . . . 11
⊢ (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0)) = (𝑖 ∈ ℤ ↦ if(𝑖 ∈ 𝐴, ⦋𝑖 / 𝑘⦌𝐵, 0)) |
| 6 | | simpr 110 |
. . . . . . . . . . . 12
⊢ ((((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆ (ℤ≥‘𝑚)) ∧ 𝑖 ∈ 𝐴) → 𝑖 ∈ 𝐴) |
| 7 | | zisum.5 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ ℂ) |
| 8 | 7 | ralrimiva 2570 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ∀𝑘 ∈ 𝐴 𝐵 ∈ ℂ) |
| 9 | 8 | ad3antrrr 492 |
. . . . . . . . . . . 12
⊢ ((((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆ (ℤ≥‘𝑚)) ∧ 𝑖 ∈ 𝐴) → ∀𝑘 ∈ 𝐴 𝐵 ∈ ℂ) |
| 10 | | nfcsb1v 3117 |
. . . . . . . . . . . . . 14
⊢
Ⅎ𝑘⦋𝑖 / 𝑘⦌𝐵 |
| 11 | 10 | nfel1 2350 |
. . . . . . . . . . . . 13
⊢
Ⅎ𝑘⦋𝑖 / 𝑘⦌𝐵 ∈ ℂ |
| 12 | | csbeq1a 3093 |
. . . . . . . . . . . . . 14
⊢ (𝑘 = 𝑖 → 𝐵 = ⦋𝑖 / 𝑘⦌𝐵) |
| 13 | 12 | eleq1d 2265 |
. . . . . . . . . . . . 13
⊢ (𝑘 = 𝑖 → (𝐵 ∈ ℂ ↔ ⦋𝑖 / 𝑘⦌𝐵 ∈ ℂ)) |
| 14 | 11, 13 | rspc 2862 |
. . . . . . . . . . . 12
⊢ (𝑖 ∈ 𝐴 → (∀𝑘 ∈ 𝐴 𝐵 ∈ ℂ → ⦋𝑖 / 𝑘⦌𝐵 ∈ ℂ)) |
| 15 | 6, 9, 14 | sylc 62 |
. . . . . . . . . . 11
⊢ ((((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆ (ℤ≥‘𝑚)) ∧ 𝑖 ∈ 𝐴) → ⦋𝑖 / 𝑘⦌𝐵 ∈ ℂ) |
| 16 | | simplr 528 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆ (ℤ≥‘𝑚)) → 𝑚 ∈ ℤ) |
| 17 | | zisum.2 |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝑀 ∈ ℤ) |
| 18 | 17 | ad2antrr 488 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆ (ℤ≥‘𝑚)) → 𝑀 ∈ ℤ) |
| 19 | | simpr 110 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆ (ℤ≥‘𝑚)) → 𝐴 ⊆ (ℤ≥‘𝑚)) |
| 20 | | zisum.3 |
. . . . . . . . . . . . 13
⊢ (𝜑 → 𝐴 ⊆ 𝑍) |
| 21 | | zisum.1 |
. . . . . . . . . . . . 13
⊢ 𝑍 =
(ℤ≥‘𝑀) |
| 22 | 20, 21 | sseqtrdi 3231 |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝐴 ⊆ (ℤ≥‘𝑀)) |
| 23 | 22 | ad2antrr 488 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆ (ℤ≥‘𝑚)) → 𝐴 ⊆ (ℤ≥‘𝑀)) |
| 24 | | zisum.dc |
. . . . . . . . . . . . . . . . . 18
⊢ (𝜑 → ∀𝑥 ∈ 𝑍 DECID 𝑥 ∈ 𝐴) |
| 25 | 21 | raleqi 2697 |
. . . . . . . . . . . . . . . . . 18
⊢
(∀𝑥 ∈
𝑍 DECID
𝑥 ∈ 𝐴 ↔ ∀𝑥 ∈ (ℤ≥‘𝑀)DECID 𝑥 ∈ 𝐴) |
| 26 | 24, 25 | sylib 122 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → ∀𝑥 ∈ (ℤ≥‘𝑀)DECID 𝑥 ∈ 𝐴) |
| 27 | | eleq1w 2257 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝑥 = 𝑖 → (𝑥 ∈ 𝐴 ↔ 𝑖 ∈ 𝐴)) |
| 28 | 27 | dcbid 839 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑥 = 𝑖 → (DECID 𝑥 ∈ 𝐴 ↔ DECID 𝑖 ∈ 𝐴)) |
| 29 | 28 | cbvralv 2729 |
. . . . . . . . . . . . . . . . 17
⊢
(∀𝑥 ∈
(ℤ≥‘𝑀)DECID 𝑥 ∈ 𝐴 ↔ ∀𝑖 ∈ (ℤ≥‘𝑀)DECID 𝑖 ∈ 𝐴) |
| 30 | 26, 29 | sylib 122 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → ∀𝑖 ∈ (ℤ≥‘𝑀)DECID 𝑖 ∈ 𝐴) |
| 31 | 30 | r19.21bi 2585 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ 𝑖 ∈ (ℤ≥‘𝑀)) → DECID
𝑖 ∈ 𝐴) |
| 32 | 31 | adantlr 477 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝑖 ∈ (ℤ≥‘𝑀)) → DECID
𝑖 ∈ 𝐴) |
| 33 | 32 | adantlr 477 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆ (ℤ≥‘𝑚)) ∧ 𝑖 ∈ (ℤ≥‘𝑀)) → DECID
𝑖 ∈ 𝐴) |
| 34 | 33 | adantlr 477 |
. . . . . . . . . . . 12
⊢
(((((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆
(ℤ≥‘𝑚)) ∧ 𝑖 ∈ (ℤ≥‘𝑚)) ∧ 𝑖 ∈ (ℤ≥‘𝑀)) → DECID
𝑖 ∈ 𝐴) |
| 35 | | simp-4l 541 |
. . . . . . . . . . . . . . 15
⊢
(((((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆
(ℤ≥‘𝑚)) ∧ 𝑖 ∈ (ℤ≥‘𝑚)) ∧ ¬ 𝑖 ∈
(ℤ≥‘𝑀)) → 𝜑) |
| 36 | | simpr 110 |
. . . . . . . . . . . . . . 15
⊢
(((((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆
(ℤ≥‘𝑚)) ∧ 𝑖 ∈ (ℤ≥‘𝑚)) ∧ ¬ 𝑖 ∈
(ℤ≥‘𝑀)) → ¬ 𝑖 ∈ (ℤ≥‘𝑀)) |
| 37 | 22 | ssneld 3185 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → (¬ 𝑖 ∈ (ℤ≥‘𝑀) → ¬ 𝑖 ∈ 𝐴)) |
| 38 | 35, 36, 37 | sylc 62 |
. . . . . . . . . . . . . 14
⊢
(((((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆
(ℤ≥‘𝑚)) ∧ 𝑖 ∈ (ℤ≥‘𝑚)) ∧ ¬ 𝑖 ∈
(ℤ≥‘𝑀)) → ¬ 𝑖 ∈ 𝐴) |
| 39 | 38 | olcd 735 |
. . . . . . . . . . . . 13
⊢
(((((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆
(ℤ≥‘𝑚)) ∧ 𝑖 ∈ (ℤ≥‘𝑚)) ∧ ¬ 𝑖 ∈
(ℤ≥‘𝑀)) → (𝑖 ∈ 𝐴 ∨ ¬ 𝑖 ∈ 𝐴)) |
| 40 | | df-dc 836 |
. . . . . . . . . . . . 13
⊢
(DECID 𝑖 ∈ 𝐴 ↔ (𝑖 ∈ 𝐴 ∨ ¬ 𝑖 ∈ 𝐴)) |
| 41 | 39, 40 | sylibr 134 |
. . . . . . . . . . . 12
⊢
(((((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆
(ℤ≥‘𝑚)) ∧ 𝑖 ∈ (ℤ≥‘𝑚)) ∧ ¬ 𝑖 ∈
(ℤ≥‘𝑀)) → DECID 𝑖 ∈ 𝐴) |
| 42 | | eluzelz 9610 |
. . . . . . . . . . . . . 14
⊢ (𝑖 ∈
(ℤ≥‘𝑚) → 𝑖 ∈ ℤ) |
| 43 | | eluzdc 9684 |
. . . . . . . . . . . . . 14
⊢ ((𝑀 ∈ ℤ ∧ 𝑖 ∈ ℤ) →
DECID 𝑖
∈ (ℤ≥‘𝑀)) |
| 44 | 18, 42, 43 | syl2an 289 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆ (ℤ≥‘𝑚)) ∧ 𝑖 ∈ (ℤ≥‘𝑚)) → DECID
𝑖 ∈
(ℤ≥‘𝑀)) |
| 45 | | exmiddc 837 |
. . . . . . . . . . . . 13
⊢
(DECID 𝑖 ∈ (ℤ≥‘𝑀) → (𝑖 ∈ (ℤ≥‘𝑀) ∨ ¬ 𝑖 ∈ (ℤ≥‘𝑀))) |
| 46 | 44, 45 | syl 14 |
. . . . . . . . . . . 12
⊢ ((((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆ (ℤ≥‘𝑚)) ∧ 𝑖 ∈ (ℤ≥‘𝑚)) → (𝑖 ∈ (ℤ≥‘𝑀) ∨ ¬ 𝑖 ∈ (ℤ≥‘𝑀))) |
| 47 | 34, 41, 46 | mpjaodan 799 |
. . . . . . . . . . 11
⊢ ((((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆ (ℤ≥‘𝑚)) ∧ 𝑖 ∈ (ℤ≥‘𝑚)) → DECID
𝑖 ∈ 𝐴) |
| 48 | 5, 15, 16, 18, 19, 23, 47, 33 | sumrbdc 11544 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆ (ℤ≥‘𝑚)) → (seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥 ↔ seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) |
| 49 | 48 | biimpd 144 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑚 ∈ ℤ) ∧ 𝐴 ⊆ (ℤ≥‘𝑚)) → (seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥 → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) |
| 50 | 49 | expimpd 363 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ ℤ) → ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) |
| 51 | 1, 50 | syl5 32 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ ℤ) → ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∀𝑗 ∈
(ℤ≥‘𝑚)DECID 𝑗 ∈ 𝐴 ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) |
| 52 | 51 | rexlimdva 2614 |
. . . . . 6
⊢ (𝜑 → (∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∀𝑗 ∈
(ℤ≥‘𝑚)DECID 𝑗 ∈ 𝐴 ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) |
| 53 | | uzssz 9621 |
. . . . . . . . . . . . . 14
⊢
(ℤ≥‘𝑀) ⊆ ℤ |
| 54 | 22, 53 | sstrdi 3195 |
. . . . . . . . . . . . 13
⊢ (𝜑 → 𝐴 ⊆ ℤ) |
| 55 | 54 | ad2antrr 488 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto→𝐴) → 𝐴 ⊆ ℤ) |
| 56 | | 1zzd 9353 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto→𝐴) → 1 ∈
ℤ) |
| 57 | | simplr 528 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto→𝐴) → 𝑚 ∈ ℕ) |
| 58 | 57 | nnzd 9447 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto→𝐴) → 𝑚 ∈ ℤ) |
| 59 | 56, 58 | fzfigd 10523 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto→𝐴) → (1...𝑚) ∈ Fin) |
| 60 | | simpr 110 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto→𝐴) → 𝑓:(1...𝑚)–1-1-onto→𝐴) |
| 61 | | f1oeng 6816 |
. . . . . . . . . . . . . . 15
⊢
(((1...𝑚) ∈ Fin
∧ 𝑓:(1...𝑚)–1-1-onto→𝐴) → (1...𝑚) ≈ 𝐴) |
| 62 | 59, 60, 61 | syl2anc 411 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto→𝐴) → (1...𝑚) ≈ 𝐴) |
| 63 | 62 | ensymd 6842 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto→𝐴) → 𝐴 ≈ (1...𝑚)) |
| 64 | | enfii 6935 |
. . . . . . . . . . . . 13
⊢
(((1...𝑚) ∈ Fin
∧ 𝐴 ≈ (1...𝑚)) → 𝐴 ∈ Fin) |
| 65 | 59, 63, 64 | syl2anc 411 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto→𝐴) → 𝐴 ∈ Fin) |
| 66 | | zfz1iso 10933 |
. . . . . . . . . . . 12
⊢ ((𝐴 ⊆ ℤ ∧ 𝐴 ∈ Fin) → ∃𝑔 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴)) |
| 67 | 55, 65, 66 | syl2anc 411 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto→𝐴) → ∃𝑔 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴)) |
| 68 | | simpr 110 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) ∧ 𝑖 ∈ 𝐴) → 𝑖 ∈ 𝐴) |
| 69 | 8 | ad3antrrr 492 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) ∧ 𝑖 ∈ 𝐴) → ∀𝑘 ∈ 𝐴 𝐵 ∈ ℂ) |
| 70 | 68, 69, 14 | sylc 62 |
. . . . . . . . . . . . . . 15
⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) ∧ 𝑖 ∈ 𝐴) → ⦋𝑖 / 𝑘⦌𝐵 ∈ ℂ) |
| 71 | 31 | adantlr 477 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑖 ∈ (ℤ≥‘𝑀)) → DECID
𝑖 ∈ 𝐴) |
| 72 | 71 | adantlr 477 |
. . . . . . . . . . . . . . 15
⊢ ((((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) ∧ 𝑖 ∈ (ℤ≥‘𝑀)) → DECID
𝑖 ∈ 𝐴) |
| 73 | | breq1 4036 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑛 = 𝑗 → (𝑛 ≤ (♯‘𝐴) ↔ 𝑗 ≤ (♯‘𝐴))) |
| 74 | | fveq2 5558 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝑛 = 𝑗 → (𝑓‘𝑛) = (𝑓‘𝑗)) |
| 75 | 74 | csbeq1d 3091 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑛 = 𝑗 → ⦋(𝑓‘𝑛) / 𝑘⦌𝐵 = ⦋(𝑓‘𝑗) / 𝑘⦌𝐵) |
| 76 | | csbco 3094 |
. . . . . . . . . . . . . . . . . 18
⊢
⦋(𝑓‘𝑗) / 𝑖⦌⦋𝑖 / 𝑘⦌𝐵 = ⦋(𝑓‘𝑗) / 𝑘⦌𝐵 |
| 77 | 75, 76 | eqtr4di 2247 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑛 = 𝑗 → ⦋(𝑓‘𝑛) / 𝑘⦌𝐵 = ⦋(𝑓‘𝑗) / 𝑖⦌⦋𝑖 / 𝑘⦌𝐵) |
| 78 | 73, 77 | ifbieq1d 3583 |
. . . . . . . . . . . . . . . 16
⊢ (𝑛 = 𝑗 → if(𝑛 ≤ (♯‘𝐴), ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0) = if(𝑗 ≤ (♯‘𝐴), ⦋(𝑓‘𝑗) / 𝑖⦌⦋𝑖 / 𝑘⦌𝐵, 0)) |
| 79 | 78 | cbvmptv 4129 |
. . . . . . . . . . . . . . 15
⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)) = (𝑗 ∈ ℕ ↦ if(𝑗 ≤ (♯‘𝐴), ⦋(𝑓‘𝑗) / 𝑖⦌⦋𝑖 / 𝑘⦌𝐵, 0)) |
| 80 | | eqid 2196 |
. . . . . . . . . . . . . . 15
⊢ (𝑗 ∈ ℕ ↦ if(𝑗 ≤ 𝑚, ⦋(𝑔‘𝑗) / 𝑖⦌⦋𝑖 / 𝑘⦌𝐵, 0)) = (𝑗 ∈ ℕ ↦ if(𝑗 ≤ 𝑚, ⦋(𝑔‘𝑗) / 𝑖⦌⦋𝑖 / 𝑘⦌𝐵, 0)) |
| 81 | | simplr 528 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → 𝑚 ∈ ℕ) |
| 82 | 17 | ad2antrr 488 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → 𝑀 ∈ ℤ) |
| 83 | 22 | ad2antrr 488 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → 𝐴 ⊆ (ℤ≥‘𝑀)) |
| 84 | 60 | adantrr 479 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → 𝑓:(1...𝑚)–1-1-onto→𝐴) |
| 85 | | simprr 531 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴)) |
| 86 | 5, 70, 72, 79, 80, 81, 82, 83, 84, 85 | summodclem2a 11546 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚)) |
| 87 | 59 | adantrr 479 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → (1...𝑚) ∈ Fin) |
| 88 | 87, 84 | fihasheqf1od 10881 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → (♯‘(1...𝑚)) = (♯‘𝐴)) |
| 89 | 81 | nnnn0d 9302 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → 𝑚 ∈ ℕ0) |
| 90 | | hashfz1 10875 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (𝑚 ∈ ℕ0
→ (♯‘(1...𝑚)) = 𝑚) |
| 91 | 89, 90 | syl 14 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → (♯‘(1...𝑚)) = 𝑚) |
| 92 | 88, 91 | eqtr3d 2231 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → (♯‘𝐴) = 𝑚) |
| 93 | 92 | breq2d 4045 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → (𝑛 ≤ (♯‘𝐴) ↔ 𝑛 ≤ 𝑚)) |
| 94 | 93 | ifbid 3582 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → if(𝑛 ≤ (♯‘𝐴), ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0) = if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)) |
| 95 | 94 | mpteq2dv 4124 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)) = (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0))) |
| 96 | 95 | seqeq3d 10547 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0))) = seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))) |
| 97 | 96 | fveq1d 5560 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ (♯‘𝐴), ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚) = (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚)) |
| 98 | 86, 97 | breqtrd 4059 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴))) → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚)) |
| 99 | 98 | expr 375 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto→𝐴) → (𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴) → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚))) |
| 100 | 99 | exlimdv 1833 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto→𝐴) → (∃𝑔 𝑔 Isom < , < ((1...(♯‘𝐴)), 𝐴) → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚))) |
| 101 | 67, 100 | mpd 13 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto→𝐴) → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚)) |
| 102 | | breq2 4037 |
. . . . . . . . . 10
⊢ (𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚) → (seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥 ↔ seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚))) |
| 103 | 101, 102 | syl5ibrcom 157 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑓:(1...𝑚)–1-1-onto→𝐴) → (𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚) → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) |
| 104 | 103 | expimpd 363 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → ((𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚)) → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) |
| 105 | 104 | exlimdv 1833 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚)) → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) |
| 106 | 105 | rexlimdva 2614 |
. . . . . 6
⊢ (𝜑 → (∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚)) → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) |
| 107 | 52, 106 | jaod 718 |
. . . . 5
⊢ (𝜑 → ((∃𝑚 ∈ ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ ∀𝑗 ∈ (ℤ≥‘𝑚)DECID 𝑗 ∈ 𝐴 ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚))) → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) |
| 108 | 17 | adantr 276 |
. . . . . . . 8
⊢ ((𝜑 ∧ seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) → 𝑀 ∈ ℤ) |
| 109 | 22 | adantr 276 |
. . . . . . . 8
⊢ ((𝜑 ∧ seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) → 𝐴 ⊆ (ℤ≥‘𝑀)) |
| 110 | | eleq1w 2257 |
. . . . . . . . . . . 12
⊢ (𝑥 = 𝑗 → (𝑥 ∈ 𝐴 ↔ 𝑗 ∈ 𝐴)) |
| 111 | 110 | dcbid 839 |
. . . . . . . . . . 11
⊢ (𝑥 = 𝑗 → (DECID 𝑥 ∈ 𝐴 ↔ DECID 𝑗 ∈ 𝐴)) |
| 112 | 111 | cbvralv 2729 |
. . . . . . . . . 10
⊢
(∀𝑥 ∈
(ℤ≥‘𝑀)DECID 𝑥 ∈ 𝐴 ↔ ∀𝑗 ∈ (ℤ≥‘𝑀)DECID 𝑗 ∈ 𝐴) |
| 113 | 26, 112 | sylib 122 |
. . . . . . . . 9
⊢ (𝜑 → ∀𝑗 ∈ (ℤ≥‘𝑀)DECID 𝑗 ∈ 𝐴) |
| 114 | 113 | adantr 276 |
. . . . . . . 8
⊢ ((𝜑 ∧ seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) → ∀𝑗 ∈ (ℤ≥‘𝑀)DECID 𝑗 ∈ 𝐴) |
| 115 | | simpr 110 |
. . . . . . . 8
⊢ ((𝜑 ∧ seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) |
| 116 | | fveq2 5558 |
. . . . . . . . . . 11
⊢ (𝑚 = 𝑀 → (ℤ≥‘𝑚) =
(ℤ≥‘𝑀)) |
| 117 | 116 | sseq2d 3213 |
. . . . . . . . . 10
⊢ (𝑚 = 𝑀 → (𝐴 ⊆ (ℤ≥‘𝑚) ↔ 𝐴 ⊆ (ℤ≥‘𝑀))) |
| 118 | 116 | raleqdv 2699 |
. . . . . . . . . 10
⊢ (𝑚 = 𝑀 → (∀𝑗 ∈ (ℤ≥‘𝑚)DECID 𝑗 ∈ 𝐴 ↔ ∀𝑗 ∈ (ℤ≥‘𝑀)DECID 𝑗 ∈ 𝐴)) |
| 119 | | seqeq1 10542 |
. . . . . . . . . . 11
⊢ (𝑚 = 𝑀 → seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) = seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0)))) |
| 120 | 119 | breq1d 4043 |
. . . . . . . . . 10
⊢ (𝑚 = 𝑀 → (seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥 ↔ seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) |
| 121 | 117, 118,
120 | 3anbi123d 1323 |
. . . . . . . . 9
⊢ (𝑚 = 𝑀 → ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∀𝑗 ∈
(ℤ≥‘𝑚)DECID 𝑗 ∈ 𝐴 ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) ↔ (𝐴 ⊆ (ℤ≥‘𝑀) ∧ ∀𝑗 ∈
(ℤ≥‘𝑀)DECID 𝑗 ∈ 𝐴 ∧ seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥))) |
| 122 | 121 | rspcev 2868 |
. . . . . . . 8
⊢ ((𝑀 ∈ ℤ ∧ (𝐴 ⊆
(ℤ≥‘𝑀) ∧ ∀𝑗 ∈ (ℤ≥‘𝑀)DECID 𝑗 ∈ 𝐴 ∧ seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) → ∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∀𝑗 ∈
(ℤ≥‘𝑚)DECID 𝑗 ∈ 𝐴 ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) |
| 123 | 108, 109,
114, 115, 122 | syl13anc 1251 |
. . . . . . 7
⊢ ((𝜑 ∧ seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) → ∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∀𝑗 ∈
(ℤ≥‘𝑚)DECID 𝑗 ∈ 𝐴 ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) |
| 124 | 123 | orcd 734 |
. . . . . 6
⊢ ((𝜑 ∧ seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) → (∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∀𝑗 ∈
(ℤ≥‘𝑚)DECID 𝑗 ∈ 𝐴 ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚)))) |
| 125 | 124 | ex 115 |
. . . . 5
⊢ (𝜑 → (seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥 → (∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∀𝑗 ∈
(ℤ≥‘𝑚)DECID 𝑗 ∈ 𝐴 ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚))))) |
| 126 | 107, 125 | impbid 129 |
. . . 4
⊢ (𝜑 → ((∃𝑚 ∈ ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ ∀𝑗 ∈ (ℤ≥‘𝑚)DECID 𝑗 ∈ 𝐴 ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚))) ↔ seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥)) |
| 127 | | eluzelz 9610 |
. . . . . . . 8
⊢ (𝑎 ∈
(ℤ≥‘𝑀) → 𝑎 ∈ ℤ) |
| 128 | | simpr 110 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑎 ∈ (ℤ≥‘𝑀)) ∧ 𝑎 ∈ 𝐴) → 𝑎 ∈ 𝐴) |
| 129 | 8 | ad2antrr 488 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑎 ∈ (ℤ≥‘𝑀)) ∧ 𝑎 ∈ 𝐴) → ∀𝑘 ∈ 𝐴 𝐵 ∈ ℂ) |
| 130 | | nfcsb1v 3117 |
. . . . . . . . . . . 12
⊢
Ⅎ𝑘⦋𝑎 / 𝑘⦌𝐵 |
| 131 | 130 | nfel1 2350 |
. . . . . . . . . . 11
⊢
Ⅎ𝑘⦋𝑎 / 𝑘⦌𝐵 ∈ ℂ |
| 132 | | csbeq1a 3093 |
. . . . . . . . . . . 12
⊢ (𝑘 = 𝑎 → 𝐵 = ⦋𝑎 / 𝑘⦌𝐵) |
| 133 | 132 | eleq1d 2265 |
. . . . . . . . . . 11
⊢ (𝑘 = 𝑎 → (𝐵 ∈ ℂ ↔ ⦋𝑎 / 𝑘⦌𝐵 ∈ ℂ)) |
| 134 | 131, 133 | rspc 2862 |
. . . . . . . . . 10
⊢ (𝑎 ∈ 𝐴 → (∀𝑘 ∈ 𝐴 𝐵 ∈ ℂ → ⦋𝑎 / 𝑘⦌𝐵 ∈ ℂ)) |
| 135 | 128, 129,
134 | sylc 62 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑎 ∈ (ℤ≥‘𝑀)) ∧ 𝑎 ∈ 𝐴) → ⦋𝑎 / 𝑘⦌𝐵 ∈ ℂ) |
| 136 | | 0cnd 8019 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑎 ∈ (ℤ≥‘𝑀)) ∧ ¬ 𝑎 ∈ 𝐴) → 0 ∈ ℂ) |
| 137 | | eleq1w 2257 |
. . . . . . . . . . . . 13
⊢ (𝑥 = 𝑎 → (𝑥 ∈ 𝐴 ↔ 𝑎 ∈ 𝐴)) |
| 138 | 137 | dcbid 839 |
. . . . . . . . . . . 12
⊢ (𝑥 = 𝑎 → (DECID 𝑥 ∈ 𝐴 ↔ DECID 𝑎 ∈ 𝐴)) |
| 139 | 138 | cbvralv 2729 |
. . . . . . . . . . 11
⊢
(∀𝑥 ∈
(ℤ≥‘𝑀)DECID 𝑥 ∈ 𝐴 ↔ ∀𝑎 ∈ (ℤ≥‘𝑀)DECID 𝑎 ∈ 𝐴) |
| 140 | 26, 139 | sylib 122 |
. . . . . . . . . 10
⊢ (𝜑 → ∀𝑎 ∈ (ℤ≥‘𝑀)DECID 𝑎 ∈ 𝐴) |
| 141 | 140 | r19.21bi 2585 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑎 ∈ (ℤ≥‘𝑀)) → DECID
𝑎 ∈ 𝐴) |
| 142 | 135, 136,
141 | ifcldadc 3590 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑎 ∈ (ℤ≥‘𝑀)) → if(𝑎 ∈ 𝐴, ⦋𝑎 / 𝑘⦌𝐵, 0) ∈ ℂ) |
| 143 | | eleq1w 2257 |
. . . . . . . . . 10
⊢ (𝑛 = 𝑎 → (𝑛 ∈ 𝐴 ↔ 𝑎 ∈ 𝐴)) |
| 144 | | csbeq1 3087 |
. . . . . . . . . 10
⊢ (𝑛 = 𝑎 → ⦋𝑛 / 𝑘⦌𝐵 = ⦋𝑎 / 𝑘⦌𝐵) |
| 145 | 143, 144 | ifbieq1d 3583 |
. . . . . . . . 9
⊢ (𝑛 = 𝑎 → if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0) = if(𝑎 ∈ 𝐴, ⦋𝑎 / 𝑘⦌𝐵, 0)) |
| 146 | | eqid 2196 |
. . . . . . . . 9
⊢ (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0)) = (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0)) |
| 147 | 145, 146 | fvmptg 5637 |
. . . . . . . 8
⊢ ((𝑎 ∈ ℤ ∧ if(𝑎 ∈ 𝐴, ⦋𝑎 / 𝑘⦌𝐵, 0) ∈ ℂ) → ((𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))‘𝑎) = if(𝑎 ∈ 𝐴, ⦋𝑎 / 𝑘⦌𝐵, 0)) |
| 148 | 127, 142,
147 | syl2an2 594 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑎 ∈ (ℤ≥‘𝑀)) → ((𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))‘𝑎) = if(𝑎 ∈ 𝐴, ⦋𝑎 / 𝑘⦌𝐵, 0)) |
| 149 | 148, 142 | eqeltrd 2273 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑎 ∈ (ℤ≥‘𝑀)) → ((𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))‘𝑎) ∈ ℂ) |
| 150 | | simpr 110 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑗 ∈ (ℤ≥‘𝑀)) → 𝑗 ∈ (ℤ≥‘𝑀)) |
| 151 | 53, 150 | sselid 3181 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑗 ∈ (ℤ≥‘𝑀)) → 𝑗 ∈ ℤ) |
| 152 | | vex 2766 |
. . . . . . . . . 10
⊢ 𝑗 ∈ V |
| 153 | | nfv 1542 |
. . . . . . . . . . 11
⊢
Ⅎ𝑘 𝑗 ∈ 𝐴 |
| 154 | | nfcsb1v 3117 |
. . . . . . . . . . 11
⊢
Ⅎ𝑘⦋𝑗 / 𝑘⦌𝐵 |
| 155 | | nfcv 2339 |
. . . . . . . . . . 11
⊢
Ⅎ𝑘0 |
| 156 | 153, 154,
155 | nfif 3589 |
. . . . . . . . . 10
⊢
Ⅎ𝑘if(𝑗 ∈ 𝐴, ⦋𝑗 / 𝑘⦌𝐵, 0) |
| 157 | | eleq1w 2257 |
. . . . . . . . . . 11
⊢ (𝑘 = 𝑗 → (𝑘 ∈ 𝐴 ↔ 𝑗 ∈ 𝐴)) |
| 158 | | csbeq1a 3093 |
. . . . . . . . . . 11
⊢ (𝑘 = 𝑗 → 𝐵 = ⦋𝑗 / 𝑘⦌𝐵) |
| 159 | 157, 158 | ifbieq1d 3583 |
. . . . . . . . . 10
⊢ (𝑘 = 𝑗 → if(𝑘 ∈ 𝐴, 𝐵, 0) = if(𝑗 ∈ 𝐴, ⦋𝑗 / 𝑘⦌𝐵, 0)) |
| 160 | 152, 156,
159 | csbief 3129 |
. . . . . . . . 9
⊢
⦋𝑗 /
𝑘⦌if(𝑘 ∈ 𝐴, 𝐵, 0) = if(𝑗 ∈ 𝐴, ⦋𝑗 / 𝑘⦌𝐵, 0) |
| 161 | | simpr 110 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑗 ∈ (ℤ≥‘𝑀)) ∧ 𝑗 ∈ 𝐴) → 𝑗 ∈ 𝐴) |
| 162 | 8 | ad2antrr 488 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑗 ∈ (ℤ≥‘𝑀)) ∧ 𝑗 ∈ 𝐴) → ∀𝑘 ∈ 𝐴 𝐵 ∈ ℂ) |
| 163 | 154 | nfel1 2350 |
. . . . . . . . . . . 12
⊢
Ⅎ𝑘⦋𝑗 / 𝑘⦌𝐵 ∈ ℂ |
| 164 | 158 | eleq1d 2265 |
. . . . . . . . . . . 12
⊢ (𝑘 = 𝑗 → (𝐵 ∈ ℂ ↔ ⦋𝑗 / 𝑘⦌𝐵 ∈ ℂ)) |
| 165 | 163, 164 | rspc 2862 |
. . . . . . . . . . 11
⊢ (𝑗 ∈ 𝐴 → (∀𝑘 ∈ 𝐴 𝐵 ∈ ℂ → ⦋𝑗 / 𝑘⦌𝐵 ∈ ℂ)) |
| 166 | 161, 162,
165 | sylc 62 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑗 ∈ (ℤ≥‘𝑀)) ∧ 𝑗 ∈ 𝐴) → ⦋𝑗 / 𝑘⦌𝐵 ∈ ℂ) |
| 167 | | 0cnd 8019 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑗 ∈ (ℤ≥‘𝑀)) ∧ ¬ 𝑗 ∈ 𝐴) → 0 ∈ ℂ) |
| 168 | 113 | r19.21bi 2585 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑗 ∈ (ℤ≥‘𝑀)) → DECID
𝑗 ∈ 𝐴) |
| 169 | 166, 167,
168 | ifcldadc 3590 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑗 ∈ (ℤ≥‘𝑀)) → if(𝑗 ∈ 𝐴, ⦋𝑗 / 𝑘⦌𝐵, 0) ∈ ℂ) |
| 170 | 160, 169 | eqeltrid 2283 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑗 ∈ (ℤ≥‘𝑀)) → ⦋𝑗 / 𝑘⦌if(𝑘 ∈ 𝐴, 𝐵, 0) ∈ ℂ) |
| 171 | | nfcv 2339 |
. . . . . . . . . . 11
⊢
Ⅎ𝑛if(𝑘 ∈ 𝐴, 𝐵, 0) |
| 172 | | nfv 1542 |
. . . . . . . . . . . 12
⊢
Ⅎ𝑘 𝑛 ∈ 𝐴 |
| 173 | | nfcsb1v 3117 |
. . . . . . . . . . . 12
⊢
Ⅎ𝑘⦋𝑛 / 𝑘⦌𝐵 |
| 174 | 172, 173,
155 | nfif 3589 |
. . . . . . . . . . 11
⊢
Ⅎ𝑘if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0) |
| 175 | | eleq1w 2257 |
. . . . . . . . . . . 12
⊢ (𝑘 = 𝑛 → (𝑘 ∈ 𝐴 ↔ 𝑛 ∈ 𝐴)) |
| 176 | | csbeq1a 3093 |
. . . . . . . . . . . 12
⊢ (𝑘 = 𝑛 → 𝐵 = ⦋𝑛 / 𝑘⦌𝐵) |
| 177 | 175, 176 | ifbieq1d 3583 |
. . . . . . . . . . 11
⊢ (𝑘 = 𝑛 → if(𝑘 ∈ 𝐴, 𝐵, 0) = if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0)) |
| 178 | 171, 174,
177 | cbvmpt 4128 |
. . . . . . . . . 10
⊢ (𝑘 ∈ ℤ ↦ if(𝑘 ∈ 𝐴, 𝐵, 0)) = (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0)) |
| 179 | 178 | eqcomi 2200 |
. . . . . . . . 9
⊢ (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0)) = (𝑘 ∈ ℤ ↦ if(𝑘 ∈ 𝐴, 𝐵, 0)) |
| 180 | 179 | fvmpts 5639 |
. . . . . . . 8
⊢ ((𝑗 ∈ ℤ ∧
⦋𝑗 / 𝑘⦌if(𝑘 ∈ 𝐴, 𝐵, 0) ∈ ℂ) → ((𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))‘𝑗) = ⦋𝑗 / 𝑘⦌if(𝑘 ∈ 𝐴, 𝐵, 0)) |
| 181 | 151, 170,
180 | syl2anc 411 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑗 ∈ (ℤ≥‘𝑀)) → ((𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))‘𝑗) = ⦋𝑗 / 𝑘⦌if(𝑘 ∈ 𝐴, 𝐵, 0)) |
| 182 | 150, 21 | eleqtrrdi 2290 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑗 ∈ (ℤ≥‘𝑀)) → 𝑗 ∈ 𝑍) |
| 183 | | zisum.4 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑘 ∈ 𝑍) → (𝐹‘𝑘) = if(𝑘 ∈ 𝐴, 𝐵, 0)) |
| 184 | 183 | ralrimiva 2570 |
. . . . . . . . 9
⊢ (𝜑 → ∀𝑘 ∈ 𝑍 (𝐹‘𝑘) = if(𝑘 ∈ 𝐴, 𝐵, 0)) |
| 185 | 184 | adantr 276 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑗 ∈ (ℤ≥‘𝑀)) → ∀𝑘 ∈ 𝑍 (𝐹‘𝑘) = if(𝑘 ∈ 𝐴, 𝐵, 0)) |
| 186 | | nfcsb1v 3117 |
. . . . . . . . . 10
⊢
Ⅎ𝑘⦋𝑗 / 𝑘⦌if(𝑘 ∈ 𝐴, 𝐵, 0) |
| 187 | 186 | nfeq2 2351 |
. . . . . . . . 9
⊢
Ⅎ𝑘(𝐹‘𝑗) = ⦋𝑗 / 𝑘⦌if(𝑘 ∈ 𝐴, 𝐵, 0) |
| 188 | | fveq2 5558 |
. . . . . . . . . 10
⊢ (𝑘 = 𝑗 → (𝐹‘𝑘) = (𝐹‘𝑗)) |
| 189 | | csbeq1a 3093 |
. . . . . . . . . 10
⊢ (𝑘 = 𝑗 → if(𝑘 ∈ 𝐴, 𝐵, 0) = ⦋𝑗 / 𝑘⦌if(𝑘 ∈ 𝐴, 𝐵, 0)) |
| 190 | 188, 189 | eqeq12d 2211 |
. . . . . . . . 9
⊢ (𝑘 = 𝑗 → ((𝐹‘𝑘) = if(𝑘 ∈ 𝐴, 𝐵, 0) ↔ (𝐹‘𝑗) = ⦋𝑗 / 𝑘⦌if(𝑘 ∈ 𝐴, 𝐵, 0))) |
| 191 | 187, 190 | rspc 2862 |
. . . . . . . 8
⊢ (𝑗 ∈ 𝑍 → (∀𝑘 ∈ 𝑍 (𝐹‘𝑘) = if(𝑘 ∈ 𝐴, 𝐵, 0) → (𝐹‘𝑗) = ⦋𝑗 / 𝑘⦌if(𝑘 ∈ 𝐴, 𝐵, 0))) |
| 192 | 182, 185,
191 | sylc 62 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑗 ∈ (ℤ≥‘𝑀)) → (𝐹‘𝑗) = ⦋𝑗 / 𝑘⦌if(𝑘 ∈ 𝐴, 𝐵, 0)) |
| 193 | 181, 192 | eqtr4d 2232 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑗 ∈ (ℤ≥‘𝑀)) → ((𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))‘𝑗) = (𝐹‘𝑗)) |
| 194 | | addcl 8004 |
. . . . . . 7
⊢ ((𝑎 ∈ ℂ ∧ 𝑏 ∈ ℂ) → (𝑎 + 𝑏) ∈ ℂ) |
| 195 | 194 | adantl 277 |
. . . . . 6
⊢ ((𝜑 ∧ (𝑎 ∈ ℂ ∧ 𝑏 ∈ ℂ)) → (𝑎 + 𝑏) ∈ ℂ) |
| 196 | 17, 149, 193, 195 | seq3feq 10572 |
. . . . 5
⊢ (𝜑 → seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) = seq𝑀( + , 𝐹)) |
| 197 | 196 | breq1d 4043 |
. . . 4
⊢ (𝜑 → (seq𝑀( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥 ↔ seq𝑀( + , 𝐹) ⇝ 𝑥)) |
| 198 | 126, 197 | bitrd 188 |
. . 3
⊢ (𝜑 → ((∃𝑚 ∈ ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ ∀𝑗 ∈ (ℤ≥‘𝑚)DECID 𝑗 ∈ 𝐴 ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚))) ↔ seq𝑀( + , 𝐹) ⇝ 𝑥)) |
| 199 | 198 | iotabidv 5241 |
. 2
⊢ (𝜑 → (℩𝑥(∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∀𝑗 ∈
(ℤ≥‘𝑚)DECID 𝑗 ∈ 𝐴 ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚)))) = (℩𝑥seq𝑀( + , 𝐹) ⇝ 𝑥)) |
| 200 | | df-sumdc 11519 |
. 2
⊢
Σ𝑘 ∈
𝐴 𝐵 = (℩𝑥(∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∀𝑗 ∈
(ℤ≥‘𝑚)DECID 𝑗 ∈ 𝐴 ∧ seq𝑚( + , (𝑛 ∈ ℤ ↦ if(𝑛 ∈ 𝐴, ⦋𝑛 / 𝑘⦌𝐵, 0))) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( + , (𝑛 ∈ ℕ ↦ if(𝑛 ≤ 𝑚, ⦋(𝑓‘𝑛) / 𝑘⦌𝐵, 0)))‘𝑚)))) |
| 201 | | df-fv 5266 |
. 2
⊢ ( ⇝
‘seq𝑀( + , 𝐹)) = (℩𝑥seq𝑀( + , 𝐹) ⇝ 𝑥) |
| 202 | 199, 200,
201 | 3eqtr4g 2254 |
1
⊢ (𝜑 → Σ𝑘 ∈ 𝐴 𝐵 = ( ⇝ ‘seq𝑀( + , 𝐹))) |