diff options
-rw-r--r-- | src/qms.c | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -1406,7 +1406,7 @@ skip_solve: memcpy(W_val_tl1, W_val, grid_size * sizeof(*W_val_tl1)); } - if (reflevel > ms->solve_level_max && timestep % 2) + if (timestep % 2) goto skip_export; @@ -1695,8 +1695,7 @@ void qms_mg_inithist(CCTK_ARGUMENTS) double dt; dt = cctk_delta_time / (1 << reflevel_solve); - if (reflevel_solve > solve_level_max) - dt *= 2; + dt *= 2; // timestep for QMS is equal to the evolution step for the coarser level fprintf(stderr, "%d inithist\n", reflevel); |