diff options
Diffstat (limited to 'src/RK87.c')
-rw-r--r-- | src/RK87.c | 10 |
1 files changed, 2 insertions, 8 deletions
@@ -67,12 +67,10 @@ void MoL_RK87Add(CCTK_ARGUMENTS) DECLARE_CCTK_ARGUMENTS; DECLARE_CCTK_PARAMETERS; - cGroupDynamicData arraydata; - CCTK_INT groupindex, ierr, i, j; - CCTK_INT arraytotalsize, arraydim; + CCTK_INT arraydim; static CCTK_INT scratchspace_firstindex = -99; - CCTK_INT index, var, scratchstep, alphaindex, scratchindex; + CCTK_INT index, var, scratchstep; CCTK_INT totalsize; CCTK_REAL * restrict UpdateVar; @@ -81,8 +79,6 @@ void MoL_RK87Add(CCTK_ARGUMENTS) CCTK_REAL * restrict ErrorVar; CCTK_REAL const * restrict OldVar; - CCTK_INT arrayscratchlocation; - CCTK_REAL beta, gamma, gamma_error; static const CCTK_REAL beta_array[12][12] = { @@ -258,8 +254,6 @@ void MoL_RK87Add(CCTK_ARGUMENTS) /* Real arrays */ - arrayscratchlocation = 0; - for (var = 0; var < MoLNumEvolvedArrayVariables; var++) { |