diff options
author | hawke <hawke@578cdeb0-5ea1-4b81-8215-5a3b8777ee0b> | 2003-04-25 14:19:35 +0000 |
---|---|---|
committer | hawke <hawke@578cdeb0-5ea1-4b81-8215-5a3b8777ee0b> | 2003-04-25 14:19:35 +0000 |
commit | afb053800f476ae76546dc5709f145a5793ff336 (patch) | |
tree | f6d2296029ad13ec8b4f868e1450a3edd9d7f6f8 /src/SetTime.c | |
parent | 590f97638ac60cddc65374801a286045dbcd8ccc (diff) |
Change the commented out debugging statements to ifdef'd out.
Remove old, buggy commented out stuff.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusNumerical/MoL/trunk@6 578cdeb0-5ea1-4b81-8215-5a3b8777ee0b
Diffstat (limited to 'src/SetTime.c')
-rw-r--r-- | src/SetTime.c | 46 |
1 files changed, 3 insertions, 43 deletions
diff --git a/src/SetTime.c b/src/SetTime.c index 898f8a6..4e99c22 100644 --- a/src/SetTime.c +++ b/src/SetTime.c @@ -65,46 +65,11 @@ int MoL_SetTime(CCTK_ARGUMENTS) DECLARE_CCTK_ARGUMENTS; DECLARE_CCTK_PARAMETERS; - /* - CCTK_INT i,j,k; - CCTK_REAL *Var0,*Var1,*Var2; - - Var0 = (CCTK_REAL*)CCTK_VarDataPtr(cctkGH, 0, - "wavetoymol::phi"); - Var1 = (CCTK_REAL*)CCTK_VarDataPtr(cctkGH, 1, - "wavetoymol::phi"); - Var2 = (CCTK_REAL*)CCTK_VarDataPtr(cctkGH, 2, - "wavetoymol::phi"); - printf("Grid %d: Pointer to time levels %ld %ld %ld\n", - cctkGH->cctk_levfac[0], Var0,Var1,Var2); - printf("First point of first two levels is %g and %g.\n", - Var0[0],Var1[0]);*/ - /* - for (k=0;k<cctk_lsh[2];k++) - { - for (j=0;j<cctk_lsh[1];j++) - { - for (i=0;i<cctk_lsh[0];i++) - { - printf("Set time: %d %d %d %d %g\n", cctk_levfac[0], - i, j, k, - Var1[CCTK_GFINDEX3D(cctkGH, i, j, k)]); - } - } - }*/ - *Original_Time = cctkGH->cctk_time; *Original_Delta_Time = cctkGH->CCTK_DELTA_TIME; cctkGH->cctk_time -= cctkGH->CCTK_DELTA_TIME; - /* - CCTK_VInfo(CCTK_THORNSTRING,"Original time was %g. Reset to %g", - *Original_Time,cctkGH->cctk_time); - */ - /* if ( (CCTK_EQUALS(MoL_ODE_Method,"ICN")) || - ( (CCTK_EQUALS(MoL_ODE_Method,"Generic")) && - ( (MoL_Intermediate_Steps == 4)) - || CCTK_EQUALS(Generic_Type,"ICN") ) )*/ + if ( (CCTK_EQUALS(MoL_ODE_Method,"ICN")) || ( (CCTK_EQUALS(MoL_ODE_Method,"Generic")) && CCTK_EQUALS(Generic_Type,"ICN") ) ) @@ -152,7 +117,6 @@ int MoL_ResetTime(CCTK_ARGUMENTS) if (MoL_Intermediate_Steps == 2) { cctkGH->cctk_time = (*Original_Time); - /* cctkGH->CCTK_DELTA_TIME = 0.5 * (*Original_Delta_Time);*/ } /* else if (MoL_Intermediate_Steps == 3) { @@ -214,14 +178,10 @@ int MoL_ResetTime(CCTK_ARGUMENTS) } }*/ } - /* - CCTK_VInfo(CCTK_THORNSTRING,"Time has been reset to %g", - cctkGH->cctk_time); - */ - /* +#ifdef MOLDEBUG printf("MoL has once more reset t: %f: and dt: %f.\n", cctkGH->cctk_time, cctkGH->CCTK_DELTA_TIME); - */ +#endif return 0; } |