Add a transpose

oscar-system · Feb 16, 2024 · 5bbb14d · 5bbb14d
1 parent 8e8e087
commit 5bbb14d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/TropicalGeometry/linear_space.jl b/src/TropicalGeometry/linear_space.jl
@@ -308,7 +308,7 @@ function tropical_linear_space(I::MPolyIdeal, nu::Union{Nothing,TropicalSemiring
     x = gens(base_ring(I))
     G = gens(I)
     macaulayMatrix = matrix([[coeff(g,xi) for xi in x] for g in G])
-    A = kernel(macaulayMatrix, side = :right)
+    A = transpose(kernel(macaulayMatrix, side = :right))
     TropL = tropical_linear_space(A,nu,
                                   weighted_polyhedral_complex_only=weighted_polyhedral_complex_only)
     if !weighted_polyhedral_complex_only