Change UnitStep to StepFunction in older hydro examples

UnitStep is converted to Piecewise in Mathematica 8, so we use our own StepFunction instead.

1 files changed, 3 insertions, 3 deletions

diff --git a/Examples/Euler.m b/Examples/Euler.m
index e3c22ad..b2716cd 100644
--- a/Examples/Euler.m
+++ b/Examples/Euler.m
@@ -88,11 +88,11 @@ initialShockCalc =
   ConditionalOnKeyword -> {"initial_data", "shock"},
   Equations ->
   {
-    rho -> rhoR0 UnitStep[x-0.5] + rhoL0 (1-UnitStep[x-0.5]),
-    v[1] -> vR0 UnitStep[x-0.5] + vL0 (1-UnitStep[x-0.5]),
+    rho -> rhoR0 StepFunction[x-0.5] + rhoL0 (1-StepFunction[x-0.5]),
+    v[1] -> vR0 StepFunction[x-0.5] + vL0 (1-StepFunction[x-0.5]),
     v[2] -> 0,
     v[3] -> 0,
-    p -> pR0 UnitStep[x-0.5] + pL0 (1-UnitStep[x-0.5])
+    p -> pR0 StepFunction[x-0.5] + pL0 (1-StepFunction[x-0.5])
   }
 };