Commit c22a7ae7 authored by Stefan's avatar Stefan
Browse files

Update to GSLIB 1.0.5

parent ee95c8b2
#!/bin/bash
set -e
VER=1.0.4
CHKSUM=422cdd18e70a92ca6a08cca57b9fbb92a3c6e789
VER=1.0.5
CHKSUM=1b5b28de5b997c3b0893a3b4dcf5cee8614b9f27
if [ "$1" == "clean" ]; then
rm -rf gslib lib include 2>/dev/null
......
......@@ -11,8 +11,8 @@
* RANS k-Omega and k-Omega-SST (experimental)
* Online mesh-smoother (experimental)
* ElapsedTime option for writeControl (in par)
* Print runtime-statistics every 100 steps
* Support for GNU 8.x compilers
* Print runtime-statistics every 500 steps
* Support for GNU > 8.x compilers
* Support for Cray compilers
* Support for ARM compilers
* Add AVM regularization for scalars (experimental)
......@@ -21,11 +21,12 @@
* CHT support for generic fld reader
* Overwrite core routines in usr
* Lagrangian phase model - LPM (experimental)
* Distributed gllnid/gllel
* Distributed gllnid/gllel (experimental)
* Add parMetis partitioner
* Add parRSB partitioner
* Add CGNS mesh converter
* Support p0th with Helmholtz
* Update to GSLIB v1.0.5 and HYPRE v2.15.1
* Various bug fixes
## What you may have to change to be compatible
......@@ -37,15 +38,17 @@
* Remove common block CTORQ from usr (now part of OBJDATA included in TOTAL)
* Use nekamg_setup tool instead of amg_hypre (required for semg_amg preconditioner)
* Your parameters to the reserved user space param(170) - param(200)
* Set lelr in SIZE for a restart using muliple files (check value in hdr)
* Set lelr in SIZE for restart using muliple files (check value in file header)
* Use planar_avg() instead of planar_average_z etc.
* Rename AMG input files (example: amg_Aff.dat -> ethier.amgAff.dat)
## Known Bugs
[635](https://github.com/Nek5000/Nek5000/issues/635)
[634](https://github.com/Nek5000/Nek5000/issues/634)
[628](https://github.com/Nek5000/Nek5000/issues/628)
[627](https://github.com/Nek5000/Nek5000/issues/627)
[562](https://github.com/Nek5000/Nek5000/issues/562),
[562](https://github.com/Nek5000/Nek5000/issues/562)
[65](https://github.com/Nek5000/Nek5000/issues/65)
## Thanks to our Contributors
......
......@@ -9,7 +9,7 @@
&,'|----------------------------------------------------------|'
&,'| |'
&,'| COPYRIGHT (c) 2008-2019 UCHICAGO ARGONNE, LLC |'
&,'| Version: 19.0-rc2 |'
&,'| Version: 19.0-rc3 |'
&,'| Web: https://nek5000.mcs.anl.gov |'
&,'| |'
&,'\\----------------------------------------------------------/'
......@@ -199,6 +199,9 @@ c-----------------------------------------------------------------------
istep = 0
msteps = 1
irstat = int(param(120))
write(6,*) 'HERE: ', irstat
do kstep=1,nsteps,msteps
call nek__multi_advance(kstep,msteps)
if(kstep.ge.nsteps) lastep = 1
......@@ -209,7 +212,7 @@ c-----------------------------------------------------------------------
tuchk = tuchk + dnekclock()-etime1
call prepost (ifoutfld,'his')
call in_situ_check()
if (mod(kstep,100).eq.0 ..and. lastep.eq.0) call runstat
if (mod(kstep,irstat).eq.0 .and. lastep.eq.0) call runstat
if (lastep .eq. 1) goto 1001
enddo
1001 lastep=1
......
......@@ -56,18 +56,13 @@ c Set default logicals
if_full_pres = .false.
CALL RZERO (PARAM,200)
C
C The initialization of CBC is done in READAT
C
C LCBC = 3*6*LELT*(LDIMT1+1)
C CALL BLANK(CBC,LCBC)
C
CALL BLANK(CCURVE ,12*LELT)
NEL8 = 8*LELT
CALL RZERO(XC,NEL8)
CALL RZERO(YC,NEL8)
CALL RZERO(ZC,NEL8)
C
NTOT=lx1*ly1*lz1*LELT
CALL RZERO(ABX1,NTOT)
CALL RZERO(ABX2,NTOT)
......@@ -155,6 +150,9 @@ C------------------------------------------------------------------------
include 'DEALIAS'
include 'TSTEP'
include 'NEKNEK'
param(120) = 500 ! print runtime stats
C
C Geometry on Mesh 3 or 1?
C
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment