fun_trans (disch:=assumption)
K : Type u_1
inst✝⁸ : RCLike K
X : Type u_2
inst✝⁷ : Vec K X
Y : Type ?u.94465
inst✝⁶ : Vec K Y
Z : Type ?u.94476
inst✝⁵ : Vec K Z
W : Type ?u.94487
inst✝⁴ : Vec K W
ι : Type ?u.94498
inst✝³ : IndexType ι
inst✝² : LawfulIndexType ι
inst✝¹ : DecidableEq ι
E : ι → Type ?u.94525
inst✝ : (i : ι) → Vec K (E i)
f g : X → K
hf : CDifferentiable K f
hg : CDifferentiable K g
hx : ∀ (x : X), g x ≠ 0
⊢ (fun x dx => ((fun x => f x / g x) x, cderiv K (fun x => f x / g x) x dx)) = fun x dx =>
    let ydy := (f x, cderiv K f x dx);
    let zdz := (g x, cderiv K g x dx);
    (ydy.1 / zdz.1, (ydy.2 * zdz.1 - ydy.1 * zdz.2) / zdz.1 ^ 2)
no goals