From ef086efe5cea36e1cad4869fb77b5a75e55e8cc5 Mon Sep 17 00:00:00 2001
From: Anton Khirnov <anton@khirnov.net>
Date: Sat, 27 Aug 2022 01:47:05 +0200
Subject: Fix smoothing W_pred on reflevel=0 with MPI.

---
 src/qms.c | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/src/qms.c b/src/qms.c
index eb38f36..aab5394 100644
--- a/src/qms.c
+++ b/src/qms.c
@@ -1557,9 +1557,7 @@ skip_solve:
                 }
             mirror(cp, W_pred1);
         } else if (reflevel == 0) {
-            const int interior_size = cctk_lsh[0] - cp->offset_left[0] - cctk_nghostzones[0];
-
-            const double bnd_loc = x[CCTK_GFINDEX3D(ms->gh, cp->offset_left[0] + interior_size, 0, 0)];
+            const double bnd_loc = (cp->level_size[0] - cctk_nghostzones[0]) * cp->solver->step[0];
             const double transition_start = bnd_loc * 0.7;
 
 #pragma omp parallel for
-- 
cgit v1.2.3