aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorjese <jese@b2a53a04-0f4f-0410-87ed-f9f25ced00cf>2008-03-27 15:31:29 +0000
committerjese <jese@b2a53a04-0f4f-0410-87ed-f9f25ced00cf>2008-03-27 15:31:29 +0000
commitecba7a774c9b7c77528199d1418b5a8157389862 (patch)
tree56b2a0dea8be0344dd4630e6f77bf4839c8ad37c
parent725f1c4deab31fdfe3516cbffacf5984e2145639 (diff)
*** empty log message ***
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/TwoPunctures/trunk@85 b2a53a04-0f4f-0410-87ed-f9f25ced00cf
-rw-r--r--interface.ccl9
-rw-r--r--schedule.ccl6
2 files changed, 12 insertions, 3 deletions
diff --git a/interface.ccl b/interface.ccl
index b77941c..4afe81d 100644
--- a/interface.ccl
+++ b/interface.ccl
@@ -40,3 +40,12 @@ CCTK_INT FUNCTION Rescale_Sources( \
USES FUNCTION Set_Rho_ADM
USES FUNCTION Set_Initial_Guess_for_u
USES FUNCTION Rescale_Sources
+
+PUBLIC:
+
+CCTK_REAL bare_mass TYPE=scalar
+{
+ mp mm
+} "Bare masses of the punctures"
+
+
diff --git a/schedule.ccl b/schedule.ccl
index c15c008..468f589 100644
--- a/schedule.ccl
+++ b/schedule.ccl
@@ -4,7 +4,7 @@
if (CCTK_Equals(initial_data, "twopunctures"))
{
if (keep_u_around) {
- STORAGE: puncture_u
+ STORAGE: puncture_u bare_mass
}
SCHEDULE TwoPunctures_ParamCheck AT PARAMCHECK
@@ -17,7 +17,7 @@ if (CCTK_Equals(initial_data, "twopunctures"))
SCHEDULE TwoPunctures IN ADMBase_InitialData
{
LANG: C
- STORAGE: puncture_u
+ STORAGE: puncture_u bare_mass
# SYNC: ADMBase::metric ADMBase::curv ADMBase::lapse
} "Create puncture black hole initial data"
}
@@ -26,7 +26,7 @@ if (CCTK_Equals(initial_data, "twopunctures"))
SCHEDULE TwoPunctures AT Initial AFTER ADMBase_InitialData BEFORE ADMBase_PostInitial AFTER TOV_Initial_Data
{
LANG: C
- STORAGE: puncture_u
+ STORAGE: puncture_u bare_mass
# SYNC: ADMBase::metric ADMBase::curv ADMBase::lapse
} "Create puncture black hole initial data"
}