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

Merge branch 'master' into reconnection

Browse Source
This commit is contained in:
Grzegorz Kowal 2014-08-13 07:44:51 -03:00
commit 3acbbffa62
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/evolution.F90
View File

@ -889,7 +889,7 @@ module evolution
if (ieee_is_nan(pdata%u(p,i,j,k))) then if (ieee_is_nan(pdata%u(p,i,j,k))) then
print *, 'U NaN:', cvars(p), pdata%meta%id, i, j, k print *, 'U NaN:', cvars(p), pdata%meta%id, i, j, k
end if end if
if (ieee_is_isnan(pdata%q(p,i,j,k))) then if (ieee_is_nan(pdata%q(p,i,j,k))) then
print *, 'Q NaN:', pvars(p), pdata%meta%id, i, j, k print *, 'Q NaN:', pvars(p), pdata%meta%id, i, j, k
end if end if
#else /* IBM */ #else /* IBM */