Merge pull request #113 from njoy/bugfix/ACER

Bugfix/acer
njoy · Nov 19, 2018 · 4f68e8a · 4f68e8a
2 parents 9e3f11b + d3d3cea
commit 4f68e8a
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/src/acefc.f90 b/src/acefc.f90
@@ -9789,7 +9789,7 @@ subroutine acelcp(next,matd,nin,za,awr)
                         renorm=1/xss(next+1+3*nx)
                         do ix=1,nx
                            xss(next+1+nx+ix)=&
-                             sigfig(renorm*xss(next+1+2*nx+ix),7,0)
+                             sigfig(renorm*xss(next+1+nx+ix),7,0)
                            xss(next+1+2*nx+ix)=&
                              sigfig(renorm*xss(next+1+2*nx+ix),9,0)
                         enddo

diff --git a/src/vers.f90 b/src/vers.f90
@@ -3,7 +3,7 @@ module version
    ! These values are updated during the NJOY revision-control process.
    implicit none
    private
-   character(8),public::vers='2016.44'
-   character(8),public::vday='11Oct18'
+   character(8),public::vers='2016.45'
+   character(8),public::vday='13Nov18'
 end module version