refine ContinuousLinearMap.ext ?_
𝕜 : Type u_1
E : Type u_2
inst✝³ : NontriviallyNormedField 𝕜
inst✝² : NormedAlgebra 𝕜 ℝ
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedSpace ℝ E
x : ℝ
⊢ fderiv ℝ (fun x => ↑(fourierChar (Multiplicative.ofAdd x))) x =
    (2 * ↑π * I * ↑(fourierChar (Multiplicative.ofAdd x))) • ofRealCLM
𝕜 : Type u_1
E : Type u_2
inst✝³ : NontriviallyNormedField 𝕜
inst✝² : NormedAlgebra 𝕜 ℝ
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedSpace ℝ E
x : ℝ
⊢ ∀ (x_1 : ℝ),
    (fderiv ℝ (fun x => ↑(fourierChar (Multiplicative.ofAdd x))) x) x_1 =
      ((2 * ↑π * I * ↑(fourierChar (Multiplicative.ofAdd x))) • ofRealCLM) x_1