diff options
Diffstat (limited to 'src/InitialCopy.c')
-rw-r--r-- | src/InitialCopy.c | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/src/InitialCopy.c b/src/InitialCopy.c index 4a1a454..c4cfbf4 100644 --- a/src/InitialCopy.c +++ b/src/InitialCopy.c @@ -702,6 +702,25 @@ void MoL_FillAllLevels(CCTK_ARGUMENTS) } + for (var = 0; var < MoLNumEvolvedVariablesSlow; var++) + { + CurrentVar = (CCTK_REAL const*)CCTK_VarDataPtrI(cctkGH, 0, + EvolvedVariableIndexSlow[var]); + for (level = 1; + level < CCTK_ActiveTimeLevelsVI(cctkGH, + EvolvedVariableIndexSlow[var]); + level++) + { + PreviousVar = (CCTK_REAL*)CCTK_VarDataPtrI(cctkGH, level, + EvolvedVariableIndexSlow[var]); + if (PreviousVar) + { + memcpy(PreviousVar, CurrentVar, totalsize * sizeof(CCTK_REAL)); + } + } + } + + for (var = 0; var < MoLNumConstrainedVariables; var++) { CurrentVar = (CCTK_REAL const*)CCTK_VarDataPtrI(cctkGH, 0, |