Repair constructor.

oscar-system · Nov 25, 2024 · 3ead720 · 3ead720
1 parent 54a2176
commit 3ead720
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/experimental/DoubleAndHyperComplexes/src/Objects/eagon_northcott_complex.jl b/experimental/DoubleAndHyperComplexes/src/Objects/eagon_northcott_complex.jl
@@ -111,7 +111,7 @@ end
       A::MatrixElem{T};
       F::FreeMod{T}=begin
         R = base_ring(A)
-        F = is_graded(R) ? graded_free_module(R, [zero(grading_group(R)) for _ in 1:n]) : FreeMod(R, n)
+        F = is_graded(R) ? graded_free_module(R, [zero(grading_group(R)) for _ in 1:ncols(A)]) : FreeMod(R, ncols(A))
       end
     ) where {T}
     chain_fac = ENCChainFactory(A, F)