Merge branch 'master' into boundaries

2011-05-15 14:01:50 -03:00 · 2011-05-15 14:01:50 -03:00 · 00e9457d46
commit 00e9457d46
parent 957ae55b4b 68a39a28e4
1 changed files with 0 additions and 9 deletions
--- a/src/evolution.F90
+++ b/src/evolution.F90
@ -230,15 +230,6 @@ module evolution
    cmax   = 1.0d-16
    lev    = 1

-! initiate the smallest spacial step
-!
-#if NDIMS == 2
-    dxmin = min(adx(lev), ady(lev))
-#endif /* NDIMS == 2 */
-#if NDIMS == 3
-    dxmin = min(adx(lev), ady(lev), adz(lev))
-#endif /* NDIMS == 3 */
-
 ! if maxlev > 1, find the highest level
 !
    if (maxlev .gt. 1) then