diff options
| author | Ian Hinder <ian.hinder@aei.mpg.de> | 2010-09-29 11:01:37 +0100 |
|---|---|---|
| committer | Ian Hinder <ian.hinder@aei.mpg.de> | 2010-09-29 11:01:37 +0100 |
| commit | 18adf96190010c3807fec95c10549b000bab186c (patch) | |
| tree | 74d64254fa9de49c742d98075930c9d2d47a16a4 /Examples/Burgers.m | |
| parent | bec5a47835d3164ae9a466e6935be2ab6f3d2b6a (diff) | |
Burgers.m: Fix to use the correct uR in HLLE
Diffstat (limited to 'Examples/Burgers.m')
| -rw-r--r-- | Examples/Burgers.m | 7 |
1 files changed, 5 insertions, 2 deletions
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])) } }; |