From 0d77e9dcedb5435d493c1ca29fc1e19fb8495e87 Mon Sep 17 00:00:00 2001
From: Liwei Ji <jiliwei.phys@gmail.com>
Date: Thu, 19 Sep 2024 17:32:15 -0400
Subject: [PATCH] ODESolvers: fix bug updating pre

---
 ODESolvers/src/solve.cxx | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ODESolvers/src/solve.cxx b/ODESolvers/src/solve.cxx
index 61d84fe9..9f2b8230 100644
--- a/ODESolvers/src/solve.cxx
+++ b/ODESolvers/src/solve.cxx
@@ -1010,7 +1010,7 @@ extern "C" void ODESolvers_Solve(CCTK_ARGUMENTS) {
                states<5>{&old, &k0, &k1, &k2, &k3});
 
     // update pre
-    statecomp_t::lincomb(pre, 0.0, reals<1>{1.0}, states<1>{&var},
+    statecomp_t::lincomb(pre, 0.0, reals<1>{1.0}, states<1>{&old},
                          make_valid_all());
 
   } else if (CCTK_EQUALS(method, "RKF78")) {