diff options
author | miguel <miguel@6a38eb6e-646e-4a02-a296-d141613ad6c4> | 2001-10-10 10:06:28 +0000 |
---|---|---|
committer | miguel <miguel@6a38eb6e-646e-4a02-a296-d141613ad6c4> | 2001-10-10 10:06:28 +0000 |
commit | b1156fa11a39335db0864ae8d0dcd489ba08ba7c (patch) | |
tree | befdee03a65ced0d6ae6c8127e185198f95a07f6 | |
parent | 215fc6475fb091b8d42149ce73b938f133a259e2 (diff) |
Minor bug that affected radpower=0.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/Boundary/trunk@160 6a38eb6e-646e-4a02-a296-d141613ad6c4
-rw-r--r-- | src/RadiationBoundary.c | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/src/RadiationBoundary.c b/src/RadiationBoundary.c index 2ba4262..2288921 100644 --- a/src/RadiationBoundary.c +++ b/src/RadiationBoundary.c @@ -996,12 +996,10 @@ void CCTK_FCALL CCTK_FNAME (BndRadiativeVN) CCTK_REAL _radius0_inv = 1/_radius[_0], \ _radius1_inv = 1/_radius[_1]; \ \ - \ - if (radpower > 0) \ + if (radpower >= 0) \ { \ CCTK_REAL H; \ \ - \ H = 0.25 * radpower * dxyz[0] \ * (_xyz[_0]*SQR (_radius0_inv) + _xyz[_1]*SQR (_radius1_inv)); \ H = (1 + H) / (1 - H); \ @@ -1108,12 +1106,10 @@ void CCTK_FCALL CCTK_FNAME (BndRadiativeVN) CCTK_REAL _radius0_inv = 1/_radius[_0], \ _radius1_inv = 1/_radius[_1]; \ \ - \ - if (radpower > 0) \ + if (radpower >= 0) \ { \ CCTK_REAL H; \ \ - \ H = 0.25 * radpower * dxyz[0] \ * (_xyz[_0]*SQR (_radius0_inv) + _xyz[_1]*SQR (_radius1_inv)); \ H = (1 - H) / (1 + H); \ |