diff options
author | allen <allen@6a38eb6e-646e-4a02-a296-d141613ad6c4> | 2001-05-10 17:13:36 +0000 |
---|---|---|
committer | allen <allen@6a38eb6e-646e-4a02-a296-d141613ad6c4> | 2001-05-10 17:13:36 +0000 |
commit | b0e4eff508d829f16a5069e17d34323ab2f602e6 (patch) | |
tree | 88f9ca112c1ab76197acb09dd2114e3109d84408 /src/RadiationBoundary.c | |
parent | 5364085baa94f87859be2d782dadcba545383e64 (diff) |
New timelevel indexing
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/Boundary/trunk@144 6a38eb6e-646e-4a02-a296-d141613ad6c4
Diffstat (limited to 'src/RadiationBoundary.c')
-rw-r--r-- | src/RadiationBoundary.c | 19 |
1 files changed, 13 insertions, 6 deletions
diff --git a/src/RadiationBoundary.c b/src/RadiationBoundary.c index 50caf70..efbbcfc 100644 --- a/src/RadiationBoundary.c +++ b/src/RadiationBoundary.c @@ -1333,7 +1333,6 @@ void CCTK_FCALL CCTK_FNAME (BndRadiativeVN) @endvar CCTK_VarTypeI CCTK_GroupDimFromVarI - CCTK_NumTimeLevelsFromVarI RADIATIVE_BOUNDARY @history @hdate Mon 9 Apr 2001 @@ -1411,18 +1410,26 @@ static int ApplyBndRadiative (cGH *GH, } /* Use next time level, if available */ - timelvl_to = CCTK_NumTimeLevelsFromVarI (first_var_to) - 1; - if (timelvl_to < 0) + timelvl_to = 0; + /* if (timelvl_to < 0) { timelvl_to = 0; - } + }*/ /* Use current time level, if available */ - timelvl_from = CCTK_NumTimeLevelsFromVarI (first_var_from) - 2; - if (timelvl_from < 0) + if (CCTK_NumTimeLevelsFromVarI(first_var_from) > 1) + { + timelvl_from = 1; + } + else { timelvl_from = 0; } + /*if (timelvl_from < 0) + { + timelvl_from = 0; + }*/ + /* Find Courant parameters. */ dtv = speed * GH->cctk_delta_time; dtvh = 0.5 * dtv; |