diff options
author | allen <allen@071ba4cb-2270-47cd-a45a-3e542e115664> | 2002-08-21 15:44:37 +0000 |
---|---|---|
committer | allen <allen@071ba4cb-2270-47cd-a45a-3e542e115664> | 2002-08-21 15:44:37 +0000 |
commit | 1b12261ddc030412699f43d17a166c3edb4d0792 (patch) | |
tree | e90784411514bfae62095f7dff9e512c7af0705b | |
parent | 54da890093057b61242dd1de500733d48c9225e1 (diff) |
Fixed error setting solution at special case of r=0
Closes Cactus/1085
Also made the gaussian in IDScalarWaveCXX consistent with gaussians in
the other ID thorns, hence new testsuite results.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusWave/IDScalarWaveC/trunk@28 071ba4cb-2270-47cd-a45a-3e542e115664
-rw-r--r-- | src/InitialData.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/InitialData.c b/src/InitialData.c index 0a1248a..7eaa6a7 100644 --- a/src/InitialData.c +++ b/src/InitialData.c @@ -100,7 +100,7 @@ void IDScalarWaveC_InitialData(CCTK_ARGUMENTS) if (R == 0.0) { - phi_p[index] = (1.0 - 2.0*dt*dt/sigma)*exp(-dt*dt/sigma); + phi_p[index] = amplitude*(1.0 - 2.0*dt*dt/sigma)*exp(-dt*dt/sigma); } else { |