From 748569b8a25ce2d5d3b774f18df0345a3fe68768 Mon Sep 17 00:00:00 2001
From: knarf <knarf@b2a53a04-0f4f-0410-87ed-f9f25ced00cf>
Date: Tue, 5 Oct 2004 11:07:13 +0000
Subject: - add source terms provided by aliased function - small fix suggested
 by Marcus concerning the initialisation of the dvs

git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/TwoPunctures/trunk@19 b2a53a04-0f4f-0410-87ed-f9f25ced00cf
---
 interface.ccl | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

(limited to 'interface.ccl')

diff --git a/interface.ccl b/interface.ccl
index a969173..3bb592b 100644
--- a/interface.ccl
+++ b/interface.ccl
@@ -5,6 +5,14 @@ IMPLEMENTS: TwoPunctures
 
 INHERITS: ADMBase StaticConformal grid
 
-
-
 REAL puncture_u TYPE=gf
+
+CCTK_INT FUNCTION Rho_ADM(                 \
+    CCTK_POINTER_TO_CONST IN cctkGH,       \
+    CCTK_INT              IN size,         \
+    CCTK_POINTER          IN source,       \
+    CCTK_POINTER          IN x,            \
+    CCTK_POINTER          IN y,            \
+    CCTK_POINTER          IN z             \
+    )
+USES FUNCTION Rho_ADM
-- 
cgit v1.2.3