From b0d6b946ffed1d1a66391cef8428d6acd0f18909 Mon Sep 17 00:00:00 2001
From: Erik Schnetter <schnetter@gmail.com>
Date: Mon, 19 Nov 2012 14:54:04 -0500
Subject: WaveToy: Rename local variable "k" to "kvec"

---
 m/WaveToy.m | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/m/WaveToy.m b/m/WaveToy.m
index 3256f63..0a21bbe 100644
--- a/m/WaveToy.m
+++ b/m/WaveToy.m
@@ -64,12 +64,12 @@ initialCalcStanding =
   {Name                 -> "WT_Standing",
    Schedule             -> {"AT initial"},
    ConditionalOnKeyword -> {"initial_data", "Standing"},
-   Shorthands           -> {k, omega},
+   Shorthands           -> {kvec, omega},
    Equations            -> 
-   {k     -> Pi / width,
-    omega -> Sqrt[3 k^2],
-    u     -> amplitude Cos[k x] Cos[k y] Cos[k z] Cos[omega t],
-    rho   -> amplitude Cos[k x] Cos[k y] Cos[k z] Sin[omega t] (-omega)}};
+   {kvec  -> Pi / width,
+    omega -> Sqrt[3 kvec^2],
+    u     -> amplitude Cos[kvec x] Cos[kvec y] Cos[kvec z] Cos[omega t],
+    rho   -> amplitude Cos[kvec x] Cos[kvec y] Cos[kvec z] Sin[omega t] (-omega)}};
 
 (******************************************************************************)
 (* Evolution equations *)
-- 
cgit v1.2.3