From 9b3e93ab973c1a4af536ef772f71059c7db83e6f Mon Sep 17 00:00:00 2001 From: Billy Cao Date: Sat, 5 Sep 2026 14:09:05 +0000 Subject: [PATCH] Restore negative slopes in the SUPERBEE limiter --- src/simulation/m_muscl.fpp | 1 + 1 file changed, 1 insertion(+) diff --git a/src/simulation/m_muscl.fpp b/src/simulation/m_muscl.fpp index 23fa67c1e1..1211cc468e 100644 --- a/src/simulation/m_muscl.fpp +++ b/src/simulation/m_muscl.fpp @@ -203,6 +203,7 @@ contains slope = -1._wp*min(-min(2._wp*abs(slopeL), abs(slopeR)), -min(abs(slopeL), & & 2._wp*abs(slopeR))) end if + if (slopeL < 0._wp) slope = -slope end if ! reconstruct from left side