From 4727e99931b092d07fae4e3188b45ae31bea927e Mon Sep 17 00:00:00 2001
From: diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c>
Date: Thu, 6 Feb 2003 18:09:27 +0000
Subject: Added routines to find out how many surfaces are present. At present
 this information is not used. Added beginning support for the spacemask. Only
 routine to read in the emask. Nothing is done with it.

git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/EHFinder/trunk@89 2a26948c-0e4f-0410-aee8-f1d3e353619c
---
 interface.ccl | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

(limited to 'interface.ccl')

diff --git a/interface.ccl b/interface.ccl
index 6631138..f4fe515 100644
--- a/interface.ccl
+++ b/interface.ccl
@@ -2,7 +2,7 @@
 # $Header$
 
 implements: ehfinder
-inherits: grid admbase coordgauge staticconformal boundary
+inherits: grid admbase coordgauge staticconformal spacemask boundary
 
 USES INCLUDE: Boundary.h
 USES INCLUDE: MoL.h
@@ -44,6 +44,16 @@ CCTK_INT mask_bak TYPE=GF TIMELEVELS=1
   eh_mask_bak
 } "Temporary placeholder for the mask during re-parametrization"
 
+CCTK_INT surface_index TYPE=GF TIMELEVELS=1
+{
+  sc
+}
+
+CCTK_INT surface_counter TYPE=SCALAR
+CCTK_INT points_counter TYPE=SCALAR
+CCTK_INT more_surfaces TYPE=SCALAR
+CCTK_INT more_points TYPE=SCALAR
+ 
 CCTK_REAL surface_arrays TYPE=ARRAY DIM=2 TIMELEVELS=1 SIZE=ntheta,nphi GHOSTSIZE=n_array_ghosts,n_array_ghosts DISTRIB=DEFAULT
 {
   ctheta, cphi, rsurf, sintheta, costheta, sinphi, cosphi,
-- 
cgit v1.2.3