Theorem: MvPowerSeries.subst_smul (DividedPowers/ForMathlib/MvPowerSeries/Substitutions.lean)

State before:
σ : Type u_1
inst✝⁸ : DecidableEq σ
A : Type u_2
inst✝⁷ : CommSemiring A
R : Type u_3
inst✝⁶ : CommRing R
inst✝⁵ : Algebra A R
τ : Type u_4
inst✝⁴ : DecidableEq τ
S : Type u_5
inst✝³ : CommRing S
inst✝² : Algebra A S
inst✝¹ : Algebra R S
inst✝ : IsScalarTower A R S
a : σ → MvPowerSeries τ S
ha : SubstDomain a
r : A
f : MvPowerSeries σ R
⊢ subst a (r • f) = r • subst a f
Tactic:
rw [← coe_substAlgHom ha, AlgHom.map_smul_of_tower]
State after:
no goals