diff --git a/M2/Macaulay2/m2/matrix2.m2 b/M2/Macaulay2/m2/matrix2.m2 index 8bd42f69535..528a97c3fc1 100644 --- a/M2/Macaulay2/m2/matrix2.m2 +++ b/M2/Macaulay2/m2/matrix2.m2 @@ -389,8 +389,7 @@ remainder'(Matrix,Matrix) := Matrix => (f,g) -> ( or not isFreeModule source g or not isFreeModule source g then error "expected maps between free modules"; dual remainder(dual f, dual g)) remainder(Matrix,Matrix) := Matrix % Matrix := Matrix => (n,m) -> ( - R := ring n; - if target m =!= target n then error "expected matrices with the same target"; + if target m != target n then error "expected matrices with the same target"; if not isFreeModule source n or not isFreeModule source m then error "expected maps from free modules"; if not isQuotientModule target m then error "expected maps to a quotient module"; c := runHooks((remainder, Matrix, Matrix), (n, m));