From 1ab0d7d9c5f3a9044fa7e3b0c215ace4f7fcd74c Mon Sep 17 00:00:00 2001 From: Erik Schnetter Date: Tue, 23 Oct 2012 14:34:32 -0400 Subject: Carpet: Correct errors in adaptive step size handling --- Carpet/Carpet/src/Evolve.cc | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'Carpet/Carpet/src/Evolve.cc') diff --git a/Carpet/Carpet/src/Evolve.cc b/Carpet/Carpet/src/Evolve.cc index b427920e3..936414d40 100644 --- a/Carpet/Carpet/src/Evolve.cc +++ b/Carpet/Carpet/src/Evolve.cc @@ -239,7 +239,8 @@ namespace Carpet { cctkGH->cctk_time = global_time; } else { // Take varying step sizes into account - cctkGH->cctk_time += delta_time; + cctkGH->cctk_time += cctkGH->cctk_delta_time; + delta_time = cctkGH->cctk_delta_time; global_time = cctkGH->cctk_time; } @@ -436,8 +437,8 @@ namespace Carpet { = (global_time - delta_time / maxtimereflevelfact + delta_time * mglevelfact / timereflevelfact); - tt->set_time (mglevel, reflevel, timelevel, cctkGH->cctk_time); } + tt->set_time (mglevel, reflevel, timelevel, cctkGH->cctk_time); Waypoint ("Evolution I at iteration %d time %g%s%s%s", cctkGH->cctk_iteration, (double)cctkGH->cctk_time, -- cgit v1.2.3