From 18adf96190010c3807fec95c10549b000bab186c Mon Sep 17 00:00:00 2001 From: Ian Hinder Date: Wed, 29 Sep 2010 11:01:37 +0100 Subject: Burgers.m: Fix to use the correct uR in HLLE --- Examples/Burgers.m | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'Examples/Burgers.m') diff --git a/Examples/Burgers.m b/Examples/Burgers.m index 60ab50a..aa04069 100644 --- a/Examples/Burgers.m +++ b/Examples/Burgers.m @@ -27,7 +27,8 @@ derivatives = PDplus[i_] -> DPlus[i], DiffPlus[i_] -> DiffPlusOp[i], - DiffMinus[i_] -> DiffMinusOp[i] + DiffMinus[i_] -> DiffMinusOp[i], + ShiftMinus[i_] -> 1/shift[i] }; (* PD = PDstandard2nd; *) @@ -115,10 +116,12 @@ reconstructCalc[i_] := fluxCalc[f_, i_] := { Name -> "burgers_flux_" <> ToString[i], + ApplyBCs -> True, + Where -> Interior, Schedule -> {"in MoL_CalcRHS after burgers_reconstruct_" <> ToString[i]}, Equations -> { - uF -> 1/2 (f[uLeft] + f[uR] + alpha (uLeft - uR)) + uF -> 1/2 (f[uLeft] + f[ShiftMinus[uR,i]] + alpha (uLeft - ShiftMinus[uR,i])) } }; -- cgit v1.2.3