Theorem: SciLean.Scalar.log.arg_x.revDeriv_rule (SciLean/Core/Functions/Exp.lean)

State before:
R✝ : Type ?u.29295
C : Type ?u.29294
inst✝⁶ : Scalar R✝ C
inst✝⁵ : RealScalar R✝
W✝ : Type ?u.29304
inst✝⁴ : Vec C W✝
U✝ : Type ?u.29327
inst✝³ : SemiInnerProductSpace C U✝
R : Type u_1
inst✝² : RealScalar R
W : Type ?u.29349
inst✝¹ : Vec R W
U : Type u_2
inst✝ : SemiInnerProductSpace R U
x : U → R
hx : HasAdjDiff R x
hu : ∀ (u : U), x u ≠ 0
⊢ (revDeriv R fun u => log (x u)) = fun u =>
    let xdx := revDeriv R x u;
    (log xdx.1, fun dy => xdx.2 ((abs (x u))⁻¹ * dy))
Tactic:
unfold revDeriv
State after:
R✝ : Type ?u.29295
C : Type ?u.29294
inst✝⁶ : Scalar R✝ C
inst✝⁵ : RealScalar R✝
W✝ : Type ?u.29304
inst✝⁴ : Vec C W✝
U✝ : Type ?u.29327
inst✝³ : SemiInnerProductSpace C U✝
R : Type u_1
inst✝² : RealScalar R
W : Type ?u.29349
inst✝¹ : Vec R W
U : Type u_2
inst✝ : SemiInnerProductSpace R U
x : U → R
hx : HasAdjDiff R x
hu : ∀ (u : U), x u ≠ 0
⊢ (fun x_1 => ((fun u => log (x u)) x_1, semiAdjoint R (cderiv R (fun u => log (x u)) x_1))) = fun u =>
    let xdx := (x u, semiAdjoint R (cderiv R x u));
    (log xdx.1, fun dy => xdx.2 ((abs (x u))⁻¹ * dy))

State before:
R✝ : Type ?u.29295
C : Type ?u.29294
inst✝⁶ : Scalar R✝ C
inst✝⁵ : RealScalar R✝
W✝ : Type ?u.29304
inst✝⁴ : Vec C W✝
U✝ : Type ?u.29327
inst✝³ : SemiInnerProductSpace C U✝
R : Type u_1
inst✝² : RealScalar R
W : Type ?u.29349
inst✝¹ : Vec R W
U : Type u_2
inst✝ : SemiInnerProductSpace R U
x : U → R
hx : HasAdjDiff R x
hu : ∀ (u : U), x u ≠ 0
⊢ (fun x_1 => ((fun u => log (x u)) x_1, semiAdjoint R (cderiv R (fun u => log (x u)) x_1))) = fun u =>
    let xdx := (x u, semiAdjoint R (cderiv R x u));
    (log xdx.1, fun dy => xdx.2 ((abs (x u))⁻¹ * dy))
Tactic:
fun_trans (disch:=aesop) only [fwdDeriv, smul_push, ftrans_simp]
State after:
no goals

State before:
case funProp.discharger
R✝ : Type ?u.29295
C : Type ?u.29294
inst✝⁶ : Scalar R✝ C
inst✝⁵ : RealScalar R✝
W✝ : Type ?u.29304
inst✝⁴ : Vec C W✝
U✝ : Type ?u.29327
inst✝³ : SemiInnerProductSpace C U✝
R : Type u_1
inst✝² : RealScalar R
W : Type ?u.29349
inst✝¹ : Vec R W
U : Type u_2
inst✝ : SemiInnerProductSpace R U
x✝ : U → R
hx : HasAdjDiff R x✝
hu : ∀ (u : U), x✝ u ≠ 0
x : U
⊢ x✝ x ≠ 0
Tactic:
aesop
State after:
no goals