Step | Hyp | Ref
| Expression |
1 | | 3simpb 1052 |
. . . . . . 7
⊢ ((𝐴 ⊆
(ℤ≥‘𝑚) ∧ ∃𝑛 ∈ (ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) → (𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥)) |
2 | 1 | reximi 2994 |
. . . . . 6
⊢
(∃𝑚 ∈
ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ ∃𝑛 ∈ (ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) → ∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥)) |
3 | | 3simpb 1052 |
. . . . . . 7
⊢ ((𝐴 ⊆
(ℤ≥‘𝑚) ∧ ∃𝑛 ∈ (ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧) → (𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧)) |
4 | 3 | reximi 2994 |
. . . . . 6
⊢
(∃𝑚 ∈
ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ ∃𝑛 ∈ (ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧) → ∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧)) |
5 | | fveq2 6103 |
. . . . . . . . . . . 12
⊢ (𝑚 = 𝑤 → (ℤ≥‘𝑚) =
(ℤ≥‘𝑤)) |
6 | 5 | sseq2d 3596 |
. . . . . . . . . . 11
⊢ (𝑚 = 𝑤 → (𝐴 ⊆ (ℤ≥‘𝑚) ↔ 𝐴 ⊆ (ℤ≥‘𝑤))) |
7 | | seqeq1 12666 |
. . . . . . . . . . . 12
⊢ (𝑚 = 𝑤 → seq𝑚( · , 𝐹) = seq𝑤( · , 𝐹)) |
8 | 7 | breq1d 4593 |
. . . . . . . . . . 11
⊢ (𝑚 = 𝑤 → (seq𝑚( · , 𝐹) ⇝ 𝑧 ↔ seq𝑤( · , 𝐹) ⇝ 𝑧)) |
9 | 6, 8 | anbi12d 743 |
. . . . . . . . . 10
⊢ (𝑚 = 𝑤 → ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧) ↔ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧))) |
10 | 9 | cbvrexv 3148 |
. . . . . . . . 9
⊢
(∃𝑚 ∈
ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧) ↔ ∃𝑤 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧)) |
11 | 10 | anbi2i 726 |
. . . . . . . 8
⊢
((∃𝑚 ∈
ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ ∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧)) ↔ (∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ ∃𝑤 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧))) |
12 | | reeanv 3086 |
. . . . . . . 8
⊢
(∃𝑚 ∈
ℤ ∃𝑤 ∈
ℤ ((𝐴 ⊆
(ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧)) ↔ (∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ ∃𝑤 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧))) |
13 | 11, 12 | bitr4i 266 |
. . . . . . 7
⊢
((∃𝑚 ∈
ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ ∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧)) ↔ ∃𝑚 ∈ ℤ ∃𝑤 ∈ ℤ ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧))) |
14 | | simprlr 799 |
. . . . . . . . . . . . 13
⊢ (((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) ∧ ((𝐴 ⊆
(ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧))) → seq𝑚( · , 𝐹) ⇝ 𝑥) |
15 | 14 | adantl 481 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ ((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) ∧ ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧)))) → seq𝑚( · , 𝐹) ⇝ 𝑥) |
16 | | prodmo.1 |
. . . . . . . . . . . . 13
⊢ 𝐹 = (𝑘 ∈ ℤ ↦ if(𝑘 ∈ 𝐴, 𝐵, 1)) |
17 | | prodmo.2 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ ℂ) |
18 | 17 | adantlr 747 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ ((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) ∧ ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧)))) ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ ℂ) |
19 | | simprll 798 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ ((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) ∧ ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧)))) → 𝑚 ∈ ℤ) |
20 | | simprlr 799 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ ((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) ∧ ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧)))) → 𝑤 ∈ ℤ) |
21 | | simprll 798 |
. . . . . . . . . . . . . 14
⊢ (((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) ∧ ((𝐴 ⊆
(ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧))) → 𝐴 ⊆ (ℤ≥‘𝑚)) |
22 | 21 | adantl 481 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ ((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) ∧ ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧)))) → 𝐴 ⊆ (ℤ≥‘𝑚)) |
23 | | simprrl 800 |
. . . . . . . . . . . . . 14
⊢ (((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) ∧ ((𝐴 ⊆
(ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧))) → 𝐴 ⊆ (ℤ≥‘𝑤)) |
24 | 23 | adantl 481 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ ((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) ∧ ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧)))) → 𝐴 ⊆ (ℤ≥‘𝑤)) |
25 | 16, 18, 19, 20, 22, 24 | prodrb 14501 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ ((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) ∧ ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧)))) → (seq𝑚( · , 𝐹) ⇝ 𝑥 ↔ seq𝑤( · , 𝐹) ⇝ 𝑥)) |
26 | 15, 25 | mpbid 221 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ ((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) ∧ ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧)))) → seq𝑤( · , 𝐹) ⇝ 𝑥) |
27 | | simprrr 801 |
. . . . . . . . . . . 12
⊢ (((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) ∧ ((𝐴 ⊆
(ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧))) → seq𝑤( · , 𝐹) ⇝ 𝑧) |
28 | 27 | adantl 481 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ ((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) ∧ ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧)))) → seq𝑤( · , 𝐹) ⇝ 𝑧) |
29 | | climuni 14131 |
. . . . . . . . . . 11
⊢
((seq𝑤( · ,
𝐹) ⇝ 𝑥 ∧ seq𝑤( · , 𝐹) ⇝ 𝑧) → 𝑥 = 𝑧) |
30 | 26, 28, 29 | syl2anc 691 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ ((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) ∧ ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧)))) → 𝑥 = 𝑧) |
31 | 30 | expcom 450 |
. . . . . . . . 9
⊢ (((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) ∧ ((𝐴 ⊆
(ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧))) → (𝜑 → 𝑥 = 𝑧)) |
32 | 31 | ex 449 |
. . . . . . . 8
⊢ ((𝑚 ∈ ℤ ∧ 𝑤 ∈ ℤ) → (((𝐴 ⊆
(ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧)) → (𝜑 → 𝑥 = 𝑧))) |
33 | 32 | rexlimivv 3018 |
. . . . . . 7
⊢
(∃𝑚 ∈
ℤ ∃𝑤 ∈
ℤ ((𝐴 ⊆
(ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ (𝐴 ⊆ (ℤ≥‘𝑤) ∧ seq𝑤( · , 𝐹) ⇝ 𝑧)) → (𝜑 → 𝑥 = 𝑧)) |
34 | 13, 33 | sylbi 206 |
. . . . . 6
⊢
((∃𝑚 ∈
ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ ∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧)) → (𝜑 → 𝑥 = 𝑧)) |
35 | 2, 4, 34 | syl2an 493 |
. . . . 5
⊢
((∃𝑚 ∈
ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ ∃𝑛 ∈ (ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ ∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧)) → (𝜑 → 𝑥 = 𝑧)) |
36 | | prodmo.3 |
. . . . . . . . . 10
⊢ 𝐺 = (𝑗 ∈ ℕ ↦ ⦋(𝑓‘𝑗) / 𝑘⦌𝐵) |
37 | 16, 17, 36 | prodmolem2 14504 |
. . . . . . . . 9
⊢ ((𝜑 ∧ ∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧)) → (∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) → 𝑧 = 𝑥)) |
38 | | equcomi 1931 |
. . . . . . . . 9
⊢ (𝑧 = 𝑥 → 𝑥 = 𝑧) |
39 | 37, 38 | syl6 34 |
. . . . . . . 8
⊢ ((𝜑 ∧ ∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧)) → (∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) → 𝑥 = 𝑧)) |
40 | 39 | expimpd 627 |
. . . . . . 7
⊢ (𝜑 → ((∃𝑚 ∈ ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ ∃𝑛 ∈ (ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧) ∧ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚))) → 𝑥 = 𝑧)) |
41 | 40 | com12 32 |
. . . . . 6
⊢
((∃𝑚 ∈
ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ ∃𝑛 ∈ (ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧) ∧ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚))) → (𝜑 → 𝑥 = 𝑧)) |
42 | 41 | ancoms 468 |
. . . . 5
⊢
((∃𝑚 ∈
ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ ∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧)) → (𝜑 → 𝑥 = 𝑧)) |
43 | 16, 17, 36 | prodmolem2 14504 |
. . . . . . 7
⊢ ((𝜑 ∧ ∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥)) → (∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚)) → 𝑥 = 𝑧)) |
44 | 43 | expimpd 627 |
. . . . . 6
⊢ (𝜑 → ((∃𝑚 ∈ ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ ∃𝑛 ∈ (ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚))) → 𝑥 = 𝑧)) |
45 | 44 | com12 32 |
. . . . 5
⊢
((∃𝑚 ∈
ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ ∃𝑛 ∈ (ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∧ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚))) → (𝜑 → 𝑥 = 𝑧)) |
46 | | reeanv 3086 |
. . . . . . . 8
⊢
(∃𝑚 ∈
ℕ ∃𝑤 ∈
ℕ (∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ ∃𝑔(𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤))) ↔ (∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ ∃𝑤 ∈ ℕ ∃𝑔(𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤)))) |
47 | | eeanv 2170 |
. . . . . . . . 9
⊢
(∃𝑓∃𝑔((𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ (𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤))) ↔ (∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ ∃𝑔(𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤)))) |
48 | 47 | 2rexbii 3024 |
. . . . . . . 8
⊢
(∃𝑚 ∈
ℕ ∃𝑤 ∈
ℕ ∃𝑓∃𝑔((𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ (𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤))) ↔ ∃𝑚 ∈ ℕ ∃𝑤 ∈ ℕ (∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ ∃𝑔(𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤)))) |
49 | | oveq2 6557 |
. . . . . . . . . . . . . 14
⊢ (𝑚 = 𝑤 → (1...𝑚) = (1...𝑤)) |
50 | | f1oeq2 6041 |
. . . . . . . . . . . . . 14
⊢
((1...𝑚) =
(1...𝑤) → (𝑓:(1...𝑚)–1-1-onto→𝐴 ↔ 𝑓:(1...𝑤)–1-1-onto→𝐴)) |
51 | 49, 50 | syl 17 |
. . . . . . . . . . . . 13
⊢ (𝑚 = 𝑤 → (𝑓:(1...𝑚)–1-1-onto→𝐴 ↔ 𝑓:(1...𝑤)–1-1-onto→𝐴)) |
52 | | fveq2 6103 |
. . . . . . . . . . . . . 14
⊢ (𝑚 = 𝑤 → (seq1( · , 𝐺)‘𝑚) = (seq1( · , 𝐺)‘𝑤)) |
53 | 52 | eqeq2d 2620 |
. . . . . . . . . . . . 13
⊢ (𝑚 = 𝑤 → (𝑧 = (seq1( · , 𝐺)‘𝑚) ↔ 𝑧 = (seq1( · , 𝐺)‘𝑤))) |
54 | 51, 53 | anbi12d 743 |
. . . . . . . . . . . 12
⊢ (𝑚 = 𝑤 → ((𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚)) ↔ (𝑓:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑤)))) |
55 | 54 | exbidv 1837 |
. . . . . . . . . . 11
⊢ (𝑚 = 𝑤 → (∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚)) ↔ ∃𝑓(𝑓:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑤)))) |
56 | | f1oeq1 6040 |
. . . . . . . . . . . . 13
⊢ (𝑓 = 𝑔 → (𝑓:(1...𝑤)–1-1-onto→𝐴 ↔ 𝑔:(1...𝑤)–1-1-onto→𝐴)) |
57 | | fveq1 6102 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝑓 = 𝑔 → (𝑓‘𝑗) = (𝑔‘𝑗)) |
58 | 57 | csbeq1d 3506 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑓 = 𝑔 → ⦋(𝑓‘𝑗) / 𝑘⦌𝐵 = ⦋(𝑔‘𝑗) / 𝑘⦌𝐵) |
59 | 58 | mpteq2dv 4673 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑓 = 𝑔 → (𝑗 ∈ ℕ ↦ ⦋(𝑓‘𝑗) / 𝑘⦌𝐵) = (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵)) |
60 | 36, 59 | syl5eq 2656 |
. . . . . . . . . . . . . . . 16
⊢ (𝑓 = 𝑔 → 𝐺 = (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵)) |
61 | 60 | seqeq3d 12671 |
. . . . . . . . . . . . . . 15
⊢ (𝑓 = 𝑔 → seq1( · , 𝐺) = seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))) |
62 | 61 | fveq1d 6105 |
. . . . . . . . . . . . . 14
⊢ (𝑓 = 𝑔 → (seq1( · , 𝐺)‘𝑤) = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤)) |
63 | 62 | eqeq2d 2620 |
. . . . . . . . . . . . 13
⊢ (𝑓 = 𝑔 → (𝑧 = (seq1( · , 𝐺)‘𝑤) ↔ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤))) |
64 | 56, 63 | anbi12d 743 |
. . . . . . . . . . . 12
⊢ (𝑓 = 𝑔 → ((𝑓:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑤)) ↔ (𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤)))) |
65 | 64 | cbvexv 2263 |
. . . . . . . . . . 11
⊢
(∃𝑓(𝑓:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑤)) ↔ ∃𝑔(𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤))) |
66 | 55, 65 | syl6bb 275 |
. . . . . . . . . 10
⊢ (𝑚 = 𝑤 → (∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚)) ↔ ∃𝑔(𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤)))) |
67 | 66 | cbvrexv 3148 |
. . . . . . . . 9
⊢
(∃𝑚 ∈
ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚)) ↔ ∃𝑤 ∈ ℕ ∃𝑔(𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤))) |
68 | 67 | anbi2i 726 |
. . . . . . . 8
⊢
((∃𝑚 ∈
ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚))) ↔ (∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ ∃𝑤 ∈ ℕ ∃𝑔(𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤)))) |
69 | 46, 48, 68 | 3bitr4i 291 |
. . . . . . 7
⊢
(∃𝑚 ∈
ℕ ∃𝑤 ∈
ℕ ∃𝑓∃𝑔((𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ (𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤))) ↔ (∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚)))) |
70 | | an4 861 |
. . . . . . . . . 10
⊢ (((𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ (𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤))) ↔ ((𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔:(1...𝑤)–1-1-onto→𝐴) ∧ (𝑥 = (seq1( · , 𝐺)‘𝑚) ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤)))) |
71 | | simpll 786 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑤 ∈ ℕ)) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔:(1...𝑤)–1-1-onto→𝐴)) → 𝜑) |
72 | 71, 17 | sylan 487 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑤 ∈ ℕ)) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔:(1...𝑤)–1-1-onto→𝐴)) ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ ℂ) |
73 | | fveq2 6103 |
. . . . . . . . . . . . . . . 16
⊢ (𝑗 = 𝑎 → (𝑓‘𝑗) = (𝑓‘𝑎)) |
74 | 73 | csbeq1d 3506 |
. . . . . . . . . . . . . . 15
⊢ (𝑗 = 𝑎 → ⦋(𝑓‘𝑗) / 𝑘⦌𝐵 = ⦋(𝑓‘𝑎) / 𝑘⦌𝐵) |
75 | 74 | cbvmptv 4678 |
. . . . . . . . . . . . . 14
⊢ (𝑗 ∈ ℕ ↦
⦋(𝑓‘𝑗) / 𝑘⦌𝐵) = (𝑎 ∈ ℕ ↦ ⦋(𝑓‘𝑎) / 𝑘⦌𝐵) |
76 | 36, 75 | eqtri 2632 |
. . . . . . . . . . . . 13
⊢ 𝐺 = (𝑎 ∈ ℕ ↦ ⦋(𝑓‘𝑎) / 𝑘⦌𝐵) |
77 | | fveq2 6103 |
. . . . . . . . . . . . . . 15
⊢ (𝑗 = 𝑎 → (𝑔‘𝑗) = (𝑔‘𝑎)) |
78 | 77 | csbeq1d 3506 |
. . . . . . . . . . . . . 14
⊢ (𝑗 = 𝑎 → ⦋(𝑔‘𝑗) / 𝑘⦌𝐵 = ⦋(𝑔‘𝑎) / 𝑘⦌𝐵) |
79 | 78 | cbvmptv 4678 |
. . . . . . . . . . . . 13
⊢ (𝑗 ∈ ℕ ↦
⦋(𝑔‘𝑗) / 𝑘⦌𝐵) = (𝑎 ∈ ℕ ↦ ⦋(𝑔‘𝑎) / 𝑘⦌𝐵) |
80 | | simplr 788 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑤 ∈ ℕ)) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔:(1...𝑤)–1-1-onto→𝐴)) → (𝑚 ∈ ℕ ∧ 𝑤 ∈ ℕ)) |
81 | | simprl 790 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑤 ∈ ℕ)) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔:(1...𝑤)–1-1-onto→𝐴)) → 𝑓:(1...𝑚)–1-1-onto→𝐴) |
82 | | simprr 792 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑤 ∈ ℕ)) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔:(1...𝑤)–1-1-onto→𝐴)) → 𝑔:(1...𝑤)–1-1-onto→𝐴) |
83 | 16, 72, 76, 79, 80, 81, 82 | prodmolem3 14502 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑤 ∈ ℕ)) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔:(1...𝑤)–1-1-onto→𝐴)) → (seq1( · ,
𝐺)‘𝑚) = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤)) |
84 | | eqeq12 2623 |
. . . . . . . . . . . 12
⊢ ((𝑥 = (seq1( · , 𝐺)‘𝑚) ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤)) → (𝑥 = 𝑧 ↔ (seq1( · , 𝐺)‘𝑚) = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤))) |
85 | 83, 84 | syl5ibrcom 236 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑤 ∈ ℕ)) ∧ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔:(1...𝑤)–1-1-onto→𝐴)) → ((𝑥 = (seq1( · , 𝐺)‘𝑚) ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤)) → 𝑥 = 𝑧)) |
86 | 85 | expimpd 627 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑤 ∈ ℕ)) → (((𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑔:(1...𝑤)–1-1-onto→𝐴) ∧ (𝑥 = (seq1( · , 𝐺)‘𝑚) ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤))) → 𝑥 = 𝑧)) |
87 | 70, 86 | syl5bi 231 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑤 ∈ ℕ)) → (((𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ (𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤))) → 𝑥 = 𝑧)) |
88 | 87 | exlimdvv 1849 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑤 ∈ ℕ)) → (∃𝑓∃𝑔((𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ (𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤))) → 𝑥 = 𝑧)) |
89 | 88 | rexlimdvva 3020 |
. . . . . . 7
⊢ (𝜑 → (∃𝑚 ∈ ℕ ∃𝑤 ∈ ℕ ∃𝑓∃𝑔((𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ (𝑔:(1...𝑤)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , (𝑗 ∈ ℕ ↦ ⦋(𝑔‘𝑗) / 𝑘⦌𝐵))‘𝑤))) → 𝑥 = 𝑧)) |
90 | 69, 89 | syl5bir 232 |
. . . . . 6
⊢ (𝜑 → ((∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚))) → 𝑥 = 𝑧)) |
91 | 90 | com12 32 |
. . . . 5
⊢
((∃𝑚 ∈
ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ∧ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚))) → (𝜑 → 𝑥 = 𝑧)) |
92 | 35, 42, 45, 91 | ccase 984 |
. . . 4
⊢
(((∃𝑚 ∈
ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ ∃𝑛 ∈ (ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚))) ∧ (∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚)))) → (𝜑 → 𝑥 = 𝑧)) |
93 | 92 | com12 32 |
. . 3
⊢ (𝜑 → (((∃𝑚 ∈ ℤ (𝐴 ⊆
(ℤ≥‘𝑚) ∧ ∃𝑛 ∈ (ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚))) ∧ (∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚)))) → 𝑥 = 𝑧)) |
94 | 93 | alrimivv 1843 |
. 2
⊢ (𝜑 → ∀𝑥∀𝑧(((∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚))) ∧ (∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚)))) → 𝑥 = 𝑧)) |
95 | | breq2 4587 |
. . . . . 6
⊢ (𝑥 = 𝑧 → (seq𝑚( · , 𝐹) ⇝ 𝑥 ↔ seq𝑚( · , 𝐹) ⇝ 𝑧)) |
96 | 95 | 3anbi3d 1397 |
. . . . 5
⊢ (𝑥 = 𝑧 → ((𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ↔ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧))) |
97 | 96 | rexbidv 3034 |
. . . 4
⊢ (𝑥 = 𝑧 → (∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ↔ ∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧))) |
98 | | eqeq1 2614 |
. . . . . . 7
⊢ (𝑥 = 𝑧 → (𝑥 = (seq1( · , 𝐺)‘𝑚) ↔ 𝑧 = (seq1( · , 𝐺)‘𝑚))) |
99 | 98 | anbi2d 736 |
. . . . . 6
⊢ (𝑥 = 𝑧 → ((𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ↔ (𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚)))) |
100 | 99 | exbidv 1837 |
. . . . 5
⊢ (𝑥 = 𝑧 → (∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ↔ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚)))) |
101 | 100 | rexbidv 3034 |
. . . 4
⊢ (𝑥 = 𝑧 → (∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)) ↔ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚)))) |
102 | 97, 101 | orbi12d 742 |
. . 3
⊢ (𝑥 = 𝑧 → ((∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚))) ↔ (∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚))))) |
103 | 102 | mo4 2505 |
. 2
⊢
(∃*𝑥(∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚))) ↔ ∀𝑥∀𝑧(((∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚))) ∧ (∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑧) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑧 = (seq1( · , 𝐺)‘𝑚)))) → 𝑥 = 𝑧)) |
104 | 94, 103 | sylibr 223 |
1
⊢ (𝜑 → ∃*𝑥(∃𝑚 ∈ ℤ (𝐴 ⊆ (ℤ≥‘𝑚) ∧ ∃𝑛 ∈
(ℤ≥‘𝑚)∃𝑦(𝑦 ≠ 0 ∧ seq𝑛( · , 𝐹) ⇝ 𝑦) ∧ seq𝑚( · , 𝐹) ⇝ 𝑥) ∨ ∃𝑚 ∈ ℕ ∃𝑓(𝑓:(1...𝑚)–1-1-onto→𝐴 ∧ 𝑥 = (seq1( · , 𝐺)‘𝑚)))) |