From f09f635f3a564b4084d29b6be106d268a7a8e892 Mon Sep 17 00:00:00 2001
From: Michael Zingale <michael.zingale@stonybrook.edu>
Date: Sat, 23 Sep 2023 18:16:59 -0400
Subject: [PATCH] a few more SDC fixes (#2578)

---
 Source/sdc/sdc_newton_solve.H | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/Source/sdc/sdc_newton_solve.H b/Source/sdc/sdc_newton_solve.H
index 3550b64364..12c83a26e1 100644
--- a/Source/sdc/sdc_newton_solve.H
+++ b/Source/sdc/sdc_newton_solve.H
@@ -2,6 +2,7 @@
 #define SDC_NEWTON_SOLVE_H
 
 #include <sdc_react_util.H>
+#include <linpack.H>
 
 // error codes
 constexpr int NEWTON_SUCCESS = 0;
@@ -238,7 +239,7 @@ sdc_newton_solve(const Real dt_m,
 #ifdef NEW_NETWORK_IMPLEMENTATION
         RHS::dgesl(Jac, f_rhs);
 #else
-        dgesl<NumSpec+2>(Jac, ipvt, f_rhs);
+        dgesl<NumSpec+1>(Jac, ipvt, f_rhs);
 #endif
 
         for (int n = 1; n < NumSpec+1; ++n) {