diff options
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])) } }; |