Diff of the two buildlogs: -- --- b1/build.log 2024-04-09 11:49:26.579925311 +0000 +++ b2/build.log 2024-04-09 11:51:12.263441233 +0000 @@ -1,6 +1,6 @@ I: pbuilder: network access will be disabled during build -I: Current time: Mon May 12 06:11:14 -12 2025 -I: pbuilder-time-stamp: 1747073474 +I: Current time: Wed Apr 10 01:49:35 +14 2024 +I: pbuilder-time-stamp: 1712663375 I: Building the build Environment I: extracting base tarball [/var/cache/pbuilder/trixie-reproducible-base.tgz] I: copying local configuration @@ -31,54 +31,86 @@ dpkg-source: info: applying fix-python3-shebang.patch I: Not using root during the build. I: Installing the build-deps -I: user script /srv/workspace/pbuilder/106158/tmp/hooks/D02_print_environment starting +I: user script /srv/workspace/pbuilder/37507/tmp/hooks/D01_modify_environment starting +debug: Running on ionos2-i386. +I: Changing host+domainname to test build reproducibility +I: Adding a custom variable just for the fun of it... +I: Changing /bin/sh to bash +'/bin/sh' -> '/bin/bash' +lrwxrwxrwx 1 root root 9 Apr 9 11:49 /bin/sh -> /bin/bash +I: Setting pbuilder2's login shell to /bin/bash +I: Setting pbuilder2's GECOS to second user,second room,second work-phone,second home-phone,second other +I: user script /srv/workspace/pbuilder/37507/tmp/hooks/D01_modify_environment finished +I: user script /srv/workspace/pbuilder/37507/tmp/hooks/D02_print_environment starting I: set - BUILDDIR='/build/reproducible-path' - BUILDUSERGECOS='first user,first room,first work-phone,first home-phone,first other' - BUILDUSERNAME='pbuilder1' - BUILD_ARCH='i386' - DEBIAN_FRONTEND='noninteractive' - DEB_BUILD_OPTIONS='buildinfo=+all reproducible=+all parallel=22 ' - DISTRIBUTION='trixie' - HOME='/root' - HOST_ARCH='i386' + BASH=/bin/sh + BASHOPTS=checkwinsize:cmdhist:complete_fullquote:extquote:force_fignore:globasciiranges:globskipdots:hostcomplete:interactive_comments:patsub_replacement:progcomp:promptvars:sourcepath + BASH_ALIASES=() + BASH_ARGC=() + BASH_ARGV=() + BASH_CMDS=() + BASH_LINENO=([0]="12" [1]="0") + BASH_LOADABLES_PATH=/usr/local/lib/bash:/usr/lib/bash:/opt/local/lib/bash:/usr/pkg/lib/bash:/opt/pkg/lib/bash:. + BASH_SOURCE=([0]="/tmp/hooks/D02_print_environment" [1]="/tmp/hooks/D02_print_environment") + BASH_VERSINFO=([0]="5" [1]="2" [2]="21" [3]="1" [4]="release" [5]="i686-pc-linux-gnu") + BASH_VERSION='5.2.21(1)-release' + BUILDDIR=/build/reproducible-path + BUILDUSERGECOS='second user,second room,second work-phone,second home-phone,second other' + BUILDUSERNAME=pbuilder2 + BUILD_ARCH=i386 + DEBIAN_FRONTEND=noninteractive + DEB_BUILD_OPTIONS='buildinfo=+all reproducible=+all parallel=7 ' + DIRSTACK=() + DISTRIBUTION=trixie + EUID=0 + FUNCNAME=([0]="Echo" [1]="main") + GROUPS=() + HOME=/root + HOSTNAME=i-capture-the-hostname + HOSTTYPE=i686 + HOST_ARCH=i386 IFS=' ' - INVOCATION_ID='917de74c674e4102aa2388144cc697cb' - LANG='C' - LANGUAGE='en_US:en' - LC_ALL='C' - LD_LIBRARY_PATH='/usr/lib/libeatmydata' - LD_PRELOAD='libeatmydata.so' - MAIL='/var/mail/root' - OPTIND='1' - PATH='/usr/sbin:/usr/bin:/sbin:/bin:/usr/games' - PBCURRENTCOMMANDLINEOPERATION='build' - PBUILDER_OPERATION='build' - PBUILDER_PKGDATADIR='/usr/share/pbuilder' - PBUILDER_PKGLIBDIR='/usr/lib/pbuilder' - PBUILDER_SYSCONFDIR='/etc' - PPID='106158' - PS1='# ' - PS2='> ' + INVOCATION_ID=c16991ecc627490eb2f55278fb2c46f9 + LANG=C + LANGUAGE=de_CH:de + LC_ALL=C + LD_LIBRARY_PATH=/usr/lib/libeatmydata + LD_PRELOAD=libeatmydata.so + MACHTYPE=i686-pc-linux-gnu + MAIL=/var/mail/root + OPTERR=1 + OPTIND=1 + OSTYPE=linux-gnu + PATH=/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:/i/capture/the/path + PBCURRENTCOMMANDLINEOPERATION=build + PBUILDER_OPERATION=build + PBUILDER_PKGDATADIR=/usr/share/pbuilder + PBUILDER_PKGLIBDIR=/usr/lib/pbuilder + PBUILDER_SYSCONFDIR=/etc + PIPESTATUS=([0]="0") + POSIXLY_CORRECT=y + PPID=37507 PS4='+ ' - PWD='/' - SHELL='/bin/bash' - SHLVL='2' - SUDO_COMMAND='/usr/bin/timeout -k 18.1h 18h /usr/bin/ionice -c 3 /usr/bin/nice /usr/sbin/pbuilder --build --configfile /srv/reproducible-results/rbuild-debian/r-b-build.gTXFycFi/pbuilderrc_1wZJ --distribution trixie --hookdir /etc/pbuilder/first-build-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/trixie-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.gTXFycFi/b1 --logfile b1/build.log feff85exafs_0.2+dfsg-2.dsc' - SUDO_GID='112' - SUDO_UID='107' - SUDO_USER='jenkins' - TERM='unknown' - TZ='/usr/share/zoneinfo/Etc/GMT+12' - USER='root' - _='/usr/bin/systemd-run' - http_proxy='http://85.184.249.68:3128' + PWD=/ + SHELL=/bin/bash + SHELLOPTS=braceexpand:errexit:hashall:interactive-comments:posix + SHLVL=3 + SUDO_COMMAND='/usr/bin/timeout -k 24.1h 24h /usr/bin/ionice -c 3 /usr/bin/nice -n 11 /usr/bin/unshare --uts -- /usr/sbin/pbuilder --build --configfile /srv/reproducible-results/rbuild-debian/r-b-build.gTXFycFi/pbuilderrc_uh6r --distribution trixie --hookdir /etc/pbuilder/rebuild-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/trixie-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.gTXFycFi/b2 --logfile b2/build.log feff85exafs_0.2+dfsg-2.dsc' + SUDO_GID=112 + SUDO_UID=107 + SUDO_USER=jenkins + TERM=unknown + TZ=/usr/share/zoneinfo/Etc/GMT-14 + UID=0 + USER=root + _='I: set' + http_proxy=http://78.137.99.97:3128 I: uname -a - Linux ionos6-i386 6.1.0-18-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.1.76-1 (2024-02-01) x86_64 GNU/Linux + Linux i-capture-the-hostname 6.1.0-18-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.1.76-1 (2024-02-01) x86_64 GNU/Linux I: ls -l /bin - lrwxrwxrwx 1 root root 7 May 11 17:46 /bin -> usr/bin -I: user script /srv/workspace/pbuilder/106158/tmp/hooks/D02_print_environment finished + lrwxrwxrwx 1 root root 7 Apr 7 11:25 /bin -> usr/bin +I: user script /srv/workspace/pbuilder/37507/tmp/hooks/D02_print_environment finished -> Attempting to satisfy build-dependencies -> Creating pbuilder-satisfydepends-dummy package Package: pbuilder-satisfydepends-dummy @@ -179,7 +211,7 @@ Get: 54 http://deb.debian.org/debian trixie/main i386 gfortran-i686-linux-gnu i386 4:13.2.0-7 [1280 B] Get: 55 http://deb.debian.org/debian trixie/main i386 gfortran i386 4:13.2.0-7 [1432 B] Get: 56 http://deb.debian.org/debian trixie/main i386 help2man i386 1.49.3 [198 kB] -Fetched 39.2 MB in 0s (91.7 MB/s) +Fetched 39.2 MB in 1s (58.6 MB/s) debconf: delaying package configuration, since apt-utils is not installed Selecting previously unselected package liblocale-gettext-perl. (Reading database ... (Reading database ... 5% (Reading database ... 10% (Reading database ... 15% (Reading database ... 20% (Reading database ... 25% (Reading database ... 30% (Reading database ... 35% (Reading database ... 40% (Reading database ... 45% (Reading database ... 50% (Reading database ... 55% (Reading database ... 60% (Reading database ... 65% (Reading database ... 70% (Reading database ... 75% (Reading database ... 80% (Reading database ... 85% (Reading database ... 90% (Reading database ... 95% (Reading database ... 100% (Reading database ... 19875 files and directories currently installed.) @@ -370,8 +402,8 @@ Setting up tzdata (2024a-1) ... Current default time zone: 'Etc/UTC' -Local time is now: Mon May 12 18:11:37 UTC 2025. -Universal Time is now: Mon May 12 18:11:37 UTC 2025. +Local time is now: Tue Apr 9 11:50:06 UTC 2024. +Universal Time is now: Tue Apr 9 11:50:06 UTC 2024. Run 'dpkg-reconfigure tzdata' if you wish to change it. Setting up autotools-dev (20220109.1) ... @@ -428,7 +460,11 @@ Building tag database... -> Finished parsing the build-deps I: Building the package -I: Running cd /build/reproducible-path/feff85exafs-0.2+dfsg/ && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-buildpackage -us -uc -b && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-genchanges -S > ../feff85exafs_0.2+dfsg-2_source.changes +I: user script /srv/workspace/pbuilder/37507/tmp/hooks/A99_set_merged_usr starting +Not re-configuring usrmerge for trixie +I: user script /srv/workspace/pbuilder/37507/tmp/hooks/A99_set_merged_usr finished +hostname: Name or service not known +I: Running cd /build/reproducible-path/feff85exafs-0.2+dfsg/ && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:/i/capture/the/path" HOME="/nonexistent/second-build" dpkg-buildpackage -us -uc -b && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:/i/capture/the/path" HOME="/nonexistent/second-build" dpkg-genchanges -S > ../feff85exafs_0.2+dfsg-2_source.changes dpkg-buildpackage: info: source package feff85exafs dpkg-buildpackage: info: source version 0.2+dfsg-2 dpkg-buildpackage: info: source distribution unstable @@ -438,7 +474,7 @@ debian/rules clean dh clean --with python3 dh_auto_clean - make -j22 clean + make -j7 clean make[1]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg' make -C src/ATOM clean make[2]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/ATOM' @@ -516,7 +552,7 @@ dh_autoreconf dh_auto_configure dh_auto_build - make -j22 "INSTALL=install --strip-program=true" + make -j7 "INSTALL=install --strip-program=true" make[1]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg' make -C src/PAR -j4 make[2]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg' @@ -701,6 +737,7 @@ gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o pertab.o pertab.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o rdcmt.o rdcmt.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o rdxsph.o rdxsph.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o str.o str.f rdxsph.f:89:72: 89 | do 60 ie=1, ne @@ -731,7 +768,6 @@ 52 | complex*16 temp(nex*(2*ltot+1)) | 1 Warning: Array 'temp' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o str.o str.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o xx.o xx.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o fixdsp.o fixdsp.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o getorb.o getorb.f @@ -756,11 +792,6 @@ gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o isnum.o isnum.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o padlib.o padlib.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o qsorti.o qsorti.f -qsorti.f:51:72: - - 51 | 1 ORD(I)=I - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) padlib.f:270:33: 270 | array(ipts) = cmplx(tmpr, tmpi) @@ -771,6 +802,11 @@ 313 | array(ipts) = cmplx(tmpr, tmpi) | 1 Warning: Conversion from REAL(8) to default-kind COMPLEX(4) at (1) might lose precision, consider using the KIND argument [-Wconversion] +qsorti.f:51:72: + + 51 | 1 ORD(I)=I + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o rdpot.o rdpot.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o setkap.o setkap.f rdpot.f:144:72: @@ -852,16 +888,16 @@ 12 | d1=da+mm | 1 Warning: Possible change of value in conversion from COMPLEX(8) to REAL(8) at (1) [-Wconversion] -bcoef.f:91:72: - - 91 | do 10 i5 = 0 ,1 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) conv.f:36:72: 36 | 200 xsec(ie) = xsec0(ie) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) +bcoef.f:91:72: + + 91 | do 10 i5 = 0 ,1 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) bcoef.f:92:72: 92 | do 10 i4 = -lx,lx @@ -1063,6 +1099,7 @@ | 1 Warning: Array 'tmat' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o cwig3j.o cwig3j.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o determ.o determ.f cwig3j.f:16:72: 16 | if (ini) 1,21,1 @@ -1083,7 +1120,6 @@ 61 | 71 isig=-isig | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 71 at (1) -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o determ.o determ.f determ.f:25:72: 25 | 120 array(i,k) = saved @@ -1125,6 +1161,7 @@ gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o lu.o lu.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o polint.o polint.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o rotwig.o rotwig.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o somm.o somm.f rotwig.f:22:72: 22 | 11 al(i+1)=al(i)+ log(b) @@ -1135,11 +1172,23 @@ 64 | 110 factor = factor + al(m(i))/2.d0 - al(m(i+4)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) +somm.f:20:72: + + 20 | if (dc) 20,40,30 + | 1 +Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) +somm.f:25:72: + + 25 | if (dc) 50,70,60 + | 1 +Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o strap.o strap.f lu.f:7971:17: 7971 | LBETA = C + QTR | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o terpc.o terpc.f lu.f:1650:69: 1650 | INTEGER FUNCTION ILAENV( ISPEC, NAME, OPTS, N1, N2, N3, & @@ -1160,19 +1209,6 @@ 5919 | & WORK31( LDWORK, NBMAX ) | 1 Warning: Array 'work31' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o somm.o somm.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o strap.o strap.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o terpc.o terpc.f -somm.f:20:72: - - 20 | if (dc) 20,40,30 - | 1 -Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) -somm.f:25:72: - - 25 | if (dc) 50,70,60 - | 1 -Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) lu.f:8561:72: 8561 | & Y = OLDY @@ -1372,6 +1408,7 @@ | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o soldir.o soldir.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o wfirdf.o wfirdf.f soldir.f:103:72: 103 | 111 gp(i)=ep(i) @@ -1462,6 +1499,26 @@ 240 | if (nd-node) 251,305,261 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) +wfirdf.f:48:72: + + 48 | 11 fix(j) = dr(1)**(fl(j)-abs(kap(j))) + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 11 at (1) +wfirdf.f:51:72: + + 51 | 21 dv(i)=(dentfa(dr(i),dz,ch)+dvn(i))/cl + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 21 at (1) +wfirdf.f:55:72: + + 55 | 51 ep(i)=0.0d 00 + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 51 at (1) +wfirdf.f:59:72: + + 59 | 61 av(i)=anoy(i)/cl + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 61 at (1) soldir.f:321:72: 321 | 711 ap(i)=ap(i)/c @@ -1477,6 +1534,17 @@ 330 | 741 gp(i)=0.0d 00 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 741 at (1) +wfirdf.f:98:72: + + 98 | 261 bp(i,j)=ap(i) + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 261 at (1) +wfirdf.f:101:72: + + 101 | 271 cp(i,j)=dp(i) + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 271 at (1) +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o aprdev.o aprdev.f soldir.f:352:72: 352 | 311 hp(i)=dr(i)*(gg(i)*gg(i)+gp(i)*gp(i)) @@ -1497,44 +1565,12 @@ 362 | 325 b=b+ag(j)*g*ag(i+1-j)+ap(j)*g*ap(i+1-j) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 325 at (1) -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o wfirdf.o wfirdf.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o aprdev.o aprdev.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o dentfa.o dentfa.f -wfirdf.f:48:72: - - 48 | 11 fix(j) = dr(1)**(fl(j)-abs(kap(j))) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 11 at (1) -wfirdf.f:51:72: - - 51 | 21 dv(i)=(dentfa(dr(i),dz,ch)+dvn(i))/cl - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 21 at (1) -wfirdf.f:55:72: - - 55 | 51 ep(i)=0.0d 00 - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 51 at (1) -wfirdf.f:59:72: - - 59 | 61 av(i)=anoy(i)/cl - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 61 at (1) aprdev.f:11:72: 11 | 11 aprdev=aprdev+a(m)*b(l+1-m) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 11 at (1) -wfirdf.f:98:72: - - 98 | 261 bp(i,j)=ap(i) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 261 at (1) -wfirdf.f:101:72: - - 101 | 271 cp(i,j)=dp(i) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 271 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o fdmocc.o fdmocc.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o inmuat.o inmuat.f inmuat.f:38:72: @@ -1615,12 +1651,12 @@ 34 | 60 m1(morb,j) = m1(j,morb) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o tabrat.o tabrat.f s02at.f:72:72: 72 | do 10 j = 1,7 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o tabrat.o tabrat.f tabrat.f:33:72: 33 | 201 mbi(i)=8-i-i/3-i/4+i/8 @@ -1637,7 +1673,6 @@ | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 251 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o yzkrdf.o yzkrdf.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o bkmrdf.o bkmrdf.f yzkrdf.f:36:72: 36 | 5 bpj(l) = bp(l,j) @@ -1663,6 +1698,7 @@ 49 | 41 ag(l)=aprdev(bgi,bpj,l) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 41 at (1) +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o bkmrdf.o bkmrdf.f bkmrdf.f:18:72: 18 | 12 cret(l)=0.0d 00 @@ -1679,6 +1715,8 @@ | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 51 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o dsordf.o dsordf.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o fdrirk.o fdrirk.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o intdir.o intdir.f dsordf.f:44:72: 44 | 15 bpj(l) = bp(l,j) @@ -1694,7 +1732,6 @@ 47 | 31 hg(l)=cg(l,i)*cg(l,j)+cp(l,i)*cp(l,j) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 31 at (1) -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o fdrirk.o fdrirk.f dsordf.f:49:72: 49 | 45 chg(l)=aprdev(bgi,bgj,l)+aprdev(bpi,bpj,l) @@ -1780,7 +1817,6 @@ 37 | 41 ag(n)=hg(n) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 41 at (1) -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o intdir.o intdir.f intdir.f:41:72: 41 | 1 f=g @@ -1843,7 +1879,6 @@ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 701 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o potrdf.o potrdf.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o scfdat.o scfdat.f potrdf.f:23:72: 23 | 9 av(i)=anoy(i) @@ -1884,6 +1919,7 @@ 59 | 51 max0= max(max0,nmax(j)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 51 at (1) +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o scfdat.o scfdat.f potrdf.f:67:72: 67 | 81 dv(i)=dv(i)+dg(i) @@ -1924,6 +1960,16 @@ 117 | 471 cep(i)=cep(i)+bp(i,j)*a | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 471 at (1) +potrdf.f:125:72: + + 125 | 527 ceg(i)=ceg(i)/cl + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 527 at (1) +potrdf.f:129:72: + + 129 | 531 eg(i)=(eg(i)+at(i)*dr(i))/cl + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 531 at (1) scfdat.f:90:72: 90 | 42 xnvalp(i) = 0.0d0 @@ -1934,21 +1980,11 @@ 93 | 44 xnvalp(i) = xnel(i) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 44 at (1) -potrdf.f:125:72: - - 125 | 527 ceg(i)=ceg(i)/cl - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 527 at (1) scfdat.f:97:72: 97 | 43 xnvalp(i) = xnval(i) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 43 at (1) -potrdf.f:129:72: - - 129 | 531 eg(i)=(eg(i)+at(i)*dr(i))/cl - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 531 at (1) scfdat.f:121:72: 121 | 41 scw(i) = 0. @@ -2026,6 +2062,7 @@ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o yzkteg.o yzkteg.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../EXCH/vbh.o ../EXCH/vbh.f yzkteg.f:40:72: 40 | 21 f(i)=f(i)*dr(i) @@ -2046,7 +2083,6 @@ 65 | 71 f(i)=f(i+1)*e+(c*(g(i)+g(i+1)*e)-(g(i+2)*ee+g(i-1)*b)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 71 at (1) -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../EXCH/vbh.o ../EXCH/vbh.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../EXCH/edp.o ../EXCH/edp.f ar rvc libfeffatom.a akeato.o cofcon.o etotal.o fpf0.o lagdat.o nucdev.o potslw.o soldir.o wfirdf.o aprdev.o dentfa.o fdmocc.o inmuat.o messer.o ortdat.o s02at.o tabrat.o yzkrdf.o bkmrdf.o dsordf.o fdrirk.o intdir.o muatco.o potrdf.o scfdat.o vlda.o yzkteg.o ../COMMON/wlog.o ../COMMON/getorb.o ../COMMON/str.o ../PAR/sequential.o ../MATH/determ.o ../MATH/somm.o ../MATH/somm2.o ../MATH/cwig3j.o ../EXCH/vbh.o ../EXCH/edp.o a - akeato.o @@ -2095,14 +2131,14 @@ gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o sigm3.o sigm3.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o sigms.o sigms.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o sigrem.o sigrem.f -sigcl.f:65:72: +sigms.f:64:72: - 65 | do 800 jl=il,nleg + 64 | do 800 jl=il,nleg | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 800 at (1) -sigms.f:64:72: +sigcl.f:65:72: - 64 | do 800 jl=il,nleg + 65 | do 800 jl=il,nleg | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 800 at (1) sigms.f:211:72: @@ -2250,7 +2286,6 @@ 770 | 50 nspr(n,ispr)=0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o sigte3.o sigte3.f sigrem.f:935:72: 935 | do 320 l=k+1, natom @@ -2431,6 +2466,7 @@ 735 | dimension str(natx,natx) | 1 Warning: Array 'str' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o sigte3.o sigte3.f ar rvc libfeffdw.a sigcl.o sigm3.o sigms.o sigrem.o sigte3.o ../COMMON/wlog.o ../COMMON/str.o ../COMMON/itoken.o ../COMMON/pertab.o ../COMMON/chopen.o ../MATH/dist.o ../PAR/sequential.o a - sigcl.o a - sigm3.o @@ -2458,12 +2494,12 @@ 826 | do 1 j=1,3 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 1 at (1) +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o fndsng.o fndsng.f csigma.f:785:41: 785 | complex*16 fn,value,valu,fval(3,mx),xmax,xmin,del,del1 | 1 Warning: Array 'fval' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o fndsng.o fndsng.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o imhl.o imhl.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o mpse.o mpse.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o qsorti.o qsorti.f @@ -2541,11 +2577,6 @@ gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o dfovrg.o dfovrg.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o dsordc.o dsordc.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o intout.o intout.f -aprdec.f:13:72: - - 13 | 11 aprdec = aprdec + ala(m) * bla(lla+1-m) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 11 at (1) dsordc.f:28:72: 28 | 15 bpj(l) = bp(l,j) @@ -2576,6 +2607,26 @@ 46 | 331 dsordc=dsordc+chg(l)*(dr(1)**b)/b | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 331 at (1) +aprdec.f:13:72: + + 13 | 11 aprdec = aprdec + ala(m) * bla(lla+1-m) + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 11 at (1) +intout.f:123:72: + + 123 | 51 dp(i) = dp(i)/hx + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 51 at (1) +intout.f:144:72: + + 144 | 61 dp(j)=dp(j+1) + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 61 at (1) +intout.f:169:72: + + 169 | 741 gp(i)=0.0d 00 + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 741 at (1) dfovrg.f:85:72: 85 | 9 vxcval(i)=vxc(jri+1) @@ -2601,11 +2652,6 @@ 113 | 15 cp(i,j)=dpcn(i,j) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1) -intout.f:123:72: - - 123 | 51 dp(i) = dp(i)/hx - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 51 at (1) dfovrg.f:123:72: 123 | 18 vm(i)=0.0d0 @@ -2621,11 +2667,6 @@ 141 | 50 dv(i)=vxcval(i)/cl | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) -intout.f:144:72: - - 144 | 61 dp(j)=dp(j+1) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 61 at (1) dfovrg.f:183:72: 183 | 151 qs(i)=gp(i) @@ -2636,11 +2677,6 @@ 186 | 155 aqs(i) =ap(i) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 155 at (1) -intout.f:169:72: - - 169 | 741 gp(i)=0.0d 00 - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 741 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o nucdec.o nucdec.f nucdec.f:46:72: @@ -2862,6 +2898,8 @@ | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 42 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o potex.o potex.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o solout.o solout.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o yzkrdc.o yzkrdc.f potex.f:29:72: 29 | 9 ceg(i)=0.0d 00 @@ -2907,18 +2945,11 @@ 82 | 532 eg(i)=0.0d0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 532 at (1) -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o solout.o solout.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o yzkrdc.o yzkrdc.f solout.f:57:72: 57 | 115 ap(i)=cep(i-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 115 at (1) -yzkrdc.f:41:72: - - 41 | 5 bpi(l) = bp(l,i) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 5 at (1) solout.f:82:72: 82 | 31 g=g-av(i+1)*ag(j-i) @@ -2929,26 +2960,31 @@ 85 | 35 ap(j)=(av(1)*f-a*g)/eph | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 35 at (1) -yzkrdc.f:45:72: - - 45 | 11 dg(l)=cg(l,i)*ps(l)+cp(l,i)*qs(l) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 11 at (1) solout.f:90:72: 90 | do 41 j=1,ndor | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 41 at (1) -yzkrdc.f:47:72: - - 47 | 12 dg(l) = 0.0d0 - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 12 at (1) solout.f:94:72: 94 | 41 gp(i)=gp(i)+b*ap(j) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 41 at (1) +yzkrdc.f:41:72: + + 41 | 5 bpi(l) = bp(l,i) + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 5 at (1) +yzkrdc.f:45:72: + + 45 | 11 dg(l)=cg(l,i)*ps(l)+cp(l,i)*qs(l) + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 11 at (1) +yzkrdc.f:47:72: + + 47 | 12 dg(l) = 0.0d0 + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 12 at (1) yzkrdc.f:49:72: 49 | 21 ag(l) = aprdec(aps,bgi,l) + aprdec(aqs,bpi,l) @@ -2991,11 +3027,26 @@ 51 | 30 rat(j,iat) = real (rath(j,iat)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) +ggbi.f:45:72: + + 45 | do 10 irow = 1,istatx + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) fmsie.f:90:72: 90 | 1011 lcalc(ill) = .true. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1011 at (1) +ggbi.f:46:72: + + 46 | 10 g0t(irow,icol) = 0 + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) +ggbi.f:84:72: + + 84 | 40 xvec(is) = 0 + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) gggm.f:45:72: 45 | do 10 irow = 1,istatx @@ -3006,6 +3057,16 @@ 46 | 10 g0t(irow,icol) = 0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) +ggbi.f:92:72: + + 92 | 90 rvec(is) = - avec(is) + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) +ggbi.f:106:72: + + 106 | 95 pvec(is) = rvec(is) + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 95 at (1) gggm.f:84:72: 84 | 40 xvec(is) = 0 @@ -3016,16 +3077,6 @@ 94 | 60 xvec(is) = xvec(is) + x0(is) / q0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) -ggbi.f:45:72: - - 45 | do 10 irow = 1,istatx - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) -ggbi.f:46:72: - - 46 | 10 g0t(irow,icol) = 0 - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) gggm.f:97:72: 97 | 70 bvec(is) = avec(is) - xvec(is) @@ -3041,106 +3092,91 @@ 103 | 90 x0(is) = 0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) +ggbi.f:118:72: + + 118 | 96 yvec(is) = rvec(is) / ww + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 96 at (1) gggm.f:105:72: 105 | 95 x1(is) = bvec(is) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 95 at (1) -ggbi.f:84:72: +ggbi.f:123:72: - 84 | 40 xvec(is) = 0 + 123 | 97 yvec(is) = rvec(is) * aa + avec(is) * ww | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 97 at (1) gggm.f:117:72: 117 | 96 wvec(is) = r0(is) / ww | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 96 at (1) -ggbi.f:92:72: - - 92 | 90 rvec(is) = - avec(is) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) gggm.f:122:72: 122 | 97 wvec(is) = r0(is) * aa + r1(is) * ww | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 97 at (1) -ggbi.f:106:72: +ggbi.f:134:72: - 106 | 95 pvec(is) = rvec(is) + 134 | 120 svec(is) = rvec(is) - omega * avec(is) | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 95 at (1) +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) gggm.f:145:72: 145 | 100 xvec(is) = xvec(is) + x1(is) / q1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) +ggbi.f:145:72: + + 145 | 124 xvec(is) = xvec(is) + omega*pvec(is) + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 124 at (1) gggm.f:151:72: 151 | 130 t0(is) = r1(is) - alpha* r0(is) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) -ggbi.f:118:72: +ggbi.f:155:72: - 118 | 96 yvec(is) = rvec(is) / ww + 155 | 125 xvec(is) = xvec(is) + omega*pvec(is) + chi*svec(is) | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 96 at (1) -ggbi.f:123:72: +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) +ggbi.f:158:72: - 123 | 97 yvec(is) = rvec(is) * aa + avec(is) * ww + 158 | 130 rvec(is) = svec(is) - chi* asve(is) | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 97 at (1) +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) gggm.f:162:72: 162 | 145 r0(is) = t1(is) - theta * t0(is) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 145 at (1) -ggbi.f:134:72: - - 134 | 120 svec(is) = rvec(is) - omega * avec(is) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) gggm.f:165:72: 165 | 150 x0(is) = t0(is) + dd * (x1(is) - alpha*x0(is)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) -ggbi.f:145:72: +ggbi.f:175:72: - 145 | 124 xvec(is) = xvec(is) + omega*pvec(is) + 175 | 135 pvec(is) = rvec(is) + psi * (pvec(is)-chi*avec(is)) | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 124 at (1) +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 135 at (1) gggm.f:179:72: 179 | 390 xvec(is) = xvec(is) + x0(is) / q0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 390 at (1) -ggbi.f:155:72: - - 155 | 125 xvec(is) = xvec(is) + omega*pvec(is) + chi*svec(is) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) gggm.f:187:72: 187 | 255 t0(is) = r0(is) - beta * r1(is) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 255 at (1) -ggbi.f:158:72: - - 158 | 130 rvec(is) = svec(is) - chi* asve(is) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) gggm.f:192:72: 192 | 260 r1(is) = avec(is) + dd * r1(is) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) -ggbi.f:175:72: - - 175 | 135 pvec(is) = rvec(is) + psi * (pvec(is)-chi*avec(is)) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 135 at (1) gggm.f:197:72: 197 | 270 x1(is) = x0(is) - dd * x1(is) + t0(is) @@ -3491,6 +3527,9 @@ make[3]: 'libfeffmath.a' is up to date. make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/MATH' make -C ../JSON libfeffjson.a +make[3]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/JSON' +make[3]: 'libfeffjson.a' is up to date. +make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/JSON' mkptz.f:62:72: 62 | 10 xivec(i) = spvec(i) @@ -3501,14 +3540,17 @@ 88 | 20 call rotate (rat(1,i), cst, snt, csf, snf) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) -make[3]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/JSON' -make[3]: 'libfeffjson.a' is up to date. +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o rdinp_l.o rdinp_l.f +ffsort.f:211:72: + + 211 | 316 iatph(iph) = 0 + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 316 at (1) mkptz.f:98:72: 98 | do 30 j=-1,1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) -make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/JSON' mkptz.f:99:72: 99 | 30 ptz(j,i) = 0 @@ -3519,17 +3561,16 @@ 104 | 40 ptz(i,i) = 1.d0 /3.d0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o rdinp_l.o rdinp_l.f -mkptz.f:177:72: - - 177 | do 110 j = -1,1 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1) iniall.f:154:72: 154 | 170 iphatx(i) = -1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) +mkptz.f:177:72: + + 177 | do 110 j = -1,1 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1) mkptz.f:216:72: 216 | 120 call rotate (rat(1,i), cst, snt, csf, snf) @@ -3540,11 +3581,6 @@ 235 | 10 vec(i) = temp(i) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) -ffsort.f:211:72: - - 211 | 316 iatph(iph) = 0 - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 316 at (1) rdinp_l.f:84:72: 84 | 95 iatph(iph) = 0 @@ -3567,12 +3603,12 @@ Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 485 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o rdline.o rdline.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o setedg.o setedg.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o wrtall.o wrtall.f setedg.f:19:72: 19 | 10 if (a2 .eq. edglbl(i) .or. a2 .eq. edglbp(i) ) ihole = i | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o wrtall.o wrtall.f wrtall.f:66:72: 66 | 110 write(3,10) title(ititle) @@ -3606,6 +3642,11 @@ gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ovp2mt.o ovp2mt.f make[3]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/POT' gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o istprm.o istprm.f +istprm.f:67:72: + + 67 | 10 lnear(iph)=.false. + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) movrlp.f:45:72: 45 | 20 ri(i)=exp(-8.8d0+(i-1)*0.05d0) @@ -3616,11 +3657,6 @@ 51 | do 30 i1=1,ncp | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) -istprm.f:67:72: - - 67 | 10 lnear(iph)=.false. - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) movrlp.f:57:72: 57 | do 40 i1=1,nph+1 @@ -3631,31 +3667,31 @@ 67 | 10 lnear(iph)=.false. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) -ovp2mt.f:51:72: +istprm.f:41:52: - 51 | do 25 i=1,novp - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 25 at (1) + 41 | complex cmovp(novp*(nphx+1)+1,novp*(nphx+1)+1) + | 1 +Warning: Array 'cmovp' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] movrlp.f:215:72: 215 | & cmplx(real(aa)*bmat(iph+1,ix1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) -ovp2mt.f:125:72: +ovp2mt.f:51:72: - 125 | 505 vtot(j,iph) = vint + 51 | do 25 i=1,novp | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 505 at (1) +Warning: Fortran 2018 deleted feature: Shared DO termination label 25 at (1) movrlp.f:220:72: 220 | 270 cmovp(ncp,ix1) = cmovp(ncp, ix1) + bmat(iph+1,ix1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) -istprm.f:41:52: +ovp2mt.f:125:72: - 41 | complex cmovp(novp*(nphx+1)+1,novp*(nphx+1)+1) - | 1 -Warning: Array 'cmovp' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] + 125 | 505 vtot(j,iph) = vint + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 505 at (1) istprm.f:41:52: 41 | complex cmovp(novp*(nphx+1)+1,novp*(nphx+1)+1) @@ -3835,11 +3871,20 @@ gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o wpot.o wpot.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ovrlp.o ovrlp.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o broydn.o broydn.f +ar rvc libfeffint.a istprm.o movrlp.o ovp2mt.o fermi.o sidx.o +a - istprm.o +a - movrlp.o +a - ovp2mt.o +a - fermi.o +a - sidx.o +ranlib libfeffint.a +make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/POT' broydn.f:48:72: 48 | do 30 ir = 1, ilast(iph) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) +make -C ../ATOM libfeffatom.a broydn.f:68:72: 68 | do 510 ir = 1,ilast(iph) @@ -3880,15 +3925,6 @@ 135 | 810 rhoval(ir,iph) = rhoval(ir,iph) - aa*edenvl(ir,iph) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 810 at (1) -ar rvc libfeffint.a istprm.o movrlp.o ovp2mt.o fermi.o sidx.o -a - istprm.o -a - movrlp.o -a - ovp2mt.o -a - fermi.o -a - sidx.o -ranlib libfeffint.a -make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/POT' -make -C ../ATOM libfeffatom.a make[3]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/ATOM' make[3]: 'libfeffatom.a' is up to date. make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/ATOM' @@ -3926,17 +3962,17 @@ make[3]: 'libjsonfortran.a' is up to date. make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran' gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ff2g.o ff2g.f +ff2g.f:50:72: + + 50 | do 840 ir = 1,ilast + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 840 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o grids.o grids.f grids.f:43:72: 43 | 20 emg(i) = emg(i-1) + de | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) -ff2g.f:50:72: - - 50 | do 840 ir = 1,ilast - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 840 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o corval.o corval.f corval.f:81:72: @@ -4263,56 +4299,6 @@ gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../FF2X/xscorr.o ../FF2X/xscorr.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../XSPH/acoef.o ../XSPH/acoef.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../XSPH/axafs.o ../XSPH/axafs.f -../XSPH/acoef.f:19:72: - - 19 | do 10 i4 = 1,3 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) -../XSPH/acoef.f:20:72: - - 20 | do 10 i3 = 1,2 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) -../XSPH/acoef.f:21:72: - - 21 | do 10 i2 = 1,2 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) -../XSPH/acoef.f:22:72: - - 22 | do 10 i1 = -lx,lx - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) -../XSPH/acoef.f:36:72: - - 36 | do 20 jp = 0,lx - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) -../XSPH/acoef.f:37:72: - - 37 | do 20 mp = 0,1 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) -../XSPH/acoef.f:47:72: - - 47 | do 30 m2=0,1 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) -../XSPH/acoef.f:48:72: - - 48 | do 30 iop=1,3 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) -../XSPH/acoef.f:97:72: - - 97 | do 60 m2=0,1 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 60 at (1) -../XSPH/acoef.f:98:72: - - 98 | do 60 m1=0,1 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 60 at (1) ../XSPH/axafs.f:44:72: 44 | 30 xx(i) = 0 @@ -4388,16 +4374,56 @@ 80 | 320 xm(i,3) = yy (i-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) -../XSPH/axafs.f:85:72: +../XSPH/acoef.f:19:72: - 85 | eee = ee(1) + 100/hart - | ^ -Warning: 'ee' may be used uninitialized [-Wmaybe-uninitialized] -../XSPH/axafs.f:20:18: + 19 | do 10 i4 = 1,3 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) +../XSPH/acoef.f:20:72: - 20 | dimension ee(nex), xmu(nex), wt(nex) - | ^ -note: 'ee' declared here + 20 | do 10 i3 = 1,2 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) +../XSPH/acoef.f:21:72: + + 21 | do 10 i2 = 1,2 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) +../XSPH/acoef.f:22:72: + + 22 | do 10 i1 = -lx,lx + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) +../XSPH/acoef.f:36:72: + + 36 | do 20 jp = 0,lx + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) +../XSPH/acoef.f:37:72: + + 37 | do 20 mp = 0,1 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) +../XSPH/acoef.f:47:72: + + 47 | do 30 m2=0,1 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) +../XSPH/acoef.f:48:72: + + 48 | do 30 iop=1,3 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) +../XSPH/acoef.f:97:72: + + 97 | do 60 m2=0,1 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 60 at (1) +../XSPH/acoef.f:98:72: + + 98 | do 60 m1=0,1 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 60 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../XSPH/fmssz.o ../XSPH/fmssz.f ../XSPH/fmssz.f:35:72: @@ -4424,6 +4450,16 @@ 91 | do 100 i1 = 1,2 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) +../XSPH/axafs.f:85:72: + + 85 | eee = ee(1) + 100/hart + | ^ +Warning: 'ee' may be used uninitialized [-Wmaybe-uninitialized] +../XSPH/axafs.f:20:18: + + 20 | dimension ee(nex), xmu(nex), wt(nex) + | ^ +note: 'ee' declared here gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../XSPH/phase.o ../XSPH/phase.f ../XSPH/phase.f:267:72: @@ -4446,7 +4482,6 @@ 69 | 30 em(nmin+i) = xim*(i-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../XSPH/radint.o ../XSPH/radint.f ../XSPH/phmesh.f:78:72: 78 | 40 em(nmin+n1+i) = (xkstep*(n2+i))**2 /2 @@ -4477,6 +4512,7 @@ 215 | 150 em(ie) = 2*(edge + coni*xloss) - em(ie) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../XSPH/radint.o ../XSPH/radint.f ../XSPH/radint.f:176:72: 176 | 80 xrc(i) = 0 @@ -4594,6 +4630,7 @@ 37 | dimension dgcn(nrptx,30), dpcn(nrptx,30) | 1 Warning: Array 'dpcn' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../XSPH/wphase.o ../XSPH/wphase.f ../XSPH/rholsz.f:170:72: 170 | temp = 2*ck / (1+factor**2) / pi @@ -4604,6 +4641,7 @@ 58 | complex*16 temp, phx, phm(2,2), factor | ^ note: 'REALPART_EXPR ' was declared here +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../XSPH/wrxsph.o ../XSPH/wrxsph.f ../XSPH/rholsz.f:170:72: 170 | temp = 2*ck / (1+factor**2) / pi @@ -4614,8 +4652,6 @@ 58 | complex*16 temp, phx, phm(2,2), factor | ^ note: 'IMAGPART_EXPR ' was declared here -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../XSPH/wphase.o ../XSPH/wphase.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../XSPH/wrxsph.o ../XSPH/wrxsph.f ../XSPH/wrxsph.f:72:72: 72 | do 60 ie=1, ne @@ -4714,16 +4750,13 @@ gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ffmod1.o ffmod1.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o istval.o istval.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o reapot.o reapot.f -../XSPH/xsect.f:314:72: - - 314 | wse = dble(p2-eng(1,ihole)) - | ^ -Warning: 'eng' may be used uninitialized [-Wmaybe-uninitialized] -../XSPH/xsect.f:105:19: - - 105 | dimension eng(nex, 30) - | ^ -note: 'eng' declared here +ar rvc libfeffint.a istprm.o movrlp.o ovp2mt.o fermi.o sidx.o +r - istprm.o +r - movrlp.o +r - ovp2mt.o +r - fermi.o +r - sidx.o +ranlib libfeffint.a reapot.f:235:72: 235 | do 210 i = 1,3 @@ -4734,13 +4767,16 @@ 239 | do 220 iovr = 1, novr(iph) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 220 at (1) -ar rvc libfeffint.a istprm.o movrlp.o ovp2mt.o fermi.o sidx.o -r - istprm.o -r - movrlp.o -r - ovp2mt.o -r - fermi.o -r - sidx.o -ranlib libfeffint.a +../XSPH/xsect.f:314:72: + + 314 | wse = dble(p2-eng(1,ihole)) + | ^ +Warning: 'eng' may be used uninitialized [-Wmaybe-uninitialized] +../XSPH/xsect.f:105:19: + + 105 | dimension eng(nex, 30) + | ^ +note: 'eng' declared here gfortran ffmod1.o pot.o scmtmp.o afolp.o broydn.o corval.o coulom.o ff2g.o frnrm.o grids.o inipot.o istval.o moveh.o ovrlp.o reapot.o rholie.o scmt.o sumax.o wpot.o wrpot.o ../POT/libfeffint.a ../ATOM/libfeffatom.a ../FOVRG/libfeffpha.a ../COMMON/libfeffcom.a ../PAR/libfeffpar.a ../MATH/libfeffmath.a ../JSON/libfeffjson.a ../EXCH/libfeffexch.a ../FMS/libfefffms.a ../json-fortran/libjsonfortran.a -o feff8l_pot /usr/bin/ld: warning: json_module.o: requires executable stack (because the .note.GNU-stack section is executable) gfortran -shared libpotph.o inipotph.o ffsort_potph.o wlog_potph.o pot.o afolp.o inipot.o moveh.o wpot.o ovrlp.o broydn.o ff2g.o grids.o corval.o wrpot.o scmt.o scmtmp.o sumax.o rholie.o frnrm.o coulom.o istprm.o movrlp.o ovp2mt.o fermi.o sidx.o ../RDINP/mkptz.o ../COMMON/chopen.o ../COMMON/fixdsp.o ../COMMON/fixdsx.o ../COMMON/fixvar.o ../COMMON/getorb.o ../COMMON/getxk.o ../COMMON/head.o ../COMMON/padlib.o ../COMMON/setkap.o ../COMMON/rdcmt.o ../COMMON/str.o ../COMMON/xx.o ../ATOM/akeato.o ../ATOM/aprdev.o ../ATOM/cofcon.o ../ATOM/bkmrdf.o ../ATOM/dentfa.o ../ATOM/dsordf.o ../ATOM/etotal.o ../ATOM/fdmocc.o ../ATOM/fdrirk.o ../ATOM/inmuat.o ../ATOM/intdir.o ../ATOM/lagdat.o ../ATOM/messer.o ../ATOM/muatco.o ../ATOM/nucdev.o ../ATOM/ortdat.o ../ATOM/potrdf.o ../ATOM/potslw.o ../ATOM/scfdat.o ../ATOM/soldir.o ../ATOM/s02at.o ../ATOM/tabrat.o ../ATOM/vlda.o ../ATOM/wfirdf.o ../ATOM/yzkteg.o ../ATOM/yzkrdf.o ../MATH/bcoef.o ../MATH/besjh.o ../MATH/besjn.o ../MATH/bjnser.o ../MATH/csomm.o ../MATH/csomm2.o ../MATH/cwig3j.o ../MATH/czeros.o ../MATH/determ.o ../MATH/dist.o ../MATH/exjlnl.o ../MATH/lu.o ../MATH/phamp.o ../MATH/polint.o ../MATH/rotwig.o ../MATH/somm.o ../MATH/somm2.o ../MATH/terp.o ../MATH/terpc.o ../FMS/fmspack.o ../FMS/fmsie.o ../FMS/gglu.o ../FMS/ggbi.o ../FMS/ggrm.o ../FMS/gggm.o ../FMS/ggtf.o ../FMS/yprep.o ../FMS/xstaff.o ../FF2X/xscorr.o ../EXCH/cubic.o ../EXCH/csigma.o ../EXCH/csigz.o ../EXCH/edp.o ../EXCH/ffq.o ../EXCH/fndsng.o ../EXCH/imhl.o ../EXCH/qsorti.o ../EXCH/quinn.o ../EXCH/rhl.o ../EXCH/rhlbp.o ../EXCH/vbh.o ../EXCH/xcpot.o ../FOVRG/dfovrg.o ../FOVRG/inmuac.o ../FOVRG/diff.o ../FOVRG/wfirdc.o ../FOVRG/potex.o ../FOVRG/solin.o ../FOVRG/solout.o ../FOVRG/muatcc.o ../FOVRG/nucdec.o ../FOVRG/potdvp.o ../FOVRG/yzkrdc.o ../FOVRG/yzktec.o ../FOVRG/aprdep.o ../FOVRG/aprdec.o ../FOVRG/intout.o ../PAR/sequential.o ../XSPH/acoef.o ../XSPH/axafs.o ../XSPH/fmssz.o ../XSPH/phase.o ../XSPH/phmesh.o ../XSPH/radint.o ../XSPH/rholsz.o ../XSPH/szlz.o ../XSPH/wphase.o ../XSPH/wrxsph.o ../XSPH/xmult.o ../XSPH/xsect.o ../XSPH/xsph.o ../JSON/json_read_libpotph.o ../JSON/json_xsect.o ../JSON/bailout.o ../json-fortran/libjsonfortran.a -o libpotph.so @@ -4851,11 +4887,16 @@ make -C ../json-fortran libjsonfortran.a gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ccrit.o ccrit.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o heap.o heap.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o mcrith.o mcrith.f make[3]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran' make[3]: 'libjsonfortran.a' is up to date. make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran' make -C ../COMMON libfeffcom.a +ccrit.f:100:72: + + 100 | 700 nclus=nclus+iclus(ipat(i)) + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 700 at (1) +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o mcrith.o mcrith.f make[3]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/COMMON' make[3]: 'libfeffcom.a' is up to date. make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/COMMON' @@ -4872,13 +4913,9 @@ make[3]: 'libfeffjson.a' is up to date. make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/JSON' gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o mpprmd.o mpprmd.f -ccrit.f:100:72: - - 100 | 700 nclus=nclus+iclus(ipat(i)) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 700 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o mrb.o mrb.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o paths.o paths.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o phash.o phash.f paths.f:51:25: 51 | integer index(nx), npx, np, n, ip, i, iat0, idum @@ -4919,7 +4956,6 @@ 54 | dimension r(nx), mi(nx), mj(nx) | 1 Warning: Array 'r' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o phash.o phash.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o repath.o repath.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o timrep.o timrep.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ffmod4.o ffmod4.f @@ -4931,7 +4967,6 @@ 111 | do 20 i = 1, 3 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o outcrt.o outcrt.f mpprmp.f:115:72: 115 | do 30 i = 1, 3 @@ -4947,6 +4982,7 @@ 222 | do 400 i =1,3 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 400 at (1) +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o outcrt.o outcrt.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o pathsd.o pathsd.f pathsd.f:18:34: @@ -5021,15 +5057,11 @@ make[3]: 'libfeffpar.a' is up to date. make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/PAR' make -C ../MATH libfeffmath.a -make[3]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/MATH' -make[3]: 'libfeffmath.a' is up to date. -make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/MATH' exconv.f:48:72: 48 | 20 slope(i) = ed * (xmu(i+1) - xmu(i)) / (omega(i+1) - omega(i)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) -make -C ../JSON libfeffjson.a exconv.f:59:72: 59 | 55 xmup(i) = s02 * xmu(i) + sm1 * dmu(i) @@ -5045,15 +5077,19 @@ 83 | 200 xmu(i) = xmup(i) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) -make[3]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/JSON' -make[3]: 'libfeffjson.a' is up to date. -make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/JSON' -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o fdthea.o fdthea.f +make[3]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/MATH' +make[3]: 'libfeffmath.a' is up to date. +make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/MATH' feffdt.f:20:29: 20 | character*12 fname(npx) | 1 Warning: Array 'fname' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] +make -C ../JSON libfeffjson.a +make[3]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/JSON' +make[3]: 'libfeffjson.a' is up to date. +make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/JSON' +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o fdthea.o fdthea.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ff2afs.o ff2afs.f ff2afs.f:75:72: @@ -5116,27 +5152,42 @@ | 1 Warning: Array 'ri' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ff2chi.o ff2chi.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ff2xmu.o ff2xmu.f ff2chi.f:148:72: 148 | 120 title(ntitle+ihead) = head(ihead) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ff2xmu.o ff2xmu.f ff2chi.f:297:72: 297 | 640 read(1) chia(ie) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 640 at (1) +ff2xmu.f:72:72: + + 72 | do 112 iip =ipmin,ipmax !KJ I added this variable ip 1-06 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 112 at (1) ff2chi.f:311:72: 311 | 760 write(1) chia(ie) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 760 at (1) +ff2xmu.f:73:72: + + 73 | 112 gtrful(iip,ie) = 0 + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 112 at (1) ff2chi.f:373:72: 373 | 625 ckck(i) = dble(real(ck(i))) +coni*dble(aimag(ck(i))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 625 at (1) +ff2xmu.f:172:72: + + 172 | 120 title(ntitle+ihead) = head(ihead) + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ff2chi.f:404:72: 404 | 710 chia(ie) = 0 @@ -5147,6 +5198,11 @@ 425 | 711 omega(ie) = dimag(kxsec(ie)+cchi(ie)) !KJ xsec to kxsec 7/06 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 711 at (1) +ff2xmu.f:285:72: + + 285 | 640 read(1) chia(ie) + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 640 at (1) ff2chi.f:54:24: 54 | real achi(nex,npx), phchi(nex,npx) @@ -5157,6 +5213,12 @@ 52 | real rat(3,legtot,npx), beta(legtot,npx), eta(legtot,npx) | 1 Warning: Array 'beta' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] +ff2xmu.f:311:72: + + 311 | 760 write(1) chia(ie) + | 1 +Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 760 at (1) +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ffmod6.o ffmod6.f ff2chi.f:52:63: 52 | real rat(3,legtot,npx), beta(legtot,npx), eta(legtot,npx) @@ -5182,31 +5244,6 @@ 53 | real ri(legtot,npx) | 1 Warning: Array 'ri' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] -ff2xmu.f:72:72: - - 72 | do 112 iip =ipmin,ipmax !KJ I added this variable ip 1-06 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 112 at (1) -ff2xmu.f:73:72: - - 73 | 112 gtrful(iip,ie) = 0 - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 112 at (1) -ff2xmu.f:172:72: - - 172 | 120 title(ntitle+ihead) = head(ihead) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) -ff2xmu.f:285:72: - - 285 | 640 read(1) chia(ie) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 640 at (1) -ff2xmu.f:311:72: - - 311 | 760 write(1) chia(ie) - | 1 -Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 760 at (1) ff2xmu.f:372:72: 372 | 856 cchi(ie) = dimag(kxsec(ie)+cchi(ie)) * coni+rchtot(ie) !KJ id. @@ -5247,7 +5284,6 @@ 52 | real ri(legtot,npx) | 1 Warning: Array 'ri' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ffmod6.o ffmod6.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o fprime.o fprime.f fprime.f:47:72: @@ -5338,10 +5374,6 @@ make[3]: 'libfeffpar.a' is up to date. make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/PAR' make -C ../MATH libfeffmath.a -make[3]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/MATH' -make[3]: 'libfeffmath.a' is up to date. -make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/MATH' -make -C ../JSON libfeffjson.a mmtr.f:37:72: 37 | do 10 k = -mtot,mtot @@ -5357,30 +5389,34 @@ 39 | do 10 l = -mtot,mtot | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) -mmtr.f:59:72: - - 59 | do 40 k2= 1,8 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 40 at (1) +make[3]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/MATH' +make[3]: 'libfeffmath.a' is up to date. +make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/MATH' +make -C ../JSON libfeffjson.a fmtrxi.f:83:72: 83 | do 60 lam2 = 1, lam2x | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 60 at (1) +mmtr.f:59:72: + + 59 | do 40 k2= 1,8 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 40 at (1) mmtr.f:63:72: 63 | do 35 m2 = -lind(k2), lind(k2) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 35 at (1) -make[3]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/JSON' -make[3]: 'libfeffjson.a' is up to date. -make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/JSON' -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o mmtrxi.o mmtrxi.f mmtr.f:30:28: 30 | complex*16 bmati, bmat | 1 Warning: Array 'bmat' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] +make[3]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/JSON' +make[3]: 'libfeffjson.a' is up to date. +make[3]: Leaving directory '/build/reproducible-path/feff85exafs-0.2+dfsg/src/JSON' +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o mmtrxi.o mmtrxi.f mmtrxi.f:93:72: 93 | do 40 k2 = 1, 8 @@ -5388,8 +5424,6 @@ Warning: Fortran 2018 deleted feature: Shared DO termination label 40 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o import.o import.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o rot3i.o rot3i.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o sclmz.o sclmz.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o setlam.o setlam.f rot3i.f:46:72: 46 | do 200 im = 1, 2*ltot+1 @@ -5410,16 +5444,18 @@ 121 | do 90 m2 = 1, 2*mtot+1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 90 at (1) -sclmz.f:43:72: - - 43 | do 20 il = imp1, lmax - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) rot3i.f:42:21: 42 | dimension dri0 (ltot+1, 2*ltot+1, 2*ltot+1) | 1 Warning: Array 'dri0' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o sclmz.o sclmz.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o setlam.o setlam.f +sclmz.f:43:72: + + 43 | do 20 il = imp1, lmax + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) setlam.f:88:72: 88 | do 20 im = 1, mmax+1 @@ -5445,6 +5481,7 @@ gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o trig.o trig.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o onepath.o onepath.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o pathgeom.o pathgeom.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../FF2X/fdtxdi.o ../FF2X/fdtxdi.f onepath.f:151:53: 151 | complex*16 bmati(-mtot:mtot, 8, -mtot:mtot, 8) @@ -5465,7 +5502,6 @@ 150 | complex*16 eref2(nex,nspx), ph4(nex,-ltot:ltot, nspx, 0:nphx) | 1 Warning: Array 'ph4' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ../FF2X/fdtxdi.o ../FF2X/fdtxdi.f gcc -c -g -fPIC -o feffpath.o feffpath.c gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o ffmod5.o ffmod5.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -I/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -J/build/reproducible-path/feff85exafs-0.2+dfsg/src/json-fortran -o genfmt.o genfmt.f @@ -5596,6 +5632,7 @@ gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o terp.o terp.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o potph.o potph.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o rpotph.o rpotph.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o rdhead.o rdhead.f arrays.h:71:49: 71 | complex*16 eref(nex), ph(nex,ltot+1,0:nphx) @@ -5611,7 +5648,6 @@ 33 | dimension xsec(nex), xsatan(nex) | 1 Warning: Unused variable 'xsec' declared at (1) [-Wunused-variable] -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o rdhead.o rdhead.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o atom.o atom.f atom.f:121:72: @@ -5814,6 +5850,7 @@ | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o potsl.o potsl.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o somm.o somm.f potsl.f:14:72: 14 | 10 dv(i)=d(i)*dr(i) @@ -5834,7 +5871,6 @@ 37 | 40 dv(i)=dv(i)/dr(i) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o somm.o somm.f somm.f:21:72: 21 | if (dc) 20,40,30 @@ -5907,7 +5943,6 @@ 113 | 310 d(i)=0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1) -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o ykdir.o ykdir.f cdsld.f:139:72: 139 | 370 dp(i)=dq(i)*dgc(i,i2)*dpc(i,i2) @@ -5963,6 +5998,7 @@ 109 | 280 format (a40) | 1 Warning: Label 280 at (1) defined but not used [-Wunused-label] +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o ykdir.o ykdir.f ykdir.f:19:72: 19 | 10 dq(i)=dr(i)*(dgc(i,ia)*dgc(i,ib)+dpc(i,ia)*dpc(i,ib)) @@ -5978,6 +6014,7 @@ 24 | 1 ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o renorm.o renorm.f ykdir.f:27:72: 27 | 40 dq(i)=dr(i)*dgc(i,ia)*dpc(i,ib) @@ -6013,8 +6050,6 @@ 58 | if (i-1) 110,110,100 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o renorm.o renorm.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o potslw.o potslw.f renorm.f:40:72: 40 | do 30 i=1,np @@ -6030,6 +6065,12 @@ 101 | 120 dv(i)=dvn(i)+dumm | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) +renorm.f:26:10: + + 26 | jri=1.0+ddjri + | 1 +Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o potslw.o potslw.f potslw.f:14:72: 14 | 10 dv(i)=d(i)*dr(i) @@ -6040,11 +6081,6 @@ 22 | 20 dp(i)=dp(i-1)+das*(13.0*(dv(i)+dv(i-1))-(dv(i-2)+dv(i+1))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) -renorm.f:26:10: - - 26 | jri=1.0+ddjri - | 1 -Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] potslw.f:29:72: 29 | 1 (k-1)*dlo)) @@ -6057,7 +6093,6 @@ Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o ovrlp.o ovrlp.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o sumax.o sumax.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o frnrm.o frnrm.f sumax.f:54:15: 54 | jbl = 2.0+20.0*(blx+8.8) @@ -6073,7 +6108,6 @@ 31 | subroutine sumax (npts, rn, ann, aa2, aasum) | 1 Warning: Unused dummy argument 'npts' at (1) [-Wunused-dummy-argument] -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o istprm.o istprm.f sumax.f:75:72: 75 | fz1 = fzn+20.0*(fz3-fzn)*(blx-xbl+0.05) @@ -6084,12 +6118,14 @@ 59 | xbl = 0.05 * (xjbl-1.0) - 8.8 | ^ note: 'xbl' was declared here -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o sidx.o sidx.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o frnrm.o frnrm.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o istprm.o istprm.f istprm.f:5:58: 5 | 3 vint, rs, xf, xmu, rnrmav, intclc) | 1 Warning: Unused dummy argument 'intclc' at (1) [-Wunused-dummy-argument] +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o sidx.o sidx.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o istval.o istval.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o fermi.o fermi.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o head.o head.f @@ -6106,7 +6142,6 @@ | 1 Warning: Unused dummy argument 'x0' at (1) [-Wunused-dummy-argument] gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o fixvar.o fixvar.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o phase.o phase.f fixvar.f:2:45: 2 | 1 vint, rhoint, nr, dx, x0, ri, @@ -6122,6 +6157,7 @@ 2 | 1 vint, rhoint, nr, dx, x0, ri, | 1 Warning: Unused dummy argument 'x0' at (1) [-Wunused-dummy-argument] +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o phase.o phase.f phase.f:59:13: 59 | lmax = rmt * (20 * bohr) @@ -6172,7 +6208,6 @@ gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o quinn.o quinn.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o edp.o edp.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o fovrg.o fovrg.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o diff.o diff.f fovrg.f:127:72: 127 | if (n-nrk) 20,30,30 @@ -6208,6 +6243,7 @@ 99 | vnp1=v(n+1) | 1 Warning: Possible change of value in conversion from COMPLEX(8) to REAL(8) at (1) [-Wconversion] +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o diff.o diff.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o intpol.o intpol.f diff.f:10:72: @@ -6283,27 +6319,6 @@ gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o heap.o heap.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o pathsd.o pathsd.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o timrep.o timrep.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o mpprmp.o mpprmp.f -mpprmp.f:37:72: - - 37 | do 20 i = 1, 3 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) -mpprmp.f:41:72: - - 41 | do 30 i = 1, 3 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) -mpprmp.f:65:72: - - 65 | do 160 i = 1, 3 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 160 at (1) -mpprmp.f:135:72: - - 135 | do 400 i =1,3 - | 1 -Warning: Fortran 2018 deleted feature: Shared DO termination label 400 at (1) pathsd.f:340:5: 340 | 601 format (1x, i8, f12.6, 2i9) @@ -6329,26 +6344,47 @@ 18 | dimension iout(3,np1x), iout0(3) | 1 Warning: Array 'iout' at (1) is larger than limit set by '-fmax-stack-var-size=', moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the '-fmax-stack-var-size=' limit (or use '-frecursive', which implies unlimited '-fmax-stack-var-size') - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] -mpprmp.f:178:16: - - 178 | xp(j) = xp1(j) - | 1 -Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] pathsd.f:3:39: 3 | 1 pcritk, pcrith, nncrit, potlbl) | 1 Warning: Unused dummy argument 'pcrith' at (1) [-Wunused-dummy-argument] -mpprmp.f:179:16: - - 179 | yp(j) = yp1(j) - | 1 -Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] pathsd.f:3:31: 3 | 1 pcritk, pcrith, nncrit, potlbl) | 1 Warning: Unused dummy argument 'pcritk' at (1) [-Wunused-dummy-argument] +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o mpprmp.o mpprmp.f +mpprmp.f:37:72: + + 37 | do 20 i = 1, 3 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) +mpprmp.f:41:72: + + 41 | do 30 i = 1, 3 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) +mpprmp.f:65:72: + + 65 | do 160 i = 1, 3 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 160 at (1) +mpprmp.f:135:72: + + 135 | do 400 i =1,3 + | 1 +Warning: Fortran 2018 deleted feature: Shared DO termination label 400 at (1) +mpprmp.f:178:16: + + 178 | xp(j) = xp1(j) + | 1 +Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] +mpprmp.f:179:16: + + 179 | yp(j) = yp1(j) + | 1 +Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] mpprmp.f:180:16: 180 | zp(j) = zp1(j) @@ -6432,6 +6468,7 @@ 52 | mag2 = abs(mag1 - pi) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o rot3i.o rot3i.f setlam.f:79:16: 79 | if (jord .gt. iord) goto 20 @@ -6442,7 +6479,6 @@ 37 | iord = icode/10000 -1 | ^ note: 'iord' was declared here -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o rot3i.o rot3i.f rot3i.f:42:72: 42 | do 200 im = 1, 2*ltot+1 @@ -6516,16 +6552,16 @@ 64 | do 800 jl=il,nleg | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 800 at (1) -ff2chi.f:276:16: - - 276 | n = xkpmin / delk - | 1 -Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] sigms.f:210:72: 210 | 20 sum=sum+fn(zi) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) +ff2chi.f:276:16: + + 276 | n = xkpmin / delk + | 1 +Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ff2chi.f:25:20: 25 | dimension emxs(nex), omega(nex), xkxs(nex), xsec(nex) @@ -6564,13 +6600,13 @@ gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o dist.o dist.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o sdist.o sdist.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o xx.o xx.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o getxk.o getxk.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o dalp.o dalp.f xx.f:24:11: 24 | ii = (log(r) + c88) / delta + 1 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o getxk.o getxk.f -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o dalp.o dalp.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o fpot.o fpot.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o exchan.o exchan.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o exchee.o exchee.f @@ -6592,6 +6628,7 @@ 20 | double precision xk(nex), ckmag(nex) | 1 Warning: Unused variable 'ckmag' declared at (1) [-Wunused-variable] +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o strutils.o strutils.f padlib.f:270:33: 270 | array(ipts) = cmplx(tmpr, tmpi) @@ -6607,7 +6644,6 @@ 330 | integer iexp, itmp, isgn, i, npack, iok, j | 1 Warning: Unused variable 'iok' declared at (1) [-Wunused-variable] -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o strutils.o strutils.f ff2chi.f:361:72: 361 | xk0 = delk * (i-1) + xkmin @@ -6620,6 +6656,7 @@ note: 'xkmin' was declared here gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o echo.o echo.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o get_inpfile.o get_inpfile.f +gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o iread.o iread.f get_inpfile.f:14:31: 14 | character*512 cl_args(3), f @@ -6630,7 +6667,6 @@ 13 | integer n_args, istat, jstat | 1 Warning: Unused variable 'jstat' declared at (1) [-Wunused-variable] -gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o iread.o iread.f gfortran -c -O3 -ffree-line-length-none -g -Wall -fPIC -o compat.o compat.f compat.f:66:49: @@ -6647,7 +6683,7 @@ debian/rules override_dh_auto_install make[1]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg' dh_auto_install - make -j22 install DESTDIR=/build/reproducible-path/feff85exafs-0.2\+dfsg/debian/feff85exafs AM_UPDATE_INFO_DIR=no "INSTALL=install --strip-program=true" + make -j7 install DESTDIR=/build/reproducible-path/feff85exafs-0.2\+dfsg/debian/feff85exafs AM_UPDATE_INFO_DIR=no "INSTALL=install --strip-program=true" make[2]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg' make -C src/PAR -j4 make[3]: Entering directory '/build/reproducible-path/feff85exafs-0.2+dfsg' @@ -7040,8 +7076,8 @@ dh_gencontrol dh_md5sums dh_builddeb -dpkg-deb: building package 'feff85exafs-dbgsym' in '../feff85exafs-dbgsym_0.2+dfsg-2_i386.deb'. dpkg-deb: building package 'feff85exafs' in '../feff85exafs_0.2+dfsg-2_i386.deb'. +dpkg-deb: building package 'feff85exafs-dbgsym' in '../feff85exafs-dbgsym_0.2+dfsg-2_i386.deb'. dpkg-genbuildinfo --build=binary -O../feff85exafs_0.2+dfsg-2_i386.buildinfo dpkg-genchanges --build=binary -O../feff85exafs_0.2+dfsg-2_i386.changes dpkg-genchanges: info: binary-only upload (no source code included) @@ -7049,12 +7085,14 @@ dpkg-buildpackage: info: binary-only upload (no source included) dpkg-genchanges: info: not including original source code in upload I: copying local configuration +I: user script /srv/workspace/pbuilder/37507/tmp/hooks/B01_cleanup starting +I: user script /srv/workspace/pbuilder/37507/tmp/hooks/B01_cleanup finished I: unmounting dev/ptmx filesystem I: unmounting dev/pts filesystem I: unmounting dev/shm filesystem I: unmounting proc filesystem I: unmounting sys filesystem I: cleaning the build env -I: removing directory /srv/workspace/pbuilder/106158 and its subdirectories -I: Current time: Mon May 12 06:12:20 -12 2025 -I: pbuilder-time-stamp: 1747073540 +I: removing directory /srv/workspace/pbuilder/37507 and its subdirectories +I: Current time: Wed Apr 10 01:51:11 +14 2024 +I: pbuilder-time-stamp: 1712663471