Corrosponding changes to the *.ccl files in support of the area calculation.

git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/EHFinder/trunk@80 2a26948c-0e4f-0410-aee8-f1d3e353619c

1 files changed, 20 insertions, 3 deletions

diff --git a/interface.ccl b/interface.ccl
index d1991ec..9e993df 100644
--- a/interface.ccl
+++ b/interface.ccl
@@ -46,22 +46,39 @@ CCTK_INT mask_bak TYPE=GF TIMELEVELS=1
 
 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, sinthetacosphi, sinthetasinphi, costheta
+  ctheta, cphi, rsurf, sintheta, costheta, sinphi, cosphi,
+  drdtheta, drdphi, da, gtt, gtp, gpp, weights
 } "Grid arrays for points on the surface"
 
 CCTK_REAL surface_tmp_arrays TYPE=ARRAY DIM=2 TIMELEVELS=1 SIZE=ntheta,nphi GHOSTSIZE=n_array_ghosts,n_array_ghosts DISTRIB=DEFAULT
 {
   drsurf, interp_x, interp_y, interp_z, f_interp,
   dfdx_interp, dfdy_interp, dfdz_interp
-} "Tmeporary grid arrays for finding points on the surface"
+} "Temporary grid arrays for finding points on the surface"
+
+CCTK_REAL center_arrays TYPE=ARRAY DIM=1 TIMELEVELS=1 SIZE=3 DISTRIB=CONSTANT
+{
+  center
+} "The cartesian location of the center for the spherical coordinate system"
 
 CCTK_INT surface_int_array TYPE=ARRAY DIM=2 TIMELEVELS=1 SIZE=ntheta,nphi GHOSTSIZE=n_array_ghosts,n_array_ghosts DISTRIB=DEFAULT
 {
   n_since_last_reduction
-} "Tmeporary integer grid array for finding points on the surface"
+} "Temporary integer grid array for finding points on the surface"
+
+CCTK_REAL interp_metric_arrays TYPE=ARRAY DIM=2 TIMELEVELS=1 SIZE=ntheta,nphi GHOSTSIZE=n_array_ghosts,n_array_ghosts DISTRIB=DEFAULT
+{
+  gxxi, gxyi, gxzi, gyyi, gyzi, gzzi, psii
+} "Arrays for holding the interpolated metric and conformal factor"
+
+CCTK_REAL integrate_tmp_array TYPE=ARRAY DIM=2 TIMELEVELS=1 SIZE=ntheta,nphi GHOSTSIZE=n_array_ghosts,n_array_ghosts DISTRIB=DEFAULT
+{
+  int_tmp
+}
 
 CCTK_INT rep_mask TYPE=GF TIMELEVELS=1
 
 CCTK_INT re_param_control_pde TYPE=SCALAR
 CCTK_INT re_param_control_approx TYPE=SCALAR
 CCTK_REAL eh_area TYPE=SCALAR
+CCTK_REAL eh_area2 TYPE=SCALAR