∀ {R : Type u_2} {M : Type u_3} [inst : Ring R] [inst_1 : AddCommGroup M] [inst_2 : Module R M] {a₁ : R × M}
  (a₂ : R × M) {l₁ l₂ l : Mathlib.Tactic.Module.NF R M},
  (a₁ ::ᵣ l₁).eval - l₂.eval = l.eval → (a₁ ::ᵣ l₁).eval - (a₂ ::ᵣ l₂).eval = ((-a₂.1, a₂.2) ::ᵣ l).eval