From d6875b9d7cd888ef8554c8ce5f27e47b20a17083 Mon Sep 17 00:00:00 2001
From: Michael Burr <burr2@clemson.edu>
Date: Sun, 19 Apr 2026 21:45:33 -0400
Subject: [PATCH 1/2] Added applyMatrix to exports

---
 M2/Macaulay2/m2/exports.m2 | 1 +
 1 file changed, 1 insertion(+)

diff --git a/M2/Macaulay2/m2/exports.m2 b/M2/Macaulay2/m2/exports.m2
index 515bfcc1a59..b732f3e8528 100644
--- a/M2/Macaulay2/m2/exports.m2
+++ b/M2/Macaulay2/m2/exports.m2
@@ -501,6 +501,7 @@ export {
 	"applicationDirectory",
 	"apply",
 	"applyKeys",
+    "applyMatrix",
 	"applyPairs",
 	"applyTable",
 	"applyValues",

From 03d344381b22b94cb5e391504a9a7a0152f3e14a Mon Sep 17 00:00:00 2001
From: Michael Burr <burr2@clemson.edu>
Date: Sun, 19 Apr 2026 21:46:09 -0400
Subject: [PATCH 2/2] Added code for applyMatrix

---
 M2/Macaulay2/m2/matrix2.m2 | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/M2/Macaulay2/m2/matrix2.m2 b/M2/Macaulay2/m2/matrix2.m2
index 595700ed651..3ef5c6a5968 100644
--- a/M2/Macaulay2/m2/matrix2.m2
+++ b/M2/Macaulay2/m2/matrix2.m2
@@ -783,6 +783,9 @@ permanents(ZZ,Matrix) := Ideal => (p,M) -> (
      F := map(ring M, R2,flatten entries M);
      F D1)
 
+applyMatrix = method()
+applyMatrix(Matrix,Function) := (M,f) -> (matrix apply(entries M,i->apply(i,f)))
+
 -- Local Variables:
 -- compile-command: "make -C $M2BUILDDIR/Macaulay2/m2 "
 -- End: