diff options
| author | eschnett <eschnett@4ec1db94-0e4f-0410-ada3-8bed251432c9> | 2012-05-11 16:50:34 +0000 |
|---|---|---|
| committer | eschnett <eschnett@4ec1db94-0e4f-0410-ada3-8bed251432c9> | 2012-05-11 16:50:34 +0000 |
| commit | 089ad18c79e0a32e9edf42b66b4d2418ffc61bac (patch) | |
| tree | 7b2cabb80356d4d0538682217a61de53d3bbe42e | |
| parent | 1919f9b1fa320fd60d69f648612d00262ca30420 (diff) | |
Remove #warning
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/NoExcision/trunk@34 4ec1db94-0e4f-0410-ada3-8bed251432c9
| -rw-r--r-- | src/reduce.F90 | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/reduce.F90 b/src/reduce.F90 index ab7b70e..3084d86 100644 --- a/src/reduce.F90 +++ b/src/reduce.F90 @@ -52,7 +52,8 @@ subroutine NoExcision_Reduce (cctk_iteration, cctk_lsh, rhs, x, y, z) dist2 = (x - cx)**2 + (y - cy)**2 + (z - cz)**2 -#warning "TODO: reduce not only the RHS, but also drive the variables towards Minkowski" + ! TODO: reduce not only the RHS, but also drive the variables + ! towards Minkowski where (dist2 <= 1) rhs = smooth (rhs, rhs * reduction_factor(n), dist2) end where |