Untabified. Please try to adhere to the Cactus coding guidelines when

modifying or adding files.


git-svn-id: http://svn.cactuscode.org/arrangements/CactusWave/IDScalarWaveC/trunk@32 071ba4cb-2270-47cd-a45a-3e542e115664

1 files changed, 12 insertions, 12 deletions

diff --git a/src/InitialData.c b/src/InitialData.c
index 7eaa6a7..2261b97 100644
--- a/src/InitialData.c
+++ b/src/InitialData.c
@@ -4,7 +4,7 @@
    @author    Werner Benger   
    @desc 
               Initial data for the 3D Wave Equation
-	      Derived from Tom Goodale
+              Derived from Tom Goodale
    @enddesc 
    @version $Header$
  @@*/
@@ -98,17 +98,17 @@ void IDScalarWaveC_InitialData(CCTK_ARGUMENTS)
 
           phi[index] = amplitude*exp( - sqr( (R - radius) / sigma ) );
 
- 	  if (R == 0.0) 
-	  {
-	    phi_p[index] = amplitude*(1.0 - 2.0*dt*dt/sigma)*exp(-dt*dt/sigma);
-	  }
-	  else
-	  {
-	    phi_p[index] = amplitude/2.0*(R-dt)/R*
-	      exp( - sqr( (R - radius - dt)/ sigma ) )
-	      + amplitude/2.0*(R+dt)/R*
-	      exp( - sqr( (R - radius + dt)/ sigma ) );
-	  }
+          if (R == 0.0) 
+          {
+            phi_p[index] = amplitude*(1.0 - 2.0*dt*dt/sigma)*exp(-dt*dt/sigma);
+          }
+          else
+          {
+            phi_p[index] = amplitude/2.0*(R-dt)/R*
+              exp( - sqr( (R - radius - dt)/ sigma ) )
+              + amplitude/2.0*(R+dt)/R*
+              exp( - sqr( (R - radius + dt)/ sigma ) );
+          }
         } 
       }
     }