From 0dd503de579ffde204ec8502c8c3f9251501b3a6 Mon Sep 17 00:00:00 2001 From: schnetter Date: Thu, 5 Nov 2009 04:31:38 +0000 Subject: Correct Gaussian initial data for R=0 git-svn-id: http://svn.cactuscode.org/arrangements/CactusWave/IDScalarWaveC/trunk@46 071ba4cb-2270-47cd-a45a-3e542e115664 --- src/InitialData.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/InitialData.c b/src/InitialData.c index 18cee00..5cb3f40 100644 --- a/src/InitialData.c +++ b/src/InitialData.c @@ -95,7 +95,7 @@ void IDScalarWaveC_InitialData(CCTK_ARGUMENTS) if (R == 0.0) { - phi_p[vindex] = amplitude*(1.0 - 2.0*dt*dt/sigma)*exp(-dt*dt/sigma); + phi_p[vindex] = amplitude*(1.0 - 2.0*dt*dt/sigma/sigma)*exp(-dt*dt/sigma/sigma); } else { -- cgit v1.2.3