diff options
| author | tradke <tradke@6a3ddf76-46e1-4315-99d9-bc56cac1ef84> | 2001-05-22 05:03:42 +0000 |
|---|---|---|
| committer | tradke <tradke@6a3ddf76-46e1-4315-99d9-bc56cac1ef84> | 2001-05-22 05:03:42 +0000 |
| commit | 3602adccaa035144dcc726c8d04c0418a068535d (patch) | |
| tree | 33e250ba6b89104d6498bfbfeb024cfd9c926d0f | |
| parent | 840c052c11dec318acb285d67a15fca48663863f (diff) | |
Cannot write to parameters since these are read-only now.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/IDAnalyticBH/trunk@90 6a3ddf76-46e1-4315-99d9-bc56cac1ef84
| -rw-r--r-- | src/Misner_standard.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/src/Misner_standard.c b/src/Misner_standard.c index 3049d83..2b8d8f4 100644 --- a/src/Misner_standard.c +++ b/src/Misner_standard.c @@ -73,6 +73,7 @@ void Misner_standard(CCTK_ARGUMENTS) CCTK_REAL inv_r1_5, inv_r2_5; CCTK_REAL inv_psi; CCTK_INT powfac; + CCTK_INT adm_mass; const CCTK_REAL zero = 0.0, one = 1.0, three = 3.0; @@ -102,14 +103,14 @@ void Misner_standard(CCTK_ARGUMENTS) /* compute the ADM mass * -------------------- */ - mass = zero; + adm_mass = zero; for(n = 1; n <= nmax; n++) { csch[n] = one / sinh(mu*n); coth[n] = one / tanh(mu*n); - mass += 4.0 * csch[n]; + adm_mass += 4.0 * csch[n]; } - CCTK_VInfo(CCTK_THORNSTRING, "ADM mass is %f", (double) mass); + CCTK_VInfo(CCTK_THORNSTRING, "ADM mass is %f", (double) adm_mass); for(i = 0; i < npoints; i++) |