diff options
| author | goodale <goodale@5c0f84ea-6048-4d6e-bfa4-55cd5f2e0dd7> | 1999-10-24 15:47:21 +0000 |
|---|---|---|
| committer | goodale <goodale@5c0f84ea-6048-4d6e-bfa4-55cd5f2e0dd7> | 1999-10-24 15:47:21 +0000 |
| commit | b7923f428fd0ca7d64f788f292c71820f74985eb (patch) | |
| tree | 342acf092f0ad59df3140ffd29d5995e558fa605 | |
| parent | 3f834e20298c785fe7fc7dfa7a3661a085baaf68 (diff) | |
Initialise the wave center.
Tom
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/IDLinearWaves/trunk@36 5c0f84ea-6048-4d6e-bfa4-55cd5f2e0dd7
| -rw-r--r-- | src/teukwaves.F | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/teukwaves.F b/src/teukwaves.F index eb65488..e5df827 100644 --- a/src/teukwaves.F +++ b/src/teukwaves.F @@ -81,8 +81,9 @@ c the parameter variables to the variables of CAC3.0, to allow for c easy portation (wavepulse stays wavepulse btw). (GERD) amp = amplitude - m = mvalue - wave= wavelength + m = mvalue + wave = wavelength + ra = wavecenter c to be consistent with Evans & Abrahams, rescale the amplitude c by kappa, because they use that in the packet and |