∀ {V : Type u_1} {W : Type u_2} [inst : NormedAddCommGroup V] [inst_1 : NormedSpace ℝ V] [inst_2 : NormedAddCommGroup W]
  [inst_3 : NormedSpace ℝ W] (L : V →L[ℝ] W →L[ℝ] ℝ) (v y : V) (w : W),
  (fderiv ℝ (fun v => ↑(Real.fourierChar (-(L v) w))) v) y =
    -2 * ↑Real.pi * Complex.I * ↑((L y) w) * ↑(Real.fourierChar (-(L v) w))