From 99d623dcc21908b93893011c8ebba19940cd9035 Mon Sep 17 00:00:00 2001
From: schnetter <schnetter@c3c03602-0f4f-0410-b3fa-d2c81c8a7dc5>
Date: Wed, 4 May 2005 15:10:10 +0000
Subject: Handle the tensor type alias "d".

git-svn-id: http://svn.cactuscode.org/arrangements/CactusNumerical/RotatingSymmetry90/trunk@19 c3c03602-0f4f-0410-b3fa-d2c81c8a7dc5
---
 src/interpolate.c        | 8 ++++++--
 src/rotatingsymmetry90.c | 8 ++++++--
 2 files changed, 12 insertions(+), 4 deletions(-)

diff --git a/src/interpolate.c b/src/interpolate.c
index b99ddfc..b1d618f 100644
--- a/src/interpolate.c
+++ b/src/interpolate.c
@@ -293,7 +293,9 @@ Rot90_CheckTensorTypes (CCTK_ARGUMENTS)
                     groupname);
         free (groupname);
       }
-    } else if (CCTK_EQUALS (tensortypealias, "u")) {
+    } else if (CCTK_EQUALS (tensortypealias, "u")
+               || CCTK_EQUALS (tensortypealias, "d"))
+    {
       /* vector */
       assert (numvars == 3);
     } else if (CCTK_EQUALS (tensortypealias, "dd_sym")) {
@@ -580,7 +582,9 @@ Rot90_SymmetryInterpolate (CCTK_POINTER_TO_CONST const cctkGH_,
       tensortype = &scalar;
       basevar = vi;
       var = 0;
-    } else if (CCTK_EQUALS (tensortypealias, "u")) {
+    } else if (CCTK_EQUALS (tensortypealias, "u")
+               || CCTK_EQUALS (tensortypealias, "d"))
+    {
       /* vector */
       assert (numvars == 3);
       tensortype = &vector;
diff --git a/src/rotatingsymmetry90.c b/src/rotatingsymmetry90.c
index a253d28..8db4b93 100644
--- a/src/rotatingsymmetry90.c
+++ b/src/rotatingsymmetry90.c
@@ -163,7 +163,9 @@ int BndRot90VI (cGH const * restrict const cctkGH,
     
     if (CCTK_EQUALS (tensortypealias, "scalar")) {
       /* scalar */
-    } else if (CCTK_EQUALS (tensortypealias, "u")) {
+    } else if (CCTK_EQUALS (tensortypealias, "u")
+               || CCTK_EQUALS (tensortypealias, "d"))
+    {
       /* vector */
       assert (numvars == 3);
     } else if (CCTK_EQUALS (tensortypealias, "dd_sym")) {
@@ -261,7 +263,9 @@ int BndRot90VI (cGH const * restrict const cctkGH,
       /* scalar */
       srcvi = vi;
       /* do nothing */
-    } else if (CCTK_EQUALS (tensortypealias, "u")) {
+    } else if (CCTK_EQUALS (tensortypealias, "u")
+               || CCTK_EQUALS (tensortypealias, "d"))
+    {
       /* vector */
       int srcindex;
       srcindex = convert_index (step, index, alldirs, &parity);
-- 
cgit v1.2.3