gkowal/amun-code
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge branch 'master' into boundaries

Browse Source
This commit is contained in:
Grzegorz Kowal 2011-05-15 14:01:50 -03:00
commit 00e9457d46
1 changed files with 0 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/evolution.F90
View File

@ -230,15 +230,6 @@ module evolution
cmax = 1.0d-16 cmax = 1.0d-16
lev = 1 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 > 1, find the highest level
! !
if (maxlev .gt. 1) then if (maxlev .gt. 1) then