diff options
author | allen <allen@5633253d-7678-4964-a54d-f87795f8ee59> | 2002-05-23 20:07:15 +0000 |
---|---|---|
committer | allen <allen@5633253d-7678-4964-a54d-f87795f8ee59> | 2002-05-23 20:07:15 +0000 |
commit | dfe54c5f1c47e39d66744612b49e06df4ac92bb4 (patch) | |
tree | f1c20e99cd395950e42977e4f72bc7d7baa74998 | |
parent | 94e1485b6b94cb5ac55bc91a2a7a0510f555a039 (diff) |
Some info statements and a verbose parameter for debugging
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/Time/trunk@48 5633253d-7678-4964-a54d-f87795f8ee59
-rw-r--r-- | param.ccl | 6 | ||||
-rw-r--r-- | src/Simple.c | 14 |
2 files changed, 17 insertions, 3 deletions
@@ -37,4 +37,8 @@ REAL courant_fac "The courant timestep condition dt = courant_fac*max(delta_spac INT outtimestep_every "How often to output courant timestep" { 0:* :: "Zero means no output" -} 0
\ No newline at end of file +} 0 + +BOOLEAN verbose "Give information about timestep setting" +{ +} "no"
\ No newline at end of file diff --git a/src/Simple.c b/src/Simple.c index 31fd57d..5848d36 100644 --- a/src/Simple.c +++ b/src/Simple.c @@ -52,8 +52,18 @@ void Time_Simple(CCTK_ARGUMENTS) /* Calculate the timestep */ cctkGH->cctk_delta_time = dtfac*min_spacing; - - + if (verbose) + { + CCTK_VInfo(CCTK_THORNSTRING, + "Using simple courant condition to set timestep"); + CCTK_VInfo(CCTK_THORNSTRING, + " ... using dtfac of %f",dtfac); + CCTK_VInfo(CCTK_THORNSTRING, + " ... using minimum spacing of %f",min_spacing); + } + + CCTK_VInfo(CCTK_THORNSTRING, + "Timestep set to %f (Simple Courant)\n",cctkGH->cctk_delta_time); } |