new CoordRange Syntax

git-svn-id: http://svn.cactuscode.org/arrangements/CactusWave/WaveBinarySource/trunk@5 b9286e40-80fe-41ab-903a-d6b447012e1e

2 files changed, 7 insertions, 7 deletions

diff --git a/src/CoordinateStuff.c b/src/CoordinateStuff.c
index 377b141..4fe763b 100644
--- a/src/CoordinateStuff.c
+++ b/src/CoordinateStuff.c
@@ -35,11 +35,11 @@ int IndexFloorC(cGH *GH, CCTK_REAL coord_value, int d)
   CCTK_REAL cmin,cmax;
 
   if (d==0)
-    CCTK_CoordRange(GH,&cmin,&cmax,"x");
+    CCTK_CoordRange(GH,&cmin,&cmax, 1, "x", "cart3d");
   else if (d==1)
-    CCTK_CoordRange(GH,&cmin,&cmax,"y");
+    CCTK_CoordRange(GH,&cmin,&cmax, 2, "y", "cart3d");
   else if (d==2)
-    CCTK_CoordRange(GH,&cmin,&cmax,"z");
+    CCTK_CoordRange(GH,&cmin,&cmax, 3, "z", "cart3d");
  else 
    CCTK_WARN(0,"IndexFloor: dimension is not valid. Fortran:1..3  C:0..2");
   
@@ -106,11 +106,11 @@ int IndexCeilC(cGH *GH, CCTK_REAL coord_value, int d)
   CCTK_REAL cmin,cmax;
 
   if (d==0)
-    CCTK_CoordRange(GH,&cmin,&cmax,"x");
+    CCTK_CoordRange(GH,&cmin,&cmax, -1, "x", "cart3d");
   else if (d==1)
-    CCTK_CoordRange(GH,&cmin,&cmax,"y");
+    CCTK_CoordRange(GH,&cmin,&cmax, -1, "y", "cart3d");
   else if (d==2)
-    CCTK_CoordRange(GH,&cmin,&cmax,"z");
+    CCTK_CoordRange(GH,&cmin,&cmax, -1, "z", "cart3d");
   else 
     CCTK_WARN(0,"IndexCeil: dimension is not valid. Fortran:1..3  C:0..2");
  
diff --git a/src/WaveBinary.c b/src/WaveBinary.c
index 6a8ca79..af4b263 100644
--- a/src/WaveBinary.c
+++ b/src/WaveBinary.c
@@ -76,7 +76,7 @@ void WaveBinaryC(CCTK_ARGUMENTS)
     onthisproc = 0;
 
     /* calculate the center of a single binary source */
-    CCTK_CoordRange(cctkGH, &zmin, &zmax, "z");
+    CCTK_CoordRange(cctkGH, &zmin, &zmax, -1, "z", "cart3d");
     xs = sign * binary_radius * cos(binary_omega*cctk_time);
     ys = sign * binary_radius * sin(binary_omega*cctk_time);
     zs = (zmax-zmin)/2 + zmin;