apply Quotient.sound
case a
R : Type
inst✝² : Ring R
inst✝¹ : DecidableEq R
X : Type
inst✝ : DecidableEq X
x : R[X]
s : FormalSum R X
⊢ 1 • Quotient.mk (formalSumSetoid R X) s = Quotient.mk (formalSumSetoid R X) s
case a.a
R : Type
inst✝² : Ring R
inst✝¹ : DecidableEq R
X : Type
inst✝ : DecidableEq X
x : R[X]
s : FormalSum R X
⊢ scmul 1 s ≈ s