apply @Quotient.ind (motive := fun x : R[X] => a • (b • x) = (a * b) • x)
R : Type
inst✝² : Ring R
inst✝¹ : DecidableEq R
X : Type
inst✝ : DecidableEq X
a b : R
x : R[X]
⊢ a • b • x = (a * b) • x
case a
R : Type
inst✝² : Ring R
inst✝¹ : DecidableEq R
X : Type
inst✝ : DecidableEq X
a b : R
x : R[X]
⊢ ∀ (a_1 : FormalSum R X),
    a • b • Quotient.mk (formalSumSetoid R X) a_1 = (a * b) • Quotient.mk (formalSumSetoid R X) a_1