Added functions to get the group-type and variable type for a given variable.

Tom


git-svn-id: http://svn.cactuscode.org/flesh/trunk@248 17b73243-c579-4c4c-a9d2-2d5706c11dac

1 files changed, 24 insertions, 0 deletions

diff --git a/src/main/Groups.c b/src/main/Groups.c
index f2b0d37d..7f2f092d 100644
--- a/src/main/Groups.c
+++ b/src/main/Groups.c
@@ -564,3 +564,27 @@ int CCTK_GetFirstVarNum(int group)
 {
   return groups[group].variables[0].number;
 }
+
+int CCTK_GetVarGType(int var)
+{
+  int gtype;
+  int group;
+
+  group = group_of_variable[var];
+
+  gtype = groups[group].gtype;
+
+  return gtype;
+}
+
+int CCTK_GetVarVType(int var)
+{
+  int vtype;
+  int group;
+
+  group = group_of_variable[var];
+
+  vtype = groups[group].vtype;
+
+  return vtype;
+}