Proof of Theorem expcllem
| Step | Hyp | Ref
| Expression |
| 1 | | opreq2 3983 |
. . . . . . 7
⊢ (z = 1 → (A↑z) =
(A↑1)) |
| 2 | 1 | eleq1d 1547 |
. . . . . 6
⊢ (z = 1 → ((A↑z) ∈ F ↔
(A↑1) ∈ F)) |
| 3 | 2 | imbi2d 615 |
. . . . 5
⊢ (z = 1 → ((A
∈ F
→ (A↑z) ∈ F) ↔ (A
∈ F
→ (A↑1) ∈ F))) |
| 4 | | opreq2 3983 |
. . . . . . 7
⊢ (z = w →
(A↑z) = (A↑w)) |
| 5 | 4 | eleq1d 1547 |
. . . . . 6
⊢ (z = w →
((A↑z) ∈ F ↔ (A↑w) ∈ F)) |
| 6 | 5 | imbi2d 615 |
. . . . 5
⊢ (z = w →
((A ∈
F → (A↑z) ∈ F) ↔
(A ∈
F → (A↑w) ∈ F))) |
| 7 | | opreq2 3983 |
. . . . . . 7
⊢ (z = (w + 1)
→ (A↑z) = (A↑(w +
1))) |
| 8 | 7 | eleq1d 1547 |
. . . . . 6
⊢ (z = (w + 1)
→ ((A↑z) ∈ F ↔ (A↑(w + 1))
∈ F)) |
| 9 | 8 | imbi2d 615 |
. . . . 5
⊢ (z = (w + 1)
→ ((A ∈ F →
(A↑z) ∈ F) ↔ (A
∈ F
→ (A↑(w + 1)) ∈ F))) |
| 10 | | opreq2 3983 |
. . . . . . 7
⊢ (z = B →
(A↑z) = (A↑B)) |
| 11 | 10 | eleq1d 1547 |
. . . . . 6
⊢ (z = B →
((A↑z) ∈ F ↔ (A↑B) ∈ F)) |
| 12 | 11 | imbi2d 615 |
. . . . 5
⊢ (z = B →
((A ∈
F → (A↑z) ∈ F) ↔
(A ∈
F → (A↑B) ∈ F))) |
| 13 | | expcllem.1 |
. . . . . . . . 9
⊢ F ⊆ ℂ |
| 14 | 13 | sseli 2074 |
. . . . . . . 8
⊢ (A ∈ F → A ∈ ℂ) |
| 15 | | exp1t 6586 |
. . . . . . . 8
⊢ (A ∈ ℂ → (A↑1) = A) |
| 16 | 14, 15 | syl 10 |
. . . . . . 7
⊢ (A ∈ F → (A↑1) = A) |
| 17 | 16 | eleq1d 1547 |
. . . . . 6
⊢ (A ∈ F → ((A↑1) ∈
F ↔ A ∈ F)) |
| 18 | 17 | ibir 596 |
. . . . 5
⊢ (A ∈ F → (A↑1) ∈
F) |
| 19 | | opreq1 3982 |
. . . . . . . . . . . . 13
⊢ (x = (A↑w) →
(x · y) = ((A↑w)
· y)) |
| 20 | 19 | eleq1d 1547 |
. . . . . . . . . . . 12
⊢ (x = (A↑w) →
((x · y) ∈ F ↔ ((A↑w)
· y) ∈ F)) |
| 21 | | opreq2 3983 |
. . . . . . . . . . . . 13
⊢ (y = A →
((A↑w) · y) =
((A↑w) · A)) |
| 22 | 21 | eleq1d 1547 |
. . . . . . . . . . . 12
⊢ (y = A →
(((A↑w) · y)
∈ F
↔ ((A↑w) · A)
∈ F)) |
| 23 | | expcllem.2 |
. . . . . . . . . . . 12
⊢ ((x ∈ F ⋀ y ∈ F) → (x
· y) ∈ F) |
| 24 | 20, 22, 23 | vtocl2ga 1860 |
. . . . . . . . . . 11
⊢ (((A↑w) ∈ F ⋀ A ∈ F) →
((A↑w) · A)
∈ F) |
| 25 | 24 | ancoms 439 |
. . . . . . . . . 10
⊢ ((A ∈ F ⋀ (A↑w) ∈ F) →
((A↑w) · A)
∈ F) |
| 26 | 25 | adantlr 395 |
. . . . . . . . 9
⊢ (((A ∈ F ⋀ w ∈ ℕ) ⋀ (A↑w) ∈ F) →
((A↑w) · A)
∈ F) |
| 27 | | expp1t 6587 |
. . . . . . . . . . . 12
⊢ ((A ∈ ℂ ⋀ w ∈ ℕ0) → (A↑(w + 1))
= ((A↑w) · A)) |
| 28 | | nnnn0t 6112 |
. . . . . . . . . . . 12
⊢ (w ∈ ℕ → w
∈ ℕ0) |
| 29 | 27, 14, 28 | syl2an 457 |
. . . . . . . . . . 11
⊢ ((A ∈ F ⋀ w ∈ ℕ) → (A↑(w + 1))
= ((A↑w) · A)) |
| 30 | 29 | eleq1d 1547 |
. . . . . . . . . 10
⊢ ((A ∈ F ⋀ w ∈ ℕ) → ((A↑(w + 1))
∈ F
↔ ((A↑w) · A)
∈ F)) |
| 31 | 30 | adantr 391 |
. . . . . . . . 9
⊢ (((A ∈ F ⋀ w ∈ ℕ) ⋀ (A↑w) ∈ F) →
((A↑(w + 1)) ∈ F ↔ ((A↑w)
· A) ∈ F)) |
| 32 | 26, 31 | mpbird 196 |
. . . . . . . 8
⊢ (((A ∈ F ⋀ w ∈ ℕ) ⋀ (A↑w) ∈ F) →
(A↑(w + 1)) ∈ F) |
| 33 | 32 | exp31 378 |
. . . . . . 7
⊢ (A ∈ F → (w
∈ ℕ →
((A↑w) ∈ F → (A↑(w + 1))
∈ F))) |
| 34 | 33 | com12 11 |
. . . . . 6
⊢ (w ∈ ℕ → (A
∈ F
→ ((A↑w) ∈ F → (A↑(w + 1))
∈ F))) |
| 35 | 34 | a2d 13 |
. . . . 5
⊢ (w ∈ ℕ → ((A
∈ F
→ (A↑w) ∈ F) → (A
∈ F
→ (A↑(w + 1)) ∈ F))) |
| 36 | 3, 6, 9, 12, 18, 35 | nnind 5943 |
. . . 4
⊢ (B ∈ ℕ → (A
∈ F
→ (A↑B) ∈ F)) |
| 37 | 36 | impcom 351 |
. . 3
⊢ ((A ∈ F ⋀ B ∈ ℕ) → (A↑B) ∈ F) |
| 38 | | opreq2 3983 |
. . . . 5
⊢ (B = 0 → (A↑B) =
(A↑0)) |
| 39 | | exp0t 6584 |
. . . . . 6
⊢ (A ∈ ℂ → (A↑0) = 1) |
| 40 | 14, 39 | syl 10 |
. . . . 5
⊢ (A ∈ F → (A↑0) = 1) |
| 41 | 38, 40 | sylan9eqr 1536 |
. . . 4
⊢ ((A ∈ F ⋀ B = 0) → (A↑B) =
1) |
| 42 | | expcllem.3 |
. . . 4
⊢ 1 ∈ F |
| 43 | 41, 42 | syl6eqel 1563 |
. . 3
⊢ ((A ∈ F ⋀ B = 0) → (A↑B) ∈ F) |
| 44 | 37, 43 | jaodan 428 |
. 2
⊢ ((A ∈ F ⋀ (B ∈ ℕ ⋁ B = 0)) → (A↑B) ∈ F) |
| 45 | | elnn0 6107 |
. 2
⊢ (B ∈ ℕ0 ↔ (B ∈ ℕ ⋁ B = 0)) |
| 46 | 44, 45 | sylan2b 455 |
1
⊢ ((A ∈ F ⋀ B ∈ ℕ0) → (A↑B) ∈ F) |