diff options
| author | Erik Schnetter <eschnett@redshift.lan> | 2007-11-04 19:25:39 -0600 |
|---|---|---|
| committer | Erik Schnetter <eschnett@redshift.lan> | 2007-11-04 19:25:39 -0600 |
| commit | 23f33ea59a04e5cb6c663821c6a6ecbb8d2f438c (patch) | |
| tree | 05924deb1c5313473ce6df5c5d4b7b03ebc1a2e1 /ML_BSSN/src/ML_BSSN_enforce.c | |
| parent | d22a02edf0cb2c13daec9f4700084a7082274198 (diff) | |
Add BSSN RHS.
Remove Mathematica output trees; keep only Cactus version of trees.
Diffstat (limited to 'ML_BSSN/src/ML_BSSN_enforce.c')
| -rw-r--r-- | ML_BSSN/src/ML_BSSN_enforce.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ML_BSSN/src/ML_BSSN_enforce.c b/ML_BSSN/src/ML_BSSN_enforce.c index 9442ff9..5d75422 100644 --- a/ML_BSSN/src/ML_BSSN_enforce.c +++ b/ML_BSSN/src/ML_BSSN_enforce.c @@ -128,7 +128,7 @@ void ML_BSSN_enforce_Body(cGH *cctkGH, CCTK_INT dir, CCTK_INT face, CCTK_REAL no /* Precompute derivatives (old style) */ /* Calculate temporaries and grid functions */ - detgt = 2*gt21L*gt31L*gt32L + gt33L*(gt11L*gt22L - SQR(gt21L)) - gt22L*SQR(gt31L) - gt11L*SQR(gt32L); + detgt = 1; gtu11 = INV(detgt)*(gt22L*gt33L - SQR(gt32L)); |