diff options
-rw-r--r-- | param.ccl | 7 | ||||
-rw-r--r-- | src/GRHydro_UpdateMask.F90 | 2 |
2 files changed, 9 insertions, 0 deletions
@@ -607,3 +607,10 @@ BOOLEAN sync_conserved_only "Only sync evolved conserved quantities during evolu { } no + + + +BOOLEAN verbose "Some debug output" +{ +} no + diff --git a/src/GRHydro_UpdateMask.F90 b/src/GRHydro_UpdateMask.F90 index fbb4cda..1808df3 100644 --- a/src/GRHydro_UpdateMask.F90 +++ b/src/GRHydro_UpdateMask.F90 @@ -221,6 +221,8 @@ subroutine GRHydro_AtmosphereReset(CCTK_ARGUMENTS) vup => vel end if + if (verbose.eq.1) call CCTK_INFO("Entering AtmosphereReset.") + !$OMP PARALLEL DO PRIVATE(det,keytemp,i,j,k,anyerr,keyerr) do k = 1, cctk_lsh(3) do j = 1, cctk_lsh(2) |