aboutsummaryrefslogtreecommitdiff
path: root/src/Output.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/Output.c')
-rw-r--r--src/Output.c38
1 files changed, 19 insertions, 19 deletions
diff --git a/src/Output.c b/src/Output.c
index 0539fdf..7f1bbd5 100644
--- a/src/Output.c
+++ b/src/Output.c
@@ -45,7 +45,7 @@ static void CheckSteerableParameters (ioStreamedHDF5GH *myGH);
int IOStreamedHDF5_OutputGH (cGH *GH)
{
DECLARE_CCTK_PARAMETERS
- int index;
+ int vindex;
ioStreamedHDF5GH *myGH;
const char *name;
char *fullname;
@@ -62,14 +62,14 @@ int IOStreamedHDF5_OutputGH (cGH *GH)
}
/* Loop over all variables */
- for (index = 0; index < CCTK_NumVars (); index++)
+ for (vindex = 0; vindex < CCTK_NumVars (); vindex++)
{
- if (IOStreamedHDF5_TimeFor (GH, index))
+ if (IOStreamedHDF5_TimeFor (GH, vindex))
{
- name = CCTK_VarName (index);
- fullname = CCTK_FullName (index);
+ name = CCTK_VarName (vindex);
+ fullname = CCTK_FullName (vindex);
if (verbose)
{
@@ -83,7 +83,7 @@ int IOStreamedHDF5_OutputGH (cGH *GH)
free (fullname);
/* Register variable as having output this iteration */
- myGH->out_last[index] = GH->cctk_iteration;
+ myGH->out_last[vindex] = GH->cctk_iteration;
}
}
@@ -124,10 +124,10 @@ int IOStreamedHDF5_OutputVarAs (cGH *GH,
const char *alias)
{
DECLARE_CCTK_PARAMETERS
- int index;
+ int vindex;
- index = CCTK_VarIndex (fullname);
+ vindex = CCTK_VarIndex (fullname);
if (verbose)
{
@@ -137,7 +137,7 @@ int IOStreamedHDF5_OutputVarAs (cGH *GH,
}
/* Do the output */
- IOStreamedHDF5_Write (GH, index, alias);
+ IOStreamedHDF5_Write (GH, vindex, alias);
return (0);
}
@@ -159,7 +159,7 @@ int IOStreamedHDF5_OutputVarAs (cGH *GH,
@vtype cGH *
@vio in
@endvar
- @var index
+ @var vindex
@vdesc index of variable
@vtype int
@vio in
@@ -172,7 +172,7 @@ int IOStreamedHDF5_OutputVarAs (cGH *GH,
@endreturndesc
@@*/
int IOStreamedHDF5_TimeFor (cGH *GH,
- int index)
+ int vindex)
{
ioStreamedHDF5GH *myGH;
@@ -189,13 +189,13 @@ int IOStreamedHDF5_TimeFor (cGH *GH,
}
/* Check this variable should be output */
- if (! (myGH->do_output[index] && GH->cctk_iteration % myGH->out_every == 0))
+ if (! (myGH->do_output[vindex] && GH->cctk_iteration % myGH->out_every == 0))
{
return (0);
}
/* Check variable not already output this iteration */
- if (myGH->out_last[index] == GH->cctk_iteration)
+ if (myGH->out_last[vindex] == GH->cctk_iteration)
{
CCTK_WARN (2, "Already done output in IOStreamedHDF5");
return (0);
@@ -221,14 +221,14 @@ int IOStreamedHDF5_TimeFor (cGH *GH,
@vtype cGH *
@vio in
@endvar
- @var index
+ @var vindex
@vdesc index of variable
@vtype int
@vio in
@endvar
@@*/
int IOStreamedHDF5_TriggerOutput (cGH *GH,
- int index)
+ int vindex)
{
DECLARE_CCTK_PARAMETERS
ioStreamedHDF5GH *myGH;
@@ -236,13 +236,13 @@ int IOStreamedHDF5_TriggerOutput (cGH *GH,
const char *varname;
- varname = CCTK_VarName (index);
+ varname = CCTK_VarName (vindex);
myGH = (ioStreamedHDF5GH *) CCTK_GHExtension (GH, "IOStreamedHDF5");
if (verbose)
{
- fullname = CCTK_FullName (index);
+ fullname = CCTK_FullName (vindex);
CCTK_VInfo (CCTK_THORNSTRING, "IOStreamedHDF5_TriggerOutput: "
"output of (varname, fullname) "
"= ('%s', '%s')", varname, fullname);
@@ -250,10 +250,10 @@ int IOStreamedHDF5_TriggerOutput (cGH *GH,
}
/* Do the output */
- IOStreamedHDF5_Write (GH, index, varname);
+ IOStreamedHDF5_Write (GH, vindex, varname);
/* Register variable as having output this iteration */
- myGH->out_last[index] = GH->cctk_iteration;
+ myGH->out_last[vindex] = GH->cctk_iteration;
return (0);
}