diff options
Diffstat (limited to 'src/Output.c')
-rw-r--r-- | src/Output.c | 38 |
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); } |