optimized basis(ZZ, Matrix)

Macaulay2 · Oct 29, 2024 · fbc3bac · fbc3bac
1 parent b5ab3e7
commit fbc3bac
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/M2/Macaulay2/m2/basis.m2 b/M2/Macaulay2/m2/basis.m2
@@ -179,7 +179,7 @@ inducedBasisMap = (G, F, f) -> (
     -- this helper routine is useful for computing basis of a pair of composable
     -- matrices or a chain complex, when target f is the source of a matrix which
     -- we previously computed basis for.
-    psi := f * inducedMap(source f, , generators F);
+    psi := f * F.cache.Monomials; -- equivalent to f * inducedMap(source f, , gens F)
     phi := last coefficients(ambient psi, Monomials => generators G);
     map(G, F, phi, Degree => degree f))
     -- TODO: benchmark against inducedTruncationMap in Truncations.m2