Added dimension to the data you can get back from CCTK_GetGroupData

Tom


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

1 files changed, 14 insertions, 1 deletions

diff --git a/src/main/Groups.c b/src/main/Groups.c
index 36eed9fe..efc904a8 100644
--- a/src/main/Groups.c
+++ b/src/main/Groups.c
@@ -479,7 +479,7 @@ int CCTK_VTypeNumber(const char *type)
    @endhistory 
 
 @@*/
-int CCTK_GetGroupData(int group, int *gtype, int *vtype, int *n_variables)
+int CCTK_GetGroupData(int group, int *gtype, int *vtype, int *dim, int *n_variables)
 {
   int return_code;
 
@@ -487,6 +487,7 @@ int CCTK_GetGroupData(int group, int *gtype, int *vtype, int *n_variables)
   {
     *gtype = groups[group].gtype;
     *vtype = groups[group].vtype;
+    *dim   = groups[group].dim;
     *n_variables = groups[group].n_variables;
 
     return_code = 1;
@@ -498,3 +499,15 @@ int CCTK_GetGroupData(int group, int *gtype, int *vtype, int *n_variables)
 
   return return_code;
 }
+
+char *CCTK_GetVarName(int varnum)
+{
+  char *name;
+  int group;
+
+  group = group_of_variable[varnum];
+
+  name = groups[group].variables[varnum-groups[group].variables[0].number].name;
+
+  return name;
+}