aboutsummaryrefslogtreecommitdiff
path: root/ML_BSSN/src/ML_BSSN_enforce.c
diff options
context:
space:
mode:
authorErik Schnetter <schnetter@cct.lsu.edu>2007-12-27 23:44:35 +0100
committerErik Schnetter <schnetter@cct.lsu.edu>2007-12-27 23:44:35 +0100
commit51c2468863e407195bd99c852071bdda74a889dd (patch)
tree89b95b8d12a35614019133617be1d6bbc3489c8e /ML_BSSN/src/ML_BSSN_enforce.c
parent684fd4e0c6dd2c101967710e26c4281f2041396b (diff)
Regenerate code after removing leftover debugging code from Kranc
Diffstat (limited to 'ML_BSSN/src/ML_BSSN_enforce.c')
-rw-r--r--ML_BSSN/src/ML_BSSN_enforce.c40
1 files changed, 20 insertions, 20 deletions
diff --git a/ML_BSSN/src/ML_BSSN_enforce.c b/ML_BSSN/src/ML_BSSN_enforce.c
index 8c69f82..289a4b3 100644
--- a/ML_BSSN/src/ML_BSSN_enforce.c
+++ b/ML_BSSN/src/ML_BSSN_enforce.c
@@ -1,5 +1,5 @@
-/* File produced by user diener */
-/* Produced with Mathematica Version 6.0 for Linux x86 (32-bit) (April 20, 2007) */
+/* File produced by user eschnett */
+/* Produced with Mathematica Version 6.0 for Mac OS X x86 (32-bit) (April 20, 2007) */
/* Mathematica script written by Ian Hinder and Sascha Husa */
@@ -34,15 +34,15 @@ void ML_BSSN_enforce_Body(cGH *cctkGH, CCTK_INT dir, CCTK_INT face, CCTK_REAL no
/* Declare predefined quantities */
- CCTK_REAL qp1o12dx = INITVALUE;
- CCTK_REAL qp1o12dy = INITVALUE;
- CCTK_REAL qp1o12dz = INITVALUE;
- CCTK_REAL qp1o144dxdy = INITVALUE;
- CCTK_REAL qp1o144dxdz = INITVALUE;
- CCTK_REAL qp1o144dydz = INITVALUE;
- CCTK_REAL qpm1o12dx2 = INITVALUE;
- CCTK_REAL qpm1o12dy2 = INITVALUE;
- CCTK_REAL qpm1o12dz2 = INITVALUE;
+ CCTK_REAL p1o12dx = INITVALUE;
+ CCTK_REAL p1o12dy = INITVALUE;
+ CCTK_REAL p1o12dz = INITVALUE;
+ CCTK_REAL p1o144dxdy = INITVALUE;
+ CCTK_REAL p1o144dxdz = INITVALUE;
+ CCTK_REAL p1o144dydz = INITVALUE;
+ CCTK_REAL pm1o12dx2 = INITVALUE;
+ CCTK_REAL pm1o12dy2 = INITVALUE;
+ CCTK_REAL pm1o12dz2 = INITVALUE;
if (verbose > 1)
{
@@ -73,15 +73,15 @@ void ML_BSSN_enforce_Body(cGH *cctkGH, CCTK_INT dir, CCTK_INT face, CCTK_REAL no
hdzi = 0.5 * dzi;
/* Initialize predefined quantities */
- qp1o12dx = INV(dx)/12.;
- qp1o12dy = INV(dy)/12.;
- qp1o12dz = INV(dz)/12.;
- qp1o144dxdy = (INV(dx)*INV(dy))/144.;
- qp1o144dxdz = (INV(dx)*INV(dz))/144.;
- qp1o144dydz = (INV(dy)*INV(dz))/144.;
- qpm1o12dx2 = -pow(dx,-2)/12.;
- qpm1o12dy2 = -pow(dy,-2)/12.;
- qpm1o12dz2 = -pow(dz,-2)/12.;
+ p1o12dx = INV(dx)/12.;
+ p1o12dy = INV(dy)/12.;
+ p1o12dz = INV(dz)/12.;
+ p1o144dxdy = (INV(dx)*INV(dy))/144.;
+ p1o144dxdz = (INV(dx)*INV(dz))/144.;
+ p1o144dydz = (INV(dy)*INV(dz))/144.;
+ pm1o12dx2 = -pow(dx,-2)/12.;
+ pm1o12dy2 = -pow(dy,-2)/12.;
+ pm1o12dz2 = -pow(dz,-2)/12.;
/* Loop over the grid points */
LC_LOOP3 (ML_BSSN_enforce,