Metamath Proof Explorer


Theorem efcj

Description: The exponential of a complex conjugate. Equation 3 of Gleason p. 308. (Contributed by NM, 29-Apr-2005) (Revised by Mario Carneiro, 28-Apr-2014)

Ref Expression
Assertion efcj ⊢ A ∈ ℂ → e A ‾ = e A ‾

Proof

Step Hyp Ref Expression
1 cjcl ⊢ A ∈ ℂ → A ‾ ∈ ℂ
2 eqid ⊢ n ∈ ℕ 0 ⟼ A ‾ n n ! = n ∈ ℕ 0 ⟼ A ‾ n n !
3 2 efcvg ⊢ A ‾ ∈ ℂ → seq 0 + n ∈ ℕ 0 ⟼ A ‾ n n ! ⇝ e A ‾
4 1 3 syl ⊢ A ∈ ℂ → seq 0 + n ∈ ℕ 0 ⟼ A ‾ n n ! ⇝ e A ‾
5 nn0uz ⊢ ℕ 0 = ℤ ≥ 0
6 eqid ⊢ n ∈ ℕ 0 ⟼ A n n ! = n ∈ ℕ 0 ⟼ A n n !
7 6 efcvg ⊢ A ∈ ℂ → seq 0 + n ∈ ℕ 0 ⟼ A n n ! ⇝ e A
8 seqex ⊢ seq 0 + n ∈ ℕ 0 ⟼ A ‾ n n ! ∈ V
9 8 a1i ⊢ A ∈ ℂ → seq 0 + n ∈ ℕ 0 ⟼ A ‾ n n ! ∈ V
10 0zd ⊢ A ∈ ℂ → 0 ∈ ℤ
11 6 eftval ⊢ k ∈ ℕ 0 → n ∈ ℕ 0 ⟼ A n n ! ⁡ k = A k k !
12 11 adantl ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → n ∈ ℕ 0 ⟼ A n n ! ⁡ k = A k k !
13 eftcl ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → A k k ! ∈ ℂ
14 12 13 eqeltrd ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → n ∈ ℕ 0 ⟼ A n n ! ⁡ k ∈ ℂ
15 5 10 14 serf ⊢ A ∈ ℂ → seq 0 + n ∈ ℕ 0 ⟼ A n n ! : ℕ 0 ⟶ ℂ
16 15 ffvelcdmda ⊢ A ∈ ℂ ∧ j ∈ ℕ 0 → seq 0 + n ∈ ℕ 0 ⟼ A n n ! ⁡ j ∈ ℂ
17 addcl ⊢ k ∈ ℂ ∧ m ∈ ℂ → k + m ∈ ℂ
18 17 adantl ⊢ A ∈ ℂ ∧ j ∈ ℕ 0 ∧ k ∈ ℂ ∧ m ∈ ℂ → k + m ∈ ℂ
19 simpl ⊢ A ∈ ℂ ∧ j ∈ ℕ 0 → A ∈ ℂ
20 elfznn0 ⊢ k ∈ 0 … j → k ∈ ℕ 0
21 19 20 14 syl2an ⊢ A ∈ ℂ ∧ j ∈ ℕ 0 ∧ k ∈ 0 … j → n ∈ ℕ 0 ⟼ A n n ! ⁡ k ∈ ℂ
22 simpr ⊢ A ∈ ℂ ∧ j ∈ ℕ 0 → j ∈ ℕ 0
23 22 5 eleqtrdi ⊢ A ∈ ℂ ∧ j ∈ ℕ 0 → j ∈ ℤ ≥ 0
24 cjadd ⊢ k ∈ ℂ ∧ m ∈ ℂ → k + m ‾ = k ‾ + m ‾
25 24 adantl ⊢ A ∈ ℂ ∧ j ∈ ℕ 0 ∧ k ∈ ℂ ∧ m ∈ ℂ → k + m ‾ = k ‾ + m ‾
26 expcl ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → A k ∈ ℂ
27 faccl ⊢ k ∈ ℕ 0 → k ! ∈ ℕ
28 27 adantl ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → k ! ∈ ℕ
29 28 nncnd ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → k ! ∈ ℂ
30 28 nnne0d ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → k ! ≠ 0
31 26 29 30 cjdivd ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → A k k ! ‾ = A k ‾ k ! ‾
32 cjexp ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → A k ‾ = A ‾ k
33 28 nnred ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → k ! ∈ ℝ
34 33 cjred ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → k ! ‾ = k !
35 32 34 oveq12d ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → A k ‾ k ! ‾ = A ‾ k k !
36 31 35 eqtrd ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → A k k ! ‾ = A ‾ k k !
37 12 fveq2d ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → n ∈ ℕ 0 ⟼ A n n ! ⁡ k ‾ = A k k ! ‾
38 2 eftval ⊢ k ∈ ℕ 0 → n ∈ ℕ 0 ⟼ A ‾ n n ! ⁡ k = A ‾ k k !
39 38 adantl ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → n ∈ ℕ 0 ⟼ A ‾ n n ! ⁡ k = A ‾ k k !
40 36 37 39 3eqtr4d ⊢ A ∈ ℂ ∧ k ∈ ℕ 0 → n ∈ ℕ 0 ⟼ A n n ! ⁡ k ‾ = n ∈ ℕ 0 ⟼ A ‾ n n ! ⁡ k
41 19 20 40 syl2an ⊢ A ∈ ℂ ∧ j ∈ ℕ 0 ∧ k ∈ 0 … j → n ∈ ℕ 0 ⟼ A n n ! ⁡ k ‾ = n ∈ ℕ 0 ⟼ A ‾ n n ! ⁡ k
42 18 21 23 25 41 seqhomo ⊢ A ∈ ℂ ∧ j ∈ ℕ 0 → seq 0 + n ∈ ℕ 0 ⟼ A n n ! ⁡ j ‾ = seq 0 + n ∈ ℕ 0 ⟼ A ‾ n n ! ⁡ j
43 42 eqcomd ⊢ A ∈ ℂ ∧ j ∈ ℕ 0 → seq 0 + n ∈ ℕ 0 ⟼ A ‾ n n ! ⁡ j = seq 0 + n ∈ ℕ 0 ⟼ A n n ! ⁡ j ‾
44 5 7 9 10 16 43 climcj ⊢ A ∈ ℂ → seq 0 + n ∈ ℕ 0 ⟼ A ‾ n n ! ⇝ e A ‾
45 climuni ⊢ seq 0 + n ∈ ℕ 0 ⟼ A ‾ n n ! ⇝ e A ‾ ∧ seq 0 + n ∈ ℕ 0 ⟼ A ‾ n n ! ⇝ e A ‾ → e A ‾ = e A ‾
46 4 44 45 syl2anc ⊢ A ∈ ℂ → e A ‾ = e A ‾