<86>Apr 25 13:27:15 userdel[3383949]: delete user 'rooter' <86>Apr 25 13:27:15 userdel[3383949]: removed group 'rooter' owned by 'rooter' <86>Apr 25 13:27:15 userdel[3383949]: removed shadow group 'rooter' owned by 'rooter' <86>Apr 25 13:27:15 groupadd[3383955]: group added to /etc/group: name=rooter, GID=525 <86>Apr 25 13:27:15 groupadd[3383955]: group added to /etc/gshadow: name=rooter <86>Apr 25 13:27:15 groupadd[3383955]: new group: name=rooter, GID=525 <86>Apr 25 13:27:15 useradd[3383960]: new user: name=rooter, UID=525, GID=525, home=/root, shell=/bin/bash <86>Apr 25 13:27:15 userdel[3383967]: delete user 'builder' <86>Apr 25 13:27:15 userdel[3383967]: removed group 'builder' owned by 'builder' <86>Apr 25 13:27:15 userdel[3383967]: removed shadow group 'builder' owned by 'builder' <86>Apr 25 13:27:15 groupadd[3383973]: group added to /etc/group: name=builder, GID=526 <86>Apr 25 13:27:15 groupadd[3383973]: group added to /etc/gshadow: name=builder <86>Apr 25 13:27:15 groupadd[3383973]: new group: name=builder, GID=526 <86>Apr 25 13:27:15 useradd[3383978]: new user: name=builder, UID=526, GID=526, home=/usr/src, shell=/bin/bash /usr/src/in/srpm/libslatec-4.1-alt7.src.rpm: The use of such a license name is ambiguous: GPL <13>Apr 25 13:27:17 rpmi: libopenblas-0.2.20-alt2 sisyphus+229410.100.1.1 1557920019 installed <13>Apr 25 13:27:17 rpmi: libquadmath0-9.2.1-alt3 sisyphus+245055.100.1.1 1580041617 installed <13>Apr 25 13:27:17 rpmi: libgfortran5-9.2.1-alt3 sisyphus+245055.100.1.1 1580041617 installed <13>Apr 25 13:27:17 rpmi: libquadmath9-devel-9.2.1-alt3 sisyphus+245055.100.1.1 1580041617 installed <13>Apr 25 13:27:17 rpmi: libopenblas-devel-0.2.20-alt2 sisyphus+229410.100.1.1 1557920019 installed <13>Apr 25 13:27:17 rpmi: libxblas-1.0.248-alt1.3 sisyphus+229150.100.1.1 1557388786 installed <13>Apr 25 13:27:17 rpmi: liblapack-1:3.8.0-alt3 sisyphus+221521.100.1.1 1550134903 installed <13>Apr 25 13:27:17 rpmi: gcc-fortran-common-1.4.24-alt3 sisyphus+243033.100.1.1 1576462403 installed <13>Apr 25 13:27:17 rpmi: libgfortran9-devel-9.2.1-alt3 sisyphus+245055.100.1.1 1580041617 installed <13>Apr 25 13:27:18 rpmi: gcc9-fortran-9.2.1-alt3 sisyphus+245055.100.1.1 1580041617 installed <13>Apr 25 13:27:18 rpmi: gcc-fortran-9-alt1 sisyphus+239632.300.3.1 1571788297 installed <13>Apr 25 13:27:18 rpmi: liblapack-devel-1:3.8.0-alt3 sisyphus+221521.100.1.1 1550134903 installed Building target platforms: i586 Building for target i586 Wrote: /usr/src/in/nosrpm/libslatec-4.1-alt7.nosrc.rpm Installing libslatec-4.1-alt7.src.rpm Building target platforms: i586 Building for target i586 Executing(%prep): /bin/sh -e /usr/src/tmp/rpm-tmp.69215 + umask 022 + /bin/mkdir -p /usr/src/RPM/BUILD + cd /usr/src/RPM/BUILD + cd /usr/src/RPM/BUILD + rm -rf libslatec-4.1 + echo 'Source #0 (slatec_src.tar.gz):' Source #0 (slatec_src.tar.gz): + /bin/gzip -dc /usr/src/RPM/SOURCES/slatec_src.tar.gz + /bin/tar -xf - + cd libslatec-4.1 + /bin/chmod -c -Rf u+rwX,go-w . + tar -xzf /usr/src/RPM/SOURCES/slatec4linux.tar.gz + install /usr/src/RPM/SOURCES/guide . + exit 0 Executing(%build): /bin/sh -e /usr/src/tmp/rpm-tmp.69215 + umask 022 + /bin/mkdir -p /usr/src/RPM/BUILD + cd /usr/src/RPM/BUILD + cd libslatec-4.1 + make -j8 make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcv.f > dcv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed aaaaaa.f > aaaaaa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cnbdi.f > cnbdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hpperm.f > hpperm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqc25f.f > dqc25f.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qc25s.f > qc25s.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spoco.f > spoco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed acosh.f > acosh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cnbfa.f > cnbfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddaini.f > ddaini.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qcheb.f > qcheb.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hpsort.f > hpsort.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spodi.f > spodi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqc25s.f > dqc25s.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ai.f > ai.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddajac.f > ddajac.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hqr.f > hqr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qelg.f > qelg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cnbfs.f > cnbfs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqcheb.f > dqcheb.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed aie.f > aie.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hqr2.f > hqr2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spofa.f > spofa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cnbir.f > cnbir.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqdota.f > dqdota.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spofs.f > spofs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddanrm.f > ddanrm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qform.f > qform.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed albeta.f > albeta.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cnbsl.f > cnbsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddaslv.f > ddaslv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqdoti.f > dqdoti.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hstart.f > hstart.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spoir.f > spoir.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qk15.f > qk15.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed algams.f > algams.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed combak.f > combak.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hstcrt.f > hstcrt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqelg.f > dqelg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qk15i.f > qk15i.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ali.f > ali.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spopt.f > spopt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddassl.f > ddassl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed comhes.f > comhes.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddastp.f > ddastp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqform.f > dqform.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qk15w.f > qk15w.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed comlr.f > comlr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hstcs1.f > hstcs1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddatrp.f > ddatrp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed alngam.f > alngam.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqk15.f > dqk15.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sposl.f > sposl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qk21.f > qk21.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddaws.f > ddaws.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqk15i.f > dqk15i.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hstcsp.f > hstcsp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed comlr2.f > comlr2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sppco.f > sppco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qk31.f > qk31.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed alnrel.f > alnrel.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hstcyl.f > hstcyl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed compb.f > compb.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sppdi.f > sppdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hstplr.f > hstplr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed asinh.f > asinh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qk41.f > qk41.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddawts.f > ddawts.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spperm.f > spperm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqk15w.f > dqk15w.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddcor.f > ddcor.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed comqr.f > comqr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hstssp.f > hstssp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqk21.f > dqk21.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sppfa.f > sppfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed comqr2.f > comqr2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed asyjy.f > asyjy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddcst.f > ddcst.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqk31.f > dqk31.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed asyik.f > asyik.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qk51.f > qk51.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed htrib3.f > htrib3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qk61.f > qk61.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sppsl.f > sppsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed atanh.f > atanh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cortb.f > cortb.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddeabm.f > ddeabm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqk41.f > dqk41.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed htribk.f > htribk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed corth.f > corth.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqk51.f > dqk51.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spsort.f > spsort.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed avint.f > avint.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddebdf.f > ddebdf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sptsl.f > sptsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qmomo.f > qmomo.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bakvec.f > bakvec.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cosdg.f > cosdg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dderkf.f > dderkf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed htrid3.f > htrid3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqk61.f > dqk61.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qnc79.f > qnc79.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed htridi.f > htridi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sqrdc.f > sqrdc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed balanc.f > balanc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddes.f > ddes.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hvnrm.f > hvnrm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qpdoc.f > qpdoc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed balbak.f > balbak.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cosqb.f > cosqb.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cosgen.f > cosgen.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qng.f > qng.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqmomo.f > dqmomo.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqnc79.f > dqnc79.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qpsrt.f > qpsrt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sqrsl.f > sqrsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddntl.f > ddntl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddntp.f > ddntp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cosqb1.f > cosqb1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hw3crt.f > hw3crt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hwscrt.f > hwscrt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bandr.f > bandr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sreadp.f > sreadp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed srlcal.f > srlcal.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqng.f > dqng.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddoglg.f > ddoglg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqpsrt.f > dqpsrt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bandv.f > bandv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qrfac.f > qrfac.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed srot.f > srot.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bcrh.f > bcrh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qrsolv.f > qrsolv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cosqf.f > cosqf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddot.f > ddot.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hwscs1.f > hwscs1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cosqf1.f > cosqf1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qs2i1d.f > qs2i1d.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hwscsp.f > hwscsp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bdiff.f > bdiff.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqrdc.f > dqrdc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cosqi.f > cosqi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddpsc.f > ddpsc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqrfac.f > dqrfac.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hwscyl.f > hwscyl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qs2i1r.f > qs2i1r.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed srotg.f > srotg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besi.f > besi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cost.f > cost.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed srotm.f > srotm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hwsplr.f > hwsplr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qwgtc.f > qwgtc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddpst.f > ddpst.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed srotmg.f > srotmg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqrsl.f > dqrsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besi0.f > besi0.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hwsss1.f > hwsss1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqrslv.f > dqrslv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qwgtf.f > qwgtf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ss2lt.f > ss2lt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besi0e.f > besi0e.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddriv2.f > ddriv2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed costi.f > costi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cot.f > cot.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqwgtc.f > dqwgtc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hwsssp.f > hwsssp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddriv1.f > ddriv1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qwgts.f > qwgts.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besi1.f > besi1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cpadd.f > cpadd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddriv3.f > ddriv3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ss2y.f > ss2y.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqwgtf.f > dqwgtf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed i1mach.f > i1mach.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qzhes.f > qzhes.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssbmv.f > ssbmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cpbco.f > cpbco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddscl.f > ddscl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqwgts.f > dqwgts.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qzit.f > qzit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed i1merg.f > i1merg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besi1e.f > besi1e.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sscal.f > sscal.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed drc.f > drc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besj.f > besj.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cpbdi.f > cpbdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed icamax.f > icamax.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qzval.f > qzval.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddstp.f > ddstp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssd2s.f > ssd2s.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cpbfa.f > cpbfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besj0.f > besj0.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ddzro.f > ddzro.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed icopy.f > icopy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besj1.f > besj1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qzvec.f > qzvec.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed de1.f > de1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssdbcg.f > ssdbcg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed drc3jj.f > drc3jj.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cpbsl.f > cpbsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed idamax.f > idamax.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed r1mach.f > r1mach.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed drc3jm.f > drc3jm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssdcg.f > ssdcg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besk.f > besk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed deabm.f > deabm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed drc6j.f > drc6j.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed r1mpyq.f > r1mpyq.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssdcgn.f > ssdcgn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besk0.f > besk0.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cpevlr.f > cpevlr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cpevl.f > cpevl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed idloc.f > idloc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed drd.f > drd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed imtql1.f > imtql1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed debdf.f > debdf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed r1updt.f > r1updt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssdcgs.f > ssdcgs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besk0e.f > besk0e.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cpoco.f > cpoco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed defc.f > defc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dreadp.f > dreadp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed imtql2.f > imtql2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besk1.f > besk1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed r9aimp.f > r9aimp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cpodi.f > cpodi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed defcmn.f > defcmn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssdgmr.f > ssdgmr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed imtqlv.f > imtqlv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed r9atn1.f > r9atn1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dreort.f > dreort.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besk1e.f > besk1e.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cpofa.f > cpofa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssdi.f > ssdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed indxa.f > indxa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed beskes.f > beskes.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssdomn.f > ssdomn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed defe4.f > defe4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed r9chu.f > r9chu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cpofs.f > cpofs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed drf.f > drf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed defehl.f > defehl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed drj.f > drj.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed r9gmic.f > r9gmic.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssds.f > ssds.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besknu.f > besknu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed defer.f > defer.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed indxc.f > indxc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed r9gmit.f > r9gmit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssdscl.f > ssdscl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed indxb.f > indxb.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besks.f > besks.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cposl.f > cposl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cpoir.f > cpoir.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dei.f > dei.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed drkfs.f > drkfs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed initds.f > initds.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssgs.f > ssgs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cppco.f > cppco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed denorm.f > denorm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed drlcal.f > drlcal.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed r9lgic.f > r9lgic.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed inits.f > inits.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed r9knus.f > r9knus.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besy.f > besy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besy0.f > besy0.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssiccg.f > ssiccg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cppdi.f > cppdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed derf.f > derf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed intrv.f > intrv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed r9lgit.f > r9lgit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besy1.f > besy1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed drot.f > drot.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed derfc.f > derfc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed drotg.f > drotg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cppfa.f > cppfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed intyd.f > intyd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed r9lgmc.f > r9lgmc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssics.f > ssics.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssico.f > ssico.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed besynu.f > besynu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cppsl.f > cppsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed derkf.f > derkf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed r9ln2r.f > r9ln2r.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed drotm.f > drotm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssidi.f > ssidi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed beta.f > beta.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cpqr79.f > cpqr79.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed invit.f > invit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed derkfs.f > derkfs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed drotmg.f > drotmg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed inxca.f > inxca.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed r9pak.f > r9pak.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssiev.f > ssiev.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed betai.f > betai.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cproc.f > cproc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed drsco.f > drsco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed r9upak.f > r9upak.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssifa.f > ssifa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed inxcb.f > inxcb.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bfqad.f > bfqad.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cprocp.f > cprocp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed des.f > des.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ds2lt.f > ds2lt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed inxcc.f > inxcc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed radb2.f > radb2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssilur.f > ssilur.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bi.f > bi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ds2y.f > ds2y.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed radb3.f > radb3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed iploc.f > iploc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bie.f > bie.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cprod.f > cprod.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssilus.f > ssilus.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dexint.f > dexint.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dexprl.f > dexprl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cprodp.f > cprodp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ipperm.f > ipperm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed radb4.f > radb4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed binom.f > binom.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cpsi.f > cpsi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dfac.f > dfac.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dscal.f > dscal.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ipsort.f > ipsort.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsbmv.f > dsbmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssisl.f > ssisl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed radb5.f > radb5.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssjac.f > ssjac.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bint4.f > bint4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dfc.f > dfc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsd2s.f > dsd2s.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed radbg.f > radbg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cptsl.f > cptsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed isamax.f > isamax.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssli.f > ssli.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bintk.f > bintk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cpzero.f > cpzero.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed radf2.f > radf2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsdbcg.f > dsdbcg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed isdbcg.f > isdbcg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bisect.f > bisect.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dfcmn.f > dfcmn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssli2.f > ssli2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cqrdc.f > cqrdc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dfdjc1.f > dfdjc1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsdcg.f > dsdcg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed isdcg.f > isdcg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed radf3.f > radf3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssllti.f > ssllti.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bkias.f > bkias.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dfdjc3.f > dfdjc3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed isdcgn.f > isdcgn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed radf4.f > radf4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bkisr.f > bkisr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cqrsl.f > cqrsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sslubc.f > sslubc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed crati.f > crati.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dfehl.f > dfehl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsdcgs.f > dsdcgs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed isdcgs.f > isdcgs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsdcgn.f > dsdcgn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sslucn.f > sslucn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bksol.f > bksol.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed crotg.f > crotg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dfspvd.f > dfspvd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed isdgmr.f > isdgmr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed radf5.f > radf5.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cs1s2.f > cs1s2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed radfg.f > radfg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsdgmr.f > dsdgmr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dfspvn.f > dfspvn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed blktr1.f > blktr1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsdi.f > dsdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sslucs.f > sslucs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rand.f > rand.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cscal.f > cscal.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sslugm.f > sslugm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed blktri.f > blktri.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dfulmt.f > dfulmt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsdomn.f > dsdomn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed isdir.f > isdir.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ratqr.f > ratqr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sslui.f > sslui.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed isdomn.f > isdomn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bndacc.f > bndacc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cscale.f > cscale.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dfzero.f > dfzero.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsdot.f > dsdot.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed isort.f > isort.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rc.f > rc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bndsol.f > bndsol.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cseri.f > cseri.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgami.f > dgami.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsds.f > dsds.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed issbcg.f > issbcg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rc3jj.f > rc3jj.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sslui2.f > sslui2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sslui4.f > sslui4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed csevl.f > csevl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bnfac.f > bnfac.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsdscl.f > dsdscl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bnslv.f > bnslv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssluom.f > ssluom.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rc3jm.f > rc3jm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgamic.f > dgamic.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed isscg.f > isscg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cshch.f > cshch.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgamit.f > dgamit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsgs.f > dsgs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed isscgn.f > isscgn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rc6j.f > rc6j.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssluti.f > ssluti.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed csico.f > csico.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgamlm.f > dgamlm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsiccg.f > dsiccg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssmmi2.f > ssmmi2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rd.f > rd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bsgq8.f > bsgq8.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed csidi.f > csidi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bqr.f > bqr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgamln.f > dgamln.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rebak.f > rebak.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsico.f > dsico.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssmmti.f > ssmmti.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed isscgs.f > isscgs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed issgmr.f > issgmr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bskin.f > bskin.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed csifa.f > csifa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgamma.f > dgamma.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed issir.f > issir.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssmtv.f > ssmtv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsidi.f > dsidi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rebakb.f > rebakb.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed csinh.f > csinh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed reduc.f > reduc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssmv.f > ssmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsics.f > dsics.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bspdr.f > bspdr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bspdoc.f > bspdoc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgamr.f > dgamr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgamrn.f > dgamrn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsifa.f > dsifa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed iswap.f > iswap.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed reduc2.f > reduc2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssort.f > ssort.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed issomn.f > issomn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgaus8.f > dgaus8.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed csisl.f > csisl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsilur.f > dsilur.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed reort.f > reort.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sspco.f > sspco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bsplvd.f > bsplvd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bspev.f > bspev.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cspdi.f > cspdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cspco.f > cspco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ivout.f > ivout.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgbco.f > dgbco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsilus.f > dsilus.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed j4save.f > j4save.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rf.f > rf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sspdi.f > sspdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bsplvn.f > bsplvn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cspfa.f > cspfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsindg.f > dsindg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rfftb.f > rfftb.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgbdi.f > dgbdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sspev.f > sspev.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed jairy.f > jairy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bsppp.f > bsppp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgbfa.f > dgbfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cspsl.f > cspsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsisl.f > dsisl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sspfa.f > sspfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rfftb1.f > rfftb1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bspvd.f > bspvd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed csroot.f > csroot.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgbmv.f > dgbmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed la05as.f > la05as.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rfftf.f > rfftf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sspmv.f > sspmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bspvn.f > bspvn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed la05ad.f > la05ad.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed csrot.f > csrot.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgbsl.f > dgbsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsli.f > dsli.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed la05bd.f > la05bd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsjac.f > dsjac.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rfftf1.f > rfftf1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bsqad.f > bsqad.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed csscal.f > csscal.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgeco.f > dgeco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsli2.f > dsli2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sspr.f > sspr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed la05bs.f > la05bs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rffti.f > rffti.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed csvdc.f > csvdc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bsrh.f > bsrh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sspr2.f > sspr2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsllti.f > dsllti.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed la05cd.f > la05cd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rffti1.f > rffti1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sspsl.f > sspsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgedi.f > dgedi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dslubc.f > dslubc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgefa.f > dgefa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rg.f > rg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed la05cs.f > la05cs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed bvalu.f > bvalu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cswap.f > cswap.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgefs.f > dgefs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssvdc.f > ssvdc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed csymm.f > csymm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sswap.f > sswap.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rgauss.f > rgauss.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed la05ed.f > la05ed.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dslucn.f > dslucn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgemm.f > dgemm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed csyr2k.f > csyr2k.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed la05es.f > la05es.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dslucs.f > dslucs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rgg.f > rgg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssymm.f > ssymm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed csyrk.f > csyrk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgemv.f > dgemv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dslugm.f > dslugm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed llsia.f > llsia.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed c0lgmc.f > c0lgmc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rj.f > rj.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssymv.f > ssymv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dger.f > dger.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dslui.f > dslui.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed c1merg.f > c1merg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ctan.f > ctan.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ctanh.f > ctanh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssyr.f > ssyr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed lmpar.f > lmpar.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgesl.f > dgesl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed lpdp.f > lpdp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rpqr79.f > rpqr79.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dslui2.f > dslui2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssyr2.f > ssyr2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed c9lgmc.f > c9lgmc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ctbmv.f > ctbmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dglss.f > dglss.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dslui4.f > dslui4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssyr2k.f > ssyr2k.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed lsame.f > lsame.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rpzero.f > rpzero.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed c9ln2r.f > c9ln2r.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ctbsv.f > ctbsv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgmres.f > dgmres.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rs.f > rs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed lsei.f > lsei.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsluom.f > dsluom.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ssyrk.f > ssyrk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ctpmv.f > ctpmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rsb.f > rsb.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cacai.f > cacai.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dgtsl.f > dgtsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed lsi.f > lsi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsluti.f > dsluti.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cacon.f > cacon.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed stbmv.f > stbmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ctpsv.f > ctpsv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dh12.f > dh12.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dslvs.f > dslvs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed lsod.f > lsod.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rsco.f > rsco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed stbsv.f > stbsv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ctrco.f > ctrco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cacos.f > cacos.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed lssods.f > lssods.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsmmi2.f > dsmmi2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cacosh.f > cacosh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rsg.f > rsg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed steps.f > steps.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dhels.f > dhels.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsmmti.f > dsmmti.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ctrdi.f > ctrdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed lssuds.f > lssuds.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rsgab.f > rsgab.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dheqr.f > dheqr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed stin.f > stin.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cairy.f > cairy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ctrmm.f > ctrmm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dhfti.f > dhfti.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsmtv.f > dsmtv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed macon.f > macon.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rsgba.f > rsgba.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dhkseq.f > dhkseq.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ctrmv.f > ctrmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed stod.f > stod.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rsp.f > rsp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed carg.f > carg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsmv.f > dsmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed stor1.f > stor1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed casin.f > casin.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ctrsl.f > ctrsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dhstrt.f > dhstrt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed casinh.f > casinh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed stout.f > stout.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsort.f > dsort.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rst.f > rst.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ctrsm.f > ctrsm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mc20ad.f > mc20ad.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dhvnrm.f > dhvnrm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rt.f > rt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mc20as.f > mc20as.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed casyi.f > casyi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ctrsv.f > ctrsv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed stpmv.f > stpmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsos.f > dsos.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mgsbv.f > mgsbv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed runif.f > runif.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsoseq.f > dsoseq.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dintp.f > dintp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed stpsv.f > stpsv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed catan.f > catan.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cuchk.f > cuchk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dintrv.f > dintrv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed minfit.f > minfit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed rwupdt.f > rwupdt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsossl.f > dsossl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed strco.f > strco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cunhj.f > cunhj.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dintyd.f > dintyd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dspco.f > dspco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed catan2.f > catan2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed s1merg.f > s1merg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed strdi.f > strdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed minso4.f > minso4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cuni1.f > cuni1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dspdi.f > dspdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed catanh.f > catanh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dir.f > dir.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed strmm.f > strmm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed minsol.f > minsol.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sasum.f > sasum.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed caxpy.f > caxpy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dspenc.f > dspenc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cuni2.f > cuni2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed djairy.f > djairy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed strmv.f > strmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cbabk2.f > cbabk2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpadd.f > mpadd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dlbeta.f > dlbeta.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed saxpy.f > saxpy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cunik.f > cunik.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sbcg.f > sbcg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dspfa.f > dspfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed strsl.f > strsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cbal.f > cbal.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpadd2.f > mpadd2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dlgams.f > dlgams.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sbhin.f > sbhin.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cbesh.f > cbesh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cunk2.f > cunk2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cunk1.f > cunk1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpadd3.f > mpadd3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dli.f > dli.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed strsm.f > strsm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sbocls.f > sbocls.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dspmv.f > dspmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsplp.f > dsplp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cuoik.f > cuoik.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed strsv.f > strsv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cbesi.f > cbesi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpblas.f > mpblas.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sbols.f > sbols.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed stway.f > stway.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpcdm.f > mpcdm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dllsia.f > dllsia.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dllti2.f > dllti2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dspr.f > dspr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dspr2.f > dspr2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cv.f > cv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cbesj.f > cbesj.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed suds.f > suds.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cbesk.f > cbesk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dlngam.f > dlngam.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cwrsk.f > cwrsk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpchk.f > mpchk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpcmd.f > mpcmd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sbolsm.f > sbolsm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed scasum.f > scasum.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dspsl.f > dspsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cbesy.f > cbesy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsteps.f > dsteps.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed svco.f > svco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d1mach.f > d1mach.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dlnrel.f > dlnrel.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed scg.f > scg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed svd.f > svd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpdivi.f > mpdivi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cbeta.f > cbeta.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d1merg.f > d1merg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dlpdoc.f > dlpdoc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mperr.f > mperr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed scgn.f > scgn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed svecs.f > svecs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dstod.f > dstod.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cbinu.f > cbinu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dstor1.f > dstor1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d1mpyq.f > d1mpyq.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed scgs.f > scgs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dlpdp.f > dlpdp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpmaxr.f > mpmaxr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed svout.f > svout.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cbiry.f > cbiry.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dlsei.f > dlsei.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dstway.f > dstway.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d1updt.f > d1updt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpmlp.f > mpmlp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed swritp.f > swritp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cbknu.f > cbknu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed schdc.f > schdc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d9aimp.f > d9aimp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dlsi.f > dlsi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsuds.f > dsuds.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpmul.f > mpmul.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sxlcal.f > sxlcal.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cblkt1.f > cblkt1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsvco.f > dsvco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dlsod.f > dlsod.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpmul2.f > mpmul2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed schex.f > schex.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed schdd.f > schdd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cblktr.f > cblktr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d9atn1.f > d9atn1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d9b0mp.f > d9b0mp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed tevlc.f > tevlc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dlssud.f > dlssud.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsvdc.f > dsvdc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpmuli.f > mpmuli.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d9b1mp.f > d9b1mp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dmacon.f > dmacon.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed schkw.f > schkw.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed tevls.f > tevls.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpnzr.f > mpnzr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dswap.f > dswap.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed schud.f > schud.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cbuni.f > cbuni.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cbrt.f > cbrt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dmgsbv.f > dmgsbv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsymm.f > dsymm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpovfl.f > mpovfl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed tinvit.f > tinvit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed tql1.f > tql1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d9chu.f > d9chu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cbunk.f > cbunk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d9gmic.f > d9gmic.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sclosm.f > sclosm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsymv.f > dsymv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpstr.f > mpstr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed tql2.f > tql2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dmpar.f > dmpar.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dmout.f > dmout.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed scnrm2.f > scnrm2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed mpunfl.f > mpunfl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ccbrt.f > ccbrt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d9gmit.f > d9gmit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsyr.f > dsyr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed tqlrat.f > tqlrat.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cchdc.f > cchdc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dnbco.f > dnbco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed scoef.f > scoef.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d9knus.f > d9knus.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed numxer.f > numxer.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsyr2.f > dsyr2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed scopy.f > scopy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed trbak1.f > trbak1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dnbdi.f > dnbdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsyr2k.f > dsyr2k.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cchdd.f > cchdd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d9lgic.f > d9lgic.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed scopym.f > scopym.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ohtrol.f > ohtrol.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed trbak3.f > trbak3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cchex.f > cchex.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d9lgit.f > d9lgit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dsyrk.f > dsyrk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ohtror.f > ohtror.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed tred1.f > tred1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dnbfa.f > dnbfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed scov.f > scov.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cchud.f > cchud.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d9lgmc.f > d9lgmc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dtbmv.f > dtbmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ortbak.f > ortbak.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed tred2.f > tred2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dnbfs.f > dnbfs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d9ln2r.f > d9ln2r.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dnbsl.f > dnbsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed scpplt.f > scpplt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ccmpb.f > ccmpb.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dtbsv.f > dtbsv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdaini.f > sdaini.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed orthes.f > orthes.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed tred3.f > tred3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ccopy.f > ccopy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dnls1.f > dnls1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dtin.f > dtin.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d9pak.f > d9pak.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ortho4.f > ortho4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed tri3.f > tri3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdajac.f > sdajac.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ccosh.f > ccosh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed d9upak.f > d9upak.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dnls1e.f > dnls1e.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed orthog.f > orthog.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdanrm.f > sdanrm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ccot.f > ccot.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dtout.f > dtout.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed tridib.f > tridib.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dnrm2.f > dnrm2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed orthol.f > orthol.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdaslv.f > sdaslv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed tridq.f > tridq.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dtpmv.f > dtpmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dacosh.f > dacosh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dai.f > dai.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dnsq.f > dnsq.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdassl.f > sdassl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdcdot.f > cdcdot.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed tris4.f > tris4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdcor.f > cdcor.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dtpsv.f > dtpsv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed orthor.f > orthor.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dnsqe.f > dnsqe.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dtrco.f > dtrco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdastp.f > sdastp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed trisp.f > trisp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed daie.f > daie.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dasinh.f > dasinh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdcst.f > cdcst.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dogleg.f > dogleg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dtrdi.f > dtrdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ortran.f > ortran.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed passb.f > passb.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdatrp.f > sdatrp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdiv.f > cdiv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dasum.f > dasum.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dohtrl.f > dohtrl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed trix.f > trix.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dtrmm.f > dtrmm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed tsturm.f > tsturm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdawts.f > sdawts.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed passb2.f > passb2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dtrmv.f > dtrmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed domn.f > domn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dasyik.f > dasyik.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdntl.f > cdntl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed passb3.f > passb3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdcor.f > sdcor.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed u11ls.f > u11ls.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdntp.f > cdntp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dasyjy.f > dasyjy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed passb4.f > passb4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdotc.f > cdotc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dtrsl.f > dtrsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dorth.f > dorth.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed u11us.f > u11us.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed datanh.f > datanh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdcst.f > sdcst.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dtrsm.f > dtrsm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dorthr.f > dorthr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed passb5.f > passb5.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed u12ls.f > u12ls.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdotu.f > cdotu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed davint.f > davint.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dp1vlu.f > dp1vlu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dtrsv.f > dtrsv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed passf.f > passf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdntp.f > sdntp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdntl.f > sdntl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed daws.f > daws.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdpsc.f > cdpsc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpbco.f > dpbco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed u12us.f > u12us.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdot.f > sdot.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ulsia.f > ulsia.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed du11ls.f > du11ls.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed passf2.f > passf2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdpst.f > cdpst.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed daxpy.f > daxpy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpbdi.f > dpbdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed du11us.f > du11us.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdpsc.f > sdpsc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed passf3.f > passf3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbcg.f > dbcg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed passf4.f > passf4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpbfa.f > dpbfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed du12ls.f > du12ls.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed usrmat.f > usrmat.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdriv1.f > cdriv1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdpst.f > sdpst.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed vnwrms.f > vnwrms.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbdiff.f > dbdiff.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdriv2.f > cdriv2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpbsl.f > dpbsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed du12us.f > du12us.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed passf5.f > passf5.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed wnlit.f > wnlit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdriv1.f > sdriv1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbesi.f > dbesi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchbs.f > dpchbs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdriv3.f > cdriv3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dulsia.f > dulsia.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchbs.f > pchbs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdriv2.f > sdriv2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdscl.f > cdscl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed wnlsm.f > wnlsm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbesi0.f > dbesi0.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchce.f > dpchce.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dusrmt.f > dusrmt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchce.f > pchce.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed wnlt1.f > wnlt1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbesi1.f > dbesi1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdstp.f > cdstp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdriv3.f > sdriv3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dvecs.f > dvecs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchci.f > dpchci.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cdzro.f > cdzro.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdscl.f > sdscl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchci.f > pchci.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed wnlt2.f > wnlt2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dvnrms.f > dvnrms.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbesj.f > dbesj.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchcm.f > pchcm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cexprl.f > cexprl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchcm.f > dpchcm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dvout.f > dvout.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed wnlt3.f > wnlt3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdsdot.f > sdsdot.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbesj0.f > dbesj0.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchcs.f > dpchcs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed wnnls.f > wnnls.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchdf.f > dpchdf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdstp.f > sdstp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchcs.f > pchcs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dwnlit.f > dwnlit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchdf.f > pchdf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbesj1.f > dbesj1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cfftb.f > cfftb.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sdzro.f > sdzro.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbesk.f > dbesk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchfd.f > dpchfd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchdoc.f > pchdoc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sepeli.f > sepeli.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xadj.f > xadj.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xadd.f > xadd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbesk0.f > dbesk0.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cfftb1.f > cfftb1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchfd.f > pchfd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dwnlsm.f > dwnlsm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xc210.f > xc210.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cfftf.f > cfftf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sepx4.f > sepx4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchfe.f > dpchfe.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbesk1.f > dbesk1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dwnlt1.f > dwnlt1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dwnlt2.f > dwnlt2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cfftf1.f > cfftf1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xcon.f > xcon.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgbco.f > sgbco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchia.f > dpchia.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cffti.f > cffti.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchfe.f > pchfe.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbesks.f > dbesks.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchic.f > dpchic.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dwnlt3.f > dwnlt3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchia.f > pchia.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cffti1.f > cffti1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbesy.f > dbesy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgbdi.f > sgbdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xerbla.f > xerbla.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchid.f > dpchid.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dwnnls.f > dwnnls.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgbfa.f > sgbfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xerclr.f > xerclr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbesy0.f > dbesy0.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchic.f > pchic.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cfod.f > cfod.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dwritp.f > dwritp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgbmv.f > sgbmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchid.f > pchid.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchim.f > dpchim.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchkt.f > dpchkt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dwupdt.f > dwupdt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cg.f > cg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xercnt.f > xercnt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgamma.f > cgamma.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbesy1.f > dbesy1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchim.f > pchim.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgbsl.f > sgbsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xerdmp.f > xerdmp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbeta.f > dbeta.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dx.f > dx.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchng.f > dpchng.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchkt.f > pchkt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgeco.f > sgeco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xerhlt.f > xerhlt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgamr.f > cgamr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchsp.f > dpchsp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchngs.f > pchngs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xermax.f > xermax.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbetai.f > dbetai.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgbco.f > cgbco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbfqad.f > dbfqad.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgedi.f > sgedi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchst.f > dpchst.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxadd.f > dxadd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dx4.f > dx4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgeev.f > sgeev.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchsp.f > pchsp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbhin.f > dbhin.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xermsg.f > xermsg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgbdi.f > cgbdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxadj.f > dxadj.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xerprn.f > xerprn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgbfa.f > cgbfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpchsw.f > dpchsw.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchst.f > pchst.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgefa.f > sgefa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbi.f > dbi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpcoef.f > dpcoef.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pchsw.f > pchsw.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgbmv.f > cgbmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgefs.f > sgefs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxc210.f > dxc210.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xersve.f > xersve.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbie.f > dbie.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpfqad.f > dpfqad.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxcon.f > dxcon.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pcoef.f > pcoef.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgeir.f > sgeir.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgbsl.f > cgbsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbinom.f > dbinom.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xgetf.f > xgetf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxlcal.f > dxlcal.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgemm.f > sgemm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpigmr.f > dpigmr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pfqad.f > pfqad.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xgetua.f > xgetua.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgeco.f > cgeco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxlegf.f > dxlegf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbint4.f > dbint4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpincw.f > dpincw.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pgsf.f > pgsf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgemv.f > sgemv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpinit.f > dpinit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxnrmp.f > dxnrmp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbintk.f > dbintk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pimach.f > pimach.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xgetun.f > xgetun.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgedi.f > cgedi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xlegf.f > xlegf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgeev.f > cgeev.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sger.f > sger.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbkias.f > dbkias.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpintm.f > dpintm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgesl.f > sgesl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pinitm.f > pinitm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxpmu.f > dxpmu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xnrmp.f > xnrmp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgefa.f > cgefa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pjac.f > pjac.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxpmup.f > dxpmup.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbkisr.f > dbkisr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpjac.f > dpjac.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sglss.f > sglss.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xpmu.f > xpmu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgefs.f > cgefs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxpnrm.f > dxpnrm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pnnzrs.f > pnnzrs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbksol.f > dbksol.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dplint.f > dplint.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgeir.f > cgeir.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xpmup.f > xpmup.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgmres.f > sgmres.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed poch.f > poch.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dplpce.f > dplpce.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxpqnu.f > dxpqnu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbndac.f > dbndac.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sgtsl.f > sgtsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xpnrm.f > xpnrm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgemm.f > cgemm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbndsl.f > dbndsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dplpdm.f > dplpdm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxpsi.f > dxpsi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed shels.f > shels.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xpqnu.f > xpqnu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed poch1.f > poch1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxqmu.f > dxqmu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pois3d.f > pois3d.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sheqr.f > sheqr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbnfac.f > dbnfac.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgerc.f > cgerc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dplpfe.f > dplpfe.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgemv.f > cgemv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxqnu.f > dxqnu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xpsi.f > xpsi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed poisd2.f > poisd2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xqmu.f > xqmu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbnslv.f > dbnslv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgeru.f > cgeru.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dplpfl.f > dplpfl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sindg.f > sindg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbocls.f > dbocls.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dplpmn.f > dplpmn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxred.f > dxred.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed poisn2.f > poisn2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xqnu.f > xqnu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sinqb.f > sinqb.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgesl.f > cgesl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbols.f > dbols.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dplpmu.f > dplpmu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dxset.f > dxset.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed poisp2.f > poisp2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xred.f > xred.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sinqf.f > sinqf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cgtsl.f > cgtsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbolsm.f > dbolsm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dy.f > dy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dplpup.f > dplpup.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed poistg.f > poistg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sinqi.f > sinqi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xset.f > xset.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ch.f > ch.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbsgq8.f > dbsgq8.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sint.f > sint.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xsetf.f > xsetf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dy4.f > dy4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbsi0e.f > dbsi0e.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpnnzr.f > dpnnzr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpoch.f > dpoch.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed polcof.f > polcof.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chbmv.f > chbmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed polfit.f > polfit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sinti.f > sinti.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dyairy.f > dyairy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xsetua.f > xsetua.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbsi1e.f > dbsi1e.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpoch1.f > dpoch1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed xsetun.f > xsetun.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chemv.f > chemv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chemm.f > chemm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed e1.f > e1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpoco.f > dpoco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed polint.f > polint.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sintrp.f > sintrp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbsk0e.f > dbsk0e.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cher.f > cher.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed yairy.f > yairy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed polyvl.f > polyvl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbsk1e.f > dbsk1e.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed efc.f > efc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpodi.f > dpodi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sir.f > sir.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed efcmn.f > efcmn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zabs.f > zabs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cher2.f > cher2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbskes.f > dbskes.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pos3d1.f > pos3d1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpofa.f > dpofa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ei.f > ei.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed postg2.f > postg2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sllti2.f > sllti2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zacai.f > zacai.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbskin.f > dbskin.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpofs.f > dpofs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed eisdoc.f > eisdoc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ppadd.f > ppadd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cher2k.f > cher2k.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zacon.f > zacon.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cherk.f > cherk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed slpdoc.f > slpdoc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbsknu.f > dbsknu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpolcf.f > dpolcf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed elmbak.f > elmbak.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ppgq8.f > ppgq8.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed slvs.f > slvs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zairy.f > zairy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chfcm.f > chfcm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbspdr.f > dbspdr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed elmhes.f > elmhes.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ppgsf.f > ppgsf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zasyi.f > zasyi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chfdv.f > chfdv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed smout.f > smout.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed eltran.f > eltran.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpolft.f > dpolft.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbspev.f > dbspev.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpolvl.f > dpolvl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pppsf.f > pppsf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed snbco.f > snbco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbsppp.f > dbsppp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zbesh.f > zbesh.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chfev.f > chfev.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ppqad.f > ppqad.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed snbdi.f > snbdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zbesi.f > zbesi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chfie.f > chfie.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpopt.f > dpopt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed erf.f > erf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ppsgf.f > ppsgf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed enorm.f > enorm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zbesj.f > zbesj.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbspvd.f > dbspvd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dposl.f > dposl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chico.f > chico.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dppco.f > dppco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed snbfa.f > snbfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ppspf.f > ppspf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed snbfs.f > snbfs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zbesk.f > zbesk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbspvn.f > dbspvn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed erfc.f > erfc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chidi.f > chidi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbsqad.f > dbsqad.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ppval.f > ppval.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chiev.f > chiev.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed snbir.f > snbir.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbsynu.f > dbsynu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dppdi.f > dppdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zbesy.f > zbesy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed exint.f > exint.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpperm.f > dpperm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed snbsl.f > snbsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed proc.f > proc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chifa.f > chifa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dbvalu.f > dbvalu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zbinu.f > zbinu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dppfa.f > dppfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed procp.f > procp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed exprel.f > exprel.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed snls1.f > snls1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zbiry.f > zbiry.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chisl.f > chisl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dppgq8.f > dppgq8.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ezfft1.f > ezfft1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chkder.f > chkder.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed prod.f > prod.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed snls1e.f > snls1e.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zbknu.f > zbknu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dppqad.f > dppqad.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ezfftb.f > ezfftb.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed prodp.f > prodp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed snrm2.f > snrm2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zbuni.f > zbuni.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ezfftf.f > ezfftf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed prvec.f > prvec.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chkpr4.f > chkpr4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dppsl.f > dppsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zbunk.f > zbunk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dppval.f > dppval.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed snsq.f > snsq.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chkprm.f > chkprm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcbrt.f > dcbrt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ezffti.f > ezffti.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed prwpge.f > prwpge.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed snsqe.f > snsqe.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chksn4.f > chksn4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zdiv.f > zdiv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcdot.f > dcdot.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dprvec.f > dprvec.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sods.f > sods.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed prwvir.f > prwvir.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chksng.f > chksng.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed fac.f > fac.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zexp.f > zexp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed psgf.f > psgf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dprwpg.f > dprwpg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcfod.f > dcfod.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chpco.f > chpco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zkscl.f > zkscl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed fc.f > fc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed somn.f > somn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcg.f > dcg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed fcmn.f > fcmn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed psi.f > psi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dprwvr.f > dprwvr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sopenm.f > sopenm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zlog.f > zlog.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chpdi.f > chpdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcgn.f > dcgn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpsi.f > dpsi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed fdjac1.f > fdjac1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed psifn.f > psifn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sorth.f > sorth.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcgs.f > dcgs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chpfa.f > chpfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zmlri.f > zmlri.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpsifn.f > dpsifn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed fdjac3.f > fdjac3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed psixn.f > psixn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sos.f > sos.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zmlt.f > zmlt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chpmv.f > chpmv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed fdump.f > fdump.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dchdc.f > dchdc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chpr.f > chpr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pvalue.f > pvalue.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpsixn.f > dpsixn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dpsort.f > dpsort.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dchdd.f > dchdd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed soseqs.f > soseqs.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zrati.f > zrati.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zs1s2.f > zs1s2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed pythag.f > pythag.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed fftdoc.f > fftdoc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed sossol.f > sossol.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chpr2.f > chpr2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dchex.f > dchex.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dptsl.f > dptsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qag.f > qag.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chpsl.f > chpsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed figi.f > figi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spbco.f > spbco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zseri.f > zseri.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed figi2.f > figi2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dchfcm.f > dchfcm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qage.f > qage.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zshch.f > zshch.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqag.f > dqag.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spbdi.f > spbdi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed chu.f > chu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dchfdv.f > dchfdv.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qagi.f > qagi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqage.f > dqage.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spbfa.f > spbfa.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cinvit.f > cinvit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed fulmat.f > fulmat.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zsqrt.f > zsqrt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dchfev.f > dchfev.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqagi.f > dqagi.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qagie.f > qagie.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zuchk.f > zuchk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dchfie.f > dchfie.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spbsl.f > spbsl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed fundoc.f > fundoc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed ckscl.f > ckscl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed fzero.f > fzero.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqagie.f > dqagie.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qagp.f > qagp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed speli4.f > speli4.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zunhj.f > zunhj.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed clbeta.f > clbeta.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dchkw.f > dchkw.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqagp.f > dqagp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed gami.f > gami.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qagpe.f > qagpe.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spelip.f > spelip.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zuni1.f > zuni1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed clngam.f > clngam.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dchu.f > dchu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqagpe.f > dqagpe.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed gamic.f > gamic.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zuni2.f > zuni2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spenc.f > spenc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qags.f > qags.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed clnrel.f > clnrel.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dchud.f > dchud.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqags.f > dqags.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed gamit.f > gamit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spigmr.f > spigmr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed clog10.f > clog10.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zunik.f > zunik.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dckder.f > dckder.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqagse.f > dqagse.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qagse.f > qagse.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed gamlim.f > gamlim.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zunk1.f > zunk1.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qawc.f > qawc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spincw.f > spincw.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcoef.f > dcoef.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqawc.f > dqawc.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cmgnbn.f > cmgnbn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed gamln.f > gamln.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qawce.f > qawce.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed spinit.f > spinit.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cmlri.f > cmlri.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcopy.f > dcopy.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed gamma.f > gamma.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqawce.f > dqawce.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zunk2.f > zunk2.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qawf.f > qawf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zuoik.f > zuoik.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcopym.f > dcopym.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cmpcsg.f > cmpcsg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed splp.f > splp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qawfe.f > qawfe.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed gamr.f > gamr.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed splpce.f > splpce.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cmposd.f > cmposd.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcosdg.f > dcosdg.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqawfe.f > dqawfe.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed gamrn.f > gamrn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqawf.f > dqawf.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qawo.f > qawo.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed zwrsk.f > zwrsk.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cmposn.f > cmposn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcot.f > dcot.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqawo.f > dqawo.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed splpdm.f > splpdm.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed gaus8.f > gaus8.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed splpfe.f > splpfe.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qawoe.f > qawoe.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cmposp.f > cmposp.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed genbun.f > genbun.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqawoe.f > dqawoe.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed splpfl.f > splpfl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qaws.f > qaws.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cmptr3.f > cmptr3.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcov.f > dcov.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcpplt.f > dcpplt.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqaws.f > dqaws.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed h12.f > h12.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qawse.f > qawse.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cmptrx.f > cmptrx.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcscal.f > dcscal.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqawse.f > dqawse.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hfti.f > hfti.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qc25c.f > qc25c.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed splpmn.f > splpmn.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed splpmu.f > splpmu.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed cnbco.f > cnbco.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dqc25c.f > dqc25c.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed qc25f.f > qc25f.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed hkseq.f > hkseq.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed splpup.f > splpup.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' sed -f makedoc.sed dcsevl.f > dcsevl.1 make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' cd static; make make[1]: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1/static' make[1]: warning: jobserver unavailable: using -j1. Add '+' to parent make rule. make[1]: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1/static' make[1]: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1/static' f77 -g -pipe -O2 -Wall -c -o aaaaaa.o ../aaaaaa.f f77 -g -pipe -O2 -Wall -c -o cnbdi.o ../cnbdi.f ../cnbdi.f:2:43: 2 | SUBROUTINE CNBDI (ABE, LDA, N, ML, MU, IPVT, DET) | 1 Warning: Unused dummy argument 'mu' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o dcv.o ../dcv.f f77 -g -pipe -O2 -Wall -c -o dqc25f.o ../dqc25f.f ../dqc25f.f:115:0: 115 | INTEGER I,IERS,INTEGR,ISYM,J,K,KSAVE,M,MOMCOM,NEVAL,MAXP1, | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o hpperm.o ../hpperm.f f77 -g -pipe -O2 -Wall -c -o qc25s.o ../qc25s.f f77 -g -pipe -O2 -Wall -c -o spoco.o ../spoco.f f77 -g -pipe -O2 -Wall -c -o acosh.o ../acosh.f ../acosh.f:2:6: 2 | FUNCTION ACOSH (X) | 1 Warning: 'acosh' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o cnbfa.o ../cnbfa.f f77 -g -pipe -O2 -Wall -c -o ddaini.o ../ddaini.f ../ddaini.f:94:72: 94 | 100 PHI(I,2)=YPRIME(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../ddaini.f:108:72: 108 | 250 Y(I)=Y(I)+H*YPRIME(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../ddaini.f:141:72: 141 | 320 DELTA(I)=DELTA(I)*DAMP | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../ddaini.f:151:72: 151 | 330 YPRIME(I)=YPRIME(I)-CJ*DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 330 at (1) ../ddaini.f:187:72: 187 | 410 DELTA(I)=MIN(Y(I),0.0D0) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1) ../ddaini.f:194:72: 194 | 420 YPRIME(I)=YPRIME(I)-CJ*DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1) ../ddaini.f:211:72: 211 | 510 E(I)=Y(I)-PHI(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../ddaini.f:230:72: 230 | 610 YPRIME(I)=PHI(I,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 610 at (1) ../ddaini.f:163:0: 163 | 340 RATE=(DELNRM/OLDNRM)**(1.0D0/M) | Warning: 'oldnrm' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dqc25s.o ../dqc25s.f f77 -g -pipe -O2 -Wall -c -o hpsort.o ../hpsort.f f77 -g -pipe -O2 -Wall -c -o qcheb.o ../qcheb.f f77 -g -pipe -O2 -Wall -c -o spodi.o ../spodi.f f77 -g -pipe -O2 -Wall -c -o ai.o ../ai.f f77 -g -pipe -O2 -Wall -c -o cnbfs.o ../cnbfs.f ../cnbfs.f:239:15: 239 | IND = -LOG10(R1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o ddajac.o ../ddajac.f ../ddajac.f:87:72: 87 | 110 WM(NPDM1+I)=0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../ddajac.f:108:72: 108 | 220 WM(NROW+L)=(E(L)-DELTA(L))*DELINV | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../ddajac.f:127:72: 127 | 410 WM(NPDM1+I)=0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1) ../ddajac.f:152:72: 152 | 510 YPRIME(N)=YPRIME(N)+CJ*DEL | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../ddajac.f:167:72: 167 | 520 WM(II+I)=(E(I)-DELTA(I))*DELINV | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 520 at (1) f77 -g -pipe -O2 -Wall -c -o dqcheb.o ../dqcheb.f f77 -g -pipe -O2 -Wall -c -o hqr.o ../hqr.f ../hqr.f:92:72: 92 | 40 NORM = NORM + ABS(H(I,J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../hqr.f:130:72: 130 | 120 H(I,I) = H(I,I) - X | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../hqr.f:180:0: 180 | 170 S = SIGN(SQRT(P*P+Q*Q+R*R),P) | Warning: 'r' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hqr.f:180:0: Warning: 'q' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hqr.f:180:0: Warning: 'p' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hqr.f:78:0: 78 | INTEGER I,J,K,L,M,N,EN,LL,MM,NA,NM,IGH,ITN,ITS,LOW,MP2,ENM2,IERR | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o qelg.o ../qelg.f f77 -g -pipe -O2 -Wall -c -o spofa.o ../spofa.f f77 -g -pipe -O2 -Wall -c -o aie.o ../aie.f f77 -g -pipe -O2 -Wall -c -o cnbir.o ../cnbir.f ../cnbir.f:277:12: 277 | IND = -LOG10(MAX(R1MACH(4),DNORM/XNORM)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o ddanrm.o ../ddanrm.f ../ddanrm.f:41:72: 41 | 20 SUM = SUM + ((V(I)/WT(I))/VMAX)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../ddanrm.f:2:62: 2 | DOUBLE PRECISION FUNCTION DDANRM (NEQ, V, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'ipar' at (1) [-Wunused-dummy-argument] ../ddanrm.f:2:56: 2 | DOUBLE PRECISION FUNCTION DDANRM (NEQ, V, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'rpar' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o dqdota.o ../dqdota.f f77 -g -pipe -O2 -Wall -c -o hqr2.o ../hqr2.f ../hqr2.f:110:72: 110 | 40 NORM = NORM + ABS(H(I,J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../hqr2.f:148:72: 148 | 120 H(I,I) = H(I,I) - X | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../hqr2.f:306:72: 306 | IF (Q) 710, 600, 800 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hqr2.f:319:72: 319 | 610 R = R + H(I,J) * H(J,EN) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 610 at (1) ../hqr2.f:410:72: 410 | 820 Z(I,J) = H(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 820 at (1) ../hqr2.f:420:72: 420 | DO 880 I = LOW, IGH | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 880 at (1) ../hqr2.f:424:72: 424 | 860 ZZ = ZZ + Z(I,K) * H(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 860 at (1) ../hqr2.f:394:0: 394 | 1 H(I,NA),H(I,EN)) | Warning: 'r' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hqr2.f:339:0: 339 | T = (X * S - ZZ * R) / Q | Warning: 's' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hqr2.f:198:0: 198 | 170 S = SIGN(SQRT(P*P+Q*Q+R*R),P) | Warning: 'p' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hqr2.f:95:0: 95 | INTEGER I,J,K,L,M,N,EN,II,JJ,LL,MM,NA,NM,NN | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o qform.o ../qform.f f77 -g -pipe -O2 -Wall -c -o spofs.o ../spofs.f ../spofs.f:151:15: 151 | IND = -LOG10(R1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o albeta.o ../albeta.f f77 -g -pipe -O2 -Wall -c -o cnbsl.o ../cnbsl.f ../cnbsl.f:126:27: 123 | DO 60 K = 1, N | 2 ...... 126 | T = CDOTC(LM,ABE(K-1,ML+2),LDB,B(LB),1) | 1 Warning: Array reference at (1) out of bounds (0 < 1) in loop beginning at (2) f77 -g -pipe -O2 -Wall -c -o ddaslv.o ../ddaslv.f f77 -g -pipe -O2 -Wall -c -o dqdoti.o ../dqdoti.f f77 -g -pipe -O2 -Wall -c -o hstart.o ../hstart.f ../hstart.f:169:72: 169 | 10 PV(J) = SPY(J) - YP(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../hstart.f:175:72: 175 | 30 PV(J) = SPY(J) - YP(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../hstart.f:207:72: 207 | 50 YP(J) = YPRIME(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../hstart.f:213:72: 213 | 70 YP(J) = ETOL(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../hstart.f:234:72: 234 | 130 PV(J) = Y(J) + DELX*YP(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../hstart.f:240:72: 240 | 140 PV(J) = YP(J) - YPRIME(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../hstart.f:246:72: 246 | 160 PV(J) = YP(J) - SF(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../hstart.f:251:72: 251 | 180 YP(J) = YP(J)/ETOL(J)**POWER | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../hstart.f:254:72: 254 | 200 YP(J) = YP(J)/ETOL(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../hstart.f:275:72: 275 | 250 YP(J) = DY | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../hstart.f:251:0: 251 | 180 YP(J) = YP(J)/ETOL(J)**POWER | Warning: 'power' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o qk15.o ../qk15.f f77 -g -pipe -O2 -Wall -c -o spoir.o ../spoir.f ../spoir.f:175:23: 175 | WORK(J,N+1) = -WORK(J,N+1) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../spoir.f:191:12: 191 | IND = -LOG10(MAX(R1MACH(4),DNORM/XNORM)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o algams.o ../algams.f ../algams.f:34:12: 34 | INT = MOD (-AINT(X), 2.0) + 0.1 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o combak.o ../combak.f f77 -g -pipe -O2 -Wall -c -o ddassl.o ../ddassl.f ../ddassl.f:1164:72: 1164 | 370 RWORK(ITEMP + I - 1) = H*YPRIME(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 370 at (1) ../ddassl.f:1297:72: 1297 | 524 ATOL(I)=R*ATOL(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 524 at (1) f77 -g -pipe -O2 -Wall -c -o dqelg.o ../dqelg.f f77 -g -pipe -O2 -Wall -c -o hstcrt.o ../hstcrt.f ../hstcrt.f:379:72: 379 | IF (ELMBDA) 133,126,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o qk15i.o ../qk15i.f f77 -g -pipe -O2 -Wall -c -o spopt.o ../spopt.f ../spopt.f:108:11: 108 | 20004 NEXT=PRGOPT(LAST) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:128:12: 128 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:144:13: 144 | KPRINT=PRGOPT(LAST+2) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:152:38: 152 | IF (PRGOPT(LAST+2).NE.ZERO) IDG=PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:168:42: 168 | IF(PRGOPT(LAST+2).NE.ZERO) IPAGEF = PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:183:41: 183 | IF(PRGOPT(LAST+2).NE.ZERO) ISAVE = PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:199:43: 199 | IF (PRGOPT(LAST+2).NE.ZERO) MXITLP = PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:213:18: 213 | IBASIS(I) = PRGOPT(LAST+2+I) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:277:40: 277 | IF (PRGOPT(LAST+2).NE.ZERO) ITBRC=MAX(ONE,PRGOPT(LAST+3)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:286:10: 286 | NPP=MAX(PRGOPT(LAST+3),ONE) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:317:0: 317 | LPRG=LPRG+LDS | Warning: 'lds' may be used uninitialized in this function [-Wmaybe-uninitialized] ../spopt.f:70:0: 70 | ROPT(4)=COSTSC | Warning: 'costsc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../spopt.f:68:0: 68 | ROPT(2)=ASMALL | Warning: 'asmall' may be used uninitialized in this function [-Wmaybe-uninitialized] ../spopt.f:69:0: 69 | ROPT(3)=ABIG | Warning: 'abig' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ali.o ../ali.f f77 -g -pipe -O2 -Wall -c -o comhes.o ../comhes.f f77 -g -pipe -O2 -Wall -c -o ddastp.o ../ddastp.f ../ddastp.f:224:72: 224 | 260 PHI(I,J)=BETA(J)*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) ../ddastp.f:245:72: 245 | 310 YPRIME(I)=0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1) ../ddastp.f:249:72: 249 | 320 YPRIME(I)=YPRIME(I)+GAMMA(J)*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../ddastp.f:286:72: 286 | 345 E(I)=0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 345 at (1) ../ddastp.f:295:72: 295 | 355 DELTA(I) = DELTA(I) * TEMP1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 355 at (1) ../ddastp.f:305:72: 305 | 360 YPRIME(I)=YPRIME(I)-CJ*DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../ddastp.f:351:72: 351 | 377 DELTA(I) = MIN(Y(I),0.0D0) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 377 at (1) ../ddastp.f:355:72: 355 | 378 E(I) = E(I) - DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 378 at (1) ../ddastp.f:386:72: 386 | 405 DELTA(I) = PHI(I,KP1) + E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 405 at (1) ../ddastp.f:394:72: 394 | 415 DELTA(I) = PHI(I,K) + DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 415 at (1) ../ddastp.f:439:72: 439 | 510 DELTA(I)=E(I)-PHI(I,KP2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../ddastp.f:484:72: 484 | 580 PHI(I,KP2)=E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 580 at (1) ../ddastp.f:487:72: 487 | 590 PHI(I,KP1)=PHI(I,KP1)+E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 590 at (1) ../ddastp.f:490:72: 490 | DO 595 I=1,NEQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 595 at (1) ../ddastp.f:491:72: 491 | 595 PHI(I,J)=PHI(I,J)+PHI(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 595 at (1) ../ddastp.f:514:72: 514 | 610 PHI(I,J)=TEMP1*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 610 at (1) ../ddastp.f:518:72: 518 | 640 PSI(I-1)=PSI(I)-H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 640 at (1) ../ddastp.f:445:0: 445 | 520 IF(TERKM1.LE.MIN(TERK,TERKP1))GO TO 540 | Warning: 'terkm1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../ddastp.f:470:0: 470 | R=(2.0D0*EST+0.0001D0)**(-1.0D0/TEMP2) | Warning: 'erkm1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dqform.o ../dqform.f f77 -g -pipe -O2 -Wall -c -o hstcs1.o ../hstcs1.f ../hstcs1.f:135:72: 135 | 129 IF (ELMBDA) 137,131,130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o qk15w.o ../qk15w.f f77 -g -pipe -O2 -Wall -c -o sposl.o ../sposl.f f77 -g -pipe -O2 -Wall -c -o alngam.o ../alngam.f ../alngam.f:57:0: 57 | IF (X.GT.0.) RETURN | Warning: '__result_alngam' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o comlr.o ../comlr.f ../comlr.f:80:0: 80 | INTEGER I,J,L,M,N,EN,LL,MM,NM,IGH,IM1,ITN,ITS,LOW,MP1,ENM1,IERR | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../comlr.f:151:0: 151 | IF (M .EQ. L) GO TO 420 | Warning: 'l' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ddatrp.o ../ddatrp.f ../ddatrp.f:50:72: 50 | 10 YPOUT(I)=0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../ddatrp.f:60:72: 60 | 20 YPOUT(I)=YPOUT(I)+D*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) f77 -g -pipe -O2 -Wall -c -o dqk15.o ../dqk15.f f77 -g -pipe -O2 -Wall -c -o hstcsp.o ../hstcsp.f f77 -g -pipe -O2 -Wall -c -o qk21.o ../qk21.f f77 -g -pipe -O2 -Wall -c -o sppco.o ../sppco.f f77 -g -pipe -O2 -Wall -c -o alnrel.o ../alnrel.f ../alnrel.f:2:0: 2 | FUNCTION ALNREL (X) | Warning: '__result_alnrel' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o comlr2.o ../comlr2.f ../comlr2.f:115:72: 115 | DO 100 J = 1, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../comlr2.f:309:72: 309 | DO 720 J = I, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 720 at (1) ../comlr2.f:365:72: 365 | DO 880 I = LOW, IGH | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 880 at (1) ../comlr2.f:104:0: 104 | INTEGER I,J,K,L,M,N,EN,II,JJ,LL,MM,NM,NN,IGH,IM1,IP1 | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../comlr2.f:211:0: 211 | IF (M .EQ. L) GO TO 420 | Warning: 'l' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ddaws.o ../ddaws.f ../ddaws.f:192:15: 192 | EPS = D1MACH(3) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dqk15i.o ../dqk15i.f f77 -g -pipe -O2 -Wall -c -o hstcyl.o ../hstcyl.f ../hstcyl.f:414:72: 414 | IF (ELMBDA) 130,123,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o qk31.o ../qk31.f f77 -g -pipe -O2 -Wall -c -o sppdi.o ../sppdi.f f77 -g -pipe -O2 -Wall -c -o asinh.o ../asinh.f ../asinh.f:2:6: 2 | FUNCTION ASINH (X) | 1 Warning: 'asinh' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o compb.o ../compb.f ../compb.f:36:72: 36 | IF (ARG) 119,101,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:50:72: 50 | IF (NB) 108,108,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:60:72: 60 | IF (IERROR) 118,105,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:71:72: 71 | IF (NPP) 117,110,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:78:72: 78 | IF (ARG) 119,111,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:83:72: 83 | IF (IERROR) 118,113,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:96:72: 96 | IF (J2-N2M2) 114,114,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:99:72: 99 | IF (J2-N2M2) 114,114,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:2:25: 2 | SUBROUTINE COMPB (N, IERROR, AN, BN, CN, B, AH, BH) | 1 Warning: Unused dummy argument 'n' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o ddawts.o ../ddawts.f ../ddawts.f:2:64: 2 | SUBROUTINE DDAWTS (NEQ, IWT, RTOL, ATOL, Y, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'ipar' at (1) [-Wunused-dummy-argument] ../ddawts.f:2:58: 2 | SUBROUTINE DDAWTS (NEQ, IWT, RTOL, ATOL, Y, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'rpar' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o dqk15w.o ../dqk15w.f f77 -g -pipe -O2 -Wall -c -o hstplr.o ../hstplr.f ../hstplr.f:430:72: 430 | IF (ELMBDA) 133,125,124 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hstplr.f:488:0: 488 | A1 = (A1-DLRSQ*A2/16.)/N | Warning: 'a2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o qk41.o ../qk41.f f77 -g -pipe -O2 -Wall -c -o spperm.o ../spperm.f f77 -g -pipe -O2 -Wall -c -o asyik.o ../asyik.f f77 -g -pipe -O2 -Wall -c -o comqr.o ../comqr.f ../comqr.f:85:0: 85 | INTEGER I,J,L,N,EN,LL,NM,IGH,ITN,ITS,LOW,LP1,ENM1,IERR | Warning: 'l' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ddcor.o ../ddcor.f ../ddcor.f:41:72: 41 | 100 SAVE1(I) = (H*SAVE2(I) - YH(I,2) - SAVE1(I))/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../ddcor.f:50:72: 50 | 105 SAVE1(I) = H*SAVE2(I) - YH(I,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 105 at (1) ../ddcor.f:54:72: 54 | 130 SAVE2(I) = H*SAVE2(I) - YH(I,2) - SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../ddcor.f:66:72: 66 | 150 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../ddcor.f:68:72: 68 | DO 160 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 160 at (1) ../ddcor.f:69:72: 69 | 160 SAVE2(I) = SAVE2(I) - A(I,J)*(YH(J,2) + SAVE1(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../ddcor.f:81:72: 81 | 180 SAVE2(I) = H*SAVE2(I) - A(I,1)*(YH(I,2) + SAVE1(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../ddcor.f:93:72: 93 | 140 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../ddcor.f:95:72: 95 | DO 170 I = 1,NDE | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 170 at (1) ../ddcor.f:96:72: 96 | 170 SAVE2(I) = SAVE2(I) - A(I,J)*(YH(J,2) + SAVE1(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../ddcor.f:102:72: 102 | 200 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../ddcor.f:106:72: 106 | 205 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 205 at (1) ../ddcor.f:112:72: 112 | 230 SAVE2(I) = H*SAVE2(I) - YH(I,2) - SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../ddcor.f:124:72: 124 | 250 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../ddcor.f:127:72: 127 | DO 260 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../ddcor.f:142:72: 142 | 280 SAVE2(I) = H*SAVE2(I) - A(I,1)*(YH(I,2) + SAVE1(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../ddcor.f:154:72: 154 | 270 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../ddcor.f:157:72: 157 | DO 290 I = MAX(ML+1, MW+1-J), MIN(MW+NDE-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 290 at (1) ../ddcor.f:166:72: 166 | 300 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../ddcor.f:170:72: 170 | 305 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 305 at (1) ../ddcor.f:184:72: 184 | 320 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../ddcor.f:188:72: 188 | 325 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 325 at (1) f77 -g -pipe -O2 -Wall -c -o dqk21.o ../dqk21.f f77 -g -pipe -O2 -Wall -c -o hstssp.o ../hstssp.f ../hstssp.f:502:72: 502 | IF (ELMBDA) 139,131,130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hstssp.f:565:0: 565 | A1 = (A1-DLRSQ*A3/16.)/N | Warning: 'a3' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hstssp.f:573:0: 573 | A1 = (A1-DLRSQ*A2/16.)/N | Warning: 'a2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o qk51.o ../qk51.f f77 -g -pipe -O2 -Wall -c -o sppfa.o ../sppfa.f f77 -g -pipe -O2 -Wall -c -o asyjy.o ../asyjy.f f77 -g -pipe -O2 -Wall -c -o comqr2.o ../comqr2.f ../comqr2.f:117:72: 117 | DO 100 J = 1, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../comqr2.f:125:72: 125 | IF (IEND) 180, 150, 105 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../comqr2.f:353:72: 353 | DO 720 J = I, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 720 at (1) ../comqr2.f:408:72: 408 | DO 880 I = LOW, IGH | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 880 at (1) ../comqr2.f:105:0: 105 | INTEGER I,J,K,L,M,N,EN,II,JJ,LL,NM,NN,IGH,IP1 | Warning: 'l' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ddcst.o ../ddcst.f ../ddcst.f:41:72: 41 | 10 FACTRL(I) = I*FACTRL(I-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../ddcst.f:48:72: 48 | 30 SUM = SUM - GAMMA(J)/(I-J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../ddcst.f:49:72: 49 | 40 GAMMA(I+1) = SUM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../ddcst.f:57:72: 57 | 50 EL(I,J) = (J-1)*EL(I,J-1) + EL(I-1,J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../ddcst.f:58:72: 58 | 60 EL(J+1,J) = 1.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../ddcst.f:62:72: 62 | DO 80 I = 3,J+1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 80 at (1) ../ddcst.f:63:72: 63 | 80 EL(I,J) = EL(I,J)/((I-1)*FACTRL(J-1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../ddcst.f:67:72: 67 | 100 TQ(3,J) = -1.D0/GAMMA(J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../ddcst.f:75:72: 75 | 120 EL(I,J) = J*EL(I,J-1) + EL(I-1,J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../ddcst.f:76:72: 76 | 130 EL(J+1,J) = 1.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../ddcst.f:80:72: 80 | DO 150 I = 1,J+1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) ../ddcst.f:81:72: 81 | 150 EL(I,J) = EL(I,J)/(FACTRL(J)*SUM) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../ddcst.f:85:72: 85 | 170 TQ(3,J) = (J+2)/EL(1,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../ddcst.f:97:72: 97 | 180 SUM = SUM - GAMMA(J)/(I-J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../ddcst.f:98:72: 98 | 190 GAMMA(I+1) = SUM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../ddcst.f:103:72: 103 | 200 EL(1+I,1) = -(I+1)*SUM*GAMMA(I+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) f77 -g -pipe -O2 -Wall -c -o dqk31.o ../dqk31.f f77 -g -pipe -O2 -Wall -c -o htrib3.o ../htrib3.f ../htrib3.f:83:72: 83 | DO 50 J = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1) f77 -g -pipe -O2 -Wall -c -o qk61.o ../qk61.f f77 -g -pipe -O2 -Wall -c -o sppsl.o ../sppsl.f f77 -g -pipe -O2 -Wall -c -o atanh.o ../atanh.f ../atanh.f:2:6: 2 | FUNCTION ATANH (X) | 1 Warning: 'atanh' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o cortb.o ../cortb.f f77 -g -pipe -O2 -Wall -c -o ddeabm.o ../ddeabm.f f77 -g -pipe -O2 -Wall -c -o dqk41.o ../dqk41.f f77 -g -pipe -O2 -Wall -c -o htribk.o ../htribk.f ../htribk.f:87:72: 87 | DO 50 J = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1) f77 -g -pipe -O2 -Wall -c -o qmomo.o ../qmomo.f f77 -g -pipe -O2 -Wall -c -o spsort.o ../spsort.f f77 -g -pipe -O2 -Wall -c -o avint.o ../avint.f ../avint.f:82:72: 82 | IF (XLO-XUP) 3,100,200 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../avint.f:136:72: 136 | IF (I-ISTART) 30,30,35 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../avint.f:156:12: 156 | ANS = SUM + CA*(SYU**3-SYL3)/R3 + CB*RP5*(SYU**2-SYL2) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../avint.f:157:0: 157 | 1 + CC*(SYU-SYL) | Warning: 'cc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../avint.f:157:0: Warning: 'cb' may be used uninitialized in this function [-Wmaybe-uninitialized] ../avint.f:157:0: Warning: 'ca' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o corth.o ../corth.f ../corth.f:88:72: 88 | 90 SCALE = SCALE + ABS(AR(I,M-1)) + ABS(AI(I,M-1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) f77 -g -pipe -O2 -Wall -c -o ddebdf.o ../ddebdf.f f77 -g -pipe -O2 -Wall -c -o dqk51.o ../dqk51.f f77 -g -pipe -O2 -Wall -c -o htrid3.o ../htrid3.f ../htrid3.f:97:72: 97 | 120 SCALE = SCALE + ABS(A(I,K)) + ABS(A(K,I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) f77 -g -pipe -O2 -Wall -c -o qnc79.o ../qnc79.f ../qnc79.f:185:72: 185 | IF (EE-TEST) 150,150,170 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../qnc79.f:203:72: 203 | IF (LR(L)) 190,190,210 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../qnc79.f:253:72: 253 | IF (LR(L)) 230,230,240 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../qnc79.f:106:16: 106 | NBITS = R1MACH(5)*I1MACH(11)/0.30102000E0 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../qnc79.f:122:12: 122 | NIB = 0.5E0 - LOG(C)/LOG(2.0E0) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o sptsl.o ../sptsl.f f77 -g -pipe -O2 -Wall -c -o bakvec.o ../bakvec.f ../bakvec.f:96:72: 96 | DO 120 I = 2, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 120 at (1) f77 -g -pipe -O2 -Wall -c -o cosdg.o ../cosdg.f ../cosdg.f:31:10: 31 | N = ABS(X)/90.0 + 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dderkf.o ../dderkf.f f77 -g -pipe -O2 -Wall -c -o dqk61.o ../dqk61.f f77 -g -pipe -O2 -Wall -c -o htridi.o ../htridi.f ../htridi.f:89:72: 89 | 100 D(I) = AR(I,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../htridi.f:99:72: 99 | 120 SCALE = SCALE + ABS(AR(I,K)) + ABS(AI(I,K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../htridi.f:165:72: 165 | DO 260 K = 1, J | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) f77 -g -pipe -O2 -Wall -c -o qng.o ../qng.f ../qng.f:339:0: 339 | 2 (0.2E+03*ABSERR/RESASC)**1.5E+00) | Warning: 'resasc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qng.f:341:0: 341 | 1 ((EPMACH*0.5E+02)*RESABS,ABSERR) | Warning: 'resabs' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qng.f:336:0: 336 | ABSERR = ABS((RES87-RES43)*HLGTH) | Warning: 'res43' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o sqrdc.o ../sqrdc.f f77 -g -pipe -O2 -Wall -c -o balanc.o ../balanc.f ../balanc.f:144:72: 144 | 180 SCALE(I) = 1.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../balanc.f:178:72: 178 | 250 A(I,J) = A(I,J) * G | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../balanc.f:181:72: 181 | 260 A(J,I) = A(J,I) * F | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) f77 -g -pipe -O2 -Wall -c -o cosgen.o ../cosgen.f f77 -g -pipe -O2 -Wall -c -o ddes.o ../ddes.f ../ddes.f:278:72: 278 | 215 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 215 at (1) ../ddes.f:290:72: 290 | 230 YY(L) = Y(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../ddes.f:324:72: 324 | 270 Y(L) = YY(L) + DT*YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../ddes.f:338:72: 338 | 290 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../ddes.f:362:72: 362 | 320 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../ddes.f:390:72: 390 | 370 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 370 at (1) ../ddes.f:412:72: 412 | 390 ATOL(L) = EPS*ATOL(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 390 at (1) ../ddes.f:415:72: 415 | 410 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1) f77 -g -pipe -O2 -Wall -c -o dqmomo.o ../dqmomo.f f77 -g -pipe -O2 -Wall -c -o hvnrm.o ../hvnrm.f ../hvnrm.f:29:72: 29 | 10 HVNRM=MAX(HVNRM,ABS(V(K))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -O2 -Wall -c -o qpdoc.o ../qpdoc.f f77 -g -pipe -O2 -Wall -c -o sqrsl.o ../sqrsl.f f77 -g -pipe -O2 -Wall -c -o balbak.o ../balbak.f ../balbak.f:80:72: 80 | 100 Z(I,J) = Z(I,J) * S | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../balbak.f:89:13: 89 | K = SCALE(I) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o cosqb.o ../cosqb.f ../cosqb.f:76:72: 76 | IF (N-2) 101,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o ddntl.o ../ddntl.f ../ddntl.f:123:72: 123 | 155 A(I,1) = 0.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 155 at (1) ../ddntl.f:153:72: 153 | 170 SAVE1(I) = SAVE2(I)/MAX(1.D0, YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../ddntl.f:157:72: 157 | 180 YH(I,2) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../ddntl.f:160:72: 160 | 20 FAC(I) = SQRT(UROUND) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) f77 -g -pipe -O2 -Wall -c -o dqnc79.o ../dqnc79.f ../dqnc79.f:188:72: 188 | IF (EE-TEST) 150,150,170 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dqnc79.f:206:72: 206 | IF (LR(L)) 190,190,210 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dqnc79.f:256:72: 256 | IF (LR(L)) 230,230,240 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dqnc79.f:109:16: 109 | NBITS = D1MACH(5)*I1MACH(14)/0.30102000D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dqnc79.f:125:12: 125 | NIB = 0.5D0 - LOG(C)/LOG(2.0D0) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o hw3crt.o ../hw3crt.f ../hw3crt.f:525:72: 525 | 158 IF (ELMBDA) 172,160,159 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o qpsrt.o ../qpsrt.f f77 -g -pipe -O2 -Wall -c -o sreadp.o ../sreadp.f f77 -g -pipe -O2 -Wall -c -o bandr.o ../bandr.f ../bandr.f:99:72: 99 | 30 D(J) = 1.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../bandr.f:106:72: 106 | 40 Z(J,K) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../bandr.f:112:72: 112 | IF (M1 - 1) 900, 800, 70 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../bandr.f:231:72: 231 | 610 A(J,L) = DMINRT * A(J,L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 610 at (1) ../bandr.f:245:72: 245 | 640 Z(L,J) = DMINRT * Z(L,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 640 at (1) ../bandr.f:254:72: 254 | 810 E(J) = SQRT(D(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 810 at (1) ../bandr.f:261:72: 261 | 820 Z(J,K) = E(K) * Z(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 820 at (1) f77 -g -pipe -O2 -Wall -c -o cosqb1.o ../cosqb1.f f77 -g -pipe -O2 -Wall -c -o ddntp.o ../ddntp.f ../ddntp.f:27:72: 27 | 10 Y(I) = YH(I,NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../ddntp.f:31:72: 31 | DO 20 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) ../ddntp.f:32:72: 32 | 20 Y(I) = YH(I,J) + R*Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../ddntp.f:37:72: 37 | 40 FACTOR = FACTOR*(NQ+1-KK) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../ddntp.f:39:72: 39 | 50 Y(I) = FACTOR*YH(I,NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../ddntp.f:45:72: 45 | 60 FACTOR = FACTOR*(J-KK) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../ddntp.f:47:72: 47 | 70 Y(I) = FACTOR*YH(I,J) + R*Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../ddntp.f:50:72: 50 | 100 Y(I) = Y(I)*H**(-KUSED) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -O2 -Wall -c -o dqng.o ../dqng.f ../dqng.f:377:0: 377 | 1 ABSERR = RESASC*MIN(0.1D+01,(0.2D+03*ABSERR/RESASC)**1.5D+00) | Warning: 'resasc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqng.f:379:0: 379 | 1 ((EPMACH*0.5D+02)*RESABS,ABSERR) | Warning: 'resabs' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqng.f:375:0: 375 | ABSERR = ABS((RES87-RES43)*HLGTH) | Warning: 'res43' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o hwscrt.o ../hwscrt.f ../hwscrt.f:405:72: 405 | IF (ELMBDA) 144,137,136 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o qrfac.o ../qrfac.f ../qrfac.f:2:56: 2 | SUBROUTINE QRFAC (M, N, A, LDA, PIVOT, IPVT, LIPVT, SIGMA, ACNORM, | 1 Warning: Unused dummy argument 'lipvt' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o srlcal.o ../srlcal.f f77 -g -pipe -O2 -Wall -c -o bandv.o ../bandv.f ../bandv.f:307:72: 307 | 640 XU = XU + RV6(I) * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 640 at (1) ../bandv.f:310:72: 310 | 660 RV6(I) = RV6(I) - XU * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 660 at (1) ../bandv.f:317:72: 317 | 720 NORM = NORM + ABS(RV6(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 720 at (1) ../bandv.f:328:72: 328 | 760 RV6(I) = XU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 760 at (1) ../bandv.f:341:72: 341 | 860 U = U + RV6(I)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 860 at (1) ../bandv.f:346:72: 346 | 900 Z(I,R) = RV6(I) * XU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 900 at (1) ../bandv.f:2:61: 2 | SUBROUTINE BANDV (NM, N, MBW, A, E21, M, W, Z, IERR, NV, RV, RV6) | 1 Warning: Unused dummy argument 'nv' at (1) [-Wunused-dummy-argument] ../bandv.f:179:0: 179 | IF (ORDER * (X1 - X0) .LE. 0.0E0) X1 = X0 + ORDER * EPS3 | Warning: 'x0' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bandv.f:330:0: 330 | RV6(ITS) = RV6(ITS) - EPS4 * UK | Warning: 'uk' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bandv.f:178:0: 178 | GROUP = GROUP + 1 | Warning: 'group' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bandv.f:330:0: 330 | RV6(ITS) = RV6(ITS) - EPS4 * UK | Warning: 'eps4' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bandv.f:179:0: 179 | IF (ORDER * (X1 - X0) .LE. 0.0E0) X1 = X0 + ORDER * EPS3 | Warning: 'eps3' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bandv.f:177:0: 177 | 100 IF (ABS(X1-X0) .GE. EPS2) GO TO 80 | Warning: 'eps2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cosqf.o ../cosqf.f ../cosqf.f:76:72: 76 | IF (N-2) 102,101,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o ddoglg.o ../ddoglg.f ../ddoglg.f:2:33: 2 | SUBROUTINE DDOGLG (N, R, LR, DIAG, QTB, DELTA, X, WA1, WA2) | 1 Warning: Unused dummy argument 'lr' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o dqpsrt.o ../dqpsrt.f f77 -g -pipe -O2 -Wall -c -o hwscs1.o ../hwscs1.f ../hwscs1.f:33:72: 33 | IF (SINT(I)) 101,102,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:136:72: 136 | 124 IF (ELMBDA) 132,125,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:139:72: 139 | IF (ICTR) 126,127,126 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:178:72: 178 | 148 IF (MBDCND-3) 155,149,155 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:203:72: 203 | IF (ISING) 161,170,161 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:206:72: 206 | IF (ICTR) 162,163,162 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:236:72: 236 | IF (IFLG-1) 174,173,174 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:237:72: 237 | 174 IF (NBDCND) 177,175,177 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:241:72: 241 | 177 IF (MBDCND) 180,178,180 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:246:72: 246 | IF (ICTR) 181,188,181 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:247:72: 247 | 181 IF (ISING) 186,182,186 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:253:0: 253 | XP = (F(ITS,1)-YPH)/YPS | Warning: 'yps' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hwscs1.f:186:0: 186 | F(I,2) = F(I,2)-AR*F(I,1)/RS2 | Warning: 'ar' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hwscs1.f:171:0: 171 | F(M,J) = F(M,J)-CT*F(M+1,J)/R(J)**2 | Warning: 'ct' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o qrsolv.o ../qrsolv.f f77 -g -pipe -O2 -Wall -c -o srot.o ../srot.f f77 -g -pipe -O2 -Wall -c -o bcrh.o ../bcrh.f ../bcrh.f:25:72: 25 | IF (SGN*F(X,IZ,C,A,BH)) 103,105,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../bcrh.f:30:72: 30 | IF (DX-CNV) 105,105,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o cosqf1.o ../cosqf1.f f77 -g -pipe -O2 -Wall -c -o ddot.o ../ddot.f ../ddot.f:50:72: 50 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o dqrdc.o ../dqrdc.f f77 -g -pipe -O2 -Wall -c -o hwscsp.o ../hwscsp.f ../hwscsp.f:386:72: 386 | IF (NCK-L) 105,105,104 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o qs2i1d.o ../qs2i1d.f f77 -g -pipe -O2 -Wall -c -o srotg.o ../srotg.f f77 -g -pipe -O2 -Wall -c -o bdiff.o ../bdiff.f f77 -g -pipe -O2 -Wall -c -o cosqi.o ../cosqi.f f77 -g -pipe -O2 -Wall -c -o ddpsc.o ../ddpsc.f ../ddpsc.f:28:72: 28 | DO 10 J2 = J1,NQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../ddpsc.f:30:72: 30 | DO 10 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../ddpsc.f:31:72: 31 | 10 YH(I,J) = YH(I,J) + YH(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../ddpsc.f:34:72: 34 | DO 30 J2 = J1,NQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../ddpsc.f:36:72: 36 | DO 30 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../ddpsc.f:37:72: 37 | 30 YH(I,J) = YH(I,J) - YH(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) f77 -g -pipe -O2 -Wall -c -o dqrfac.o ../dqrfac.f ../dqrfac.f:2:57: 2 | SUBROUTINE DQRFAC (M, N, A, LDA, PIVOT, IPVT, LIPVT, SIGMA, | 1 Warning: Unused dummy argument 'lipvt' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o hwscyl.o ../hwscyl.f ../hwscyl.f:437:72: 437 | IF (ELMBDA) 146,136,135 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o qs2i1r.o ../qs2i1r.f f77 -g -pipe -O2 -Wall -c -o srotm.o ../srotm.f ../srotm.f:69:72: 69 | IF (SFLAG) 50,10,30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../srotm.f:108:72: 108 | IF (SFLAG) 120,80,100 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o besi.o ../besi.f ../besi.f:113:72: 113 | IF (N-1) 590, 10, 20 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besi.f:117:72: 117 | IF (X) 600, 30, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besi.f:118:72: 118 | 30 IF (ALPHA) 580, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besi.f:270:72: 270 | IF (NN-1) 340, 290, 130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besi.f:280:72: 280 | IF (NN-1) 340, 310, 320 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besi.f:88:0: 88 | 1 N, NN, NS, NZ | Warning: 'ns' may be used uninitialized in this function [-Wmaybe-uninitialized] ../besi.f:205:0: 205 | 160 IF (KM.NE.0) GO TO 170 | Warning: 'km' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cost.o ../cost.f ../cost.f:76:72: 76 | IF (N-2) 106,101,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o ddpst.o ../ddpst.f ../ddpst.f:51:72: 51 | DO 110 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1) ../ddpst.f:52:72: 52 | 110 DFDY(I,J) = FACTOR*DFDY(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../ddpst.f:85:72: 85 | 140 DFDY(I,J) = (SAVE1(I) - SAVE2(I))*FACTOR | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../ddpst.f:114:72: 114 | 190 DFDY(I,I) = DFDY(I,I) + 1.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../ddpst.f:122:72: 122 | DO 210 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 210 at (1) ../ddpst.f:123:72: 123 | 210 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../ddpst.f:131:72: 131 | 230 DFDY(I,I) = DFDY(I,I) + A(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../ddpst.f:139:72: 139 | DO 220 I = 1,NDE | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 220 at (1) ../ddpst.f:140:72: 140 | 220 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../ddpst.f:154:72: 154 | DO 260 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../ddpst.f:155:72: 155 | 260 DFDY(I,J) = FACTOR*DFDY(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) ../ddpst.f:182:72: 182 | 290 Y(K) = Y(K) + DY | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../ddpst.f:201:72: 201 | 300 DFDY(I,K) = FACTOR*(SAVE1(I+K-MW) - SAVE2(I+K-MW)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../ddpst.f:231:72: 231 | DO 345 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 345 at (1) ../ddpst.f:232:72: 232 | 345 DFDYMX = MAX(DFDYMX, ABS(DFDY(I,J))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 345 at (1) ../ddpst.f:236:72: 236 | DO 350 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 350 at (1) ../ddpst.f:237:72: 237 | 350 BND = BND + (DFDY(I,J)/DFDYMX)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 350 at (1) ../ddpst.f:243:72: 243 | 360 DFDY(MW,J) = DFDY(MW,J) + 1.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../ddpst.f:251:72: 251 | DO 380 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 380 at (1) ../ddpst.f:252:72: 252 | 380 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../ddpst.f:260:72: 260 | 400 DFDY(MW,J) = DFDY(MW,J) + A(J,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 400 at (1) ../ddpst.f:268:72: 268 | DO 390 I = MAX(ML+1, MW+1-J), MIN(MW+NDE-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 390 at (1) ../ddpst.f:269:72: 269 | 390 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 390 at (1) f77 -g -pipe -O2 -Wall -c -o dqrsl.o ../dqrsl.f f77 -g -pipe -O2 -Wall -c -o hwsplr.o ../hwsplr.f ../hwsplr.f:452:72: 452 | IF (ELMBDA) 144,136,135 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsplr.f:512:15: 512 | IWSTOR = W(ID4+1)+3*MUNK | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o qwgtc.o ../qwgtc.f ../qwgtc.f:2:47: 2 | REAL FUNCTION QWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'kp' at (1) [-Wunused-dummy-argument] ../qwgtc.f:2:35: 2 | REAL FUNCTION QWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'p2' at (1) [-Wunused-dummy-argument] ../qwgtc.f:2:39: 2 | REAL FUNCTION QWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'p3' at (1) [-Wunused-dummy-argument] ../qwgtc.f:2:43: 2 | REAL FUNCTION QWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'p4' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o srotmg.o ../srotmg.f ../srotmg.f:137:15: 137 | GO TO IGO,(120,150,180,210) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../srotmg.f:143:72: 143 | ASSIGN 120 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../srotmg.f:155:72: 155 | ASSIGN 150 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../srotmg.f:168:72: 168 | ASSIGN 180 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../srotmg.f:179:72: 179 | ASSIGN 210 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../srotmg.f:188:72: 188 | IF (SFLAG) 250,230,240 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../srotmg.f:182:5: 182 | 210 CONTINUE | 1 Warning: Label 210 at (1) defined but not used [-Wunused-label] ../srotmg.f:171:5: 171 | 180 CONTINUE | 1 Warning: Label 180 at (1) defined but not used [-Wunused-label] ../srotmg.f:158:5: 158 | 150 CONTINUE | 1 Warning: Label 150 at (1) defined but not used [-Wunused-label] ../srotmg.f:146:5: 146 | 120 CONTINUE | 1 Warning: Label 120 at (1) defined but not used [-Wunused-label] ../srotmg.f:185:0: 185 | SH22=SH22*GAM | Warning: 'sh22' may be used uninitialized in this function [-Wmaybe-uninitialized] ../srotmg.f:184:0: 184 | SH21=SH21*GAM | Warning: 'sh21' may be used uninitialized in this function [-Wmaybe-uninitialized] ../srotmg.f:191:0: 191 | SPARAM(4)=SH12 | Warning: 'sh12' may be used uninitialized in this function [-Wmaybe-uninitialized] ../srotmg.f:194:0: 194 | SPARAM(2)=SH11 | Warning: 'sh11' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o besi0.o ../besi0.f f77 -g -pipe -O2 -Wall -c -o costi.o ../costi.f f77 -g -pipe -O2 -Wall -c -o ddriv1.o ../ddriv1.f ../ddriv1.f:347:72: 347 | 20 IWORK(I) = WORK(I+LENWCM) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../ddriv1.f:354:72: 354 | 40 WORK(I+LENWCM) = IWORK(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../ddriv1.f:347:21: 347 | 20 IWORK(I) = WORK(I+LENWCM) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dqrslv.o ../dqrslv.f f77 -g -pipe -O2 -Wall -c -o hwsss1.o ../hwsss1.f ../hwsss1.f:41:72: 41 | IF (SINT(I)) 101,102,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:90:72: 90 | IF (ISP) 116,116,113 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:102:72: 102 | 116 IF (INP) 120,120,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:155:72: 155 | 131 IF (ELMBDA) 138,132,132 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:158:72: 158 | IF (INP) 134,134,133 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:160:72: 160 | 134 IF (ISP) 136,136,135 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:170:72: 170 | 139 IF (NBDCND-3) 146,140,146 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:184:72: 184 | 147 IF (NBDCND-3) 154,148,154 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:215:72: 215 | IF (ISING) 165,176,165 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:218:72: 218 | IF (INP) 167,167,166 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:220:72: 220 | 167 IF (ISP) 169,169,168 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:260:72: 260 | IF (ISING) 186,186,179 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:261:72: 261 | 179 IF (INP) 183,183,180 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:262:72: 262 | 180 IF (ISP) 181,181,186 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:267:72: 267 | 183 IF (ISP) 186,186,184 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:272:72: 272 | 186 IF (INP) 193,193,187 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:280:72: 280 | IF (ISP) 189,189,194 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:292:72: 292 | 193 IF (ISP) 209,209,194 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:300:72: 300 | IF (INP) 196,196,200 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:314:72: 314 | IF (ISING) 202,202,201 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:318:72: 318 | 202 IF (ABS(DNN)-ABS(DSN)) 204,204,203 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:338:72: 338 | 209 IF (NBDCND) 212,210,212 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:320:0: 320 | RTS = RTS-RTN*DSN/DNN | Warning: 'dsn' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hwsss1.f:325:0: 325 | RTN = RTN-RTS*DNN/DSN | Warning: 'dnn' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hwsss1.f:312:0: 312 | 200 RTN = F(1,1)-DFN | Warning: 'dfn' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hwsss1.f:195:0: 195 | F(M+1,J) = F(M+1,J)-TDT*BDTF(J)*CT | Warning: 'ct' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hwsss1.f:177:0: 177 | F(2,J) = F(2,J)-AT*F(1,J) | Warning: 'at' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o qwgtf.o ../qwgtf.f ../qwgtf.f:2:39: 2 | REAL FUNCTION QWGTF (X, OMEGA, P2, P3, P4, INTEGR) | 1 Warning: Unused dummy argument 'p2' at (1) [-Wunused-dummy-argument] ../qwgtf.f:2:43: 2 | REAL FUNCTION QWGTF (X, OMEGA, P2, P3, P4, INTEGR) | 1 Warning: Unused dummy argument 'p3' at (1) [-Wunused-dummy-argument] ../qwgtf.f:2:47: 2 | REAL FUNCTION QWGTF (X, OMEGA, P2, P3, P4, INTEGR) | 1 Warning: Unused dummy argument 'p4' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o ss2lt.o ../ss2lt.f f77 -g -pipe -O2 -Wall -c -o besi0e.o ../besi0e.f f77 -g -pipe -O2 -Wall -c -o cot.o ../cot.f ../cot.f:73:12: 73 | IFN = MOD (AINTY, 2.) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o ddriv2.o ../ddriv2.f f77 -g -pipe -O2 -Wall -c -o dqwgtc.o ../dqwgtc.f ../dqwgtc.f:2:60: 2 | DOUBLE PRECISION FUNCTION DQWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'kp' at (1) [-Wunused-dummy-argument] ../dqwgtc.f:2:48: 2 | DOUBLE PRECISION FUNCTION DQWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'p2' at (1) [-Wunused-dummy-argument] ../dqwgtc.f:2:52: 2 | DOUBLE PRECISION FUNCTION DQWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'p3' at (1) [-Wunused-dummy-argument] ../dqwgtc.f:2:56: 2 | DOUBLE PRECISION FUNCTION DQWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'p4' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o hwsssp.o ../hwsssp.f f77 -g -pipe -O2 -Wall -c -o qwgts.o ../qwgts.f f77 -g -pipe -O2 -Wall -c -o ss2y.o ../ss2y.f ../ss2y.f:2:47: 2 | SUBROUTINE SS2Y (N, NELT, IA, JA, A, ISYM) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o besi1.o ../besi1.f f77 -g -pipe -O2 -Wall -c -o cpadd.o ../cpadd.f ../cpadd.f:42:72: 42 | IF (BP(N)-BP(1)) 101,142,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:54:72: 54 | IF (MODIZ) 106,107,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:55:72: 55 | 106 IF (A(1)) 110,142,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:59:72: 59 | IF (PGSF(XL,IZ,C,A,BH)) 108,108,109 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:64:72: 64 | IF (MODIZ) 111,112,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:65:72: 65 | 111 IF (A(1)) 112,142,115 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:69:72: 69 | IF (PGSF(XR,IZ,C,A,BH)) 113,114,114 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:79:72: 79 | IF (ABS(PSG)-EPS) 118,118,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:80:72: 80 | 116 IF (PSG*PPGSF(XM,IZ,C,A,BH)) 117,118,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:112:72: 112 | IF (MODIZ) 123,122,123 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:117:72: 117 | IF (ABS(FP)) 126,126,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:120:72: 120 | 126 IF (ABS(FPP)) 132,132,127 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:124:72: 124 | IF (ABS(R1)-ABS(R2)) 129,129,128 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:130:72: 130 | IF (I3) 133,133,131 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:138:72: 138 | IF (ICV) 134,134,135 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:144:72: 144 | IF (ABS(CBP(N))-ABS(CBP(1))) 137,142,139 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:154:72: 154 | IF (AIMAG(CBP(J))) 143,140,143 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:134:0: 134 | 133 CX = CX+R1 | Warning: 'IMAGPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cpadd.f:134:0: Warning: 'REALPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cpadd.f:137:0: 137 | IF (ABS(R1) .GT. SCNV) GO TO 120 | Warning: 'r3' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ddriv3.o ../ddriv3.f ../ddriv3.f:979:72: 979 | 30 WORK(I+IYH-1) = Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../ddriv3.f:1179:72: 1179 | 190 Y(I) = WORK(I+IYH-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../ddriv3.f:1192:72: 1192 | 230 WORK(I+IYWT-1) = 1.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../ddriv3.f:1196:72: 1196 | 250 WORK(I+IYWT-1) = EWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../ddriv3.f:1203:72: 1203 | 280 WORK(I+IYWT-1) = ABS(Y(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../ddriv3.f:1253:72: 1253 | 340 WORK(I+ISAVE2-1) = WORK(I+ISAVE2-1)/WORK(I+IA-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1) ../ddriv3.f:1293:72: 1293 | 380 WORK(I+IYWT-1) = MAX(EWT(1), ABS(Y(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../ddriv3.f:1296:72: 1296 | 400 WORK(I+IYWT-1) = MAX(EWT(I), ABS(Y(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 400 at (1) ../ddriv3.f:1300:72: 1300 | 420 WORK(I+ISAVE2-1) = Y(I)/WORK(I+IYWT-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1) ../ddriv3.f:1401:72: 1401 | 480 Y(J) = WORK(IYH+J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 480 at (1) ../ddriv3.f:1483:72: 1483 | 570 Y(I) = WORK(I+IYH-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 570 at (1) ../ddriv3.f:879:0: 879 | ISAVE1 = IYWT + N | Warning: 'iywt' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dqwgtf.o ../dqwgtf.f ../dqwgtf.f:2:52: 2 | DOUBLE PRECISION FUNCTION DQWGTF (X, OMEGA, P2, P3, P4, INTEGR) | 1 Warning: Unused dummy argument 'p2' at (1) [-Wunused-dummy-argument] ../dqwgtf.f:2:56: 2 | DOUBLE PRECISION FUNCTION DQWGTF (X, OMEGA, P2, P3, P4, INTEGR) | 1 Warning: Unused dummy argument 'p3' at (1) [-Wunused-dummy-argument] ../dqwgtf.f:2:60: 2 | DOUBLE PRECISION FUNCTION DQWGTF (X, OMEGA, P2, P3, P4, INTEGR) | 1 Warning: Unused dummy argument 'p4' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o i1mach.o ../i1mach.f f77 -g -pipe -O2 -Wall -c -o qzhes.o ../qzhes.f f77 -g -pipe -O2 -Wall -c -o ssbmv.o ../ssbmv.f f77 -g -pipe -O2 -Wall -c -o besi1e.o ../besi1e.f f77 -g -pipe -O2 -Wall -c -o cpbco.o ../cpbco.f f77 -g -pipe -O2 -Wall -c -o ddscl.o ../ddscl.f ../ddscl.f:32:72: 32 | DO 10 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../ddscl.f:33:72: 33 | 10 YH(I,J+1) = YH(I,J+1)*R1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -O2 -Wall -c -o dqwgts.o ../dqwgts.f f77 -g -pipe -O2 -Wall -c -o i1merg.o ../i1merg.f f77 -g -pipe -O2 -Wall -c -o qzit.o ../qzit.f ../qzit.f:290:0: 290 | 200 S = ABS(A1) + ABS(A2) + ABS(A3) | Warning: 'a3' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o sscal.o ../sscal.f f77 -g -pipe -O2 -Wall -c -o besj.o ../besj.f ../besj.f:111:72: 111 | IF (N-1) 720, 10, 20 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besj.f:114:72: 114 | IF (X) 730, 30, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besj.f:115:72: 115 | 30 IF (ALPHA) 710, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besj.f:236:72: 236 | IF (NN-1) 440, 390, 130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besj.f:246:72: 246 | IF (NN-1) 440, 410, 420 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o cpbdi.o ../cpbdi.f f77 -g -pipe -O2 -Wall -c -o ddstp.o ../ddstp.f ../ddstp.f:117:72: 117 | 115 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 115 at (1) ../ddstp.f:136:72: 136 | 125 SAVE1(I) = 0.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) ../ddstp.f:160:72: 160 | 132 DFDY(1,I) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 132 at (1) ../ddstp.f:165:72: 165 | 134 DFDY(1,I) = SAVE1(I) - DFDY(1,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 134 at (1) ../ddstp.f:174:72: 174 | 136 DFDY(1,I) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 136 at (1) ../ddstp.f:186:72: 186 | 140 Y(I) = YH(I,1) + EL(1,NQ)*SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../ddstp.f:225:72: 225 | 180 SAVE2(I) = SAVE1(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../ddstp.f:228:72: 228 | 185 SAVE2(I) = SAVE1(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 185 at (1) ../ddstp.f:247:72: 247 | 190 SAVE2(I) = YH(I,NQ+1)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../ddstp.f:250:72: 250 | 195 SAVE2(I) = YH(I,NQ+1)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 195 at (1) ../ddstp.f:278:72: 278 | 215 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 215 at (1) ../ddstp.f:297:72: 297 | DO 230 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 230 at (1) ../ddstp.f:298:72: 298 | 230 YH(I,J) = YH(I,J) + EL(J,NQ)*SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../ddstp.f:300:72: 300 | 235 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 235 at (1) ../ddstp.f:367:72: 367 | 250 YH(I,MAXORD+1) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../ddstp.f:386:72: 386 | 270 SAVE2(I) = YH(I,NQ+1)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../ddstp.f:389:72: 389 | 275 SAVE2(I) = YH(I,NQ+1)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 275 at (1) ../ddstp.f:400:72: 400 | 290 SAVE2(I) = (SAVE1(I) - YH(I,MAXORD+1))/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../ddstp.f:422:72: 422 | 360 YH(I,NQ+2) = SAVE1(I)*EL(NQ+1,NQ)/(NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../ddstp.f:442:72: 442 | 405 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 405 at (1) ../ddstp.f:456:72: 456 | 435 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 435 at (1) ../ddstp.f:179:0: 179 | IF (ITER .GT. 0) TREND = MAX(.9D0*TREND, D/D1) | Warning: 'd1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o drc.o ../drc.f f77 -g -pipe -O2 -Wall -c -o icamax.o ../icamax.f f77 -g -pipe -O2 -Wall -c -o qzval.o ../qzval.f ../qzval.f:191:0: 191 | IF (AN .LT. ABS(E) * BN) GO TO 455 | Warning: 'e' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qzval.f:191:0: Warning: 'an' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ssd2s.o ../ssd2s.f f77 -g -pipe -O2 -Wall -c -o besj0.o ../besj0.f ../besj0.f:2:6: 2 | FUNCTION BESJ0 (X) | 1 Warning: 'besj0' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o cpbfa.o ../cpbfa.f f77 -g -pipe -O2 -Wall -c -o ddzro.o ../ddzro.f f77 -g -pipe -O2 -Wall -c -o drc3jj.o ../drc3jj.f ../drc3jj.f:203:72: 203 | IF(NDIM-NFIN) 21, 23, 23 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jj.f:236:72: 236 | IF(LSTEP-2) 32, 32, 31 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jj.f:279:72: 279 | 70 THRCOF(I) = THRCOF(I) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../drc3jj.f:289:72: 289 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jj.f:366:72: 366 | 130 THRCOF(INDEX) = THRCOF(INDEX) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../drc3jj.f:391:72: 391 | 210 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../drc3jj.f:398:72: 398 | 212 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 212 at (1) ../drc3jj.f:413:72: 413 | IF(SIGN1*SIGN2) 235,235,236 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jj.f:419:72: 419 | 240 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../drc3jj.f:425:72: 425 | 251 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 251 at (1) ../drc3jj.f:399:0: 399 | SUMUNI = SUMFOR + RATIO*RATIO*SUMBAC | Warning: 'sumbac' may be used uninitialized in this function [-Wmaybe-uninitialized] ../drc3jj.f:258:0: 258 | 60 C2 = - L1 * OLDFAC / DENOM | Warning: 'denom' may be used uninitialized in this function [-Wmaybe-uninitialized] ../drc3jj.f:289:0: 289 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | Warning: 'c1old' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o icopy.o ../icopy.f ../icopy.f:42:72: 42 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o qzvec.o ../qzvec.f ../qzvec.f:122:72: 122 | 610 R = R + (BETM * A(I,J) - ALFM * B(I,J)) * B(J,EN) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 610 at (1) ../qzvec.f:237:72: 237 | DO 880 I = 1, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 880 at (1) ../qzvec.f:241:72: 241 | 860 ZZ = ZZ + Z(I,K) * B(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 860 at (1) ../qzvec.f:258:72: 258 | 900 Z(I,J) = Z(I,J) / D | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 900 at (1) ../qzvec.f:223:0: 223 | 785 T1 = (-R - ZZ * B(I+1,NA) + Z1 * B(I+1,EN)) / Y | Warning: 'zz' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qzvec.f:224:0: 224 | T2 = (-S - ZZ * B(I+1,EN) - Z1 * B(I+1,NA)) / Y | Warning: 'z1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qzvec.f:221:0: 221 | TI = -SA - X * B(I+1,EN) - X1 * B(I+1,NA) | Warning: 'x1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qzvec.f:221:0: Warning: 'x' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qzvec.f:224:0: 224 | T2 = (-S - ZZ * B(I+1,EN) - Z1 * B(I+1,NA)) / Y | Warning: 's' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qzvec.f:223:0: 223 | 785 T1 = (-R - ZZ * B(I+1,NA) + Z1 * B(I+1,EN)) / Y | Warning: 'r' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ssdbcg.o ../ssdbcg.f f77 -g -pipe -O2 -Wall -c -o besj1.o ../besj1.f ../besj1.f:2:6: 2 | FUNCTION BESJ1 (X) | 1 Warning: 'besj1' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o cpbsl.o ../cpbsl.f f77 -g -pipe -O2 -Wall -c -o de1.o ../de1.f f77 -g -pipe -O2 -Wall -c -o drc3jm.o ../drc3jm.f ../drc3jm.f:204:72: 204 | IF(NDIM-NFIN) 21, 23, 23 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jm.f:237:72: 237 | IF(LSTEP-2) 32, 32, 31 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jm.f:275:72: 275 | 70 THRCOF(I) = THRCOF(I) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../drc3jm.f:286:72: 286 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jm.f:359:72: 359 | 111 THRCOF(INDEX) = THRCOF(INDEX) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 111 at (1) ../drc3jm.f:384:72: 384 | 210 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../drc3jm.f:391:72: 391 | 212 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 212 at (1) ../drc3jm.f:406:72: 406 | IF(SIGN1*SIGN2) 235,235,236 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jm.f:412:72: 412 | 240 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../drc3jm.f:418:72: 418 | 251 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 251 at (1) ../drc3jm.f:392:0: 392 | SUMUNI = SUMFOR + RATIO*RATIO*SUMBAC | Warning: 'sumbac' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o idamax.o ../idamax.f f77 -g -pipe -O2 -Wall -c -o r1mach.o ../r1mach.f f951: Warning: Nonconforming tab character in column 1 of line 72 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 74 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 77 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 410 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 411 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 412 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 413 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 414 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 415 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 416 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 417 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 418 [-Wtabs] f77 -g -pipe -O2 -Wall -c -o ssdcg.o ../ssdcg.f f77 -g -pipe -O2 -Wall -c -o besk.o ../besk.f ../besk.f:198:0: 198 | TM = TM + TRX | Warning: 'trx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../besk.f:198:0: Warning: 'tm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../besk.f:192:0: 192 | Y(2) = S2 | Warning: 's2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cpevl.o ../cpevl.f ../cpevl.f:60:72: 60 | DO 1 I=1,MINI | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 1 at (1) f77 -g -pipe -O2 -Wall -c -o deabm.o ../deabm.f f77 -g -pipe -O2 -Wall -c -o drc6j.o ../drc6j.f ../drc6j.f:208:72: 208 | IF(NDIM-NFIN) 21, 23, 23 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc6j.f:243:72: 243 | IF(LSTEP-2) 32, 32, 31 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc6j.f:288:72: 288 | 70 SIXCOF(I) = SIXCOF(I) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../drc6j.f:299:72: 299 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc6j.f:378:72: 378 | 130 SIXCOF(INDEX) = SIXCOF(INDEX) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../drc6j.f:402:72: 402 | 210 SIXCOF(N) = RATIO * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../drc6j.f:409:72: 409 | 212 SIXCOF(N) = RATIO * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 212 at (1) ../drc6j.f:424:72: 424 | IF(SIGN1*SIGN2) 235,235,236 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc6j.f:430:72: 430 | 240 SIXCOF(N) = CNORM * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../drc6j.f:436:72: 436 | 251 SIXCOF(N) = CNORM * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 251 at (1) ../drc6j.f:410:0: 410 | SUMUNI = SUMFOR + RATIO*RATIO*SUMBAC | Warning: 'sumbac' may be used uninitialized in this function [-Wmaybe-uninitialized] ../drc6j.f:266:0: 266 | 60 C2 = - L1 * OLDFAC / DENOM | Warning: 'denom' may be used uninitialized in this function [-Wmaybe-uninitialized] ../drc6j.f:299:0: 299 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | Warning: 'c1old' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o idloc.o ../idloc.f f77 -g -pipe -O2 -Wall -c -o r1mpyq.o ../r1mpyq.f f77 -g -pipe -O2 -Wall -c -o ssdcgn.o ../ssdcgn.f f77 -g -pipe -O2 -Wall -c -o besk0.o ../besk0.f f77 -g -pipe -O2 -Wall -c -o cpevlr.o ../cpevlr.f ../cpevlr.f:25:72: 25 | DO 1 I=1,MINI | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 1 at (1) f77 -g -pipe -O2 -Wall -c -o debdf.o ../debdf.f f77 -g -pipe -O2 -Wall -c -o drd.o ../drd.f f77 -g -pipe -O2 -Wall -c -o imtql1.o ../imtql1.f ../imtql1.f:79:72: 79 | 100 E(I-1) = E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -O2 -Wall -c -o r1updt.o ../r1updt.f ../r1updt.f:2:36: 2 | SUBROUTINE R1UPDT (M, N, S, LS, U, V, W, SING) | 1 Warning: Unused dummy argument 'ls' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o ssdcgs.o ../ssdcgs.f f77 -g -pipe -O2 -Wall -c -o besk0e.o ../besk0e.f ../besk0e.f:2:0: 2 | FUNCTION BESK0E (X) | Warning: '__result_besk0e' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cpoco.o ../cpoco.f f77 -g -pipe -O2 -Wall -c -o defc.o ../defc.f f77 -g -pipe -O2 -Wall -c -o dreadp.o ../dreadp.f f77 -g -pipe -O2 -Wall -c -o imtql2.o ../imtql2.f ../imtql2.f:99:72: 99 | 100 E(I-1) = E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -O2 -Wall -c -o r9aimp.o ../r9aimp.f f77 -g -pipe -O2 -Wall -c -o ssdgmr.o ../ssdgmr.f ../ssdgmr.f:2:68: 2 | SUBROUTINE SSDGMR (N, B, X, NELT, IA, JA, A, ISYM, NSAVE, ITOL, | 1 Warning: Unused dummy argument 'itol' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o besk1.o ../besk1.f f77 -g -pipe -O2 -Wall -c -o cpodi.o ../cpodi.f f77 -g -pipe -O2 -Wall -c -o defcmn.o ../defcmn.f ../defcmn.f:142:13: 142 | L = PTEMP(IDATA) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dreort.o ../dreort.f f77 -g -pipe -O2 -Wall -c -o imtqlv.o ../imtqlv.f f77 -g -pipe -O2 -Wall -c -o r9atn1.o ../r9atn1.f f77 -g -pipe -O2 -Wall -c -o ssdi.o ../ssdi.f ../ssdi.f:2:47: 2 | SUBROUTINE SSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ssdi.f:2:40: 2 | SUBROUTINE SSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../ssdi.f:2:53: 2 | SUBROUTINE SSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../ssdi.f:2:44: 2 | SUBROUTINE SSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o besk1e.o ../besk1e.f ../besk1e.f:2:0: 2 | FUNCTION BESK1E (X) | Warning: '__result_besk1e' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cpofa.o ../cpofa.f f77 -g -pipe -O2 -Wall -c -o defe4.o ../defe4.f ../defe4.f:47:72: 47 | DO 30 J=JS,NS | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) f77 -g -pipe -O2 -Wall -c -o drf.o ../drf.f f77 -g -pipe -O2 -Wall -c -o indxa.o ../indxa.f ../indxa.f:22:72: 22 | IF (I-NM) 102,102,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o r9chu.o ../r9chu.f f77 -g -pipe -O2 -Wall -c -o ssdomn.o ../ssdomn.f f77 -g -pipe -O2 -Wall -c -o beskes.o ../beskes.f f77 -g -pipe -O2 -Wall -c -o cpofs.o ../cpofs.f ../cpofs.f:156:15: 156 | IND = -LOG10(R1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o defehl.o ../defehl.f ../defehl.f:58:72: 58 | 230 YS(K)=Y(K)+CH*YP(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../defehl.f:63:72: 63 | 240 YS(K)=Y(K)+CH*(YP(K)+3.*F1(K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../defehl.f:68:72: 68 | 250 YS(K)=Y(K)+CH*(1932.*YP(K)+(7296.*F2(K)-7200.*F1(K))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../defehl.f:74:72: 74 | 1 (29440.*F2(K)-32832.*F1(K))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) ../defehl.f:80:72: 80 | 1 (41040.*F1(K)-28352.*F2(K))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../defehl.f:88:72: 88 | 1 (3953664.*F2(K)+277020.*F5(K))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) f77 -g -pipe -O2 -Wall -c -o drj.o ../drj.f f77 -g -pipe -O2 -Wall -c -o indxb.o ../indxb.f ../indxb.f:24:72: 24 | IF (IR) 107,101,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../indxb.f:25:72: 25 | 101 IF (I-NM) 102,102,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../indxb.f:34:72: 34 | IF (I-IPL-NM) 105,105,104 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../indxb.f:37:72: 37 | 105 IF (I+IPL-NM) 107,107,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o r9gmic.o ../r9gmic.f ../r9gmic.f:40:11: 40 | MA = A - 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o ssds.o ../ssds.f ../ssds.f:2:34: 2 | SUBROUTINE SSDS (N, NELT, IA, JA, A, ISYM, DINV) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../ssds.f:2:47: 2 | SUBROUTINE SSDS (N, NELT, IA, JA, A, ISYM, DINV) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o besknu.o ../besknu.f f77 -g -pipe -O2 -Wall -c -o cpoir.o ../cpoir.f ../cpoir.f:200:12: 200 | IND = -LOG10(MAX(R1MACH(4),DNORM/XNORM)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o defer.o ../defer.f f77 -g -pipe -O2 -Wall -c -o indxc.o ../indxc.f ../indxc.f:22:72: 22 | IF (IDXC+NC-1-NM) 102,102,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o r9gmit.o ../r9gmit.f ../r9gmit.f:36:11: 36 | MA = A + 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../r9gmit.f:37:25: 37 | IF (A.LT.0.0) MA = A - 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../r9gmit.f:2:48: 2 | FUNCTION R9GMIT (A, X, ALGAP1, SGNGAM, ALX) | 1 Warning: Unused dummy argument 'alx' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o ssdscl.o ../ssdscl.f ../ssdscl.f:2:49: 2 | SUBROUTINE SSDSCL (N, NELT, IA, JA, A, ISYM, X, B, DINV, JOB, | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o besks.o ../besks.f f77 -g -pipe -O2 -Wall -c -o cposl.o ../cposl.f f77 -g -pipe -O2 -Wall -c -o dei.o ../dei.f f77 -g -pipe -O2 -Wall -c -o drkfs.o ../drkfs.f f77 -g -pipe -O2 -Wall -c -o initds.o ../initds.f ../initds.f:49:0: 49 | 20 IF (I .EQ. NOS) CALL XERMSG ('SLATEC', 'INITDS', | Warning: 'i' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o r9knus.o ../r9knus.f ../r9knus.f:133:15: 133 | NTERMS = MAX (2.0, 11.0+(8.*ALNZ-25.19-ALNEPS)/(4.28-ALNZ)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o ssgs.o ../ssgs.f f77 -g -pipe -O2 -Wall -c -o besy.o ../besy.f ../besy.f:157:0: 157 | TM = TM + TRX | Warning: 'trx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../besy.f:157:0: Warning: 'tm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../besy.f:151:0: 151 | Y(2) = S2 | Warning: 's2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cppco.o ../cppco.f f77 -g -pipe -O2 -Wall -c -o denorm.o ../denorm.f f77 -g -pipe -O2 -Wall -c -o drlcal.o ../drlcal.f f77 -g -pipe -O2 -Wall -c -o inits.o ../inits.f ../inits.f:48:0: 48 | 20 IF (I .EQ. NOS) CALL XERMSG ('SLATEC', 'INITS', | Warning: 'i' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o r9lgic.o ../r9lgic.f f77 -g -pipe -O2 -Wall -c -o ssiccg.o ../ssiccg.f f77 -g -pipe -O2 -Wall -c -o besy0.o ../besy0.f ../besy0.f:2:6: 2 | FUNCTION BESY0 (X) | 1 Warning: 'besy0' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o cppdi.o ../cppdi.f f77 -g -pipe -O2 -Wall -c -o derf.o ../derf.f ../derf.f:2:6: 2 | DOUBLE PRECISION FUNCTION DERF (X) | 1 Warning: 'derf' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] ../derf.f:2:0: 2 | DOUBLE PRECISION FUNCTION DERF (X) | Warning: '__result_derf' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o drot.o ../drot.f f77 -g -pipe -O2 -Wall -c -o intrv.o ../intrv.f f77 -g -pipe -O2 -Wall -c -o r9lgit.o ../r9lgit.f f77 -g -pipe -O2 -Wall -c -o ssico.o ../ssico.f f77 -g -pipe -O2 -Wall -c -o besy1.o ../besy1.f ../besy1.f:2:6: 2 | FUNCTION BESY1 (X) | 1 Warning: 'besy1' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o cppfa.o ../cppfa.f f77 -g -pipe -O2 -Wall -c -o derfc.o ../derfc.f ../derfc.f:2:6: 2 | DOUBLE PRECISION FUNCTION DERFC (X) | 1 Warning: 'derfc' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o drotg.o ../drotg.f f77 -g -pipe -O2 -Wall -c -o intyd.o ../intyd.f ../intyd.f:70:72: 70 | 10 IC = IC*JJ | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../intyd.f:73:72: 73 | 20 DKY(I) = C*YH(I,L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../intyd.f:83:72: 83 | 30 IC = IC*JJ | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../intyd.f:86:72: 86 | 40 DKY(I) = C*YH(I,JP1) + S*DKY(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../intyd.f:91:72: 91 | 60 DKY(I) = R*DKY(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) f77 -g -pipe -O2 -Wall -c -o r9lgmc.o ../r9lgmc.f f77 -g -pipe -O2 -Wall -c -o ssics.o ../ssics.f f77 -g -pipe -O2 -Wall -c -o besynu.o ../besynu.f ../besynu.f:275:0: 275 | S2 = CK*S2 - S1 | Warning: 's1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../besynu.f:287:0: 287 | CK = CK + RX | Warning: 'ck' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cppsl.o ../cppsl.f f77 -g -pipe -O2 -Wall -c -o derkf.o ../derkf.f f77 -g -pipe -O2 -Wall -c -o drotm.o ../drotm.f ../drotm.f:71:72: 71 | IF (DFLAG) 50,10,30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drotm.f:110:72: 110 | IF (DFLAG) 120,80,100 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o invit.o ../invit.f ../invit.f:167:72: 167 | 160 X = X + ABS(A(I,J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../invit.f:208:72: 208 | 300 RM1(J,I) = A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../invit.f:237:72: 237 | 380 RM1(J,I) = RM1(J,I) - X * RM1(J,MP) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../invit.f:251:72: 251 | 460 Y = Y - RM1(J,I) * RV1(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 460 at (1) ../invit.f:270:72: 270 | 540 RM1(1,I) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 540 at (1) ../invit.f:406:72: 406 | 860 RV1(I) = Y | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 860 at (1) ../invit.f:409:0: 409 | RV1(J) = RV1(J) - EPS3 * X | Warning: 'ukroot' may be used uninitialized in this function [-Wmaybe-uninitialized] ../invit.f:127:0: 127 | INTEGER I,J,K,L,M,N,S,II,IP,MM,MP,NM,NS,N1,UK,IP1,ITS,KM1,IERR | Warning: 'ns' may be used uninitialized in this function [-Wmaybe-uninitialized] ../invit.f:384:0: 384 | X = RV1(J) | Warning: 'j' may be used uninitialized in this function [-Wmaybe-uninitialized] ../invit.f:382:0: 382 | IF (NORM .LT. GROWTO) GO TO 840 | Warning: 'growto' may be used uninitialized in this function [-Wmaybe-uninitialized] ../invit.f:409:0: 409 | RV1(J) = RV1(J) - EPS3 * X | Warning: 'eps3' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o r9ln2r.o ../r9ln2r.f ../r9ln2r.f:2:0: 2 | FUNCTION R9LN2R (X) | Warning: '__result_r9ln2r' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ssidi.o ../ssidi.f f77 -g -pipe -O2 -Wall -c -o beta.o ../beta.f ../beta.f:42:0: 42 | IF (A+B.LT.XMAX) RETURN | Warning: '__result_beta' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cpqr79.o ../cpqr79.f f77 -g -pipe -O2 -Wall -c -o derkfs.o ../derkfs.f ../derkfs.f:307:72: 307 | 75 F1(K)=TOL | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 75 at (1) ../derkfs.f:337:72: 337 | 90 Y(K)=Y(K)+DT*YP(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) ../derkfs.f:471:72: 471 | 350 EEOET=MAX(EEOET,EE/ET) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 350 at (1) ../derkfs.f:507:72: 507 | 525 Y(K)=YS(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 525 at (1) ../derkfs.f:590:72: 590 | 939 ATOL(K)=TOLFAC*ATOL(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 939 at (1) f77 -g -pipe -O2 -Wall -c -o drotmg.o ../drotmg.f ../drotmg.f:141:15: 141 | GO TO IGO,(120,150,180,210) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../drotmg.f:147:72: 147 | ASSIGN 120 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../drotmg.f:159:72: 159 | ASSIGN 150 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../drotmg.f:172:72: 172 | ASSIGN 180 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../drotmg.f:183:72: 183 | ASSIGN 210 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../drotmg.f:192:72: 192 | IF (DFLAG) 250,230,240 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drotmg.f:186:5: 186 | 210 CONTINUE | 1 Warning: Label 210 at (1) defined but not used [-Wunused-label] ../drotmg.f:175:5: 175 | 180 CONTINUE | 1 Warning: Label 180 at (1) defined but not used [-Wunused-label] ../drotmg.f:162:5: 162 | 150 CONTINUE | 1 Warning: Label 150 at (1) defined but not used [-Wunused-label] ../drotmg.f:150:5: 150 | 120 CONTINUE | 1 Warning: Label 120 at (1) defined but not used [-Wunused-label] ../drotmg.f:189:0: 189 | DH22=DH22*GAM | Warning: 'dh22' may be used uninitialized in this function [-Wmaybe-uninitialized] ../drotmg.f:188:0: 188 | DH21=DH21*GAM | Warning: 'dh21' may be used uninitialized in this function [-Wmaybe-uninitialized] ../drotmg.f:195:0: 195 | DPARAM(4)=DH12 | Warning: 'dh12' may be used uninitialized in this function [-Wmaybe-uninitialized] ../drotmg.f:198:0: 198 | DPARAM(2)=DH11 | Warning: 'dh11' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o inxca.o ../inxca.f ../inxca.f:22:72: 22 | IF (I-NM) 102,102,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o r9pak.o ../r9pak.f ../r9pak.f:38:16: 38 | NMIN = A1N2B*I1MACH(12) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../r9pak.f:39:16: 39 | NMAX = A1N2B*I1MACH(13) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o ssiev.o ../ssiev.f ../ssiev.f:96:72: 96 | DO 10 I=1,J | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) f77 -g -pipe -O2 -Wall -c -o betai.o ../betai.f ../betai.f:78:10: 78 | N = MAX (ALNEPS/LOG(Y), 4.0E0) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../betai.f:89:11: 89 | IB = MAX (XB/ALNSML, 0.0E0) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../betai.f:95:10: 95 | N = Q | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o cproc.o ../cproc.f ../cproc.f:49:72: 49 | IF (ID) 109,109,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:64:72: 64 | IF (ABS(DEN)) 105,106,105 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:71:72: 71 | 109 IF (M1) 110,110,112 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:72:72: 72 | 110 IF (M2) 121,121,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:76:72: 76 | 112 IF (M2) 113,113,114 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:80:72: 80 | 114 IF (ABS(BM1(M1))-ABS(BM2(M2))) 116,116,115 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:87:72: 87 | IF (MM-2) 120,118,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:100:72: 100 | 121 IF (IA) 124,124,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:110:72: 110 | 124 IF (IFLG) 125,125,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:3:23: 3 | + B, C, D, W, YY) | 1 Warning: Unused dummy argument 'yy' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o des.o ../des.f ../des.f:281:72: 281 | 215 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 215 at (1) ../des.f:293:72: 293 | 230 YY(L) = Y(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../des.f:327:72: 327 | 270 Y(L) = YY(L) + DT*YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../des.f:341:72: 341 | 290 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../des.f:365:72: 365 | 320 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../des.f:393:72: 393 | 370 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 370 at (1) ../des.f:415:72: 415 | 390 ATOL(L) = EPS*ATOL(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 390 at (1) ../des.f:418:72: 418 | 410 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1) f77 -g -pipe -O2 -Wall -c -o drsco.o ../drsco.f f77 -g -pipe -O2 -Wall -c -o inxcb.o ../inxcb.f ../inxcb.f:22:72: 22 | IF (IR) 107,101,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../inxcb.f:23:72: 23 | 101 IF (I-NM) 102,102,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../inxcb.f:32:72: 32 | IF (I-IPL-NM) 105,105,104 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../inxcb.f:35:72: 35 | 105 IF (I+IPL-NM) 107,107,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o r9upak.o ../r9upak.f f77 -g -pipe -O2 -Wall -c -o ssifa.o ../ssifa.f f77 -g -pipe -O2 -Wall -c -o bfqad.o ../bfqad.f f77 -g -pipe -O2 -Wall -c -o cprocp.o ../cprocp.f ../cprocp.f:52:72: 52 | IF (ID) 111,111,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:66:72: 66 | IF (MM2-2) 106,104,104 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:83:72: 83 | IF (ABS(DEN)) 107,108,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:92:72: 92 | 111 IF (M1) 112,112,114 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:93:72: 93 | 112 IF (M2) 123,123,113 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:97:72: 97 | 114 IF (M2) 115,115,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:101:72: 101 | 116 IF (ABS(BM1(M1))-ABS(BM2(M2))) 118,118,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:112:72: 112 | IF (MM-2) 122,120,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:122:72: 122 | 123 IF (IA) 126,126,124 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:132:72: 132 | 126 IF (IFLG) 127,127,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:3:23: 3 | + B, C, D, U, YY) | 1 Warning: Unused dummy argument 'yy' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o ds2lt.o ../ds2lt.f f77 -g -pipe -O2 -Wall -c -o inxcc.o ../inxcc.f ../inxcc.f:22:72: 22 | IF (IDXC+NC-1-NM) 102,102,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o radb2.o ../radb2.f ../radb2.f:27:72: 27 | IF (IDO-2) 107,105,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o ssilur.o ../ssilur.f f77 -g -pipe -O2 -Wall -c -o bi.o ../bi.f f77 -g -pipe -O2 -Wall -c -o cprod.o ../cprod.f ../cprod.f:48:72: 48 | IF (ID) 109,109,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:63:72: 63 | IF (ABS(DEN)) 105,106,105 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:70:72: 70 | 109 IF (M1) 110,110,112 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:71:72: 71 | 110 IF (M2) 121,121,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:75:72: 75 | 112 IF (M2) 113,113,114 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:79:72: 79 | 114 IF (ABS(BM1(M1))-ABS(BM2(M2))) 116,116,115 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:86:72: 86 | IF (MM-2) 120,118,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:99:72: 99 | 121 IF (IA) 124,124,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:109:72: 109 | 124 IF (IFLG) 125,125,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o dexint.o ../dexint.f ../dexint.f:133:11: 133 | IX = TX | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dexint.f:210:11: 210 | IX = TX | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o ds2y.o ../ds2y.f ../ds2y.f:2:47: 2 | SUBROUTINE DS2Y (N, NELT, IA, JA, A, ISYM) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o iploc.o ../iploc.f f77 -g -pipe -O2 -Wall -c -o radb3.o ../radb3.f f77 -g -pipe -O2 -Wall -c -o ssilus.o ../ssilus.f f77 -g -pipe -O2 -Wall -c -o bie.o ../bie.f f77 -g -pipe -O2 -Wall -c -o cprodp.o ../cprodp.f ../cprodp.f:53:72: 53 | IF (ID) 111,111,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:67:72: 67 | IF (MM2-2) 106,104,104 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:84:72: 84 | IF (ABS(DEN)) 107,108,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:93:72: 93 | 111 IF (M1) 112,112,114 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:94:72: 94 | 112 IF (M2) 123,123,113 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:98:72: 98 | 114 IF (M2) 115,115,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:102:72: 102 | 116 IF (ABS(BM1(M1))-ABS(BM2(M2))) 118,118,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:113:72: 113 | IF (MM-2) 122,120,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:123:72: 123 | 123 IF (IA) 126,126,124 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:133:72: 133 | 126 IF (IFLG) 127,127,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o dexprl.o ../dexprl.f ../dexprl.f:37:18: 37 | NTERMS = XN - (XN*XLN+ALNEPS)/(XLN+1.36D0) + 1.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dsbmv.o ../dsbmv.f f77 -g -pipe -O2 -Wall -c -o ipperm.o ../ipperm.f f77 -g -pipe -O2 -Wall -c -o radb4.o ../radb4.f ../radb4.f:37:72: 37 | IF (IDO-2) 107,105,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o ssisl.o ../ssisl.f f77 -g -pipe -O2 -Wall -c -o binom.o ../binom.f f77 -g -pipe -O2 -Wall -c -o cpsi.o ../cpsi.f ../cpsi.f:47:17: 47 | NTERM = -0.30*LOG(R1MACH(3)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cpsi.f:88:10: 88 | 30 N = SQRT(BOUND**2-Y**2) - X + 1.0 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dfac.o ../dfac.f ../dfac.f:62:13: 62 | NMAX = XMAX - 1.D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dscal.o ../dscal.f f77 -g -pipe -O2 -Wall -c -o ipsort.o ../ipsort.f f77 -g -pipe -O2 -Wall -c -o radb5.o ../radb5.f f77 -g -pipe -O2 -Wall -c -o ssjac.o ../ssjac.f f77 -g -pipe -O2 -Wall -c -o bint4.o ../bint4.f f77 -g -pipe -O2 -Wall -c -o cptsl.o ../cptsl.f f77 -g -pipe -O2 -Wall -c -o dfc.o ../dfc.f f77 -g -pipe -O2 -Wall -c -o dsd2s.o ../dsd2s.f f77 -g -pipe -O2 -Wall -c -o isamax.o ../isamax.f f77 -g -pipe -O2 -Wall -c -o radbg.o ../radbg.f f77 -g -pipe -O2 -Wall -c -o ssli.o ../ssli.f ../ssli.f:2:47: 2 | SUBROUTINE SSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ssli.f:2:40: 2 | SUBROUTINE SSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../ssli.f:2:53: 2 | SUBROUTINE SSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../ssli.f:2:44: 2 | SUBROUTINE SSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o bintk.o ../bintk.f f77 -g -pipe -O2 -Wall -c -o cpzero.o ../cpzero.f ../cpzero.f:96:72: 96 | 13 R(I)=MAX(X,.001*ABS(TEMP))*CMPLX(COS(U),SIN(U))+TEMP | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 13 at (1) ../cpzero.f:113:72: 113 | 17 IF(J .NE. I) TEMP=TEMP*(R(I)-R(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 17 at (1) ../cpzero.f:117:72: 117 | 15 R(I)=R(I)-T(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1) ../cpzero.f:132:72: 132 | 23 S(NR)=MAX(S(NR),(ABS(TEMP)/X)**(1./I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 23 at (1) ../cpzero.f:133:72: 133 | 25 S(NR)=1./S(NR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 25 at (1) f77 -g -pipe -O2 -Wall -c -o dfcmn.o ../dfcmn.f ../dfcmn.f:226:16: 226 | L = PTEMP(IDATA) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dsdbcg.o ../dsdbcg.f f77 -g -pipe -O2 -Wall -c -o isdbcg.o ../isdbcg.f ../isdbcg.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isdbcg.f:3:58: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] ../isdbcg.f:3:70: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'pp' at (1) [-Wunused-dummy-argument] ../isdbcg.f:3:62: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'rr' at (1) [-Wunused-dummy-argument] ../isdbcg.f:3:66: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'zz' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o radf2.o ../radf2.f ../radf2.f:27:72: 27 | IF (IDO-2) 107,105,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o ssli2.o ../ssli2.f f77 -g -pipe -O2 -Wall -c -o bisect.o ../bisect.f ../bisect.f:219:0: 219 | S2 = S1 + ABS(X0 - XU) | Warning: 'xu' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bisect.f:219:0: Warning: 'x0' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bisect.f:154:0: 154 | 100 IF (R .EQ. M) GO TO 1001 | Warning: 'r' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bisect.f:254:0: 254 | R = R + M2 - M1 + 1 | Warning: 'm2' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bisect.f:240:0: 240 | RV4(M1) = X1 | Warning: 'm1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bisect.f:237:0: 237 | 360 IF (S .GE. K) GO TO 400 | Warning: 'k' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cqrdc.o ../cqrdc.f f77 -g -pipe -O2 -Wall -c -o dfdjc1.o ../dfdjc1.f f77 -g -pipe -O2 -Wall -c -o dsdcg.o ../dsdcg.f f77 -g -pipe -O2 -Wall -c -o isdcg.o ../isdcg.f ../isdcg.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, DZ, RWORK, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isdcg.f:3:58: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, DZ, RWORK, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o radf3.o ../radf3.f f77 -g -pipe -O2 -Wall -c -o ssllti.o ../ssllti.f ../ssllti.f:2:49: 2 | SUBROUTINE SSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ssllti.f:2:42: 2 | SUBROUTINE SSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../ssllti.f:2:55: 2 | SUBROUTINE SSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../ssllti.f:2:46: 2 | SUBROUTINE SSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o bkias.o ../bkias.f ../bkias.f:150:0: 150 | ERR = ERR*RAT | Warning: 'rat' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cqrsl.o ../cqrsl.f f77 -g -pipe -O2 -Wall -c -o dfdjc3.o ../dfdjc3.f f77 -g -pipe -O2 -Wall -c -o dsdcgn.o ../dsdcgn.f f77 -g -pipe -O2 -Wall -c -o isdcgn.o ../isdcgn.f ../isdcgn.f:4:15: 4 | + P, ATP, ATZ, DZ, ATDZ, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'atp' at (1) [-Wunused-dummy-argument] ../isdcgn.f:3:41: 3 | + MTTVEC, MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isdcgn.f:2:69: 2 | INTEGER FUNCTION ISDCGN (N, B, X, NELT, IA, JA, A, ISYM, MATVEC, | 1 Warning: Unused dummy argument 'matvec' at (1) [-Wunused-dummy-argument] ../isdcgn.f:4:10: 4 | + P, ATP, ATZ, DZ, ATDZ, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] ../isdcgn.f:3:71: 3 | + MTTVEC, MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, | 1 Warning: Unused dummy argument 'z' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o radf4.o ../radf4.f ../radf4.f:35:72: 35 | IF (IDO-2) 107,105,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o sslubc.o ../sslubc.f f77 -g -pipe -O2 -Wall -c -o bkisr.o ../bkisr.f f77 -g -pipe -O2 -Wall -c -o crati.o ../crati.f ../crati.f:32:12: 32 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../crati.f:35:13: 35 | MAGZ = AZ | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dfehl.o ../dfehl.f f77 -g -pipe -O2 -Wall -c -o dsdcgs.o ../dsdcgs.f f77 -g -pipe -O2 -Wall -c -o isdcgs.o ../isdcgs.f ../isdcgs.f:3:33: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isdcgs.f:3:67: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] ../isdcgs.f:3:70: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'q' at (1) [-Wunused-dummy-argument] ../isdcgs.f:3:64: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'r0' at (1) [-Wunused-dummy-argument] ../isdcgs.f:4:10: 4 | + U, V1, V2, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'u' at (1) [-Wunused-dummy-argument] ../isdcgs.f:4:14: 4 | + U, V1, V2, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'v1' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o radf5.o ../radf5.f f77 -g -pipe -O2 -Wall -c -o sslucn.o ../sslucn.f f77 -g -pipe -O2 -Wall -c -o bksol.o ../bksol.f ../bksol.f:42:72: 42 | 10 X(J)=X(J)*A(M) - SDOT(K,A(M+1),1,X(J+1),1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -O2 -Wall -c -o crotg.o ../crotg.f f77 -g -pipe -O2 -Wall -c -o dfspvd.o ../dfspvd.f ../dfspvd.f:38:72: 38 | 11 VNIKX(J-1,IDERVM) = VNIKX(J,IDERIV) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 11 at (1) ../dfspvd.f:45:72: 45 | 19 A(I,J) = 0.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 19 at (1) ../dfspvd.f:46:72: 46 | 20 A(I,I) = 1.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../dfspvd.f:59:72: 59 | 24 A(L,J) = (A(L,J) - A(L,J-1))/DIFF*FKMD | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 24 at (1) ../dfspvd.f:66:72: 66 | 30 DO 40 I=1,K | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 40 at (1) ../dfspvd.f:70:72: 70 | 35 V = A(I,J)*VNIKX(J,M) + V | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 35 at (1) ../dfspvd.f:71:72: 71 | 40 VNIKX(I,M) = V | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) f77 -g -pipe -O2 -Wall -c -o dsdgmr.o ../dsdgmr.f ../dsdgmr.f:2:68: 2 | SUBROUTINE DSDGMR (N, B, X, NELT, IA, JA, A, ISYM, NSAVE, ITOL, | 1 Warning: Unused dummy argument 'itol' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o isdgmr.o ../isdgmr.f ../isdgmr.f:2:35: 2 | INTEGER FUNCTION ISDGMR (N, B, X, XL, NELT, IA, JA, A, ISYM, | 1 Warning: Unused dummy argument 'b' at (1) [-Wunused-dummy-argument] ../isdgmr.f:3:39: 3 | + MSOLVE, NMSL, ITOL, TOL, ITMAX, ITER, ERR, IUNIT, R, Z, DZ, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isdgmr.f:4:37: 4 | + RWORK, IWORK, RNRM, BNRM, SB, SX, JSCAL, KMP, LGMR, MAXL, | 1 Warning: Unused dummy argument 'sb' at (1) [-Wunused-dummy-argument] ../isdgmr.f:3:63: 3 | + MSOLVE, NMSL, ITOL, TOL, ITMAX, ITER, ERR, IUNIT, R, Z, DZ, | 1 Warning: Unused dummy argument 'z' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o radfg.o ../radfg.f f77 -g -pipe -O2 -Wall -c -o sslucs.o ../sslucs.f f77 -g -pipe -O2 -Wall -c -o blktr1.o ../blktr1.f ../blktr1.f:53:72: 53 | IF (I-NM) 101,101,108 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:58:72: 58 | IF (I-IF) 102,108,108 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:66:72: 66 | IF (IPI2-NM) 105,105,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:81:72: 81 | IF (NPP) 132,110,132 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:123:72: 123 | IF (I-I2-IZR) 117,114,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:124:72: 124 | 114 IF (I-NM) 115,115,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:137:72: 137 | IF (I-NM) 117,119,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:145:72: 145 | IF (NCMPLX) 121,122,121 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:188:72: 188 | IF (IPI2-IZR) 127,128,127 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:189:72: 189 | 127 IF (I-IZR) 130,131,130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:217:72: 217 | IF (I-NM) 133,133,143 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:227:72: 227 | IF (I-I2) 134,134,136 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:234:72: 234 | 137 IF (IPI2-NM) 140,140,138 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:2:34: 2 | SUBROUTINE BLKTR1 (N, AN, BN, CN, M, AM, BM, CM, IDIMY, Y, B, W1, | 1 Warning: Unused dummy argument 'bn' at (1) [-Wunused-dummy-argument] ../blktr1.f:2:26: 2 | SUBROUTINE BLKTR1 (N, AN, BN, CN, M, AM, BM, CM, IDIMY, Y, B, W1, | 1 Warning: Unused dummy argument 'n' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o cs1s2.o ../cs1s2.f f77 -g -pipe -O2 -Wall -c -o dfspvn.o ../dfspvn.f ../dfspvn.f:44:72: 44 | 26 VMPREV = VM*DELTAM(JP1ML) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 26 at (1) f77 -g -pipe -O2 -Wall -c -o dsdi.o ../dsdi.f ../dsdi.f:2:47: 2 | SUBROUTINE DSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../dsdi.f:2:40: 2 | SUBROUTINE DSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../dsdi.f:2:53: 2 | SUBROUTINE DSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../dsdi.f:2:44: 2 | SUBROUTINE DSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o isdir.o ../isdir.f ../isdir.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, DZ, RWORK, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o rand.o ../rand.f ../rand.f:2:6: 2 | FUNCTION RAND (R) | 1 Warning: 'rand' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] ../rand.f:117:12: 117 | 20 IX1 = MOD(R,1.)*4194304. + 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o sslugm.o ../sslugm.f ../sslugm.f:2:68: 2 | SUBROUTINE SSLUGM (N, B, X, NELT, IA, JA, A, ISYM, NSAVE, ITOL, | 1 Warning: Unused dummy argument 'itol' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o blktri.o ../blktri.f ../blktri.f:207:72: 207 | IF (M-5) 101,102,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:210:72: 210 | 102 IF (NM-3) 103,104,104 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:213:72: 213 | 104 IF (IDIMY-M) 105,106,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:218:72: 218 | IF (NPP) 107,108,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:224:72: 224 | IF (NH-IK) 110,110,109 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:229:72: 229 | IF (NPP) 111,112,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:244:72: 244 | 113 IF (IERROR) 119,114,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:250:72: 250 | IF (IFLG) 116,115,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:253:72: 253 | 116 IF (MP) 117,118,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o cscal.o ../cscal.f f77 -g -pipe -O2 -Wall -c -o dfulmt.o ../dfulmt.f ../dfulmt.f:46:13: 46 | 10 NEXT = PRGOPT(LP) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dfulmt.f:55:12: 55 | 20 KEY = PRGOPT(LP+1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dfulmt.f:64:17: 64 | IFLAG(4) = PRGOPT(LP+3) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dfulmt.f:65:17: 65 | IFLAG(5) = PRGOPT(LP+4) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dfulmt.f:66:17: 66 | IFLAG(6) = PRGOPT(LP+5) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dsdomn.o ../dsdomn.f f77 -g -pipe -O2 -Wall -c -o isdomn.o ../isdomn.f ../isdomn.f:3:69: 3 | + NSAVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, AP, | 1 Warning: Unused dummy argument 'ap' at (1) [-Wunused-dummy-argument] ../isdomn.f:4:23: 4 | + EMAP, DZ, CSAV, RWORK, IWORK, AK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'csav' at (1) [-Wunused-dummy-argument] ../isdomn.f:4:13: 4 | + EMAP, DZ, CSAV, RWORK, IWORK, AK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'emap' at (1) [-Wunused-dummy-argument] ../isdomn.f:3:32: 3 | + NSAVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, AP, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isdomn.f:3:65: 3 | + NSAVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, AP, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o ratqr.o ../ratqr.f ../ratqr.f:146:72: 146 | 20 W(I) = D(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../ratqr.f:177:72: 177 | 110 W(I) = W(I) - TOT | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../ratqr.f:262:72: 262 | 500 W(I) = -W(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 500 at (1) f77 -g -pipe -O2 -Wall -c -o sslui.o ../sslui.f ../sslui.f:2:48: 2 | SUBROUTINE SSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../sslui.f:2:41: 2 | SUBROUTINE SSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../sslui.f:2:54: 2 | SUBROUTINE SSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../sslui.f:2:45: 2 | SUBROUTINE SSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o bndacc.o ../bndacc.f ../bndacc.f:218:72: 218 | DO 10 J=1,NBP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../bndacc.f:225:72: 225 | DO 20 J=1,NBP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) ../bndacc.f:245:72: 245 | DO 50 I=1,K | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1) f77 -g -pipe -O2 -Wall -c -o cscale.o ../cscale.f ../cscale.f:35:72: 35 | 5 COLS(K)=SDOT(NROW,A(1,K),1,A(1,K),1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 5 at (1) ../cscale.f:45:72: 45 | 30 SCALES(K)=1. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../cscale.f:64:72: 64 | 80 A(J,K)=S*A(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../cscale.f:72:72: 72 | 200 ANORM=ANORM+ROWS(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../cscale.f:56:12: 56 | IP=-0.5*P | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dfzero.o ../dfzero.f f77 -g -pipe -O2 -Wall -c -o dsdot.o ../dsdot.f f77 -g -pipe -O2 -Wall -c -o isort.o ../isort.f f77 -g -pipe -O2 -Wall -c -o rc.o ../rc.f f77 -g -pipe -O2 -Wall -c -o sslui2.o ../sslui2.f f77 -g -pipe -O2 -Wall -c -o bndsol.o ../bndsol.f ../bndsol.f:229:72: 229 | 70 IF (G(I,L+1)) 80,130,80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../bndsol.f:230:72: 230 | 80 X(I)=(X(I)-S)/G(I,L+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../bndsol.f:244:72: 244 | IF (G(J,L+1)) 120,130,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../bndsol.f:245:72: 245 | 120 X(J)=(X(J)-S)/G(J,L+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) f77 -g -pipe -O2 -Wall -c -o cseri.o ../cseri.f f77 -g -pipe -O2 -Wall -c -o dgami.o ../dgami.f f77 -g -pipe -O2 -Wall -c -o dsds.o ../dsds.f ../dsds.f:2:34: 2 | SUBROUTINE DSDS (N, NELT, IA, JA, A, ISYM, DINV) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../dsds.f:2:47: 2 | SUBROUTINE DSDS (N, NELT, IA, JA, A, ISYM, DINV) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o issbcg.o ../issbcg.f ../issbcg.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../issbcg.f:3:58: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] ../issbcg.f:3:70: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'pp' at (1) [-Wunused-dummy-argument] ../issbcg.f:3:62: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'rr' at (1) [-Wunused-dummy-argument] ../issbcg.f:3:66: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'zz' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o rc3jj.o ../rc3jj.f ../rc3jj.f:202:72: 202 | IF(NDIM-NFIN) 21, 23, 23 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jj.f:235:72: 235 | IF(LSTEP-2) 32, 32, 31 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jj.f:278:72: 278 | 70 THRCOF(I) = THRCOF(I) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../rc3jj.f:288:72: 288 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jj.f:365:72: 365 | 130 THRCOF(INDEX) = THRCOF(INDEX) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../rc3jj.f:390:72: 390 | 210 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../rc3jj.f:397:72: 397 | 212 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 212 at (1) ../rc3jj.f:412:72: 412 | IF(SIGN1*SIGN2) 235,235,236 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jj.f:418:72: 418 | 240 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../rc3jj.f:424:72: 424 | 251 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 251 at (1) ../rc3jj.f:398:0: 398 | SUMUNI = SUMFOR + RATIO*RATIO*SUMBAC | Warning: 'sumbac' may be used uninitialized in this function [-Wmaybe-uninitialized] ../rc3jj.f:257:0: 257 | 60 C2 = - L1 * OLDFAC / DENOM | Warning: 'denom' may be used uninitialized in this function [-Wmaybe-uninitialized] ../rc3jj.f:288:0: 288 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | Warning: 'c1old' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o sslui4.o ../sslui4.f f77 -g -pipe -O2 -Wall -c -o bnfac.o ../bnfac.f ../bnfac.f:87:72: 87 | IF (NROWM1) 120, 110, 10 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o csevl.o ../csevl.f ../csevl.f:62:0: 62 | CSEVL = 0.5E0*(B0-B2) | Warning: 'b2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dgamic.o ../dgamic.f ../dgamic.f:97:0: 97 | IF (A.LT.X) RETURN | Warning: '__result_dgamic' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dsdscl.o ../dsdscl.f ../dsdscl.f:2:49: 2 | SUBROUTINE DSDSCL (N, NELT, IA, JA, A, ISYM, X, B, DINV, JOB, | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o isscg.o ../isscg.f ../isscg.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, DZ, RWORK, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isscg.f:3:58: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, DZ, RWORK, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o rc3jm.o ../rc3jm.f ../rc3jm.f:203:72: 203 | IF(NDIM-NFIN) 21, 23, 23 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jm.f:236:72: 236 | IF(LSTEP-2) 32, 32, 31 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jm.f:274:72: 274 | 70 THRCOF(I) = THRCOF(I) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../rc3jm.f:285:72: 285 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jm.f:358:72: 358 | 111 THRCOF(INDEX) = THRCOF(INDEX) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 111 at (1) ../rc3jm.f:383:72: 383 | 210 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../rc3jm.f:390:72: 390 | 212 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 212 at (1) ../rc3jm.f:405:72: 405 | IF(SIGN1*SIGN2) 235,235,236 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jm.f:411:72: 411 | 240 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../rc3jm.f:417:72: 417 | 251 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 251 at (1) ../rc3jm.f:391:0: 391 | SUMUNI = SUMFOR + RATIO*RATIO*SUMBAC | Warning: 'sumbac' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ssluom.o ../ssluom.f f77 -g -pipe -O2 -Wall -c -o bnslv.o ../bnslv.f f77 -g -pipe -O2 -Wall -c -o cshch.o ../cshch.f f77 -g -pipe -O2 -Wall -c -o dgamit.o ../dgamit.f f77 -g -pipe -O2 -Wall -c -o dsgs.o ../dsgs.f f77 -g -pipe -O2 -Wall -c -o isscgn.o ../isscgn.f ../isscgn.f:4:15: 4 | + P, ATP, ATZ, DZ, ATDZ, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'atp' at (1) [-Wunused-dummy-argument] ../isscgn.f:3:41: 3 | + MTTVEC, MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isscgn.f:2:69: 2 | INTEGER FUNCTION ISSCGN (N, B, X, NELT, IA, JA, A, ISYM, MATVEC, | 1 Warning: Unused dummy argument 'matvec' at (1) [-Wunused-dummy-argument] ../isscgn.f:4:10: 4 | + P, ATP, ATZ, DZ, ATDZ, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] ../isscgn.f:3:71: 3 | + MTTVEC, MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, | 1 Warning: Unused dummy argument 'z' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o rc6j.o ../rc6j.f ../rc6j.f:208:72: 208 | IF(NDIM-NFIN) 21, 23, 23 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc6j.f:243:72: 243 | IF(LSTEP-2) 32, 32, 31 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc6j.f:288:72: 288 | 70 SIXCOF(I) = SIXCOF(I) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../rc6j.f:299:72: 299 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc6j.f:378:72: 378 | 130 SIXCOF(INDEX) = SIXCOF(INDEX) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../rc6j.f:402:72: 402 | 210 SIXCOF(N) = RATIO * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../rc6j.f:409:72: 409 | 212 SIXCOF(N) = RATIO * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 212 at (1) ../rc6j.f:424:72: 424 | IF(SIGN1*SIGN2) 235,235,236 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc6j.f:430:72: 430 | 240 SIXCOF(N) = CNORM * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../rc6j.f:436:72: 436 | 251 SIXCOF(N) = CNORM * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 251 at (1) ../rc6j.f:410:0: 410 | SUMUNI = SUMFOR + RATIO*RATIO*SUMBAC | Warning: 'sumbac' may be used uninitialized in this function [-Wmaybe-uninitialized] ../rc6j.f:266:0: 266 | 60 C2 = - L1 * OLDFAC / DENOM | Warning: 'denom' may be used uninitialized in this function [-Wmaybe-uninitialized] ../rc6j.f:299:0: 299 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | Warning: 'c1old' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ssluti.o ../ssluti.f ../ssluti.f:2:49: 2 | SUBROUTINE SSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ssluti.f:2:42: 2 | SUBROUTINE SSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../ssluti.f:2:55: 2 | SUBROUTINE SSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../ssluti.f:2:46: 2 | SUBROUTINE SSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o bqr.o ../bqr.f ../bqr.f:155:72: 155 | 80 A(I,MB) = A(I,MB) - G | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../bqr.f:158:72: 158 | 100 RV(K) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../bqr.f:168:72: 168 | 110 RV(K) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../bqr.f:223:72: 223 | 180 SCALE = SCALE + ABS(RV(K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../bqr.f:228:72: 228 | 190 S = S + (RV(K)/SCALE)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../bqr.f:253:72: 253 | 240 RV(K) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../bqr.f:281:72: 281 | DO 320 K = 1, M1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 320 at (1) ../bqr.f:294:72: 294 | 380 A(I,MB) = A(I,MB) - G | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../bqr.f:2:50: 2 | SUBROUTINE BQR (NM, N, MB, A, T, R, IERR, NV, RV) | 1 Warning: Unused dummy argument 'nv' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o csico.o ../csico.f f77 -g -pipe -O2 -Wall -c -o dgamlm.o ../dgamlm.f f77 -g -pipe -O2 -Wall -c -o dsiccg.o ../dsiccg.f f77 -g -pipe -O2 -Wall -c -o isscgs.o ../isscgs.f ../isscgs.f:3:33: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isscgs.f:3:67: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] ../isscgs.f:3:70: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'q' at (1) [-Wunused-dummy-argument] ../isscgs.f:3:64: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'r0' at (1) [-Wunused-dummy-argument] ../isscgs.f:4:10: 4 | + U, V1, V2, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'u' at (1) [-Wunused-dummy-argument] ../isscgs.f:4:14: 4 | + U, V1, V2, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'v1' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o rd.o ../rd.f f77 -g -pipe -O2 -Wall -c -o ssmmi2.o ../ssmmi2.f f77 -g -pipe -O2 -Wall -c -o bsgq8.o ../bsgq8.f ../bsgq8.f:139:72: 139 | IF (EE-AE) 40, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../bsgq8.f:142:72: 142 | IF (LR(L)) 60, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../bsgq8.f:172:72: 172 | IF (LR(L)) 100, 100, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o csidi.o ../csidi.f f77 -g -pipe -O2 -Wall -c -o dgamln.o ../dgamln.f ../dgamln.f:143:11: 143 | NZ = Z | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dgamln.f:158:11: 158 | MZ = ZM + 1 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dgamln.f:185:11: 185 | NZ = ZINC | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dgamln.f:163:0: 163 | ZINC = ZMIN - NZ | Warning: 'nz' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dsico.o ../dsico.f f77 -g -pipe -O2 -Wall -c -o issgmr.o ../issgmr.f ../issgmr.f:2:35: 2 | INTEGER FUNCTION ISSGMR (N, B, X, XL, NELT, IA, JA, A, ISYM, | 1 Warning: Unused dummy argument 'b' at (1) [-Wunused-dummy-argument] ../issgmr.f:3:39: 3 | + MSOLVE, NMSL, ITOL, TOL, ITMAX, ITER, ERR, IUNIT, R, Z, DZ, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../issgmr.f:4:37: 4 | + RWORK, IWORK, RNRM, BNRM, SB, SX, JSCAL, KMP, LGMR, MAXL, | 1 Warning: Unused dummy argument 'sb' at (1) [-Wunused-dummy-argument] ../issgmr.f:3:63: 3 | + MSOLVE, NMSL, ITOL, TOL, ITMAX, ITER, ERR, IUNIT, R, Z, DZ, | 1 Warning: Unused dummy argument 'z' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o rebak.o ../rebak.f ../rebak.f:77:72: 77 | DO 100 II = 1, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../rebak.f:84:72: 84 | 60 X = X - B(K,I) * Z(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) f77 -g -pipe -O2 -Wall -c -o ssmmti.o ../ssmmti.f ../ssmmti.f:2:49: 2 | SUBROUTINE SSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ssmmti.f:2:42: 2 | SUBROUTINE SSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../ssmmti.f:2:55: 2 | SUBROUTINE SSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../ssmmti.f:2:46: 2 | SUBROUTINE SSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o bskin.o ../bskin.f f77 -g -pipe -O2 -Wall -c -o csifa.o ../csifa.f f77 -g -pipe -O2 -Wall -c -o dgamma.o ../dgamma.f ../dgamma.f:2:6: 2 | DOUBLE PRECISION FUNCTION DGAMMA (X) | 1 Warning: 'dgamma' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] ../dgamma.f:97:10: 97 | N = X | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dsics.o ../dsics.f f77 -g -pipe -O2 -Wall -c -o issir.o ../issir.f ../issir.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, DZ, RWORK, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o rebakb.o ../rebakb.f ../rebakb.f:77:72: 77 | DO 100 II = 1, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../rebakb.f:84:72: 84 | 60 X = X + B(I,K) * Z(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) f77 -g -pipe -O2 -Wall -c -o ssmtv.o ../ssmtv.f f77 -g -pipe -O2 -Wall -c -o bspdoc.o ../bspdoc.f f77 -g -pipe -O2 -Wall -c -o csinh.o ../csinh.f f77 -g -pipe -O2 -Wall -c -o dgamr.o ../dgamr.f f77 -g -pipe -O2 -Wall -c -o dsidi.o ../dsidi.f f77 -g -pipe -O2 -Wall -c -o issomn.o ../issomn.f ../issomn.f:3:69: 3 | + NSAVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, AP, | 1 Warning: Unused dummy argument 'ap' at (1) [-Wunused-dummy-argument] ../issomn.f:4:23: 4 | + EMAP, DZ, CSAV, RWORK, IWORK, AK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'csav' at (1) [-Wunused-dummy-argument] ../issomn.f:4:13: 4 | + EMAP, DZ, CSAV, RWORK, IWORK, AK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'emap' at (1) [-Wunused-dummy-argument] ../issomn.f:3:32: 3 | + NSAVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, AP, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../issomn.f:3:65: 3 | + NSAVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, AP, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o reduc.o ../reduc.f ../reduc.f:87:72: 87 | DO 80 J = I, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 80 at (1) ../reduc.f:92:72: 92 | 20 X = X - B(I,K) * B(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../reduc.f:107:72: 107 | DO 200 J = I, NN | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 200 at (1) ../reduc.f:112:72: 112 | 160 X = X - B(I,K) * A(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../reduc.f:120:72: 120 | DO 300 I = J, NN | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 300 at (1) ../reduc.f:126:72: 126 | 220 X = X - A(K,J) * B(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../reduc.f:131:72: 131 | 260 X = X - A(J,K) * B(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) f77 -g -pipe -O2 -Wall -c -o ssmv.o ../ssmv.f f77 -g -pipe -O2 -Wall -c -o bspdr.o ../bspdr.f f77 -g -pipe -O2 -Wall -c -o csisl.o ../csisl.f f77 -g -pipe -O2 -Wall -c -o dgamrn.o ../dgamrn.f f77 -g -pipe -O2 -Wall -c -o dsifa.o ../dsifa.f f77 -g -pipe -O2 -Wall -c -o iswap.o ../iswap.f ../iswap.f:47:72: 47 | IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o reduc2.o ../reduc2.f ../reduc2.f:89:72: 89 | DO 80 J = I, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 80 at (1) ../reduc2.f:94:72: 94 | 20 X = X - B(I,K) * B(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../reduc2.f:108:72: 108 | DO 200 J = 1, I | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 200 at (1) ../reduc2.f:114:72: 114 | 120 X = X + A(K,I) * B(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../reduc2.f:119:72: 119 | 160 X = X + A(I,K) * B(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../reduc2.f:128:72: 128 | DO 300 J = 1, I | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 300 at (1) ../reduc2.f:133:72: 133 | 260 X = X + A(K,J) * B(K,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) f77 -g -pipe -O2 -Wall -c -o ssort.o ../ssort.f f77 -g -pipe -O2 -Wall -c -o bspev.o ../bspev.f f77 -g -pipe -O2 -Wall -c -o cspco.o ../cspco.f f77 -g -pipe -O2 -Wall -c -o dgaus8.o ../dgaus8.f ../dgaus8.f:148:72: 148 | IF (EE-AE) 40, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dgaus8.f:151:72: 151 | IF (LR(L)) 60, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dgaus8.f:181:72: 181 | IF (LR(L)) 100, 100, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dgaus8.f:107:14: 107 | NBITS = ANIB | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dgaus8.f:121:12: 121 | NIB = ANIB | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dsilur.o ../dsilur.f f77 -g -pipe -O2 -Wall -c -o ivout.o ../ivout.f f77 -g -pipe -O2 -Wall -c -o reort.o ../reort.f ../reort.f:159:72: 159 | 65 Y(J,L) = Y(J,L)*VNORM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 65 at (1) ../reort.f:172:72: 172 | 80 YP(J) = YP(J) / YPNM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../reort.f:174:72: 174 | 90 W(J) = C * W(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) f77 -g -pipe -O2 -Wall -c -o sspco.o ../sspco.f f77 -g -pipe -O2 -Wall -c -o bsplvd.o ../bsplvd.f ../bsplvd.f:35:72: 35 | 11 VNIKX(J-1,IDERVM) = VNIKX(J,IDERIV) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 11 at (1) ../bsplvd.f:42:72: 42 | 19 A(I,J) = 0. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 19 at (1) ../bsplvd.f:43:72: 43 | 20 A(I,I) = 1. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../bsplvd.f:56:72: 56 | 24 A(L,J) = (A(L,J) - A(L,J-1))/DIFF*FKMD | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 24 at (1) ../bsplvd.f:63:72: 63 | 30 DO 40 I=1,K | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 40 at (1) ../bsplvd.f:67:72: 67 | 35 V = A(I,J)*VNIKX(J,M) + V | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 35 at (1) ../bsplvd.f:68:72: 68 | 40 VNIKX(I,M) = V | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) f77 -g -pipe -O2 -Wall -c -o cspdi.o ../cspdi.f f77 -g -pipe -O2 -Wall -c -o dgbco.o ../dgbco.f f77 -g -pipe -O2 -Wall -c -o dsilus.o ../dsilus.f f77 -g -pipe -O2 -Wall -c -o j4save.o ../j4save.f f77 -g -pipe -O2 -Wall -c -o rf.o ../rf.f f77 -g -pipe -O2 -Wall -c -o sspdi.o ../sspdi.f f77 -g -pipe -O2 -Wall -c -o bsplvn.o ../bsplvn.f ../bsplvn.f:41:72: 41 | 26 VMPREV = VM*DELTAM(JP1ML) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 26 at (1) f77 -g -pipe -O2 -Wall -c -o cspfa.o ../cspfa.f f77 -g -pipe -O2 -Wall -c -o dgbdi.o ../dgbdi.f f77 -g -pipe -O2 -Wall -c -o dsindg.o ../dsindg.f ../dsindg.f:30:10: 30 | N = ABS(X)/90.D0 + 0.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o jairy.o ../jairy.f f77 -g -pipe -O2 -Wall -c -o rfftb.o ../rfftb.f f77 -g -pipe -O2 -Wall -c -o sspev.o ../sspev.f ../sspev.f:113:72: 113 | 25 V(I,J) = 0. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 25 at (1) ../sspev.f:114:72: 114 | 30 V(I,I) = 1. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) f77 -g -pipe -O2 -Wall -c -o bsppp.o ../bsppp.f f77 -g -pipe -O2 -Wall -c -o cspsl.o ../cspsl.f f77 -g -pipe -O2 -Wall -c -o dgbfa.o ../dgbfa.f f77 -g -pipe -O2 -Wall -c -o dsisl.o ../dsisl.f f77 -g -pipe -O2 -Wall -c -o la05ad.o ../la05ad.f ../la05ad.f:189:0: 189 | IF (ABS(A(KJ)).LT.AMAX*U) GO TO 180 | Warning: 'kj' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05ad.f:192:0: 192 | JP = J | Warning: 'jp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05ad.f:191:0: 191 | IPP = I | Warning: 'ipp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05ad.f:141:0: 141 | KR = IP(J,2) - 1 | Warning: 'kr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o rfftb1.o ../rfftb1.f f77 -g -pipe -O2 -Wall -c -o sspfa.o ../sspfa.f f77 -g -pipe -O2 -Wall -c -o bspvd.o ../bspvd.f f77 -g -pipe -O2 -Wall -c -o csroot.o ../csroot.f f77 -g -pipe -O2 -Wall -c -o dgbmv.o ../dgbmv.f f77 -g -pipe -O2 -Wall -c -o dsjac.o ../dsjac.f f77 -g -pipe -O2 -Wall -c -o la05as.o ../la05as.f ../la05as.f:186:0: 186 | IF (ABS(A(KJ)).LT.AMAX*U) GO TO 180 | Warning: 'kj' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05as.f:189:0: 189 | JP = J | Warning: 'jp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05as.f:188:0: 188 | IPP = I | Warning: 'ipp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05as.f:138:0: 138 | KR = IP(J,2) - 1 | Warning: 'kr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o rfftf.o ../rfftf.f f77 -g -pipe -O2 -Wall -c -o sspmv.o ../sspmv.f f77 -g -pipe -O2 -Wall -c -o bspvn.o ../bspvn.f f77 -g -pipe -O2 -Wall -c -o csrot.o ../csrot.f f77 -g -pipe -O2 -Wall -c -o dgbsl.o ../dgbsl.f f77 -g -pipe -O2 -Wall -c -o dsli.o ../dsli.f ../dsli.f:2:47: 2 | SUBROUTINE DSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../dsli.f:2:40: 2 | SUBROUTINE DSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../dsli.f:2:53: 2 | SUBROUTINE DSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../dsli.f:2:44: 2 | SUBROUTINE DSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o la05bd.o ../la05bd.f f77 -g -pipe -O2 -Wall -c -o rfftf1.o ../rfftf1.f f77 -g -pipe -O2 -Wall -c -o sspr.o ../sspr.f ../sspr.f:96:0: 96 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o bsqad.o ../bsqad.f f77 -g -pipe -O2 -Wall -c -o csscal.o ../csscal.f f77 -g -pipe -O2 -Wall -c -o dgeco.o ../dgeco.f f77 -g -pipe -O2 -Wall -c -o dsli2.o ../dsli2.f f77 -g -pipe -O2 -Wall -c -o la05bs.o ../la05bs.f f77 -g -pipe -O2 -Wall -c -o rffti.o ../rffti.f f77 -g -pipe -O2 -Wall -c -o sspr2.o ../sspr2.f ../sspr2.f:107:0: 107 | INTEGER I, INFO, IX, IY, J, JX, JY, K, KK, KX, KY | Warning: 'ky' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sspr2.f:107:0: Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sspr2.f:107:0: Warning: 'jy' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sspr2.f:107:0: Warning: 'jx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o bsrh.o ../bsrh.f ../bsrh.f:25:72: 25 | IF (SGN*F(X,IZ,C,A,BH)) 103,105,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../bsrh.f:30:72: 30 | IF (DX-CNV) 105,105,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o csvdc.o ../csvdc.f ../csvdc.f:382:0: 382 | IF (LS .NE. L) GO TO 490 | Warning: 'ls' may be used uninitialized in this function [-Wmaybe-uninitialized] ../csvdc.f:371:0: 371 | IF (LS .EQ. L) GO TO 480 | Warning: 'l' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dgedi.o ../dgedi.f f77 -g -pipe -O2 -Wall -c -o dsllti.o ../dsllti.f ../dsllti.f:2:49: 2 | SUBROUTINE DSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../dsllti.f:2:42: 2 | SUBROUTINE DSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../dsllti.f:2:55: 2 | SUBROUTINE DSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../dsllti.f:2:46: 2 | SUBROUTINE DSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o la05cd.o ../la05cd.f ../la05cd.f:244:72: 244 | IF (II-LAST1) 560, 590, 560 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../la05cd.f:73:0: 73 | IF (I.EQ.IM) M = II | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05cd.f:76:0: 76 | LAST = II | Warning: 'last' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o rffti1.o ../rffti1.f ../rffti1.f:61:72: 61 | IF (J-4) 102,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rffti1.f:67:72: 67 | IF (NR) 101,105,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o sspsl.o ../sspsl.f f77 -g -pipe -O2 -Wall -c -o bvalu.o ../bvalu.f f77 -g -pipe -O2 -Wall -c -o cswap.o ../cswap.f f77 -g -pipe -O2 -Wall -c -o dgefa.o ../dgefa.f f77 -g -pipe -O2 -Wall -c -o dslubc.o ../dslubc.f f77 -g -pipe -O2 -Wall -c -o la05cs.o ../la05cs.f ../la05cs.f:245:72: 245 | IF (II-LAST1) 560, 590, 560 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../la05cs.f:74:0: 74 | IF (I.EQ.IM) M = II | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05cs.f:77:0: 77 | LAST = II | Warning: 'last' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o rg.o ../rg.f f77 -g -pipe -O2 -Wall -c -o ssvdc.o ../ssvdc.f ../ssvdc.f:368:0: 368 | L = L + 1 | Warning: 'ls' may be used uninitialized in this function [-Wmaybe-uninitialized] ../ssvdc.f:345:0: 345 | IF (LS .EQ. L) GO TO 440 | Warning: 'l' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o csymm.o ../csymm.f f77 -g -pipe -O2 -Wall -c -o dgefs.o ../dgefs.f ../dgefs.f:153:15: 153 | IND = -LOG10(D1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dslucn.o ../dslucn.f f77 -g -pipe -O2 -Wall -c -o la05ed.o ../la05ed.f ../la05ed.f:2:46: 2 | SUBROUTINE LA05ED (A, IRN, IP, N, IW, IA, REALS) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o rgauss.o ../rgauss.f f77 -g -pipe -O2 -Wall -c -o sswap.o ../sswap.f ../sswap.f:50:72: 50 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o csyr2k.o ../csyr2k.f f77 -g -pipe -O2 -Wall -c -o dgemm.o ../dgemm.f f77 -g -pipe -O2 -Wall -c -o dslucs.o ../dslucs.f f77 -g -pipe -O2 -Wall -c -o la05es.o ../la05es.f ../la05es.f:2:46: 2 | SUBROUTINE LA05ES (A, IRN, IP, N, IW, IA, REALS) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o rgg.o ../rgg.f f77 -g -pipe -O2 -Wall -c -o ssymm.o ../ssymm.f f77 -g -pipe -O2 -Wall -c -o csyrk.o ../csyrk.f f77 -g -pipe -O2 -Wall -c -o dgemv.o ../dgemv.f f77 -g -pipe -O2 -Wall -c -o dslugm.o ../dslugm.f ../dslugm.f:2:68: 2 | SUBROUTINE DSLUGM (N, B, X, NELT, IA, JA, A, ISYM, NSAVE, ITOL, | 1 Warning: Unused dummy argument 'itol' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o llsia.o ../llsia.f f77 -g -pipe -O2 -Wall -c -o rj.o ../rj.f f77 -g -pipe -O2 -Wall -c -o ssymv.o ../ssymv.f f77 -g -pipe -O2 -Wall -c -o c0lgmc.o ../c0lgmc.f f77 -g -pipe -O2 -Wall -c -o ctan.o ../ctan.f f77 -g -pipe -O2 -Wall -c -o dger.o ../dger.f f77 -g -pipe -O2 -Wall -c -o dslui.o ../dslui.f ../dslui.f:2:48: 2 | SUBROUTINE DSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../dslui.f:2:41: 2 | SUBROUTINE DSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../dslui.f:2:54: 2 | SUBROUTINE DSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../dslui.f:2:45: 2 | SUBROUTINE DSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o lmpar.o ../lmpar.f f77 -g -pipe -O2 -Wall -c -o ssyr.o ../ssyr.f ../ssyr.f:99:0: 99 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o c1merg.o ../c1merg.f f77 -g -pipe -O2 -Wall -c -o ctanh.o ../ctanh.f f77 -g -pipe -O2 -Wall -c -o dgesl.o ../dgesl.f f77 -g -pipe -O2 -Wall -c -o dslui2.o ../dslui2.f f77 -g -pipe -O2 -Wall -c -o lpdp.o ../lpdp.f f77 -g -pipe -O2 -Wall -c -o rpqr79.o ../rpqr79.f f77 -g -pipe -O2 -Wall -c -o ssyr2.o ../ssyr2.f ../ssyr2.f:110:0: 110 | INTEGER I, INFO, IX, IY, J, JX, JY, KX, KY | Warning: 'ky' may be used uninitialized in this function [-Wmaybe-uninitialized] ../ssyr2.f:110:0: Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../ssyr2.f:110:0: Warning: 'jy' may be used uninitialized in this function [-Wmaybe-uninitialized] ../ssyr2.f:110:0: Warning: 'jx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o c9lgmc.o ../c9lgmc.f ../c9lgmc.f:51:17: 51 | NTERM = -0.30*LOG(R1MACH(3)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o ctbmv.o ../ctbmv.f ../ctbmv.f:151:0: 151 | INTEGER I, INFO, IX, J, JX, KPLUS1, KX, L | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dglss.o ../dglss.f f77 -g -pipe -O2 -Wall -c -o dslui4.o ../dslui4.f f77 -g -pipe -O2 -Wall -c -o lsame.o ../lsame.f f77 -g -pipe -O2 -Wall -c -o rpzero.o ../rpzero.f f77 -g -pipe -O2 -Wall -c -o ssyr2k.o ../ssyr2k.f f77 -g -pipe -O2 -Wall -c -o c9ln2r.o ../c9ln2r.f f77 -g -pipe -O2 -Wall -c -o ctbsv.o ../ctbsv.f ../ctbsv.f:231:0: 231 | KX = KX + ( N - 1 )*INCX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dgmres.o ../dgmres.f ../dgmres.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, SB, SX, RGWK, LRGW, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o dsluom.o ../dsluom.f f77 -g -pipe -O2 -Wall -c -o lsei.o ../lsei.f ../lsei.f:491:13: 491 | LINK = PRGOPT(1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../lsei.f:506:15: 506 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../lsei.f:521:16: 521 | NEXT = PRGOPT(LINK) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../lsei.f:577:0: 577 | IF (I.NE.IMAX) CALL SSWAP (NP1, W(I,1), MDW, W(IMAX,1), MDW) | Warning: 'imax' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o rs.o ../rs.f f77 -g -pipe -O2 -Wall -c -o ssyrk.o ../ssyrk.f f77 -g -pipe -O2 -Wall -c -o cacai.o ../cacai.f ../cacai.f:81:12: 81 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o ctpmv.o ../ctpmv.f ../ctpmv.f:110:0: 110 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dgtsl.o ../dgtsl.f f77 -g -pipe -O2 -Wall -c -o dsluti.o ../dsluti.f ../dsluti.f:2:49: 2 | SUBROUTINE DSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../dsluti.f:2:42: 2 | SUBROUTINE DSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../dsluti.f:2:55: 2 | SUBROUTINE DSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../dsluti.f:2:46: 2 | SUBROUTINE DSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o lsi.o ../lsi.f ../lsi.f:93:13: 93 | LINK = PRGOPT(1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../lsi.f:96:15: 96 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../lsi.f:100:16: 100 | NEXT = PRGOPT(LINK) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o rsb.o ../rsb.f f77 -g -pipe -O2 -Wall -c -o stbmv.o ../stbmv.f ../stbmv.f:150:0: 150 | INTEGER I, INFO, IX, J, JX, KPLUS1, KX, L | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cacon.o ../cacon.f ../cacon.f:60:12: 60 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cacon.f:133:0: 133 | S1 = SC1*CSS(KFLAG) | Warning: 'IMAGPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cacon.f:133:0: Warning: 'REALPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ctpsv.o ../ctpsv.f ../ctpsv.f:113:0: 113 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dh12.o ../dh12.f f77 -g -pipe -O2 -Wall -c -o dslvs.o ../dslvs.f ../dslvs.f:2:39: 2 | SUBROUTINE DSLVS (WM, IWM, X, TEM) | 1 Warning: Unused dummy argument 'tem' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o lsod.o ../lsod.f ../lsod.f:257:72: 257 | 210 YPOUT(L) = YH(L,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../lsod.f:271:72: 271 | 225 EWT(L) = TOL | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 225 at (1) ../lsod.f:281:72: 281 | 230 YH(L,2) = H*YH(L,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../lsod.f:314:72: 314 | 280 Y(L) = YH(L,1) + (DT/H)*YH(L,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../lsod.f:367:72: 367 | 360 ATOL(L) = TOLFAC*ATOL(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../lsod.f:404:72: 404 | 555 YPOUT(L) = YH(L,2)/H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 555 at (1) f77 -g -pipe -O2 -Wall -c -o rsco.o ../rsco.f ../rsco.f:40:72: 40 | 10 RLS(I) = RSAV(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../rsco.f:42:72: 42 | 20 ILS(I) = ISAV(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) f77 -g -pipe -O2 -Wall -c -o stbsv.o ../stbsv.f ../stbsv.f:300:0: 300 | TEMP = X( JX ) | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cacos.o ../cacos.f f77 -g -pipe -O2 -Wall -c -o ctrco.o ../ctrco.f f77 -g -pipe -O2 -Wall -c -o dhels.o ../dhels.f f77 -g -pipe -O2 -Wall -c -o dsmmi2.o ../dsmmi2.f f77 -g -pipe -O2 -Wall -c -o lssods.o ../lssods.f ../lssods.f:152:72: 152 | DO 10 K=1,M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../lssods.f:153:72: 153 | 10 Q(K,J)=A(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../lssods.f:173:72: 173 | 13 DIV(K)=DIAG(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 13 at (1) ../lssods.f:183:72: 183 | 20 X(K)=0. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../lssods.f:196:72: 196 | 30 R(K)=B(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../lssods.f:211:72: 211 | DO 35 K=J,M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 35 at (1) ../lssods.f:212:72: 212 | 35 R(K)=R(K)+GAMMA*Q(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 35 at (1) ../lssods.f:221:72: 221 | 40 Z(K)=(R(K)-SDOT(L,Q(K,KP),NRDA,Z(KP),1))/DIV(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../lssods.f:230:72: 230 | 50 Z(K)=0. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../lssods.f:235:72: 235 | DO 55 J=IRP,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 55 at (1) ../lssods.f:236:72: 236 | 55 Z(J)=Z(J)+GAM*Q(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 55 at (1) ../lssods.f:244:72: 244 | 65 X(L)=X(L)+Z(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 65 at (1) ../lssods.f:267:72: 267 | 85 R(K)=-SDSDOT(N,-B(K),A(K,1),NRDA,X(1),1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 85 at (1) ../lssods.f:293:72: 293 | 100 ZNRM0=ZNORM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -O2 -Wall -c -o rsg.o ../rsg.f f77 -g -pipe -O2 -Wall -c -o steps.o ../steps.f ../steps.f:212:72: 212 | 10 ROUND = ROUND + (Y(L)/WT(L))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../steps.f:229:72: 229 | 20 PHI(L,2) = 0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../steps.f:251:72: 251 | 25 PHI(L,15) = 0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 25 at (1) ../steps.f:290:72: 290 | 105 SIG(I+1) = REALI*ALPHA(I)*SIG(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 105 at (1) ../steps.f:301:72: 301 | 115 W(IQ) = V(IQ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 115 at (1) ../steps.f:328:72: 328 | 125 W(I) = V(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) ../steps.f:339:72: 339 | 135 W(IQ) = V(IQ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 135 at (1) ../steps.f:358:72: 358 | 145 W(IQ) = W(IQ) - TEMP6*W(IQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 145 at (1) ../steps.f:359:72: 359 | 150 G(I) = W(1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../steps.f:379:72: 379 | 205 PHI(L,I) = TEMP1*PHI(L,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 205 at (1) ../steps.f:387:72: 387 | 220 P(L) = 0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../steps.f:394:72: 394 | 225 PHI(L,I) = PHI(L,I) + PHI(L,IP1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 225 at (1) ../steps.f:400:72: 400 | 235 PHI(L,16) = (P(L) - Y(L)) - TAU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 235 at (1) ../steps.f:403:72: 403 | 245 P(L) = Y(L) + H*P(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 245 at (1) ../steps.f:417:72: 417 | IF(KM2)265,260,255 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../steps.f:420:72: 420 | 265 ERK = ERK + (TEMP4*TEMP3)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 265 at (1) ../steps.f:421:72: 421 | IF(KM2)280,275,270 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../steps.f:431:72: 431 | IF(KM2)299,290,285 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../steps.f:457:72: 457 | 305 PHI(L,I) = TEMP1*(PHI(L,I) - PHI(L,IP1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 305 at (1) ../steps.f:461:72: 461 | 315 PSI(I-1) = PSI(I) - H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 315 at (1) ../steps.f:468:72: 468 | IF(IFAIL - 3) 335,330,325 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../steps.f:499:72: 499 | 405 P(L) = TEMP3 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 405 at (1) ../steps.f:504:72: 504 | 415 P(L) = TEMP3 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 415 at (1) ../steps.f:511:72: 511 | 425 PHI(L,KP2) = PHI(L,KP1) - PHI(L,KP2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 425 at (1) ../steps.f:514:72: 514 | 430 PHI(L,I) = PHI(L,I) + PHI(L,KP1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 430 at (1) ../steps.f:528:72: 528 | 440 ERKP1 = ERKP1 + (PHI(L,KP2)/WT(L))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 440 at (1) f77 -g -pipe -O2 -Wall -c -o cacosh.o ../cacosh.f f77 -g -pipe -O2 -Wall -c -o ctrdi.o ../ctrdi.f f77 -g -pipe -O2 -Wall -c -o dheqr.o ../dheqr.f f77 -g -pipe -O2 -Wall -c -o dsmmti.o ../dsmmti.f ../dsmmti.f:2:49: 2 | SUBROUTINE DSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../dsmmti.f:2:42: 2 | SUBROUTINE DSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../dsmmti.f:2:55: 2 | SUBROUTINE DSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../dsmmti.f:2:46: 2 | SUBROUTINE DSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o lssuds.o ../lssuds.f ../lssuds.f:152:72: 152 | DO 10 J=1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../lssuds.f:153:72: 153 | 10 Q(J,K)=A(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../lssuds.f:174:72: 174 | 20 DIV(K)=DIAG(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../lssuds.f:199:72: 199 | 45 X(K)=B(KP) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 45 at (1) ../lssuds.f:201:72: 201 | 50 S(K)=X(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../lssuds.f:219:72: 219 | DO 55 J=IRP,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 55 at (1) ../lssuds.f:220:72: 220 | 55 S(J)=S(J)+GAM*Q(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 55 at (1) ../lssuds.f:233:72: 233 | 65 S(K)=(S(K)-SDOT(K-1,Q(K,1),NRDA,S(1),1))/DIV(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 65 at (1) ../lssuds.f:246:72: 246 | DO 80 K=J,M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 80 at (1) ../lssuds.f:247:72: 247 | 80 X(K)=X(K)+GAMMA*Q(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../lssuds.f:252:72: 252 | 85 X(K)=X(K)*SCALES(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 85 at (1) ../lssuds.f:265:72: 265 | DO 100 JR=1,IRANK | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../lssuds.f:269:72: 269 | DO 100 I=J,M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../lssuds.f:270:72: 270 | 100 U(I,K)=U(I,K)+GAMMA*Q(J,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -O2 -Wall -c -o rsgab.o ../rsgab.f f77 -g -pipe -O2 -Wall -c -o stin.o ../stin.f f77 -g -pipe -O2 -Wall -c -o cairy.o ../cairy.f f77 -g -pipe -O2 -Wall -c -o ctrmm.o ../ctrmm.f f77 -g -pipe -O2 -Wall -c -o dhfti.o ../dhfti.f f77 -g -pipe -O2 -Wall -c -o dsmtv.o ../dsmtv.f f77 -g -pipe -O2 -Wall -c -o macon.o ../macon.f ../macon.f:29:11: 29 | LPAR=0.5*DD | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../macon.f:30:9: 30 | KE=0.5+0.75*DD | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o rsgba.o ../rsgba.f f77 -g -pipe -O2 -Wall -c -o stod.o ../stod.f ../stod.f:166:72: 166 | 125 EL(I) = ELCO(I,NQ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) ../stod.f:187:72: 187 | 155 EL(I) = ELCO(I,NQ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 155 at (1) ../stod.f:210:72: 210 | DO 180 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 180 at (1) ../stod.f:211:72: 211 | 180 YH(I,J) = YH(I,J)*R | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../stod.f:231:72: 231 | 210 YH1(I) = YH1(I) + YH1(I+NYH) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../stod.f:242:72: 242 | 230 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../stod.f:259:72: 259 | 260 ACOR(I) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) ../stod.f:267:72: 267 | 290 Y(I) = SAVF(I) - ACOR(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../stod.f:271:72: 271 | 300 ACOR(I) = SAVF(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../stod.f:279:72: 279 | 360 Y(I) = H*SAVF(I) - (YH(I,2) + ACOR(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../stod.f:285:72: 285 | 380 Y(I) = YH(I,1) + EL(1)*ACOR(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../stod.f:317:72: 317 | 440 YH1(I) = YH1(I) - YH1(I+NYH) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 440 at (1) ../stod.f:351:72: 351 | DO 470 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 470 at (1) ../stod.f:352:72: 352 | 470 YH(I,J) = YH(I,J) + EL(J)*ACOR(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 470 at (1) ../stod.f:358:72: 358 | 490 YH(I,LMAX) = ACOR(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 490 at (1) ../stod.f:373:72: 373 | 510 YH1(I) = YH1(I) - YH1(I+NYH) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../stod.f:393:72: 393 | 530 SAVF(I) = ACOR(I) - YH(I,LMAX) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 530 at (1) ../stod.f:420:72: 420 | 600 YH(I,NEWQ+1) = ACOR(I)*R | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 600 at (1) ../stod.f:450:72: 450 | 645 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 645 at (1) ../stod.f:454:72: 454 | 650 YH(I,2) = H*SAVF(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 650 at (1) ../stod.f:473:72: 473 | 695 ACOR(I) = ACOR(I)*R | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 695 at (1) ../stod.f:295:0: 295 | IF (M .GE. 2 .AND. DEL .GT. 2.0E0*DELP) GO TO 410 | Warning: 'delp' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o carg.o ../carg.f f77 -g -pipe -O2 -Wall -c -o ctrmv.o ../ctrmv.f ../ctrmv.f:113:0: 113 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dhkseq.o ../dhkseq.f f77 -g -pipe -O2 -Wall -c -o dsmv.o ../dsmv.f f77 -g -pipe -O2 -Wall -c -o rsp.o ../rsp.f f77 -g -pipe -O2 -Wall -c -o stor1.o ../stor1.f ../stor1.f:39:72: 39 | 10 U(J) = YH(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../stor1.f:46:72: 46 | 20 V(J) = 0. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../stor1.f:54:72: 54 | 40 V(J) = YP(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../stor1.f:58:72: 58 | 60 V(J) = C * YP(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) f77 -g -pipe -O2 -Wall -c -o casin.o ../casin.f ../casin.f:34:18: 34 | NTERMS = -0.4343*LOG(R1MACH(3)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o ctrsl.o ../ctrsl.f f77 -g -pipe -O2 -Wall -c -o dhstrt.o ../dhstrt.f f77 -g -pipe -O2 -Wall -c -o dsort.o ../dsort.f f77 -g -pipe -O2 -Wall -c -o mc20ad.o ../mc20ad.f f77 -g -pipe -O2 -Wall -c -o rst.o ../rst.f f77 -g -pipe -O2 -Wall -c -o stout.o ../stout.f f77 -g -pipe -O2 -Wall -c -o casinh.o ../casinh.f f77 -g -pipe -O2 -Wall -c -o ctrsm.o ../ctrsm.f f77 -g -pipe -O2 -Wall -c -o dhvnrm.o ../dhvnrm.f f77 -g -pipe -O2 -Wall -c -o dsos.o ../dsos.f f77 -g -pipe -O2 -Wall -c -o mc20as.o ../mc20as.f f77 -g -pipe -O2 -Wall -c -o rt.o ../rt.f f77 -g -pipe -O2 -Wall -c -o stpmv.o ../stpmv.f ../stpmv.f:110:0: 110 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o casyi.o ../casyi.f ../casyi.f:64:11: 64 | JL = RL+RL + 2 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../casyi.f:72:12: 72 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o ctrsv.o ../ctrsv.f ../ctrsv.f:116:0: 116 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dintp.o ../dintp.f ../dintp.f:79:72: 79 | 10 W(IQ) = XIQ/TEMP1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../dintp.f:93:72: 93 | 40 GDI = OW(KP2-I) - ALPHA(I)*GDI | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../dintp.f:109:72: 109 | 70 W(JQ) = GAMMA*W(JQ) - ALP*W(JQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../dintp.f:111:72: 111 | 80 C(I+1) = GAMMA*C(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../dintp.f:124:72: 124 | 100 YPOUT(L) = 0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../dintp.f:132:72: 132 | 110 YPOUT(L) = YPOUT(L) + TEMP3*PHI(L,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../dintp.f:138:72: 138 | 1 (YPOUT(L) + (C(1) + RMU*OG(1))*PHI(L,1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../dintp.f:85:0: 85 | GDI = 1.0D0/TEMP1 | Warning: 'temp1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dsoseq.o ../dsoseq.f ../dsoseq.f:3:47: 3 | + NCJS, NSRRC, NSRI, IPRINT, FMAX, C, NC, B, P, TEMP, X, Y, FAC, | 1 Warning: Unused dummy argument 'nc' at (1) [-Wunused-dummy-argument] ../dsoseq.f:475:0: 475 | IF (FN1 .GT. 5.0D0*FMIN .OR. FN2 .GT. 5.0D0*FMIN) | Warning: 'fmin' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dsoseq.f:295:0: 295 | KD = ISV - K | Warning: 'isv' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o mgsbv.o ../mgsbv.f ../mgsbv.f:141:72: 141 | 50 KJ=KJ+NN-J | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../mgsbv.f:159:72: 159 | 65 KJ=KJ+NFCC-K | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 65 at (1) ../mgsbv.f:169:72: 169 | 70 A(L,NR)=T | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../mgsbv.f:199:72: 199 | 90 A(I,J)=A(I,J)-P(JP)*A(I,NR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) ../mgsbv.f:211:72: 211 | 95 A(L,J)=A(L,J)+PJP*A(K,NR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 95 at (1) ../mgsbv.f:239:72: 239 | 130 V(I)=V(I)-W(LR)*A(I,NR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../mgsbv.f:246:72: 246 | 135 V(L)=V(L)-W(LR)*A(K,NR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 135 at (1) ../mgsbv.f:80:0: 80 | 10 JP=0 | Warning: 'jp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../mgsbv.f:108:0: 108 | IF (N .NE. NFCC) LIX=2*IX-1 | Warning: 'ix' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o runif.o ../runif.f ../runif.f:73:10: 73 | 20 J = T(NOLD+1)*FLOATN + 1. | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o stpsv.o ../stpsv.f ../stpsv.f:113:0: 113 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o catan.o ../catan.f ../catan.f:35:18: 35 | NTERMS = -0.4343*LOG(R1MACH(3)) + 1.0 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o cuchk.o ../cuchk.f f77 -g -pipe -O2 -Wall -c -o dintrv.o ../dintrv.f f77 -g -pipe -O2 -Wall -c -o dsossl.o ../dsossl.f f77 -g -pipe -O2 -Wall -c -o minfit.o ../minfit.f ../minfit.f:116:72: 116 | 120 SCALE = SCALE + ABS(A(K,I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../minfit.f:135:72: 135 | 140 S = S + A(K,I) * A(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../minfit.f:139:72: 139 | DO 150 K = I, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) ../minfit.f:149:72: 149 | 170 S = S + A(K,I) * B(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../minfit.f:153:72: 153 | DO 180 K = I, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 180 at (1) ../minfit.f:158:72: 158 | 200 A(K,I) = SCALE * A(K,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../minfit.f:167:72: 167 | 220 SCALE = SCALE + ABS(A(I,K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../minfit.f:182:72: 182 | 240 RV1(K) = A(I,K) / H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../minfit.f:190:72: 190 | 250 S = S + A(J,K) * A(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../minfit.f:192:72: 192 | DO 260 K = L, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../minfit.f:197:72: 197 | 280 A(I,K) = SCALE * A(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../minfit.f:210:72: 210 | 320 A(J,I) = (A(I,J) / A(I,L)) / G | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../minfit.f:216:72: 216 | 340 S = S + A(I,K) * A(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1) ../minfit.f:218:72: 218 | DO 350 K = L, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 350 at (1) ../minfit.f:237:72: 237 | DO 500 J = 1, IP | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 500 at (1) ../minfit.f:348:72: 348 | 690 A(J,K) = -A(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 690 at (1) ../minfit.f:95:0: 95 | INTEGER I,J,K,L,M,N,II,IP,I1,KK,K1,LL,L1,M1,NM,ITS,IERR | Warning: 'l1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o rwupdt.o ../rwupdt.f f77 -g -pipe -O2 -Wall -c -o strco.o ../strco.f f77 -g -pipe -O2 -Wall -c -o catan2.o ../catan2.f f77 -g -pipe -O2 -Wall -c -o cunhj.o ../cunhj.f f77 -g -pipe -O2 -Wall -c -o dintyd.o ../dintyd.f f77 -g -pipe -O2 -Wall -c -o dspco.o ../dspco.f f77 -g -pipe -O2 -Wall -c -o minso4.o ../minso4.f ../minso4.f:2:50: 2 | SUBROUTINE MINSO4 (USOL, IDMN, ZN, ZM, PERTB) | 1 Warning: Unused dummy argument 'pertb' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o s1merg.o ../s1merg.f f77 -g -pipe -O2 -Wall -c -o strdi.o ../strdi.f f77 -g -pipe -O2 -Wall -c -o catanh.o ../catanh.f f77 -g -pipe -O2 -Wall -c -o cuni1.o ../cuni1.f f77 -g -pipe -O2 -Wall -c -o dir.o ../dir.f f77 -g -pipe -O2 -Wall -c -o dspdi.o ../dspdi.f f77 -g -pipe -O2 -Wall -c -o minsol.o ../minsol.f ../minsol.f:2:50: 2 | SUBROUTINE MINSOL (USOL, IDMN, ZN, ZM, PERTB) | 1 Warning: Unused dummy argument 'pertb' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o sasum.o ../sasum.f f77 -g -pipe -O2 -Wall -c -o strmm.o ../strmm.f f77 -g -pipe -O2 -Wall -c -o caxpy.o ../caxpy.f f77 -g -pipe -O2 -Wall -c -o cuni2.o ../cuni2.f ../cuni2.f:66:12: 66 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o djairy.o ../djairy.f f77 -g -pipe -O2 -Wall -c -o dspenc.o ../dspenc.f f77 -g -pipe -O2 -Wall -c -o mpadd.o ../mpadd.f f77 -g -pipe -O2 -Wall -c -o saxpy.o ../saxpy.f ../saxpy.f:51:72: 51 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o strmv.o ../strmv.f ../strmv.f:113:0: 113 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cbabk2.o ../cbabk2.f ../cbabk2.f:93:13: 93 | K = SCALE(I) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o cunik.o ../cunik.f f77 -g -pipe -O2 -Wall -c -o dlbeta.o ../dlbeta.f f77 -g -pipe -O2 -Wall -c -o dspfa.o ../dspfa.f f77 -g -pipe -O2 -Wall -c -o mpadd2.o ../mpadd2.f ../mpadd2.f:72:72: 72 | IF (ED) 90, 70, 120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpadd2.f:76:72: 76 | IF (X(J+2) - Y(J+2)) 100, 80, 130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o sbcg.o ../sbcg.f ../sbcg.f:335:0: 335 | BK = BKNUM/BKDEN | Warning: 'bkden' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o strsl.o ../strsl.f f77 -g -pipe -O2 -Wall -c -o cbal.o ../cbal.f ../cbal.f:157:72: 157 | 180 SCALE(I) = 1.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) f77 -g -pipe -O2 -Wall -c -o cunk1.o ../cunk1.f ../cunk1.f:207:12: 207 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cunk1.f:28:0: 28 | INTEGER I, IB, IFLAG, IFN, IL, INIT, INU, IUF, K, KDFLG, KFLAG, | Warning: 'iflag' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cunk1.f:171:0: 171 | C1 = CSR(KFLAG) | Warning: 'kflag' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dlgams.o ../dlgams.f ../dlgams.f:33:12: 33 | INT = MOD (-AINT(X), 2.0D0) + 0.1D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dsplp.o ../dsplp.f ../dsplp.f:1580:11: 1580 | 20008 NEXT=PRGOPT(LAST) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dsplp.f:1599:12: 1599 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dsplp.f:1607:10: 1607 | LMX=PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dsplp.f:1608:10: 1608 | LBM=PRGOPT(LAST+4) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o mpadd3.o ../mpadd3.f ../mpadd3.f:81:72: 81 | 100 R(I+1) = R(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -O2 -Wall -c -o sbhin.o ../sbhin.f f77 -g -pipe -O2 -Wall -c -o strsm.o ../strsm.f f77 -g -pipe -O2 -Wall -c -o cbesh.o ../cbesh.f ../cbesh.f:285:12: 285 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o cunk2.o ../cunk2.f ../cunk2.f:69:12: 69 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cunk2.f:33:0: 33 | INTEGER I, IB, IFLAG, IFN, IL, IN, INU, IUF, K, KDFLG, KFLAG, KK, | Warning: 'iflag' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cunk2.f:209:0: 209 | C1 = CSR(KFLAG) | Warning: 'kflag' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dli.o ../dli.f f77 -g -pipe -O2 -Wall -c -o dspmv.o ../dspmv.f f77 -g -pipe -O2 -Wall -c -o mpblas.o ../mpblas.f f77 -g -pipe -O2 -Wall -c -o sbocls.o ../sbocls.f ../sbocls.f:1121:0: 1121 | IF (ANORM.GT.ZERO) WT = WT/ANORM | Warning: 'srelpr' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sbocls.f:994:0: 994 | IF (ACCUM .OR. PRETRI) THEN | Warning: 'pretri' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sbocls.f:715:0: 715 | LOCACC = LP + 2 | Warning: 'locacc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sbocls.f:1138:0: 1138 | * RNORM,MODE,RW(LRW),IW(LIW)) | Warning: 'lbou' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sbocls.f:1012:0: 1012 | IF (MCON.GT.0 .AND. FILTER) THEN | Warning: 'filter' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o strsv.o ../strsv.f ../strsv.f:116:0: 116 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cbesi.o ../cbesi.f ../cbesi.f:215:12: 215 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o cuoik.o ../cuoik.f f77 -g -pipe -O2 -Wall -c -o dllsia.o ../dllsia.f f77 -g -pipe -O2 -Wall -c -o dspr.o ../dspr.f ../dspr.f:96:0: 96 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o mpcdm.o ../mpcdm.f ../mpcdm.f:41:72: 41 | IF (DX) 20, 10, 30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpcdm.f:70:72: 70 | 80 DJ = DJ - DBLE(R(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../mpcdm.f:76:72: 76 | IF (IE) 90, 130, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o sbols.o ../sbols.f f77 -g -pipe -O2 -Wall -c -o stway.o ../stway.f ../stway.f:47:72: 47 | 25 STOWA(KSJ)=YHP(KSJ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 25 at (1) ../stway.f:62:72: 62 | 125 YHP(KSJ)=STOWA(KSJ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) ../stway.f:70:72: 70 | 175 BACKSPACE NTAPE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 175 at (1) f77 -g -pipe -O2 -Wall -c -o cbesj.o ../cbesj.f ../cbesj.f:208:12: 208 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o cv.o ../cv.f f77 -g -pipe -O2 -Wall -c -o dllti2.o ../dllti2.f f77 -g -pipe -O2 -Wall -c -o dspr2.o ../dspr2.f ../dspr2.f:107:0: 107 | INTEGER I, INFO, IX, IY, J, JX, JY, K, KK, KX, KY | Warning: 'ky' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dspr2.f:107:0: Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dspr2.f:107:0: Warning: 'jy' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dspr2.f:107:0: Warning: 'jx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o mpchk.o ../mpchk.f f77 -g -pipe -O2 -Wall -c -o sbolsm.o ../sbolsm.f ../sbolsm.f:1046:5: 1046 | 350 JDROP = JDROP1 + JDROP2 | 1 Warning: Label 350 at (1) defined but not used [-Wunused-label] ../sbolsm.f:837:0: 837 | JBIG = JMAG | Warning: 'jmag' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sbolsm.f:832:0: 832 | JBIG = JLARGE | Warning: 'jlarge' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sbolsm.f:1045:0: 1045 | 340 IF (JDROP1+JDROP2.LE.0 .OR. NSETB.LE.0) GO TO 580 | Warning: 'jdrop2' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sbolsm.f:972:0: 972 | JDROP1 = J | Warning: 'jdrop1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o suds.o ../suds.f f77 -g -pipe -O2 -Wall -c -o cbesk.o ../cbesk.f f77 -g -pipe -O2 -Wall -c -o cwrsk.o ../cwrsk.f f77 -g -pipe -O2 -Wall -c -o dlngam.o ../dlngam.f ../dlngam.f:59:0: 59 | IF (X.GT.0.D0) RETURN | Warning: '__result_dlngam' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dspsl.o ../dspsl.f f77 -g -pipe -O2 -Wall -c -o mpcmd.o ../mpcmd.f ../mpcmd.f:48:0: 48 | 20 DZ = DZ*(DB**(X(2)-TM)) | Warning: 'tm' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o scasum.o ../scasum.f f77 -g -pipe -O2 -Wall -c -o svco.o ../svco.f ../svco.f:40:72: 40 | 10 RSAV(I) = RLS(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../svco.f:42:72: 42 | 20 ISAV(I) = ILS(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) f77 -g -pipe -O2 -Wall -c -o cbesy.o ../cbesy.f f77 -g -pipe -O2 -Wall -c -o d1mach.o ../d1mach.f f951: Warning: Nonconforming tab character in column 1 of line 73 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 75 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 78 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 493 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 494 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 495 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 496 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 497 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 498 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 499 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 500 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 501 [-Wtabs] f77 -g -pipe -O2 -Wall -c -o dlnrel.o ../dlnrel.f ../dlnrel.f:2:0: 2 | DOUBLE PRECISION FUNCTION DLNREL (X) | Warning: '__result_dlnrel' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dsteps.o ../dsteps.f ../dsteps.f:221:72: 221 | 10 ROUND = ROUND + (Y(L)/WT(L))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../dsteps.f:238:72: 238 | 20 PHI(L,2) = 0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../dsteps.f:260:72: 260 | 25 PHI(L,15) = 0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 25 at (1) ../dsteps.f:299:72: 299 | 105 SIG(I+1) = REALI*ALPHA(I)*SIG(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 105 at (1) ../dsteps.f:310:72: 310 | 115 W(IQ) = V(IQ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 115 at (1) ../dsteps.f:337:72: 337 | 125 W(I) = V(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) ../dsteps.f:348:72: 348 | 135 W(IQ) = V(IQ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 135 at (1) ../dsteps.f:367:72: 367 | 145 W(IQ) = W(IQ) - TEMP6*W(IQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 145 at (1) ../dsteps.f:368:72: 368 | 150 G(I) = W(1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../dsteps.f:388:72: 388 | 205 PHI(L,I) = TEMP1*PHI(L,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 205 at (1) ../dsteps.f:396:72: 396 | 220 P(L) = 0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../dsteps.f:403:72: 403 | 225 PHI(L,I) = PHI(L,I) + PHI(L,IP1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 225 at (1) ../dsteps.f:409:72: 409 | 235 PHI(L,16) = (P(L) - Y(L)) - TAU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 235 at (1) ../dsteps.f:412:72: 412 | 245 P(L) = Y(L) + H*P(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 245 at (1) ../dsteps.f:426:72: 426 | IF(KM2)265,260,255 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dsteps.f:429:72: 429 | 265 ERK = ERK + (TEMP4*TEMP3)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 265 at (1) ../dsteps.f:430:72: 430 | IF(KM2)280,275,270 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dsteps.f:440:72: 440 | IF(KM2)299,290,285 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dsteps.f:466:72: 466 | 305 PHI(L,I) = TEMP1*(PHI(L,I) - PHI(L,IP1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 305 at (1) ../dsteps.f:470:72: 470 | 315 PSI(I-1) = PSI(I) - H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 315 at (1) ../dsteps.f:477:72: 477 | IF(IFAIL - 3) 335,330,325 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dsteps.f:508:72: 508 | 405 P(L) = TEMP3 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 405 at (1) ../dsteps.f:513:72: 513 | 415 P(L) = TEMP3 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 415 at (1) ../dsteps.f:520:72: 520 | 425 PHI(L,KP2) = PHI(L,KP1) - PHI(L,KP2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 425 at (1) ../dsteps.f:523:72: 523 | 430 PHI(L,I) = PHI(L,I) + PHI(L,KP1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 430 at (1) ../dsteps.f:537:72: 537 | 440 ERKP1 = ERKP1 + (PHI(L,KP2)/WT(L))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 440 at (1) f77 -g -pipe -O2 -Wall -c -o mpdivi.o ../mpdivi.f ../mpdivi.f:35:72: 35 | IF (J) 30, 10, 40 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpdivi.f:68:72: 68 | IF (R1) 210, 70, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpdivi.f:80:72: 80 | 90 C = B*(C - J*R(K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) ../mpdivi.f:85:72: 85 | 110 C = B*(C - J*R(K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../mpdivi.f:100:72: 100 | IF (C-J1) 140, 150, 160 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o scg.o ../scg.f ../scg.f:308:0: 308 | BK = BKNUM/BKDEN | Warning: 'bkden' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o svd.o ../svd.f ../svd.f:103:72: 103 | DO 100 J = 1, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../svd.f:120:72: 120 | 120 SCALE = SCALE + ABS(U(K,I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../svd.f:139:72: 139 | 140 S = S + U(K,I) * U(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../svd.f:143:72: 143 | DO 150 K = I, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) ../svd.f:148:72: 148 | 200 U(K,I) = SCALE * U(K,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../svd.f:157:72: 157 | 220 SCALE = SCALE + ABS(U(I,K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../svd.f:172:72: 172 | 240 RV1(K) = U(I,K) / H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../svd.f:180:72: 180 | 250 S = S + U(J,K) * U(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../svd.f:182:72: 182 | DO 260 K = L, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../svd.f:187:72: 187 | 280 U(I,K) = SCALE * U(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../svd.f:201:72: 201 | 320 V(J,I) = (U(I,J) / U(I,L)) / G | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../svd.f:207:72: 207 | 340 S = S + U(I,K) * V(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1) ../svd.f:209:72: 209 | DO 350 K = L, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 350 at (1) ../svd.f:235:72: 235 | 420 U(I,J) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1) ../svd.f:244:72: 244 | 440 S = S + U(K,I) * U(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 440 at (1) ../svd.f:248:72: 248 | DO 450 K = I, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 450 at (1) ../svd.f:253:72: 253 | 470 U(J,I) = U(J,I) / G | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 470 at (1) ../svd.f:258:72: 258 | 480 U(J,I) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 480 at (1) ../svd.f:372:72: 372 | 690 V(J,K) = -V(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 690 at (1) ../svd.f:92:0: 92 | INTEGER I,J,K,L,M,N,II,I1,KK,K1,LL,L1,MN,NM,ITS,IERR | Warning: 'l1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cbeta.o ../cbeta.f ../cbeta.f:44:0: 44 | IF (REAL(A)+REAL(B).LT.XMAX) RETURN | Warning: '__result_cbeta' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o d1merg.o ../d1merg.f f77 -g -pipe -O2 -Wall -c -o dlpdoc.o ../dlpdoc.f f77 -g -pipe -O2 -Wall -c -o dstod.o ../dstod.f f77 -g -pipe -O2 -Wall -c -o mperr.o ../mperr.f f77 -g -pipe -O2 -Wall -c -o scgn.o ../scgn.f ../scgn.f:333:0: 333 | BK = BKNUM/BKDEN | Warning: 'bkden' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o svecs.o ../svecs.f ../svecs.f:50:72: 50 | 6 YHP(K,LNFC+1)=YHP(K,LNFCC+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 6 at (1) f77 -g -pipe -O2 -Wall -c -o cbinu.o ../cbinu.f ../cbinu.f:100:12: 100 | NUI = FNUL-DFNU + 1 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o d1mpyq.o ../d1mpyq.f f77 -g -pipe -O2 -Wall -c -o dlpdp.o ../dlpdp.f f77 -g -pipe -O2 -Wall -c -o dstor1.o ../dstor1.f f77 -g -pipe -O2 -Wall -c -o mpmaxr.o ../mpmaxr.f ../mpmaxr.f:34:72: 34 | 10 X(I+2) = IT | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -O2 -Wall -c -o scgs.o ../scgs.f f77 -g -pipe -O2 -Wall -c -o svout.o ../svout.f f77 -g -pipe -O2 -Wall -c -o cbiry.o ../cbiry.f f77 -g -pipe -O2 -Wall -c -o d1updt.o ../d1updt.f ../d1updt.f:2:36: 2 | SUBROUTINE D1UPDT (M, N, S, LS, U, V, W, SING) | 1 Warning: Unused dummy argument 'ls' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o dlsei.o ../dlsei.f ../dlsei.f:492:13: 492 | LINK = PRGOPT(1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dlsei.f:507:15: 507 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dlsei.f:522:16: 522 | NEXT = PRGOPT(LINK) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dlsei.f:578:0: 578 | IF (I.NE.IMAX) CALL DSWAP (NP1, W(I,1), MDW, W(IMAX,1), MDW) | Warning: 'imax' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dstway.o ../dstway.f f77 -g -pipe -O2 -Wall -c -o mpmlp.o ../mpmlp.f ../mpmlp.f:25:72: 25 | 10 U(I) = U(I) + W*V(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -O2 -Wall -c -o schdc.o ../schdc.f f77 -g -pipe -O2 -Wall -c -o swritp.o ../swritp.f f77 -g -pipe -O2 -Wall -c -o cbknu.o ../cbknu.f ../cbknu.f:65:12: 65 | INU = FNU+0.5E0 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cbknu.f:256:10: 256 | K = FK | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cbknu.f:430:0: 430 | Y(2) = S2 | Warning: 'IMAGPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cbknu.f:430:0: Warning: 'REALPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cbknu.f:356:0: 356 | CK = CK + RZ | Warning: 'IMAGPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cbknu.f:356:0: Warning: 'REALPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o d9aimp.o ../d9aimp.f f77 -g -pipe -O2 -Wall -c -o dlsi.o ../dlsi.f ../dlsi.f:95:13: 95 | LINK = PRGOPT(1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dlsi.f:98:15: 98 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dlsi.f:102:16: 102 | NEXT = PRGOPT(LINK) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dsuds.o ../dsuds.f f77 -g -pipe -O2 -Wall -c -o mpmul.o ../mpmul.f ../mpmul.f:53:72: 53 | 20 R(I) = 0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../mpmul.f:72:72: 72 | 30 R(J1) = RI - B*C | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../mpmul.f:84:72: 84 | 50 R(J1) = RI - B*C | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) f77 -g -pipe -O2 -Wall -c -o schdd.o ../schdd.f f77 -g -pipe -O2 -Wall -c -o sxlcal.o ../sxlcal.f f77 -g -pipe -O2 -Wall -c -o cblkt1.o ../cblkt1.f ../cblkt1.f:55:72: 55 | IF (I-NM) 101,101,108 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:60:72: 60 | IF (I-IF) 102,108,108 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:68:72: 68 | IF (IPI2-NM) 105,105,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:83:72: 83 | IF (NPP) 132,110,132 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:125:72: 125 | IF (I-I2-IZR) 117,114,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:126:72: 126 | 114 IF (I-NM) 115,115,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:139:72: 139 | IF (I-NM) 117,119,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:147:72: 147 | IF (NCMPLX) 121,122,121 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:190:72: 190 | IF (IPI2-IZR) 127,128,127 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:191:72: 191 | 127 IF (I-IZR) 130,131,130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:219:72: 219 | IF (I-NM) 133,133,143 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:229:72: 229 | IF (I-I2) 134,134,136 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:236:72: 236 | 137 IF (IPI2-NM) 140,140,138 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:2:34: 2 | SUBROUTINE CBLKT1 (N, AN, BN, CN, M, AM, BM, CM, IDIMY, Y, B, W1, | 1 Warning: Unused dummy argument 'bn' at (1) [-Wunused-dummy-argument] ../cblkt1.f:2:26: 2 | SUBROUTINE CBLKT1 (N, AN, BN, CN, M, AM, BM, CM, IDIMY, Y, B, W1, | 1 Warning: Unused dummy argument 'n' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o d9atn1.o ../d9atn1.f f77 -g -pipe -O2 -Wall -c -o dlsod.o ../dlsod.f f77 -g -pipe -O2 -Wall -c -o dsvco.o ../dsvco.f f77 -g -pipe -O2 -Wall -c -o mpmul2.o ../mpmul2.f ../mpmul2.f:39:72: 39 | IF (J) 20, 10, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpmul2.f:71:72: 71 | 60 R(I+4) = RI - B*C | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../mpmul2.f:79:72: 79 | 70 R(I) = RI - B*C | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../mpmul2.f:84:72: 84 | 90 R(I+1) = R(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) ../mpmul2.f:89:72: 89 | IF (C) 130, 100, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpmul2.f:106:72: 106 | 120 R(I+4) = RI - B*IS | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../mpmul2.f:107:72: 107 | IF (C) 130, 100, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpmul2.f:73:0: 73 | IF (RI.LT.0) GO TO 130 | Warning: 'ri' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o schex.o ../schex.f f77 -g -pipe -O2 -Wall -c -o tevlc.o ../tevlc.f ../tevlc.f:138:0: 138 | IF (ABS(E2(L)) .LE. ABS(C/H)) GO TO 108 | Warning: 'c' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cblktr.o ../cblktr.f ../cblktr.f:210:72: 210 | IF (M-5) 101,102,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:213:72: 213 | 102 IF (NM-3) 103,104,104 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:216:72: 216 | 104 IF (IDIMY-M) 105,106,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:221:72: 221 | IF (NPP) 107,108,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:227:72: 227 | IF (NH-IK) 110,110,109 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:232:72: 232 | IF (NPP) 111,112,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:247:72: 247 | 113 IF (IERROR) 119,114,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:253:72: 253 | IF (IFLG) 116,115,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:256:72: 256 | 116 IF (MP) 117,118,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o d9b0mp.o ../d9b0mp.f f77 -g -pipe -O2 -Wall -c -o dlssud.o ../dlssud.f f77 -g -pipe -O2 -Wall -c -o dsvdc.o ../dsvdc.f ../dsvdc.f:368:0: 368 | L = L + 1 | Warning: 'ls' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dsvdc.f:345:0: 345 | IF (LS .EQ. L) GO TO 440 | Warning: 'l' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o mpmuli.o ../mpmuli.f f77 -g -pipe -O2 -Wall -c -o schkw.o ../schkw.f f77 -g -pipe -O2 -Wall -c -o tevls.o ../tevls.f ../tevls.f:138:0: 138 | IF (ABS(E2(L)) .LE. ABS(C/H)) GO TO 108 | Warning: 'c' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cbrt.o ../cbrt.f ../cbrt.f:31:30: 31 | IF (NITER.EQ.0) NITER = 1.443*LOG(-.106*LOG(0.1*R1MACH(3))) + 1. | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o d9b1mp.o ../d9b1mp.f f77 -g -pipe -O2 -Wall -c -o dmacon.o ../dmacon.f ../dmacon.f:28:13: 28 | LPAR = 0.5D0*DD | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dmacon.f:29:11: 29 | KE = 0.5D0 + 0.75D0*DD | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dswap.o ../dswap.f ../dswap.f:50:72: 50 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o mpnzr.o ../mpnzr.f ../mpnzr.f:58:72: 58 | 70 R(J) = R(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../mpnzr.f:61:72: 61 | 80 R(J) = 0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../mpnzr.f:70:72: 70 | IF (R(T+1) - B2) 150, 100, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpnzr.f:78:72: 78 | 120 R(I) = 0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../mpnzr.f:86:72: 86 | IF (R(IT) - B2) 150, 140, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpnzr.f:100:72: 100 | 180 Z(I+2) = R(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) f77 -g -pipe -O2 -Wall -c -o schud.o ../schud.f f77 -g -pipe -O2 -Wall -c -o tinvit.o ../tinvit.f ../tinvit.f:146:72: 146 | 500 NORM = MAX(NORM, ABS(D(I)) + ABS(E(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 500 at (1) ../tinvit.f:217:72: 217 | 640 XU = XU + RV6(I) * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 640 at (1) ../tinvit.f:220:72: 220 | 660 RV6(I) = RV6(I) - XU * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 660 at (1) ../tinvit.f:227:72: 227 | 720 NORM = NORM + ABS(RV6(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 720 at (1) ../tinvit.f:240:72: 240 | 760 RV6(I) = RV6(I) * XU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 760 at (1) ../tinvit.f:265:72: 265 | 860 U = U + RV6(I)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 860 at (1) ../tinvit.f:270:72: 270 | 880 Z(I,R) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 880 at (1) ../tinvit.f:273:72: 273 | 900 Z(I,R) = RV6(I) * XU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 900 at (1) ../tinvit.f:187:0: 187 | RV1(I-1) = U | Warning: 'u' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cbuni.o ../cbuni.f f77 -g -pipe -O2 -Wall -c -o d9chu.o ../d9chu.f f77 -g -pipe -O2 -Wall -c -o dmgsbv.o ../dmgsbv.f ../dmgsbv.f:70:0: 70 | 1 IX, IZ, J, JK, JP, JQ, JY, JZ, K, KD, KJ, KP, L, LIX, LPAR, | Warning: 'jp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dmgsbv.f:124:0: 124 | IF (N .NE. NFCC) LIX = 2*IX - 1 | Warning: 'ix' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dsymm.o ../dsymm.f f77 -g -pipe -O2 -Wall -c -o mpovfl.o ../mpovfl.f f77 -g -pipe -O2 -Wall -c -o sclosm.o ../sclosm.f f77 -g -pipe -O2 -Wall -c -o tql1.o ../tql1.f ../tql1.f:77:72: 77 | 100 E(I-1) = E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../tql1.f:110:72: 110 | 140 D(I) = D(I) - H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) f77 -g -pipe -O2 -Wall -c -o cbunk.o ../cbunk.f f77 -g -pipe -O2 -Wall -c -o d9gmic.o ../d9gmic.f ../d9gmic.f:47:10: 47 | M = -(A - 0.5D0) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dmout.o ../dmout.f ../dmout.f:78:72: 78 | DO 5 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 5 at (1) ../dmout.f:89:72: 89 | DO 10 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../dmout.f:100:72: 100 | DO 30 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../dmout.f:111:72: 111 | DO 50 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1) ../dmout.f:120:72: 120 | DO 70 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 70 at (1) ../dmout.f:131:72: 131 | DO 85 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 85 at (1) ../dmout.f:140:72: 140 | DO 90 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 90 at (1) ../dmout.f:151:72: 151 | DO 110 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1) ../dmout.f:162:72: 162 | DO 130 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 130 at (1) ../dmout.f:171:72: 171 | DO 150 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) f77 -g -pipe -O2 -Wall -c -o dsymv.o ../dsymv.f f77 -g -pipe -O2 -Wall -c -o mpstr.o ../mpstr.f f77 -g -pipe -O2 -Wall -c -o scnrm2.o ../scnrm2.f ../scnrm2.f:89:72: 89 | 10 ASSIGN 30 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../scnrm2.f:98:19: 98 | GO TO NEXT,(30, 50, 70, 90, 110) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../scnrm2.f:100:72: 100 | ASSIGN 50 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../scnrm2.f:110:72: 110 | ASSIGN 70 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../scnrm2.f:115:72: 115 | 100 ASSIGN 110 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../scnrm2.f:141:72: 141 | 85 ASSIGN 90 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../scnrm2.f:160:16: 160 | GO TO NEXT,( 50, 70, 90, 110 ) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../scnrm2.f:168:0: 168 | IF (SCALE) SCNRM2 = SCNRM2 * XMAX | Warning: 'xmax' may be used uninitialized in this function [-Wmaybe-uninitialized] ../scnrm2.f:168:0: Warning: 'scale' may be used uninitialized in this function [-Wmaybe-uninitialized] ../scnrm2.f:151:0: 151 | 90 IF (ABSX .GE. HITEST) GO TO 100 | Warning: 'hitest' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o tql2.o ../tql2.f ../tql2.f:94:72: 94 | 100 E(I-1) = E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../tql2.f:127:72: 127 | 140 D(I) = D(I) - H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) f77 -g -pipe -O2 -Wall -c -o ccbrt.o ../ccbrt.f f77 -g -pipe -O2 -Wall -c -o d9gmit.o ../d9gmit.f ../d9gmit.f:43:11: 43 | MA = A + 0.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../d9gmit.f:44:26: 44 | IF (A.LT.0.D0) MA = A - 0.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../d9gmit.f:2:65: 2 | DOUBLE PRECISION FUNCTION D9GMIT (A, X, ALGAP1, SGNGAM, ALX) | 1 Warning: Unused dummy argument 'alx' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o dmpar.o ../dmpar.f f77 -g -pipe -O2 -Wall -c -o dsyr.o ../dsyr.f ../dsyr.f:99:0: 99 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o mpunfl.o ../mpunfl.f f77 -g -pipe -O2 -Wall -c -o scoef.o ../scoef.f ../scoef.f:87:72: 87 | 1 BY(K,L) = SDOT(NCOMP,B(K,1),NROWB,YH(1,J),1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) ../scoef.f:128:72: 128 | 14 COEF(K)=0. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 14 at (1) ../scoef.f:135:72: 135 | DO 15 I=J,NFCC | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 15 at (1) ../scoef.f:136:72: 136 | 15 COEF(I)=COEF(I)+GAM*BY(J,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1) ../scoef.f:140:72: 140 | 20 COEF(K)=WORK(KI) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../scoef.f:153:72: 153 | 30 BN = MAX(BN,ABS(B(1,K))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../scoef.f:113:14: 113 | KFLAG = 0.5 * LOG10(EPS) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../scoef.f:2:54: 2 | SUBROUTINE SCOEF (YH, YP, NCOMP, NROWB, NFC, NIC, B, BETA, COEF, | 1 Warning: Unused dummy argument 'nic' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o tqlrat.o ../tqlrat.f ../tqlrat.f:85:72: 85 | 100 E2(I-1) = E2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../tqlrat.f:117:72: 117 | 140 D(I) = D(I) - H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../tqlrat.f:143:0: 143 | IF (ABS(E2(L)) .LE. ABS(C/H)) GO TO 210 | Warning: 'c' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cchdc.o ../cchdc.f f77 -g -pipe -O2 -Wall -c -o d9knus.o ../d9knus.f ../d9knus.f:108:15: 108 | ETA = 0.1D0*D1MACH(3) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../d9knus.f:116:18: 116 | ALNEPS = LOG (0.1D0*D1MACH(3)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../d9knus.f:162:15: 162 | NTERMS = MAX (2.0, 11.0+(8.*REAL(ALNZ)-25.19-ALNEPS) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dnbco.o ../dnbco.f f77 -g -pipe -O2 -Wall -c -o dsyr2.o ../dsyr2.f ../dsyr2.f:110:0: 110 | INTEGER I, INFO, IX, IY, J, JX, JY, KX, KY | Warning: 'ky' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dsyr2.f:110:0: Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dsyr2.f:110:0: Warning: 'jy' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dsyr2.f:110:0: Warning: 'jx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o numxer.o ../numxer.f f77 -g -pipe -O2 -Wall -c -o scopy.o ../scopy.f ../scopy.f:49:72: 49 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o trbak1.o ../trbak1.f ../trbak1.f:88:72: 88 | 110 S = S + A(I,K) * Z(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../trbak1.f:94:72: 94 | 120 Z(K,J) = Z(K,J) + S * A(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) f77 -g -pipe -O2 -Wall -c -o cchdd.o ../cchdd.f f77 -g -pipe -O2 -Wall -c -o d9lgic.o ../d9lgic.f f77 -g -pipe -O2 -Wall -c -o dnbdi.o ../dnbdi.f ../dnbdi.f:2:43: 2 | SUBROUTINE DNBDI (ABE, LDA, N, ML, MU, IPVT, DET) | 1 Warning: Unused dummy argument 'mu' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o dsyr2k.o ../dsyr2k.f f77 -g -pipe -O2 -Wall -c -o ohtrol.o ../ohtrol.f ../ohtrol.f:48:72: 48 | 10 Q(L,J)=Q(L,J)+QS*Q(L,KIR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -O2 -Wall -c -o scopym.o ../scopym.f ../scopym.f:40:72: 40 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o trbak3.o ../trbak3.f ../trbak3.f:2:34: 2 | SUBROUTINE TRBAK3 (NM, N, NV, A, M, Z) | 1 Warning: Unused dummy argument 'nv' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o cchex.o ../cchex.f f77 -g -pipe -O2 -Wall -c -o d9lgit.o ../d9lgit.f f77 -g -pipe -O2 -Wall -c -o dnbfa.o ../dnbfa.f f77 -g -pipe -O2 -Wall -c -o dsyrk.o ../dsyrk.f f77 -g -pipe -O2 -Wall -c -o ohtror.o ../ohtror.f ../ohtror.f:48:72: 48 | 10 Q(J,L)=Q(J,L)+QS*Q(KIR,L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -O2 -Wall -c -o scov.o ../scov.f ../scov.f:185:72: 185 | 120 R(I,I)=WA1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../scov.f:243:72: 243 | DO 290 J=I,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 290 at (1) f77 -g -pipe -O2 -Wall -c -o tred1.o ../tred1.f ../tred1.f:75:72: 75 | 100 D(I) = A(I,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../tred1.f:85:72: 85 | 120 SCALE = SCALE + ABS(A(I,K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../tred1.f:110:72: 110 | 180 G = G + A(J,K) * A(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../tred1.f:116:72: 116 | 200 G = G + A(K,J) * A(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../tred1.f:129:72: 129 | DO 260 K = 1, J | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../tred1.f:134:72: 134 | 280 A(I,K) = SCALE * A(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) f77 -g -pipe -O2 -Wall -c -o cchud.o ../cchud.f f77 -g -pipe -O2 -Wall -c -o d9lgmc.o ../d9lgmc.f f77 -g -pipe -O2 -Wall -c -o dnbfs.o ../dnbfs.f ../dnbfs.f:238:15: 238 | IND = -LOG10(D1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dtbmv.o ../dtbmv.f ../dtbmv.f:150:0: 150 | INTEGER I, INFO, IX, J, JX, KPLUS1, KX, L | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ortbak.o ../ortbak.f ../ortbak.f:91:72: 91 | 100 ORT(I) = A(I,MP-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../ortbak.f:97:72: 97 | 110 G = G + ORT(I) * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../ortbak.f:103:72: 103 | 120 Z(I,J) = Z(I,J) + G * ORT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) f77 -g -pipe -O2 -Wall -c -o scpplt.o ../scpplt.f f77 -g -pipe -O2 -Wall -c -o tred2.o ../tred2.f ../tred2.f:74:72: 74 | DO 100 J = 1, I | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../tred2.f:88:72: 88 | 120 SCALE = SCALE + ABS(Z(I,K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../tred2.f:111:72: 111 | 180 G = G + Z(J,K) * Z(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../tred2.f:117:72: 117 | 200 G = G + Z(K,J) * Z(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../tred2.f:130:72: 130 | DO 260 K = 1, J | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../tred2.f:148:72: 148 | 340 G = G + Z(I,K) * Z(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1) ../tred2.f:150:72: 150 | DO 360 K = 1, L | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 360 at (1) f77 -g -pipe -O2 -Wall -c -o ccmpb.o ../ccmpb.f ../ccmpb.f:36:72: 36 | IF (ARG) 119,101,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:50:72: 50 | IF (NB) 108,108,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:60:72: 60 | IF (IERROR) 118,105,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:71:72: 71 | IF (NPP) 117,110,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:78:72: 78 | IF (ARG) 119,111,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:83:72: 83 | IF (IERROR) 118,113,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:96:72: 96 | IF (J2-N2M2) 114,114,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:99:72: 99 | IF (J2-N2M2) 114,114,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:2:25: 2 | SUBROUTINE CCMPB (N, IERROR, AN, BN, CN, B, AH, BH) | 1 Warning: Unused dummy argument 'n' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o d9ln2r.o ../d9ln2r.f ../d9ln2r.f:134:15: 134 | EPS = D1MACH(3) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../d9ln2r.f:2:0: 2 | DOUBLE PRECISION FUNCTION D9LN2R (X) | Warning: '__result_d9ln2r' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dnbsl.o ../dnbsl.f ../dnbsl.f:126:26: 123 | DO 60 K = 1, N | 2 ...... 126 | T = DDOT(LM,ABE(K-1,ML+2),LDB,B(LB),1) | 1 Warning: Array reference at (1) out of bounds (0 < 1) in loop beginning at (2) f77 -g -pipe -O2 -Wall -c -o dtbsv.o ../dtbsv.f ../dtbsv.f:300:0: 300 | TEMP = X( JX ) | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o orthes.o ../orthes.f ../orthes.f:83:72: 83 | 90 SCALE = SCALE + ABS(A(I,M-1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) ../orthes.f:109:72: 109 | 120 A(I,J) = A(I,J) - F * ORT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../orthes.f:124:72: 124 | 150 A(I,J) = A(I,J) - F * ORT(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) f77 -g -pipe -O2 -Wall -c -o sdaini.o ../sdaini.f ../sdaini.f:92:72: 92 | 100 PHI(I,2)=YPRIME(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../sdaini.f:106:72: 106 | 250 Y(I)=Y(I)+H*YPRIME(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../sdaini.f:139:72: 139 | 320 DELTA(I)=DELTA(I)*DAMP | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../sdaini.f:149:72: 149 | 330 YPRIME(I)=YPRIME(I)-CJ*DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 330 at (1) ../sdaini.f:185:72: 185 | 410 DELTA(I)=MIN(Y(I),0.0E0) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1) ../sdaini.f:192:72: 192 | 420 YPRIME(I)=YPRIME(I)-CJ*DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1) ../sdaini.f:209:72: 209 | 510 E(I)=Y(I)-PHI(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../sdaini.f:228:72: 228 | 610 YPRIME(I)=PHI(I,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 610 at (1) ../sdaini.f:161:0: 161 | 340 RATE=(DELNRM/OLDNRM)**(1.0E0/M) | Warning: 'oldnrm' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o tred3.o ../tred3.f ../tred3.f:130:72: 130 | DO 260 K = 1, J | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../tred3.f:2:29: 2 | SUBROUTINE TRED3 (N, NV, A, D, E, E2) | 1 Warning: Unused dummy argument 'nv' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o ccopy.o ../ccopy.f f77 -g -pipe -O2 -Wall -c -o d9pak.o ../d9pak.f ../d9pak.f:40:16: 40 | NMIN = A1N2B*I1MACH(15) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../d9pak.f:41:16: 41 | NMAX = A1N2B*I1MACH(16) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dnls1.o ../dnls1.f f77 -g -pipe -O2 -Wall -c -o dtin.o ../dtin.f f77 -g -pipe -O2 -Wall -c -o ortho4.o ../ortho4.f f77 -g -pipe -O2 -Wall -c -o sdajac.o ../sdajac.f ../sdajac.f:86:72: 86 | 110 WM(NPDM1+I)=0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../sdajac.f:107:72: 107 | 220 WM(NROW+L)=(E(L)-DELTA(L))*DELINV | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../sdajac.f:126:72: 126 | 410 WM(NPDM1+I)=0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1) ../sdajac.f:151:72: 151 | 510 YPRIME(N)=YPRIME(N)+CJ*DEL | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../sdajac.f:166:72: 166 | 520 WM(II+I)=(E(I)-DELTA(I))*DELINV | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 520 at (1) f77 -g -pipe -O2 -Wall -c -o tri3.o ../tri3.f ../tri3.f:62:0: 62 | 105 IF (N .NE. L3) GO TO 107 | Warning: 'l3' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tri3.f:58:0: 58 | 103 IF (N .NE. L2) GO TO 105 | Warning: 'l2' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tri3.f:54:0: 54 | IF (N .NE. L1) GO TO 103 | Warning: 'l1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ccosh.o ../ccosh.f f77 -g -pipe -O2 -Wall -c -o d9upak.o ../d9upak.f f77 -g -pipe -O2 -Wall -c -o dnls1e.o ../dnls1e.f f77 -g -pipe -O2 -Wall -c -o dtout.o ../dtout.f f77 -g -pipe -O2 -Wall -c -o orthog.o ../orthog.f f77 -g -pipe -O2 -Wall -c -o sdanrm.o ../sdanrm.f ../sdanrm.f:41:72: 41 | 20 SUM = SUM + ((V(I)/WT(I))/VMAX)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../sdanrm.f:2:50: 2 | REAL FUNCTION SDANRM (NEQ, V, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'ipar' at (1) [-Wunused-dummy-argument] ../sdanrm.f:2:44: 2 | REAL FUNCTION SDANRM (NEQ, V, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'rpar' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o tridib.o ../tridib.f ../tridib.f:158:72: 158 | 60 IF (S - M1) 65, 73, 70 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../tridib.f:170:72: 170 | 80 IF (S - M22) 65, 85, 70 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../tridib.f:276:0: 276 | R = R + M2 - M1 + 1 | Warning: 'm2' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tridib.f:259:0: 259 | 360 IF (S .GE. K) GO TO 400 | Warning: 'k' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tridib.f:176:0: 176 | 100 IF (R .EQ. M) GO TO 1001 | Warning: 'r' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tridib.f:170:0: 170 | 80 IF (S - M22) 65, 85, 70 | Warning: 'm22' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ccot.o ../ccot.f f77 -g -pipe -O2 -Wall -c -o dacosh.o ../dacosh.f ../dacosh.f:2:6: 2 | DOUBLE PRECISION FUNCTION DACOSH (X) | 1 Warning: 'dacosh' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o dnrm2.o ../dnrm2.f ../dnrm2.f:88:72: 88 | 10 ASSIGN 30 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dnrm2.f:95:19: 95 | 20 GO TO NEXT,(30, 50, 70, 110) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dnrm2.f:97:72: 97 | ASSIGN 50 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dnrm2.f:107:72: 107 | ASSIGN 70 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dnrm2.f:113:72: 113 | ASSIGN 110 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dnrm2.f:147:72: 147 | 95 SUM = SUM + DX(J)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 95 at (1) ../dnrm2.f:126:5: 126 | 110 IF (ABS(DX(I)) .LE. XMAX) GO TO 115 | 1 Warning: Label 110 at (1) defined but not used [-Wunused-label] ../dnrm2.f:121:5: 121 | 70 IF (ABS(DX(I)) .GT. CUTLO) GO TO 75 | 1 Warning: Label 70 at (1) defined but not used [-Wunused-label] ../dnrm2.f:102:5: 102 | 50 IF (DX(I) .EQ. ZERO) GO TO 200 | 1 Warning: Label 50 at (1) defined but not used [-Wunused-label] ../dnrm2.f:127:0: 127 | SUM = ONE + SUM * (XMAX / DX(I))**2 | Warning: 'xmax' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dtpmv.o ../dtpmv.f ../dtpmv.f:110:0: 110 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o orthol.o ../orthol.f ../orthol.f:155:72: 155 | 20 A(L,JCOL)=ASAVE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../orthol.f:181:72: 181 | 35 A(L,J)=A(L,J)+AS*A(L,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 35 at (1) ../orthol.f:182:72: 182 | 40 COLS(J)=COLS(J)-A(K,J)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../orthol.f:133:0: 133 | IF (SIGMA .GE. 0.99*COLS(J)) GO TO 10 | Warning: 'sigma' may be used uninitialized in this function [-Wmaybe-uninitialized] ../orthol.f:124:0: 124 | KP=K+1 | Warning: 'kp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../orthol.f:154:0: 154 | A(L,K)=A(L,JCOL) | Warning: 'jcol' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o sdaslv.o ../sdaslv.f f77 -g -pipe -O2 -Wall -c -o tridq.o ../tridq.f f77 -g -pipe -O2 -Wall -c -o cdcdot.o ../cdcdot.f f77 -g -pipe -O2 -Wall -c -o dai.o ../dai.f f77 -g -pipe -O2 -Wall -c -o dnsq.o ../dnsq.f f77 -g -pipe -O2 -Wall -c -o dtpsv.o ../dtpsv.f ../dtpsv.f:113:0: 113 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o orthor.o ../orthor.f ../orthor.f:153:72: 153 | 20 A(JROW,L)=ASAVE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../orthor.f:179:72: 179 | 35 A(J,L)=A(J,L)+AS*A(K,L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 35 at (1) ../orthor.f:180:72: 180 | 40 ROWS(J)=ROWS(J)-A(J,K)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../orthor.f:134:0: 134 | IF (SIGMA .GE. 0.99*ROWS(J)) GO TO 10 | Warning: 'sigma' may be used uninitialized in this function [-Wmaybe-uninitialized] ../orthor.f:125:0: 125 | KP=K+1 | Warning: 'kp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../orthor.f:143:0: 143 | KPIVOT(K)=KPIVOT(JROW) | Warning: 'jrow' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o sdassl.o ../sdassl.f ../sdassl.f:1158:72: 1158 | 370 RWORK(ITEMP + I - 1) = H*YPRIME(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 370 at (1) ../sdassl.f:1291:72: 1291 | 524 ATOL(I)=R*ATOL(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 524 at (1) f77 -g -pipe -O2 -Wall -c -o tris4.o ../tris4.f f77 -g -pipe -O2 -Wall -c -o cdcor.o ../cdcor.f ../cdcor.f:42:72: 42 | 100 SAVE1(I) = (H*SAVE2(I) - YH(I,2) - SAVE1(I))/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../cdcor.f:51:72: 51 | 105 SAVE1(I) = H*SAVE2(I) - YH(I,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 105 at (1) ../cdcor.f:55:72: 55 | 130 SAVE2(I) = H*SAVE2(I) - YH(I,2) - SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../cdcor.f:67:72: 67 | 150 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../cdcor.f:69:72: 69 | DO 160 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 160 at (1) ../cdcor.f:70:72: 70 | 160 SAVE2(I) = SAVE2(I) - A(I,J)*(YH(J,2) + SAVE1(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../cdcor.f:82:72: 82 | 180 SAVE2(I) = H*SAVE2(I) - A(I,1)*(YH(I,2) + SAVE1(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../cdcor.f:94:72: 94 | 140 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../cdcor.f:96:72: 96 | DO 170 I = 1,NDE | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 170 at (1) ../cdcor.f:97:72: 97 | 170 SAVE2(I) = SAVE2(I) - A(I,J)*(YH(J,2) + SAVE1(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../cdcor.f:103:72: 103 | 200 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../cdcor.f:107:72: 107 | 205 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), ABS(YWT(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 205 at (1) ../cdcor.f:113:72: 113 | 230 SAVE2(I) = H*SAVE2(I) - YH(I,2) - SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../cdcor.f:125:72: 125 | 250 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../cdcor.f:128:72: 128 | DO 260 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../cdcor.f:143:72: 143 | 280 SAVE2(I) = H*SAVE2(I) - A(I,1)*(YH(I,2) + SAVE1(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../cdcor.f:155:72: 155 | 270 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../cdcor.f:158:72: 158 | DO 290 I = MAX(ML+1, MW+1-J), MIN(MW+NDE-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 290 at (1) ../cdcor.f:167:72: 167 | 300 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../cdcor.f:171:72: 171 | 305 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), ABS(YWT(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 305 at (1) ../cdcor.f:185:72: 185 | 320 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../cdcor.f:189:72: 189 | 325 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), ABS(YWT(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 325 at (1) f77 -g -pipe -O2 -Wall -c -o daie.o ../daie.f f77 -g -pipe -O2 -Wall -c -o dnsqe.o ../dnsqe.f f77 -g -pipe -O2 -Wall -c -o dtrco.o ../dtrco.f f77 -g -pipe -O2 -Wall -c -o ortran.o ../ortran.f ../ortran.f:78:72: 78 | 60 Z(I,J) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../ortran.f:92:72: 92 | 100 ORT(I) = A(I,MP-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../ortran.f:98:72: 98 | 110 G = G + ORT(I) * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../ortran.f:104:72: 104 | 120 Z(I,J) = Z(I,J) + G * ORT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) f77 -g -pipe -O2 -Wall -c -o sdastp.o ../sdastp.f ../sdastp.f:222:72: 222 | 260 PHI(I,J)=BETA(J)*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) ../sdastp.f:243:72: 243 | 310 YPRIME(I)=0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1) ../sdastp.f:247:72: 247 | 320 YPRIME(I)=YPRIME(I)+GAMMA(J)*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../sdastp.f:284:72: 284 | 345 E(I)=0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 345 at (1) ../sdastp.f:293:72: 293 | 355 DELTA(I) = DELTA(I) * TEMP1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 355 at (1) ../sdastp.f:303:72: 303 | 360 YPRIME(I)=YPRIME(I)-CJ*DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../sdastp.f:349:72: 349 | 377 DELTA(I) = MIN(Y(I),0.0E0) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 377 at (1) ../sdastp.f:353:72: 353 | 378 E(I) = E(I) - DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 378 at (1) ../sdastp.f:384:72: 384 | 405 DELTA(I) = PHI(I,KP1) + E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 405 at (1) ../sdastp.f:392:72: 392 | 415 DELTA(I) = PHI(I,K) + DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 415 at (1) ../sdastp.f:437:72: 437 | 510 DELTA(I)=E(I)-PHI(I,KP2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../sdastp.f:482:72: 482 | 580 PHI(I,KP2)=E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 580 at (1) ../sdastp.f:485:72: 485 | 590 PHI(I,KP1)=PHI(I,KP1)+E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 590 at (1) ../sdastp.f:488:72: 488 | DO 595 I=1,NEQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 595 at (1) ../sdastp.f:489:72: 489 | 595 PHI(I,J)=PHI(I,J)+PHI(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 595 at (1) ../sdastp.f:512:72: 512 | 610 PHI(I,J)=TEMP1*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 610 at (1) ../sdastp.f:516:72: 516 | 640 PSI(I-1)=PSI(I)-H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 640 at (1) ../sdastp.f:443:0: 443 | 520 IF(TERKM1.LE.MIN(TERK,TERKP1))GO TO 540 | Warning: 'terkm1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sdastp.f:468:0: 468 | R=(2.0E0*EST+0.0001E0)**(-1.0E0/TEMP2) | Warning: 'erkm1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o trisp.o ../trisp.f f77 -g -pipe -O2 -Wall -c -o cdcst.o ../cdcst.f ../cdcst.f:41:72: 41 | 10 FACTRL(I) = I*FACTRL(I-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../cdcst.f:48:72: 48 | 30 SUM = SUM - GAMMA(J)/(I-J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../cdcst.f:49:72: 49 | 40 GAMMA(I+1) = SUM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../cdcst.f:57:72: 57 | 50 EL(I,J) = (J-1)*EL(I,J-1) + EL(I-1,J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../cdcst.f:58:72: 58 | 60 EL(J+1,J) = 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../cdcst.f:62:72: 62 | DO 80 I = 3,J+1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 80 at (1) ../cdcst.f:63:72: 63 | 80 EL(I,J) = EL(I,J)/((I-1)*FACTRL(J-1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../cdcst.f:67:72: 67 | 100 TQ(3,J) = -1.E0/GAMMA(J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../cdcst.f:75:72: 75 | 120 EL(I,J) = J*EL(I,J-1) + EL(I-1,J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../cdcst.f:76:72: 76 | 130 EL(J+1,J) = 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../cdcst.f:80:72: 80 | DO 150 I = 1,J+1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) ../cdcst.f:81:72: 81 | 150 EL(I,J) = EL(I,J)/(FACTRL(J)*SUM) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../cdcst.f:85:72: 85 | 170 TQ(3,J) = (J+2)/EL(1,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../cdcst.f:97:72: 97 | 180 SUM = SUM - GAMMA(J)/(I-J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../cdcst.f:98:72: 98 | 190 GAMMA(I+1) = SUM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../cdcst.f:103:72: 103 | 200 EL(1+I,1) = -(I+1)*SUM*GAMMA(I+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) f77 -g -pipe -O2 -Wall -c -o dasinh.o ../dasinh.f ../dasinh.f:2:6: 2 | DOUBLE PRECISION FUNCTION DASINH (X) | 1 Warning: 'dasinh' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o dogleg.o ../dogleg.f f77 -g -pipe -O2 -Wall -c -o dtrdi.o ../dtrdi.f f77 -g -pipe -O2 -Wall -c -o passb.o ../passb.f f77 -g -pipe -O2 -Wall -c -o sdatrp.o ../sdatrp.f ../sdatrp.f:50:72: 50 | 10 YPOUT(I)=0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../sdatrp.f:60:72: 60 | 20 YPOUT(I)=YPOUT(I)+D*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) f77 -g -pipe -O2 -Wall -c -o trix.o ../trix.f f77 -g -pipe -O2 -Wall -c -o cdiv.o ../cdiv.f f77 -g -pipe -O2 -Wall -c -o dasum.o ../dasum.f f77 -g -pipe -O2 -Wall -c -o dohtrl.o ../dohtrl.f f77 -g -pipe -O2 -Wall -c -o dtrmm.o ../dtrmm.f f77 -g -pipe -O2 -Wall -c -o passb2.o ../passb2.f f77 -g -pipe -O2 -Wall -c -o sdawts.o ../sdawts.f ../sdawts.f:2:64: 2 | SUBROUTINE SDAWTS (NEQ, IWT, RTOL, ATOL, Y, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'ipar' at (1) [-Wunused-dummy-argument] ../sdawts.f:2:58: 2 | SUBROUTINE SDAWTS (NEQ, IWT, RTOL, ATOL, Y, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'rpar' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o tsturm.o ../tsturm.f ../tsturm.f:188:72: 188 | 160 Z(I,R) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../tsturm.f:267:72: 267 | 500 NORM = MAX(NORM, ABS(D(I)) + ABS(E(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 500 at (1) ../tsturm.f:337:72: 337 | 640 XU = XU + RV6(I) * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 640 at (1) ../tsturm.f:340:72: 340 | 660 RV6(I) = RV6(I) - XU * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 660 at (1) ../tsturm.f:347:72: 347 | 720 NORM = NORM + ABS(RV6(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 720 at (1) ../tsturm.f:360:72: 360 | 760 RV6(I) = RV6(I) * XU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 760 at (1) ../tsturm.f:381:72: 381 | 860 U = U + RV6(I)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 860 at (1) ../tsturm.f:386:72: 386 | 880 Z(I,R) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 880 at (1) ../tsturm.f:389:72: 389 | 900 Z(I,R) = RV6(I) * XU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 900 at (1) ../tsturm.f:230:0: 230 | S2 = S1 + ABS(X0 - XU) | Warning: 'xu' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tsturm.f:230:0: Warning: 'x0' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tsturm.f:185:0: 185 | R = R + 1 | Warning: 'r' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tsturm.f:251:0: 251 | RV4(M1) = X1 | Warning: 'm1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tsturm.f:248:0: 248 | 360 IF (S .GE. K) GO TO 400 | Warning: 'k' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cdntl.o ../cdntl.f ../cdntl.f:124:72: 124 | 155 A(I,1) = 0.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 155 at (1) ../cdntl.f:154:72: 154 | 170 SAVE1(I) = SAVE2(I)/MAX(1.E0, ABS(YWT(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../cdntl.f:158:72: 158 | 180 YH(I,2) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../cdntl.f:161:72: 161 | 20 FAC(I) = SQRT(UROUND) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) f77 -g -pipe -O2 -Wall -c -o dasyik.o ../dasyik.f f77 -g -pipe -O2 -Wall -c -o domn.o ../domn.f f77 -g -pipe -O2 -Wall -c -o dtrmv.o ../dtrmv.f ../dtrmv.f:113:0: 113 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o passb3.o ../passb3.f f77 -g -pipe -O2 -Wall -c -o sdcor.o ../sdcor.f ../sdcor.f:40:72: 40 | 100 SAVE1(I) = (H*SAVE2(I) - YH(I,2) - SAVE1(I))/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../sdcor.f:49:72: 49 | 105 SAVE1(I) = H*SAVE2(I) - YH(I,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 105 at (1) ../sdcor.f:53:72: 53 | 130 SAVE2(I) = H*SAVE2(I) - YH(I,2) - SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../sdcor.f:65:72: 65 | 150 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../sdcor.f:67:72: 67 | DO 160 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 160 at (1) ../sdcor.f:68:72: 68 | 160 SAVE2(I) = SAVE2(I) - A(I,J)*(YH(J,2) + SAVE1(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../sdcor.f:80:72: 80 | 180 SAVE2(I) = H*SAVE2(I) - A(I,1)*(YH(I,2) + SAVE1(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../sdcor.f:92:72: 92 | 140 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../sdcor.f:94:72: 94 | DO 170 I = 1,NDE | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 170 at (1) ../sdcor.f:95:72: 95 | 170 SAVE2(I) = SAVE2(I) - A(I,J)*(YH(J,2) + SAVE1(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../sdcor.f:101:72: 101 | 200 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../sdcor.f:105:72: 105 | 205 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 205 at (1) ../sdcor.f:111:72: 111 | 230 SAVE2(I) = H*SAVE2(I) - YH(I,2) - SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../sdcor.f:123:72: 123 | 250 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../sdcor.f:126:72: 126 | DO 260 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../sdcor.f:141:72: 141 | 280 SAVE2(I) = H*SAVE2(I) - A(I,1)*(YH(I,2) + SAVE1(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../sdcor.f:153:72: 153 | 270 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../sdcor.f:156:72: 156 | DO 290 I = MAX(ML+1, MW+1-J), MIN(MW+NDE-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 290 at (1) ../sdcor.f:165:72: 165 | 300 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../sdcor.f:169:72: 169 | 305 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 305 at (1) ../sdcor.f:183:72: 183 | 320 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../sdcor.f:187:72: 187 | 325 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 325 at (1) f77 -g -pipe -O2 -Wall -c -o u11ls.o ../u11ls.f f77 -g -pipe -O2 -Wall -c -o cdntp.o ../cdntp.f ../cdntp.f:28:72: 28 | 10 Y(I) = YH(I,NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../cdntp.f:32:72: 32 | DO 20 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) ../cdntp.f:33:72: 33 | 20 Y(I) = YH(I,J) + R*Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../cdntp.f:38:72: 38 | 40 FACTOR = FACTOR*(NQ+1-KK) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../cdntp.f:40:72: 40 | 50 Y(I) = FACTOR*YH(I,NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../cdntp.f:46:72: 46 | 60 FACTOR = FACTOR*(J-KK) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../cdntp.f:48:72: 48 | 70 Y(I) = FACTOR*YH(I,J) + R*Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../cdntp.f:51:72: 51 | 100 Y(I) = Y(I)*H**(-KUSED) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -O2 -Wall -c -o dasyjy.o ../dasyjy.f f77 -g -pipe -O2 -Wall -c -o dorth.o ../dorth.f f77 -g -pipe -O2 -Wall -c -o dtrsl.o ../dtrsl.f f77 -g -pipe -O2 -Wall -c -o passb4.o ../passb4.f f77 -g -pipe -O2 -Wall -c -o sdcst.o ../sdcst.f ../sdcst.f:40:72: 40 | 10 FACTRL(I) = I*FACTRL(I-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../sdcst.f:47:72: 47 | 30 SUM = SUM - GAMMA(J)/(I-J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../sdcst.f:48:72: 48 | 40 GAMMA(I+1) = SUM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../sdcst.f:56:72: 56 | 50 EL(I,J) = (J-1)*EL(I,J-1) + EL(I-1,J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../sdcst.f:57:72: 57 | 60 EL(J+1,J) = 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../sdcst.f:61:72: 61 | DO 80 I = 3,J+1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 80 at (1) ../sdcst.f:62:72: 62 | 80 EL(I,J) = EL(I,J)/((I-1)*FACTRL(J-1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../sdcst.f:66:72: 66 | 100 TQ(3,J) = -1.E0/GAMMA(J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../sdcst.f:74:72: 74 | 120 EL(I,J) = J*EL(I,J-1) + EL(I-1,J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../sdcst.f:75:72: 75 | 130 EL(J+1,J) = 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../sdcst.f:79:72: 79 | DO 150 I = 1,J+1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) ../sdcst.f:80:72: 80 | 150 EL(I,J) = EL(I,J)/(FACTRL(J)*SUM) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../sdcst.f:84:72: 84 | 170 TQ(3,J) = (J+2)/EL(1,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../sdcst.f:96:72: 96 | 180 SUM = SUM - GAMMA(J)/(I-J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../sdcst.f:97:72: 97 | 190 GAMMA(I+1) = SUM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../sdcst.f:102:72: 102 | 200 EL(1+I,1) = -(I+1)*SUM*GAMMA(I+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) f77 -g -pipe -O2 -Wall -c -o u11us.o ../u11us.f f77 -g -pipe -O2 -Wall -c -o cdotc.o ../cdotc.f f77 -g -pipe -O2 -Wall -c -o datanh.o ../datanh.f ../datanh.f:2:6: 2 | DOUBLE PRECISION FUNCTION DATANH (X) | 1 Warning: 'datanh' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o dorthr.o ../dorthr.f ../dorthr.f:140:0: 140 | IF (SIGMA .GE. 0.99D0*ROWS(J)) GO TO 50 | Warning: 'sigma' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dorthr.f:73:0: 73 | INTEGER IFLAG, IRANK, ISCALE, J, JROW, K, KP, KPIVOT(*), L, M, | Warning: 'kp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dorthr.f:152:0: 152 | KPIVOT(K) = KPIVOT(JROW) | Warning: 'jrow' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dtrsm.o ../dtrsm.f f77 -g -pipe -O2 -Wall -c -o passb5.o ../passb5.f f77 -g -pipe -O2 -Wall -c -o sdntl.o ../sdntl.f ../sdntl.f:122:72: 122 | 155 A(I,1) = 0.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 155 at (1) ../sdntl.f:152:72: 152 | 170 SAVE1(I) = SAVE2(I)/MAX(1.E0, YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../sdntl.f:156:72: 156 | 180 YH(I,2) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../sdntl.f:159:72: 159 | 20 FAC(I) = SQRT(UROUND) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) f77 -g -pipe -O2 -Wall -c -o u12ls.o ../u12ls.f ../u12ls.f:41:72: 41 | DO 406 I=1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 406 at (1) ../u12ls.f:115:72: 115 | DO 460 I=KP1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 460 at (1) f77 -g -pipe -O2 -Wall -c -o cdotu.o ../cdotu.f f77 -g -pipe -O2 -Wall -c -o davint.o ../davint.f ../davint.f:196:0: 196 | 1 + CB*RP5*(SYU**2 - SYL2) + CC*(SYU - SYL) | Warning: 'cc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../davint.f:196:0: Warning: 'cb' may be used uninitialized in this function [-Wmaybe-uninitialized] ../davint.f:196:0: Warning: 'ca' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dp1vlu.o ../dp1vlu.f ../dp1vlu.f:76:72: 76 | 1 YP(I) = 0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) ../dp1vlu.f:102:72: 102 | 5 A(I) = 0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 5 at (1) ../dp1vlu.f:122:72: 122 | 6 YP(N) = DIF*A(K3PN) + N*A(K3PN-1) - A(K1I)*A(K4PN) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 6 at (1) ../dp1vlu.f:130:72: 130 | 7 A(K3PN) = YP(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 7 at (1) ../dp1vlu.f:132:72: 132 | 9 A(K3P1) = VAL | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 9 at (1) ../dp1vlu.f:67:15: 67 | MAXORD = A(1) + 0.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dp1vlu.f:71:13: 71 | NORD = A(K3) + 0.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dtrsv.o ../dtrsv.f ../dtrsv.f:116:0: 116 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o passf.o ../passf.f f77 -g -pipe -O2 -Wall -c -o sdntp.o ../sdntp.f ../sdntp.f:27:72: 27 | 10 Y(I) = YH(I,NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../sdntp.f:31:72: 31 | DO 20 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) ../sdntp.f:32:72: 32 | 20 Y(I) = YH(I,J) + R*Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../sdntp.f:37:72: 37 | 40 FACTOR = FACTOR*(NQ+1-KK) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../sdntp.f:39:72: 39 | 50 Y(I) = FACTOR*YH(I,NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../sdntp.f:45:72: 45 | 60 FACTOR = FACTOR*(J-KK) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../sdntp.f:47:72: 47 | 70 Y(I) = FACTOR*YH(I,J) + R*Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../sdntp.f:50:72: 50 | 100 Y(I) = Y(I)*H**(-KUSED) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -O2 -Wall -c -o u12us.o ../u12us.f ../u12us.f:41:72: 41 | DO 406 I=1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 406 at (1) ../u12us.f:113:72: 113 | DO 460 I=KP1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 460 at (1) f77 -g -pipe -O2 -Wall -c -o cdpsc.o ../cdpsc.f ../cdpsc.f:28:72: 28 | DO 10 J2 = J1,NQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../cdpsc.f:30:72: 30 | DO 10 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../cdpsc.f:31:72: 31 | 10 YH(I,J) = YH(I,J) + YH(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../cdpsc.f:34:72: 34 | DO 30 J2 = J1,NQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../cdpsc.f:36:72: 36 | DO 30 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../cdpsc.f:37:72: 37 | 30 YH(I,J) = YH(I,J) - YH(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) f77 -g -pipe -O2 -Wall -c -o daws.o ../daws.f f77 -g -pipe -O2 -Wall -c -o dpbco.o ../dpbco.f f77 -g -pipe -O2 -Wall -c -o du11ls.o ../du11ls.f f77 -g -pipe -O2 -Wall -c -o passf2.o ../passf2.f f77 -g -pipe -O2 -Wall -c -o sdot.o ../sdot.f ../sdot.f:50:72: 50 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o ulsia.o ../ulsia.f f77 -g -pipe -O2 -Wall -c -o cdpst.o ../cdpst.f ../cdpst.f:51:72: 51 | DO 110 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1) ../cdpst.f:52:72: 52 | 110 DFDY(I,J) = FACTOR*DFDY(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../cdpst.f:84:72: 84 | 140 DFDY(I,J) = (SAVE1(I) - SAVE2(I))*CFCTR | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../cdpst.f:113:72: 113 | 190 DFDY(I,I) = DFDY(I,I) + 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../cdpst.f:121:72: 121 | DO 210 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 210 at (1) ../cdpst.f:122:72: 122 | 210 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../cdpst.f:130:72: 130 | 230 DFDY(I,I) = DFDY(I,I) + A(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../cdpst.f:138:72: 138 | DO 220 I = 1,NDE | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 220 at (1) ../cdpst.f:139:72: 139 | 220 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../cdpst.f:153:72: 153 | DO 260 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../cdpst.f:154:72: 154 | 260 DFDY(I,J) = FACTOR*DFDY(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) ../cdpst.f:180:72: 180 | 290 Y(K) = Y(K) + DY | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../cdpst.f:191:72: 191 | 300 DFDY(I,K) = CFCTR*(SAVE1(I+K-MW) - SAVE2(I+K-MW)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../cdpst.f:221:72: 221 | DO 345 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 345 at (1) ../cdpst.f:230:72: 230 | DO 350 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 350 at (1) ../cdpst.f:239:72: 239 | 360 DFDY(MW,J) = DFDY(MW,J) + 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../cdpst.f:247:72: 247 | DO 380 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 380 at (1) ../cdpst.f:248:72: 248 | 380 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../cdpst.f:256:72: 256 | 400 DFDY(MW,J) = DFDY(MW,J) + A(J,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 400 at (1) ../cdpst.f:264:72: 264 | DO 390 I = MAX(ML+1, MW+1-J), MIN(MW+NDE-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 390 at (1) ../cdpst.f:265:72: 265 | 390 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 390 at (1) f77 -g -pipe -O2 -Wall -c -o daxpy.o ../daxpy.f ../daxpy.f:51:72: 51 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o dpbdi.o ../dpbdi.f f77 -g -pipe -O2 -Wall -c -o du11us.o ../du11us.f f77 -g -pipe -O2 -Wall -c -o passf3.o ../passf3.f f77 -g -pipe -O2 -Wall -c -o sdpsc.o ../sdpsc.f ../sdpsc.f:28:72: 28 | DO 10 J2 = J1,NQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../sdpsc.f:30:72: 30 | DO 10 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../sdpsc.f:31:72: 31 | 10 YH(I,J) = YH(I,J) + YH(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../sdpsc.f:34:72: 34 | DO 30 J2 = J1,NQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../sdpsc.f:36:72: 36 | DO 30 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../sdpsc.f:37:72: 37 | 30 YH(I,J) = YH(I,J) - YH(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) f77 -g -pipe -O2 -Wall -c -o usrmat.o ../usrmat.f ../usrmat.f:34:20: 34 | IFLAG(2)=-DATTRV(1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../usrmat.f:35:21: 35 | IFLAG(3)= DATTRV(2) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../usrmat.f:53:18: 53 | I=DATTRV(L) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../usrmat.f:61:20: 61 | IFLAG(3)=DATTRV(L+1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../usrmat.f:2:50: 2 | SUBROUTINE USRMAT (I, J, AIJ, INDCAT, PRGOPT, DATTRV, IFLAG) | 1 Warning: Unused dummy argument 'prgopt' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o cdriv1.o ../cdriv1.f ../cdriv1.f:349:72: 349 | 20 IWORK(I) = WORK(I+LENWCM) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../cdriv1.f:356:72: 356 | 40 WORK(I+LENWCM) = IWORK(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../cdriv1.f:349:21: 349 | 20 IWORK(I) = WORK(I+LENWCM) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dbcg.o ../dbcg.f ../dbcg.f:337:0: 337 | BK = BKNUM/BKDEN | Warning: 'bkden' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dpbfa.o ../dpbfa.f f77 -g -pipe -O2 -Wall -c -o du12ls.o ../du12ls.f ../du12ls.f:43:72: 43 | DO 406 I=1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 406 at (1) ../du12ls.f:117:72: 117 | DO 460 I=KP1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 460 at (1) f77 -g -pipe -O2 -Wall -c -o passf4.o ../passf4.f f77 -g -pipe -O2 -Wall -c -o sdpst.o ../sdpst.f ../sdpst.f:50:72: 50 | DO 110 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1) ../sdpst.f:51:72: 51 | 110 DFDY(I,J) = FACTOR*DFDY(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../sdpst.f:84:72: 84 | 140 DFDY(I,J) = (SAVE1(I) - SAVE2(I))*FACTOR | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../sdpst.f:113:72: 113 | 190 DFDY(I,I) = DFDY(I,I) + 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../sdpst.f:121:72: 121 | DO 210 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 210 at (1) ../sdpst.f:122:72: 122 | 210 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../sdpst.f:130:72: 130 | 230 DFDY(I,I) = DFDY(I,I) + A(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../sdpst.f:138:72: 138 | DO 220 I = 1,NDE | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 220 at (1) ../sdpst.f:139:72: 139 | 220 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../sdpst.f:153:72: 153 | DO 260 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../sdpst.f:154:72: 154 | 260 DFDY(I,J) = FACTOR*DFDY(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) ../sdpst.f:181:72: 181 | 290 Y(K) = Y(K) + DY | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../sdpst.f:200:72: 200 | 300 DFDY(I,K) = FACTOR*(SAVE1(I+K-MW) - SAVE2(I+K-MW)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../sdpst.f:230:72: 230 | DO 345 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 345 at (1) ../sdpst.f:231:72: 231 | 345 DFDYMX = MAX(DFDYMX, ABS(DFDY(I,J))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 345 at (1) ../sdpst.f:235:72: 235 | DO 350 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 350 at (1) ../sdpst.f:236:72: 236 | 350 BND = BND + (DFDY(I,J)/DFDYMX)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 350 at (1) ../sdpst.f:242:72: 242 | 360 DFDY(MW,J) = DFDY(MW,J) + 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../sdpst.f:250:72: 250 | DO 380 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 380 at (1) ../sdpst.f:251:72: 251 | 380 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../sdpst.f:259:72: 259 | 400 DFDY(MW,J) = DFDY(MW,J) + A(J,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 400 at (1) ../sdpst.f:267:72: 267 | DO 390 I = MAX(ML+1, MW+1-J), MIN(MW+NDE-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 390 at (1) ../sdpst.f:268:72: 268 | 390 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 390 at (1) f77 -g -pipe -O2 -Wall -c -o vnwrms.o ../vnwrms.f ../vnwrms.f:38:72: 38 | 10 SUM = SUM + (V(I)/W(I))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -O2 -Wall -c -o cdriv2.o ../cdriv2.f f77 -g -pipe -O2 -Wall -c -o dbdiff.o ../dbdiff.f f77 -g -pipe -O2 -Wall -c -o dpbsl.o ../dpbsl.f f77 -g -pipe -O2 -Wall -c -o du12us.o ../du12us.f ../du12us.f:43:72: 43 | DO 406 I=1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 406 at (1) ../du12us.f:115:72: 115 | DO 460 I=KP1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 460 at (1) f77 -g -pipe -O2 -Wall -c -o passf5.o ../passf5.f f77 -g -pipe -O2 -Wall -c -o sdriv1.o ../sdriv1.f ../sdriv1.f:344:72: 344 | 20 IWORK(I) = WORK(I+LENWCM) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../sdriv1.f:351:72: 351 | 40 WORK(I+LENWCM) = IWORK(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../sdriv1.f:344:21: 344 | 20 IWORK(I) = WORK(I+LENWCM) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o wnlit.o ../wnlit.f f77 -g -pipe -O2 -Wall -c -o cdriv3.o ../cdriv3.f ../cdriv3.f:984:72: 984 | 30 WORK(I+IYH-1) = Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../cdriv3.f:1009:72: 1009 | DO 35 I = 1,13 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 35 at (1) ../cdriv3.f:1010:72: 1010 | 35 EL(I,J) = WORK(I+IEL+(J-1)*13-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 35 at (1) ../cdriv3.f:1012:72: 1012 | DO 40 I = 1,3 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 40 at (1) ../cdriv3.f:1013:72: 1013 | 40 TQ(I,J) = WORK(I+ITQ+(J-1)*3-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../cdriv3.f:1197:72: 1197 | 190 Y(I) = WORK(I+IYH-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../cdriv3.f:1210:72: 1210 | 230 WORK(I+IYWT-1) = 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../cdriv3.f:1214:72: 1214 | 250 WORK(I+IYWT-1) = EWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../cdriv3.f:1221:72: 1221 | 280 WORK(I+IYWT-1) = Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../cdriv3.f:1271:72: 1271 | 340 WORK(I+ISAVE2-1) = WORK(I+ISAVE2-1)/WORK(I+IA-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1) ../cdriv3.f:1311:72: 1311 | 380 WORK(I+IYWT-1) = MAX(EWT(1), ABS(Y(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../cdriv3.f:1314:72: 1314 | 400 WORK(I+IYWT-1) = MAX(EWT(I), ABS(Y(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 400 at (1) ../cdriv3.f:1318:72: 1318 | 420 WORK(I+ISAVE2-1) = Y(I)/WORK(I+IYWT-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1) ../cdriv3.f:1413:72: 1413 | 480 Y(J) = WORK(IYH+J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 480 at (1) ../cdriv3.f:1495:72: 1495 | 570 Y(I) = WORK(I+IYH-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 570 at (1) ../cdriv3.f:1509:72: 1509 | DO 582 I = 1,13 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 582 at (1) ../cdriv3.f:1510:72: 1510 | 582 WORK(I+IEL+(J-1)*13-1) = EL(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 582 at (1) ../cdriv3.f:1512:72: 1512 | DO 584 I = 1,3 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 584 at (1) ../cdriv3.f:1513:72: 1513 | 584 WORK(I+ITQ+(J-1)*3-1) = TQ(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 584 at (1) ../cdriv3.f:1530:72: 1530 | 662 Y(I) = WORK(I + IYH - 1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 662 at (1) ../cdriv3.f:1544:72: 1544 | DO 664 I = 1,13 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 664 at (1) ../cdriv3.f:1545:72: 1545 | 664 WORK(I+IEL+(J-1)*13-1) = EL(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 664 at (1) ../cdriv3.f:1547:72: 1547 | DO 666 I = 1,3 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 666 at (1) ../cdriv3.f:1548:72: 1548 | 666 WORK(I+ITQ+(J-1)*3-1) = TQ(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 666 at (1) ../cdriv3.f:959:15: 959 | AE = WORK(IMACH1) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:988:17: 988 | UROUND = WORK(IMACH4) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:991:15: 991 | AE = WORK(IMACH1) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1002:13: 1002 | AVGH = WORK(IAVGH) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1003:15: 1003 | AVGORD = WORK(IAVGRD) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1004:13: 1004 | HOLD = WORK(IHOLD) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1005:11: 1005 | RC = WORK(IRC) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1006:13: 1006 | RMAX = WORK(IRMAX) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1007:14: 1007 | TREND = WORK(ITREND) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1010:20: 1010 | 35 EL(I,J) = WORK(I+IEL+(J-1)*13-1) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1013:20: 1013 | 40 TQ(I,J) = WORK(I+ITQ+(J-1)*3-1) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1014:10: 1014 | T = WORK(IT) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1015:10: 1015 | H = WORK(IH) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1016:14: 1016 | HSIGN = WORK(IHSIGN) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1037:22: 1037 | TROOT = WORK(ITOUT) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1058:26: 1058 | TROOT = WORK(JTROOT) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1064:26: 1064 | TROOT = WORK(JTROOT) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1387:18: 1387 | GLAST = WORK(I+IGNOW-1) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1438:22: 1438 | TROOT = WORK(I+ITROOT-1) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:882:0: 882 | ISAVE1 = IYWT + N | Warning: 'iywt' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dbesi.o ../dbesi.f ../dbesi.f:118:72: 118 | IF (N-1) 590, 10, 20 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesi.f:122:72: 122 | IF (X) 600, 30, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesi.f:123:72: 123 | 30 IF (ALPHA) 580, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesi.f:275:72: 275 | IF (NN-1) 340, 290, 130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesi.f:285:72: 285 | IF (NN-1) 340, 310, 320 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesi.f:93:0: 93 | 1 N, NN, NS, NZ | Warning: 'ns' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbesi.f:210:0: 210 | 160 IF (KM.NE.0) GO TO 170 | Warning: 'km' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dpchbs.o ../dpchbs.f f77 -g -pipe -O2 -Wall -c -o dulsia.o ../dulsia.f f77 -g -pipe -O2 -Wall -c -o pchbs.o ../pchbs.f f77 -g -pipe -O2 -Wall -c -o sdriv2.o ../sdriv2.f f77 -g -pipe -O2 -Wall -c -o wnlsm.o ../wnlsm.f ../wnlsm.f:126:13: 126 | LINK = PRGOPT(1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../wnlsm.f:141:15: 141 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../wnlsm.f:154:16: 154 | NEXT = PRGOPT(LINK) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../wnlsm.f:81:0: 81 | * JCON, JP, KEY, KRANK, L1, LAST, LINK, M, ME, NEXT, NIV, NLINK, | Warning: 'jcon' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cdscl.o ../cdscl.f ../cdscl.f:33:72: 33 | DO 10 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../cdscl.f:34:72: 34 | 10 YH(I,J+1) = YH(I,J+1)*R1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -O2 -Wall -c -o dbesi0.o ../dbesi0.f f77 -g -pipe -O2 -Wall -c -o dpchce.o ../dpchce.f f77 -g -pipe -O2 -Wall -c -o dusrmt.o ../dusrmt.f ../dusrmt.f:35:20: 35 | IFLAG(2)=-DATTRV(1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dusrmt.f:36:21: 36 | IFLAG(3)= DATTRV(2) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dusrmt.f:54:18: 54 | I=DATTRV(L) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dusrmt.f:62:20: 62 | IFLAG(3)=DATTRV(L+1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dusrmt.f:2:50: 2 | SUBROUTINE DUSRMT (I, J, AIJ, INDCAT, PRGOPT, DATTRV, IFLAG) | 1 Warning: Unused dummy argument 'prgopt' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o pchce.o ../pchce.f f77 -g -pipe -O2 -Wall -c -o sdriv3.o ../sdriv3.f ../sdriv3.f:977:72: 977 | 30 WORK(I+IYH-1) = Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../sdriv3.f:1177:72: 1177 | 190 Y(I) = WORK(I+IYH-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../sdriv3.f:1190:72: 1190 | 230 WORK(I+IYWT-1) = 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../sdriv3.f:1194:72: 1194 | 250 WORK(I+IYWT-1) = EWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../sdriv3.f:1201:72: 1201 | 280 WORK(I+IYWT-1) = ABS(Y(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../sdriv3.f:1251:72: 1251 | 340 WORK(I+ISAVE2-1) = WORK(I+ISAVE2-1)/WORK(I+IA-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1) ../sdriv3.f:1291:72: 1291 | 380 WORK(I+IYWT-1) = MAX(EWT(1), ABS(Y(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../sdriv3.f:1294:72: 1294 | 400 WORK(I+IYWT-1) = MAX(EWT(I), ABS(Y(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 400 at (1) ../sdriv3.f:1298:72: 1298 | 420 WORK(I+ISAVE2-1) = Y(I)/WORK(I+IYWT-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1) ../sdriv3.f:1399:72: 1399 | 480 Y(J) = WORK(IYH+J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 480 at (1) ../sdriv3.f:1481:72: 1481 | 570 Y(I) = WORK(I+IYH-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 570 at (1) ../sdriv3.f:877:0: 877 | ISAVE1 = IYWT + N | Warning: 'iywt' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o wnlt1.o ../wnlt1.f f77 -g -pipe -O2 -Wall -c -o cdstp.o ../cdstp.f ../cdstp.f:118:72: 118 | 115 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 115 at (1) ../cdstp.f:137:72: 137 | 125 SAVE1(I) = 0.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) ../cdstp.f:161:72: 161 | 132 DFDY(1,I) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 132 at (1) ../cdstp.f:166:72: 166 | 134 DFDY(1,I) = SAVE1(I) - DFDY(1,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 134 at (1) ../cdstp.f:175:72: 175 | 136 DFDY(1,I) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 136 at (1) ../cdstp.f:187:72: 187 | 140 Y(I) = YH(I,1) + EL(1,NQ)*SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../cdstp.f:226:72: 226 | 180 SAVE2(I) = SAVE1(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../cdstp.f:229:72: 229 | 185 SAVE2(I) = SAVE1(I)/MAX(ABS(Y(I)), ABS(YWT(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 185 at (1) ../cdstp.f:248:72: 248 | 190 SAVE2(I) = YH(I,NQ+1)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../cdstp.f:251:72: 251 | 195 SAVE2(I) = YH(I,NQ+1)/MAX(ABS(Y(I)), ABS(YWT(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 195 at (1) ../cdstp.f:279:72: 279 | 215 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 215 at (1) ../cdstp.f:298:72: 298 | DO 230 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 230 at (1) ../cdstp.f:299:72: 299 | 230 YH(I,J) = YH(I,J) + EL(J,NQ)*SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../cdstp.f:301:72: 301 | 235 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 235 at (1) ../cdstp.f:368:72: 368 | 250 YH(I,MAXORD+1) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../cdstp.f:387:72: 387 | 270 SAVE2(I) = YH(I,NQ+1)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../cdstp.f:390:72: 390 | 275 SAVE2(I) = YH(I,NQ+1)/MAX(ABS(Y(I)), ABS(YWT(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 275 at (1) ../cdstp.f:401:72: 401 | 290 SAVE2(I) = (SAVE1(I) - YH(I,MAXORD+1))/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../cdstp.f:423:72: 423 | 360 YH(I,NQ+2) = SAVE1(I)*EL(NQ+1,NQ)/(NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../cdstp.f:443:72: 443 | 405 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 405 at (1) ../cdstp.f:457:72: 457 | 435 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 435 at (1) ../cdstp.f:180:0: 180 | IF (ITER .GT. 0) TREND = MAX(.9E0*TREND, D/D1) | Warning: 'd1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dbesi1.o ../dbesi1.f f77 -g -pipe -O2 -Wall -c -o dpchci.o ../dpchci.f f77 -g -pipe -O2 -Wall -c -o dvecs.o ../dvecs.f f77 -g -pipe -O2 -Wall -c -o pchci.o ../pchci.f f77 -g -pipe -O2 -Wall -c -o sdscl.o ../sdscl.f ../sdscl.f:32:72: 32 | DO 10 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../sdscl.f:33:72: 33 | 10 YH(I,J+1) = YH(I,J+1)*R1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -O2 -Wall -c -o wnlt2.o ../wnlt2.f f77 -g -pipe -O2 -Wall -c -o cdzro.o ../cdzro.f f77 -g -pipe -O2 -Wall -c -o dbesj.o ../dbesj.f ../dbesj.f:116:72: 116 | IF (N-1) 720, 10, 20 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesj.f:119:72: 119 | IF (X) 730, 30, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesj.f:120:72: 120 | 30 IF (ALPHA) 710, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesj.f:241:72: 241 | IF (NN-1) 440, 390, 130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesj.f:251:72: 251 | IF (NN-1) 440, 410, 420 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o dpchcm.o ../dpchcm.f f77 -g -pipe -O2 -Wall -c -o dvnrms.o ../dvnrms.f f77 -g -pipe -O2 -Wall -c -o pchcm.o ../pchcm.f f77 -g -pipe -O2 -Wall -c -o sdsdot.o ../sdsdot.f ../sdsdot.f:67:15: 67 | 30 SDSDOT = DSDOT | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../sdsdot.f:76:15: 76 | SDSDOT = DSDOT | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o wnlt3.o ../wnlt3.f f77 -g -pipe -O2 -Wall -c -o cexprl.o ../cexprl.f ../cexprl.f:35:18: 35 | NTERMS = XN - (XN*XLN+ALNEPS)/(XLN+1.36) + 1.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dbesj0.o ../dbesj0.f ../dbesj0.f:2:6: 2 | DOUBLE PRECISION FUNCTION DBESJ0 (X) | 1 Warning: 'dbesj0' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o dpchcs.o ../dpchcs.f ../dpchcs.f:122:72: 122 | IF ( DPCHST(SLOPE(I-1),SLOPE(I)) ) 100, 300, 900 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dpchcs.f:145:72: 145 | IF ( DPCHST(DEXT, SLOPE(I-1)) ) 200, 900, 250 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o dvout.o ../dvout.f f77 -g -pipe -O2 -Wall -c -o pchcs.o ../pchcs.f ../pchcs.f:120:72: 120 | IF ( PCHST(SLOPE(I-1),SLOPE(I)) ) 100, 300, 900 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../pchcs.f:143:72: 143 | IF ( PCHST(DEXT, SLOPE(I-1)) ) 200, 900, 250 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o sdstp.o ../sdstp.f ../sdstp.f:116:72: 116 | 115 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 115 at (1) ../sdstp.f:135:72: 135 | 125 SAVE1(I) = 0.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) ../sdstp.f:159:72: 159 | 132 DFDY(1,I) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 132 at (1) ../sdstp.f:164:72: 164 | 134 DFDY(1,I) = SAVE1(I) - DFDY(1,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 134 at (1) ../sdstp.f:173:72: 173 | 136 DFDY(1,I) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 136 at (1) ../sdstp.f:185:72: 185 | 140 Y(I) = YH(I,1) + EL(1,NQ)*SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../sdstp.f:224:72: 224 | 180 SAVE2(I) = SAVE1(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../sdstp.f:227:72: 227 | 185 SAVE2(I) = SAVE1(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 185 at (1) ../sdstp.f:246:72: 246 | 190 SAVE2(I) = YH(I,NQ+1)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../sdstp.f:249:72: 249 | 195 SAVE2(I) = YH(I,NQ+1)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 195 at (1) ../sdstp.f:277:72: 277 | 215 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 215 at (1) ../sdstp.f:296:72: 296 | DO 230 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 230 at (1) ../sdstp.f:297:72: 297 | 230 YH(I,J) = YH(I,J) + EL(J,NQ)*SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../sdstp.f:299:72: 299 | 235 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 235 at (1) ../sdstp.f:366:72: 366 | 250 YH(I,MAXORD+1) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../sdstp.f:385:72: 385 | 270 SAVE2(I) = YH(I,NQ+1)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../sdstp.f:388:72: 388 | 275 SAVE2(I) = YH(I,NQ+1)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 275 at (1) ../sdstp.f:399:72: 399 | 290 SAVE2(I) = (SAVE1(I) - YH(I,MAXORD+1))/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../sdstp.f:421:72: 421 | 360 YH(I,NQ+2) = SAVE1(I)*EL(NQ+1,NQ)/(NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../sdstp.f:441:72: 441 | 405 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 405 at (1) ../sdstp.f:455:72: 455 | 435 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 435 at (1) ../sdstp.f:178:0: 178 | IF (ITER .GT. 0) TREND = MAX(.9E0*TREND, D/D1) | Warning: 'd1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o wnnls.o ../wnnls.f f77 -g -pipe -O2 -Wall -c -o cfftb.o ../cfftb.f f77 -g -pipe -O2 -Wall -c -o dbesj1.o ../dbesj1.f ../dbesj1.f:2:6: 2 | DOUBLE PRECISION FUNCTION DBESJ1 (X) | 1 Warning: 'dbesj1' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o dpchdf.o ../dpchdf.f f77 -g -pipe -O2 -Wall -c -o dwnlit.o ../dwnlit.f f77 -g -pipe -O2 -Wall -c -o pchdf.o ../pchdf.f f77 -g -pipe -O2 -Wall -c -o sdzro.o ../sdzro.f f77 -g -pipe -O2 -Wall -c -o xadd.o ../xadd.f ../xadd.f:79:72: 79 | IF (I) 80, 50, 90 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o cfftb1.o ../cfftb1.f f77 -g -pipe -O2 -Wall -c -o dbesk.o ../dbesk.f ../dbesk.f:201:0: 201 | TM = TM + TRX | Warning: 'trx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbesk.f:201:0: Warning: 'tm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbesk.f:195:0: 195 | Y(2) = S2 | Warning: 's2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dpchfd.o ../dpchfd.f f77 -g -pipe -O2 -Wall -c -o dwnlsm.o ../dwnlsm.f ../dwnlsm.f:130:13: 130 | LINK = PRGOPT(1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dwnlsm.f:146:15: 146 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dwnlsm.f:159:16: 159 | NEXT = PRGOPT(LINK) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dwnlsm.f:85:0: 85 | * JCON, JP, KEY, KRANK, L1, LAST, LINK, M, ME, NEXT, NIV, NLINK, | Warning: 'jcon' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o pchdoc.o ../pchdoc.f f77 -g -pipe -O2 -Wall -c -o sepeli.o ../sepeli.f f77 -g -pipe -O2 -Wall -c -o xadj.o ../xadj.f f77 -g -pipe -O2 -Wall -c -o cfftf.o ../cfftf.f f77 -g -pipe -O2 -Wall -c -o dbesk0.o ../dbesk0.f f77 -g -pipe -O2 -Wall -c -o dpchfe.o ../dpchfe.f f77 -g -pipe -O2 -Wall -c -o dwnlt1.o ../dwnlt1.f f77 -g -pipe -O2 -Wall -c -o pchfd.o ../pchfd.f f77 -g -pipe -O2 -Wall -c -o sepx4.o ../sepx4.f f77 -g -pipe -O2 -Wall -c -o xc210.o ../xc210.f f77 -g -pipe -O2 -Wall -c -o cfftf1.o ../cfftf1.f f77 -g -pipe -O2 -Wall -c -o dbesk1.o ../dbesk1.f f77 -g -pipe -O2 -Wall -c -o dpchia.o ../dpchia.f f77 -g -pipe -O2 -Wall -c -o dwnlt2.o ../dwnlt2.f f77 -g -pipe -O2 -Wall -c -o pchfe.o ../pchfe.f f77 -g -pipe -O2 -Wall -c -o sgbco.o ../sgbco.f f77 -g -pipe -O2 -Wall -c -o xcon.o ../xcon.f ../xcon.f:91:10: 91 | I = LOG10(ABS(X))/DLG10R | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../xcon.f:115:14: 115 | ITEMP = ISPACE/DLG10R | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o cffti.o ../cffti.f f77 -g -pipe -O2 -Wall -c -o dbesks.o ../dbesks.f f77 -g -pipe -O2 -Wall -c -o dpchic.o ../dpchic.f f77 -g -pipe -O2 -Wall -c -o dwnlt3.o ../dwnlt3.f f77 -g -pipe -O2 -Wall -c -o pchia.o ../pchia.f f77 -g -pipe -O2 -Wall -c -o sgbdi.o ../sgbdi.f f77 -g -pipe -O2 -Wall -c -o xerbla.o ../xerbla.f f77 -g -pipe -O2 -Wall -c -o cffti1.o ../cffti1.f ../cffti1.f:62:72: 62 | IF (J-4) 102,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cffti1.f:68:72: 68 | IF (NR) 101,105,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o dbesy.o ../dbesy.f ../dbesy.f:160:0: 160 | TM = TM + TRX | Warning: 'trx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbesy.f:160:0: Warning: 'tm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbesy.f:154:0: 154 | Y(2) = S2 | Warning: 's2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dpchid.o ../dpchid.f f77 -g -pipe -O2 -Wall -c -o dwnnls.o ../dwnnls.f f77 -g -pipe -O2 -Wall -c -o pchic.o ../pchic.f f77 -g -pipe -O2 -Wall -c -o sgbfa.o ../sgbfa.f f77 -g -pipe -O2 -Wall -c -o xerclr.o ../xerclr.f f77 -g -pipe -O2 -Wall -c -o cfod.o ../cfod.f ../cfod.f:82:72: 82 | 110 PC(I) = PC(I-1) + FNQM1*PC(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../cfod.f:91:72: 91 | 120 XPIN = XPIN + TSIGN*PC(I)/(I+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../cfod.f:96:72: 96 | 130 ELCO(I+1,NQ) = RQ1FAC*PC(I)/I | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../cfod.f:119:72: 119 | 210 PC(I) = PC(I-1) + FNQ*PC(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../cfod.f:123:72: 123 | 220 ELCO(I,NQ) = PC(I)/PC(2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) f77 -g -pipe -O2 -Wall -c -o dbesy0.o ../dbesy0.f ../dbesy0.f:2:6: 2 | DOUBLE PRECISION FUNCTION DBESY0 (X) | 1 Warning: 'dbesy0' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o dpchim.o ../dpchim.f ../dpchim.f:212:72: 212 | IF ( DPCHST(DEL1,DEL2) ) 42, 41, 45 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o dwritp.o ../dwritp.f f77 -g -pipe -O2 -Wall -c -o pchid.o ../pchid.f f77 -g -pipe -O2 -Wall -c -o sgbmv.o ../sgbmv.f f77 -g -pipe -O2 -Wall -c -o xercnt.o ../xercnt.f ../xercnt.f:2:67: 2 | SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) | 1 Warning: Unused dummy argument 'kontrl' at (1) [-Wunused-dummy-argument] ../xercnt.f:2:59: 2 | SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) | 1 Warning: Unused dummy argument 'level' at (1) [-Wunused-dummy-argument] ../xercnt.f:2:31: 2 | SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) | 1 Warning: Unused dummy argument 'librar' at (1) [-Wunused-dummy-argument] ../xercnt.f:2:46: 2 | SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) | 1 Warning: Unused dummy argument 'messg' at (1) [-Wunused-dummy-argument] ../xercnt.f:2:52: 2 | SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) | 1 Warning: Unused dummy argument 'nerr' at (1) [-Wunused-dummy-argument] ../xercnt.f:2:39: 2 | SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) | 1 Warning: Unused dummy argument 'subrou' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o cg.o ../cg.f f77 -g -pipe -O2 -Wall -c -o dbesy1.o ../dbesy1.f ../dbesy1.f:2:6: 2 | DOUBLE PRECISION FUNCTION DBESY1 (X) | 1 Warning: 'dbesy1' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o dpchkt.o ../dpchkt.f f77 -g -pipe -O2 -Wall -c -o dwupdt.o ../dwupdt.f f77 -g -pipe -O2 -Wall -c -o pchim.o ../pchim.f ../pchim.f:209:72: 209 | IF ( PCHST(DEL1,DEL2) ) 42, 41, 45 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o sgbsl.o ../sgbsl.f f77 -g -pipe -O2 -Wall -c -o xerdmp.o ../xerdmp.f f77 -g -pipe -O2 -Wall -c -o cgamma.o ../cgamma.f f77 -g -pipe -O2 -Wall -c -o dbeta.o ../dbeta.f ../dbeta.f:41:0: 41 | IF (A+B.LT.XMAX) RETURN | Warning: '__result_dbeta' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dpchng.o ../dpchng.f f77 -g -pipe -O2 -Wall -c -o dx.o ../dx.f f77 -g -pipe -O2 -Wall -c -o pchkt.o ../pchkt.f f77 -g -pipe -O2 -Wall -c -o sgeco.o ../sgeco.f f77 -g -pipe -O2 -Wall -c -o xerhlt.o ../xerhlt.f ../xerhlt.f:2:30: 2 | SUBROUTINE XERHLT (MESSG) | 1 Warning: Unused dummy argument 'messg' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o cgamr.o ../cgamr.f f77 -g -pipe -O2 -Wall -c -o dbetai.o ../dbetai.f ../dbetai.f:78:10: 78 | N = MAX (ALNEPS/LOG(Y), 4.0D0) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dbetai.f:90:11: 90 | IB = MAX (XB/ALNSML, 0.0D0) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dbetai.f:96:10: 96 | N = Q | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dpchsp.o ../dpchsp.f f77 -g -pipe -O2 -Wall -c -o dx4.o ../dx4.f f77 -g -pipe -O2 -Wall -c -o pchngs.o ../pchngs.f f77 -g -pipe -O2 -Wall -c -o sgedi.o ../sgedi.f f77 -g -pipe -O2 -Wall -c -o xermax.o ../xermax.f f77 -g -pipe -O2 -Wall -c -o cgbco.o ../cgbco.f f77 -g -pipe -O2 -Wall -c -o dbfqad.o ../dbfqad.f f77 -g -pipe -O2 -Wall -c -o dpchst.o ../dpchst.f f77 -g -pipe -O2 -Wall -c -o dxadd.o ../dxadd.f ../dxadd.f:79:72: 79 | IF (I) 80, 50, 90 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o pchsp.o ../pchsp.f f77 -g -pipe -O2 -Wall -c -o sgeev.o ../sgeev.f f77 -g -pipe -O2 -Wall -c -o xermsg.o ../xermsg.f f77 -g -pipe -O2 -Wall -c -o cgbdi.o ../cgbdi.f f77 -g -pipe -O2 -Wall -c -o dbhin.o ../dbhin.f f77 -g -pipe -O2 -Wall -c -o dpchsw.o ../dpchsw.f f77 -g -pipe -O2 -Wall -c -o dxadj.o ../dxadj.f f77 -g -pipe -O2 -Wall -c -o pchst.o ../pchst.f f77 -g -pipe -O2 -Wall -c -o sgefa.o ../sgefa.f f77 -g -pipe -O2 -Wall -c -o xerprn.o ../xerprn.f f77 -g -pipe -O2 -Wall -c -o cgbfa.o ../cgbfa.f f77 -g -pipe -O2 -Wall -c -o dbi.o ../dbi.f f77 -g -pipe -O2 -Wall -c -o dpcoef.o ../dpcoef.f ../dpcoef.f:68:72: 68 | 1 TC(I) = TC(I)/FAC | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) ../dpcoef.f:76:72: 76 | 3 TC(NEW) = SAVE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 3 at (1) f77 -g -pipe -O2 -Wall -c -o dxc210.o ../dxc210.f f77 -g -pipe -O2 -Wall -c -o pchsw.o ../pchsw.f f77 -g -pipe -O2 -Wall -c -o sgefs.o ../sgefs.f ../sgefs.f:152:15: 152 | IND = -LOG10(R1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o xersve.o ../xersve.f f77 -g -pipe -O2 -Wall -c -o cgbmv.o ../cgbmv.f f77 -g -pipe -O2 -Wall -c -o dbie.o ../dbie.f f77 -g -pipe -O2 -Wall -c -o dpfqad.o ../dpfqad.f f77 -g -pipe -O2 -Wall -c -o dxcon.o ../dxcon.f ../dxcon.f:91:10: 91 | I = LOG10(ABS(X))/DLG10R | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dxcon.f:115:14: 115 | ITEMP = ISPACE/DLG10R | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o pcoef.o ../pcoef.f ../pcoef.f:68:72: 68 | 1 TC(I) = TC(I)/FAC | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) ../pcoef.f:76:72: 76 | 3 TC(NEW) = SAVE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 3 at (1) f77 -g -pipe -O2 -Wall -c -o sgeir.o ../sgeir.f ../sgeir.f:191:12: 191 | IND = -LOG10(MAX(R1MACH(4),DNORM/XNORM)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o xgetf.o ../xgetf.f f77 -g -pipe -O2 -Wall -c -o cgbsl.o ../cgbsl.f f77 -g -pipe -O2 -Wall -c -o dbinom.o ../dbinom.f f77 -g -pipe -O2 -Wall -c -o dpigmr.o ../dpigmr.f ../dpigmr.f:383:0: 383 | IF (RHO .LT. R0NRM) GO TO 150 | Warning: 'rho' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dxlcal.o ../dxlcal.f f77 -g -pipe -O2 -Wall -c -o pfqad.o ../pfqad.f f77 -g -pipe -O2 -Wall -c -o sgemm.o ../sgemm.f f77 -g -pipe -O2 -Wall -c -o xgetua.o ../xgetua.f f77 -g -pipe -O2 -Wall -c -o cgeco.o ../cgeco.f f77 -g -pipe -O2 -Wall -c -o dbint4.o ../dbint4.f f77 -g -pipe -O2 -Wall -c -o dpincw.o ../dpincw.f ../dpincw.f:2:68: 2 | SUBROUTINE DPINCW (MRELAS, NVARS, LMX, LBM, NPP, JSTRT, IBASIS, | 1 Warning: Unused dummy argument 'ibasis' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o dxlegf.o ../dxlegf.f ../dxlegf.f:141:72: 141 | 290 IPQA(I)=0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) f77 -g -pipe -O2 -Wall -c -o pgsf.o ../pgsf.f ../pgsf.f:25:72: 25 | IF (MOD(IZ,2)) 103,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o sgemv.o ../sgemv.f f77 -g -pipe -O2 -Wall -c -o xgetun.o ../xgetun.f f77 -g -pipe -O2 -Wall -c -o cgedi.o ../cgedi.f f77 -g -pipe -O2 -Wall -c -o dbintk.o ../dbintk.f f77 -g -pipe -O2 -Wall -c -o dpinit.o ../dpinit.f ../dpinit.f:3:13: 3 | + INFO, AMAT, CSC, COSTSC, COLNRM, XLAMDA, ANORM, RHS, RHSNRM, | 1 Warning: Unused dummy argument 'info' at (1) [-Wunused-dummy-argument] ../dpinit.f:186:0: 186 | RHS(I-NVARS)=RHS(I-NVARS)+SCALR | Warning: 'scalr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dxnrmp.o ../dxnrmp.f ../dxnrmp.f:154:13: 154 | ISIG = LOG10(2.0D0*NU*(5.0D0+TX**2)) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dxnrmp.f:161:13: 161 | ISIG = LOG10(2.0D0*NU*(5.0D0+ABS(DARG*TX))) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o pimach.o ../pimach.f ../pimach.f:2:26: 2 | FUNCTION PIMACH (DUM) | 1 Warning: Unused dummy argument 'dum' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o sger.o ../sger.f f77 -g -pipe -O2 -Wall -c -o xlegf.o ../xlegf.f ../xlegf.f:141:72: 141 | 290 IPQA(I)=0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) f77 -g -pipe -O2 -Wall -c -o cgeev.o ../cgeev.f f77 -g -pipe -O2 -Wall -c -o dbkias.o ../dbkias.f ../dbkias.f:151:0: 151 | ERR = ERR*RAT | Warning: 'rat' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dpintm.o ../dpintm.f f77 -g -pipe -O2 -Wall -c -o dxpmu.o ../dxpmu.f f77 -g -pipe -O2 -Wall -c -o pinitm.o ../pinitm.f f77 -g -pipe -O2 -Wall -c -o sgesl.o ../sgesl.f f77 -g -pipe -O2 -Wall -c -o xnrmp.o ../xnrmp.f ../xnrmp.f:154:13: 154 | ISIG = LOG10(2.0*NU*(5.0+TX**2)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../xnrmp.f:161:13: 161 | ISIG = LOG10(2.0*NU*(5.0+ABS(SARG*TX))) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o cgefa.o ../cgefa.f f77 -g -pipe -O2 -Wall -c -o dbkisr.o ../dbkisr.f f77 -g -pipe -O2 -Wall -c -o dpjac.o ../dpjac.f ../dpjac.f:2:27: 2 | SUBROUTINE DPJAC (NEQ, Y, YH, NYH, EWT, FTEM, SAVF, WM, IWM, DF, | 1 Warning: Unused dummy argument 'neq' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o dxpmup.o ../dxpmup.f ../dxpmup.f:54:72: 54 | 220 CALL DXADJ(PROD,IPROD,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) f77 -g -pipe -O2 -Wall -c -o pjac.o ../pjac.f ../pjac.f:80:72: 80 | 110 WM(I+2) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../pjac.f:84:72: 84 | 120 WM(I+2) = WM(I+2)*CON | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../pjac.f:99:72: 99 | 220 WM(I+J1) = (FTEM(I) - SAVF(I))*FAC | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../pjac.f:108:72: 108 | 250 J = J + (N + 1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../pjac.f:117:72: 117 | 310 Y(I) = Y(I) + R*(H*SAVF(I) - YH(I,2)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1) ../pjac.f:139:72: 139 | 410 WM(I+2) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1) ../pjac.f:143:72: 143 | 420 WM(I+2) = WM(I+2)*CON | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1) ../pjac.f:160:72: 160 | 530 Y(I) = Y(I) + R | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 530 at (1) ../pjac.f:171:72: 171 | 540 WM(II+I) = (FTEM(I) - SAVF(I))*FAC | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 540 at (1) ../pjac.f:179:72: 179 | 580 II = II + MEBAND | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 580 at (1) ../pjac.f:2:26: 2 | SUBROUTINE PJAC (NEQ, Y, YH, NYH, EWT, FTEM, SAVF, WM, IWM, F, | 1 Warning: Unused dummy argument 'neq' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o sglss.o ../sglss.f f77 -g -pipe -O2 -Wall -c -o xpmu.o ../xpmu.f f77 -g -pipe -O2 -Wall -c -o cgefs.o ../cgefs.f ../cgefs.f:153:15: 153 | IND = -LOG10(R1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dbksol.o ../dbksol.f f77 -g -pipe -O2 -Wall -c -o dplint.o ../dplint.f ../dplint.f:51:72: 51 | DO 10010 I=1,KM1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10010 at (1) f77 -g -pipe -O2 -Wall -c -o dxpnrm.o ../dxpnrm.f ../dxpnrm.f:60:72: 60 | 510 CALL DXADJ(PROD,IPROD,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../dxpnrm.f:29:8: 29 | L=(MU2-MU1)+(NU2-NU1+1.5D0) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o pnnzrs.o ../pnnzrs.f f77 -g -pipe -O2 -Wall -c -o sgmres.o ../sgmres.f ../sgmres.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, SB, SX, RGWK, LRGW, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o xpmup.o ../xpmup.f ../xpmup.f:54:72: 54 | 220 CALL XADJ(PROD,IPROD,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) f77 -g -pipe -O2 -Wall -c -o cgeir.o ../cgeir.f ../cgeir.f:191:12: 191 | IND = -LOG10(MAX(R1MACH(4),DNORM/XNORM)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dbndac.o ../dbndac.f ../dbndac.f:217:72: 217 | DO 10 J=1,NBP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../dbndac.f:224:72: 224 | DO 20 J=1,NBP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) ../dbndac.f:244:72: 244 | DO 50 I=1,K | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1) f77 -g -pipe -O2 -Wall -c -o dplpce.o ../dplpce.f f77 -g -pipe -O2 -Wall -c -o dxpqnu.o ../dxpqnu.f ../dxpqnu.f:58:72: 58 | 50 CALL DXADJ(FACTMU,IF,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../dxpqnu.f:103:72: 103 | 77 CALL DXADJ(X1,IPQ,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 77 at (1) f77 -g -pipe -O2 -Wall -c -o poch.o ../poch.f ../poch.f:45:10: 45 | N = X | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../poch.f:60:10: 60 | N = ABS(X) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o sgtsl.o ../sgtsl.f f77 -g -pipe -O2 -Wall -c -o xpnrm.o ../xpnrm.f ../xpnrm.f:60:72: 60 | 510 CALL XADJ(PROD,IPROD,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../xpnrm.f:29:8: 29 | L=(MU2-MU1)+(NU2-NU1+1.5) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o cgemm.o ../cgemm.f f77 -g -pipe -O2 -Wall -c -o dbndsl.o ../dbndsl.f ../dbndsl.f:228:72: 228 | 70 IF (G(I,L+1)) 80,130,80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbndsl.f:229:72: 229 | 80 X(I)=(X(I)-S)/G(I,L+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../dbndsl.f:243:72: 243 | IF (G(J,L+1)) 120,130,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbndsl.f:244:72: 244 | 120 X(J)=(X(J)-S)/G(J,L+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) f77 -g -pipe -O2 -Wall -c -o dplpdm.o ../dplpdm.f ../dplpdm.f:3:47: 3 | + IBASIS, IMAT, IBRC, IPR, IWR, IND, IBB, ANORM, EPS, UU, GG, | 1 Warning: Unused dummy argument 'ibb' at (1) [-Wunused-dummy-argument] ../dplpdm.f:2:43: 2 | SUBROUTINE DPLPDM (MRELAS, NVARS, LMX, LBM, NREDC, INFO, IOPT, | 1 Warning: Unused dummy argument 'lmx' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o dxpsi.o ../dxpsi.f ../dxpsi.f:48:72: 48 | 12 C=(C+CNUM(K)/CDENOM(K))/B**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 12 at (1) ../dxpsi.f:56:72: 56 | 15 B=B+1.D0/(N-M+A) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1) f77 -g -pipe -O2 -Wall -c -o poch1.o ../poch1.f ../poch1.f:82:29: 82 | IF (BP.LT.10.0) INCR = 11.0 - BP | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../poch1.f:99:15: 99 | NTERMS = -0.5*ALNEPS/ALNVAR + 1.0 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o shels.o ../shels.f f77 -g -pipe -O2 -Wall -c -o xpqnu.o ../xpqnu.f ../xpqnu.f:58:72: 58 | 50 CALL XADJ(FACTMU,IF,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../xpqnu.f:103:72: 103 | 77 CALL XADJ(X1,IPQ,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 77 at (1) f77 -g -pipe -O2 -Wall -c -o cgemv.o ../cgemv.f f77 -g -pipe -O2 -Wall -c -o dbnfac.o ../dbnfac.f ../dbnfac.f:89:72: 89 | IF (NROWM1) 120, 110, 10 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o dplpfe.o ../dplpfe.f f77 -g -pipe -O2 -Wall -c -o dxqmu.o ../dxqmu.f f77 -g -pipe -O2 -Wall -c -o pois3d.o ../pois3d.f f77 -g -pipe -O2 -Wall -c -o sheqr.o ../sheqr.f f77 -g -pipe -O2 -Wall -c -o xpsi.o ../xpsi.f ../xpsi.f:48:72: 48 | 12 C=(C+CNUM(K)/CDENOM(K))/B**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 12 at (1) ../xpsi.f:56:72: 56 | 15 B=B+1./(N-M+A) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1) f77 -g -pipe -O2 -Wall -c -o cgerc.o ../cgerc.f f77 -g -pipe -O2 -Wall -c -o dbnslv.o ../dbnslv.f f77 -g -pipe -O2 -Wall -c -o dplpfl.o ../dplpfl.f ../dplpfl.f:3:12: 3 | + IBB, THETA, DIRNRM, RPRNRM, CSC, WW, BL, BU, ERP, RPRIM, | 1 Warning: Unused dummy argument 'ibb' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o dxqnu.o ../dxqnu.f ../dxqnu.f:42:8: 42 | K=(NU2-NU1+1.5D0) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o poisd2.o ../poisd2.f ../poisd2.f:207:0: 207 | GO TO (146,148),NODDPR | Warning: 'noddpr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o sindg.o ../sindg.f ../sindg.f:31:10: 31 | N = ABS(X)/90.0 + 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o xqmu.o ../xqmu.f f77 -g -pipe -O2 -Wall -c -o cgeru.o ../cgeru.f f77 -g -pipe -O2 -Wall -c -o dbocls.o ../dbocls.f ../dbocls.f:995:0: 995 | IF (ACCUM .OR. PRETRI) THEN | Warning: 'pretri' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbocls.f:715:0: 715 | LOCACC = LP + 2 | Warning: 'locacc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbocls.f:1139:0: 1139 | * RNORM,MODE,RW(LRW),IW(LIW)) | Warning: 'lbou' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbocls.f:1013:0: 1013 | IF (MCON.GT.0 .AND. FILTER) THEN | Warning: 'filter' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbocls.f:1122:0: 1122 | IF (ANORM.GT.ZERO) WT = WT/ANORM | Warning: 'drelpr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dplpmn.o ../dplpmn.f ../dplpmn.f:203:72: 203 | ASSIGN 20013 TO NPR004 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:212:72: 212 | 20014 ASSIGN 20018 TO NPR005 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:214:72: 214 | 20018 ASSIGN 20019 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:216:72: 216 | 20019 ASSIGN 20020 TO NPR007 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:219:72: 219 | ASSIGN 20024 TO NPR008 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:232:72: 232 | ASSIGN 20029 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:234:72: 234 | 20029 ASSIGN 20030 TO NPR010 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:236:72: 236 | 20030 ASSIGN 20031 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:238:72: 238 | 20031 ASSIGN 20032 TO NPR008 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:248:72: 248 | ASSIGN 20036 TO NPR007 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:250:72: 250 | 20036 ASSIGN 20037 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:252:72: 252 | 20037 ASSIGN 20038 TO NPR010 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:254:72: 254 | 20038 ASSIGN 20039 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:256:72: 256 | 20039 ASSIGN 20040 TO NPR008 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:265:72: 265 | ASSIGN 20044 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:282:72: 282 | ASSIGN 20050 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:287:72: 287 | 20035 ASSIGN 20051 TO NPR011 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:383:72: 383 | ASSIGN 20096 TO NPR012 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:442:18: 442 | GO TO NPR010, (20030,20038) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:444:72: 444 | 30009 ASSIGN 20134 TO NPR013 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:446:72: 446 | 20134 ASSIGN 20135 TO NPR014 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:452:72: 452 | 20139 ASSIGN 20141 TO NPR015 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:463:72: 463 | 20153 ASSIGN 20154 TO NPR005 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:474:18: 474 | GO TO NPR009, (20029,20037,20044,20050) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:548:18: 548 | GO TO NPR004, (20013,20204,20242) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:589:18: 589 | GO TO NPR007, (20020,20036) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:612:72: 612 | ASSIGN 20204 TO NPR004 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:624:18: 624 | GO TO NPR005, (20018,20154,20243) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:681:18: 681 | GO TO NPR008, (20024,20032,20040) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:691:18: 691 | GO TO NPR014, (20135,20246) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:696:72: 696 | ASSIGN 20233 TO NPR011 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:700:72: 700 | ASSIGN 20237 TO NPR012 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:721:72: 721 | ASSIGN 20242 TO NPR004 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:723:72: 723 | 20242 ASSIGN 20243 TO NPR005 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:725:72: 725 | 20243 ASSIGN 20244 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:727:72: 727 | 20244 ASSIGN 20245 TO NPR013 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:729:72: 729 | 20245 ASSIGN 20246 TO NPR014 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:741:72: 741 | 20249 ASSIGN 20251 TO NPR015 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:754:18: 754 | GO TO NPR006, (20019,20031,20039,20244,20275) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:775:18: 775 | GO TO NPR013, (20134,20245,20267) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:784:18: 784 | GO TO NPR015, (20141,20251) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:816:72: 816 | 30011 ASSIGN 20267 TO NPR013 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:827:72: 827 | 20268 ASSIGN 20275 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:883:18: 883 | GO TO NPR011, (20051,20233) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:951:18: 951 | GO TO NPR012, (20096,20237) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:831:5: 831 | 20275 I=1 | 1 Warning: Label 20275 at (1) defined but not used [-Wunused-label] ../dplpmn.f:818:5: 818 | 20267 IF (.NOT.(COSTSC.NE.ZERO)) GO TO 20268 | 1 Warning: Label 20267 at (1) defined but not used [-Wunused-label] ../dplpmn.f:731:5: 731 | 20246 CONTINUE | 1 Warning: Label 20246 at (1) defined but not used [-Wunused-label] ../dplpmn.f:725:5: 725 | 20243 ASSIGN 20244 TO NPR006 | 1 Warning: Label 20243 at (1) defined but not used [-Wunused-label] ../dplpmn.f:723:5: 723 | 20242 ASSIGN 20243 TO NPR005 | 1 Warning: Label 20242 at (1) defined but not used [-Wunused-label] ../dplpmn.f:614:5: 614 | 20204 CONTINUE | 1 Warning: Label 20204 at (1) defined but not used [-Wunused-label] ../dplpmn.f:505:10: 505 | 20159 KEY=AMAT(4) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dplpmn.f:264:0: 264 | COSTSC=SCOSTS | Warning: 'scosts' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpmn.f:416:0: 416 | 20116 RHS(I)=RHS(I)+AIJ*SCALR | Warning: 'scalr' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpmn.f:594:0: 594 | 20194 NTRIES=NTRIES+1 | Warning: 'ntries' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpmn.f:292:0: 292 | 20052 IF (.NOT.((.NOT.FEAS).AND.(.NOT.UNBND))) GO TO 10001 | Warning: 'feas' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dxred.o ../dxred.f f77 -g -pipe -O2 -Wall -c -o poisn2.o ../poisn2.f ../poisn2.f:341:0: 341 | IF (NROD .NE. 0) GO TO 173 | Warning: 'nrod' may be used uninitialized in this function [-Wmaybe-uninitialized] ../poisn2.f:133:0: 133 | IF (NRODPR .NE. 0) GO TO 121 | Warning: 'nrodpr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o sinqb.o ../sinqb.f f77 -g -pipe -O2 -Wall -c -o xqnu.o ../xqnu.f ../xqnu.f:42:8: 42 | K=(NU2-NU1+1.5) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o cgesl.o ../cgesl.f f77 -g -pipe -O2 -Wall -c -o dbols.o ../dbols.f f77 -g -pipe -O2 -Wall -c -o dplpmu.o ../dplpmu.f ../dplpmu.f:74:72: 74 | ASSIGN 20009 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmu.f:85:72: 85 | ASSIGN 20013 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmu.f:96:72: 96 | ASSIGN 20017 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmu.f:131:72: 131 | ASSIGN 20028 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmu.f:194:72: 194 | ASSIGN 20042 TO NPR003 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmu.f:294:72: 294 | 20039 ASSIGN 20074 TO NPR003 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmu.f:379:72: 379 | 20029 ASSIGN 20109 TO NPR003 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmu.f:403:18: 403 | GO TO NPR001, (20009,20013,20017,20028) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmu.f:432:18: 432 | GO TO NPR003, (20042,20074,20109) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmu.f:287:0: 287 | RG(ABS(IBASIS(IENTER)))= GQ/WP**2 | Warning: 'wp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpmu.f:120:0: 120 | 20019 IF ((N20018-K).LT.0) GO TO 20020 | Warning: 'n20018' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpmu.f:116:0: 116 | K=1 | Warning: 'k' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpmu.f:266:0: 266 | RG(J)=MAX(RG(J)-TWO*ALPHA*GAMMA+ALPHA**2*GQ,ONE+ALPHA**2) | Warning: 'gq' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpmu.f:98:0: 98 | 20017 THETA=-SCALR-THETA | Warning: 'scalr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dxset.o ../dxset.f ../dxset.f:252:11: 252 | 14 LX = 0.5D0*LOG10(DZEROX)/DLG10R | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o poisp2.o ../poisp2.f ../poisp2.f:51:15: 51 | IPSTOR = W(1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../poisp2.f:96:15: 96 | IPSTOR = W(1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o sinqf.o ../sinqf.f f77 -g -pipe -O2 -Wall -c -o xred.o ../xred.f f77 -g -pipe -O2 -Wall -c -o cgtsl.o ../cgtsl.f f77 -g -pipe -O2 -Wall -c -o dbolsm.o ../dbolsm.f ../dbolsm.f:1049:5: 1049 | 350 JDROP = JDROP1 + JDROP2 | 1 Warning: Label 350 at (1) defined but not used [-Wunused-label] ../dbolsm.f:840:0: 840 | JBIG = JMAG | Warning: 'jmag' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbolsm.f:835:0: 835 | JBIG = JLARGE | Warning: 'jlarge' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbolsm.f:1048:0: 1048 | 340 IF (JDROP1+JDROP2.LE.0 .OR. NSETB.LE.0) GO TO 580 | Warning: 'jdrop2' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbolsm.f:975:0: 975 | JDROP1 = J | Warning: 'jdrop1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dplpup.o ../dplpup.f ../dplpup.f:196:0: 196 | ELSEIF (ABS(AIJ).GT.AMX) THEN | Warning: 'amx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpup.f:153:0: 153 | ELSEIF (ABS(AIJ).LT.AMN) THEN | Warning: 'amn' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dy.o ../dy.f f77 -g -pipe -O2 -Wall -c -o poistg.o ../poistg.f ../poistg.f:274:15: 274 | IPSTOR = W(IWW1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o sinqi.o ../sinqi.f f77 -g -pipe -O2 -Wall -c -o xset.o ../xset.f ../xset.f:252:11: 252 | 14 LX = 0.5*LOG10(DZEROX)/DLG10R | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o ch.o ../ch.f f77 -g -pipe -O2 -Wall -c -o dbsgq8.o ../dbsgq8.f ../dbsgq8.f:141:72: 141 | IF (EE-AE) 40, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbsgq8.f:144:72: 144 | IF (LR(L)) 60, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbsgq8.f:174:72: 174 | IF (LR(L)) 100, 100, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o dpnnzr.o ../dpnnzr.f f77 -g -pipe -O2 -Wall -c -o dy4.o ../dy4.f f77 -g -pipe -O2 -Wall -c -o polcof.o ../polcof.f ../polcof.f:86:72: 86 | DO 10030 I=2,NMKP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10030 at (1) ../polcof.f:80:0: 80 | D(1)=PTWO | Warning: 'ptwo' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o sint.o ../sint.f ../sint.f:76:72: 76 | IF (N-2) 101,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o xsetf.o ../xsetf.f f77 -g -pipe -O2 -Wall -c -o chbmv.o ../chbmv.f f77 -g -pipe -O2 -Wall -c -o dbsi0e.o ../dbsi0e.f f77 -g -pipe -O2 -Wall -c -o dpoch.o ../dpoch.f ../dpoch.f:48:10: 48 | N = X | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpoch.f:51:11: 51 | IA = A | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpoch.f:64:10: 64 | N = ABS(X) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dyairy.o ../dyairy.f f77 -g -pipe -O2 -Wall -c -o polfit.o ../polfit.f ../polfit.f:149:72: 149 | 3 W(I) = 1.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 3 at (1) ../polfit.f:173:72: 173 | 9 A(I) = 0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 9 at (1) ../polfit.f:182:72: 182 | 10 W11 = W11 + W(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../polfit.f:189:72: 189 | 12 W11 = W11 + W(I)*A(K4PI)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 12 at (1) ../polfit.f:207:72: 207 | 15 SIGJ = SIGJ + W(I)*((Y(I)-R(I)) - A(K5PI))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1) ../polfit.f:212:72: 212 | IF (EPS) 24,26,27 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../polfit.f:246:72: 246 | 19 W11 = W11 + W(I)*A(K4PI)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 19 at (1) ../polfit.f:256:72: 256 | 20 TEMD1 = TEMD1 + TEMD2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../polfit.f:273:72: 273 | 21 SIGJ = SIGJ + W(I)*((Y(I)-R(I)) - A(K5PI))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 21 at (1) ../polfit.f:278:72: 278 | IF (EPS) 23,26,27 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../polfit.f:199:16: 199 | A(K2+1) = TEMD1 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../polfit.f:205:15: 205 | R(I) = TEMD2 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../polfit.f:206:18: 206 | A(K5PI) = TEMD2 - DBLE(R(I)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../polfit.f:234:15: 234 | A(JP1) = TEMD1/DBLE(W11) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../polfit.f:258:18: 258 | A(K2PJ+1) = TEMD1 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../polfit.f:271:15: 271 | R(I) = TEMD2 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../polfit.f:272:18: 272 | A(K5PI) = TEMD2 - DBLE(R(I)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../polfit.f:224:0: 224 | IF (J .GT. 1) A(K1PJ) = W11/W1 | Warning: 'w1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../polfit.f:350:0: 350 | 36 EPS = SQRT(SIG/XM) | Warning: 'sigpas' may be used uninitialized in this function [-Wmaybe-uninitialized] ../polfit.f:301:0: 301 | 25 NFAIL = NFAIL + 1 | Warning: 'nfail' may be used uninitialized in this function [-Wmaybe-uninitialized] ../polfit.f:325:0: 325 | NDEG = JPAS | Warning: 'jpas' may be used uninitialized in this function [-Wmaybe-uninitialized] ../polfit.f:157:0: 157 | KSIG = 1 | Warning: 'ksig' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o sinti.o ../sinti.f f77 -g -pipe -O2 -Wall -c -o xsetua.o ../xsetua.f f77 -g -pipe -O2 -Wall -c -o chemm.o ../chemm.f f77 -g -pipe -O2 -Wall -c -o dbsi1e.o ../dbsi1e.f f77 -g -pipe -O2 -Wall -c -o dpoch1.o ../dpoch1.f ../dpoch1.f:97:31: 97 | IF (BP.LT.10.0D0) INCR = 11.0D0 - BP | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpoch1.f:114:15: 114 | NTERMS = -0.5D0*ALNEPS/ALNVAR + 1.0D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o e1.o ../e1.f f77 -g -pipe -O2 -Wall -c -o polint.o ../polint.f ../polint.f:50:72: 50 | DO 10010 I=1,KM1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10010 at (1) f77 -g -pipe -O2 -Wall -c -o sintrp.o ../sintrp.f ../sintrp.f:73:72: 73 | 10 W(IQ) = XIQ/TEMP1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../sintrp.f:87:72: 87 | 40 GDI = OW(KP2-I) - ALPHA(I)*GDI | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../sintrp.f:103:72: 103 | 70 W(JQ) = GAMMA*W(JQ) - ALP*W(JQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../sintrp.f:105:72: 105 | 80 C(I+1) = GAMMA*C(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../sintrp.f:118:72: 118 | 100 YPOUT(L) = 0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../sintrp.f:126:72: 126 | 110 YPOUT(L) = YPOUT(L) + TEMP3*PHI(L,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../sintrp.f:132:72: 132 | 1 (YPOUT(L) + (C(1) + RMU*OG(1))*PHI(L,1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../sintrp.f:79:0: 79 | GDI = 1.0/TEMP1 | Warning: 'temp1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o xsetun.o ../xsetun.f f77 -g -pipe -O2 -Wall -c -o chemv.o ../chemv.f f77 -g -pipe -O2 -Wall -c -o dbsk0e.o ../dbsk0e.f ../dbsk0e.f:2:0: 2 | DOUBLE PRECISION FUNCTION DBSK0E (X) | Warning: '__result_dbsk0e' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dpoco.o ../dpoco.f f77 -g -pipe -O2 -Wall -c -o efc.o ../efc.f f77 -g -pipe -O2 -Wall -c -o polyvl.o ../polyvl.f ../polyvl.f:177:72: 177 | DO 10090 I=2,NMKP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10090 at (1) ../polyvl.f:93:0: 93 | YFIT=PTWO | Warning: 'ptwo' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o sir.o ../sir.f f77 -g -pipe -O2 -Wall -c -o yairy.o ../yairy.f f77 -g -pipe -O2 -Wall -c -o cher.o ../cher.f ../cher.f:103:0: 103 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dbsk1e.o ../dbsk1e.f ../dbsk1e.f:2:0: 2 | DOUBLE PRECISION FUNCTION DBSK1E (X) | Warning: '__result_dbsk1e' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dpodi.o ../dpodi.f f77 -g -pipe -O2 -Wall -c -o efcmn.o ../efcmn.f ../efcmn.f:142:13: 142 | L = PTEMP(IDATA) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o pos3d1.o ../pos3d1.f f77 -g -pipe -O2 -Wall -c -o zabs.o ../zabs.f ../zabs.f:2:6: 2 | DOUBLE PRECISION FUNCTION ZABS (ZR, ZI) | 1 Warning: 'zabs' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o cher2.o ../cher2.f ../cher2.f:114:0: 114 | INTEGER I, INFO, IX, IY, J, JX, JY, KX, KY | Warning: 'ky' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cher2.f:194:0: 194 | IX = KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cher2.f:114:0: 114 | INTEGER I, INFO, IX, IY, J, JX, JY, KX, KY | Warning: 'jy' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cher2.f:114:0: Warning: 'jx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dbskes.o ../dbskes.f f77 -g -pipe -O2 -Wall -c -o dpofa.o ../dpofa.f f77 -g -pipe -O2 -Wall -c -o ei.o ../ei.f f77 -g -pipe -O2 -Wall -c -o postg2.o ../postg2.f ../postg2.f:467:0: 467 | IF (NROD .NE. 0) GO TO 193 | Warning: 'nrod' may be used uninitialized in this function [-Wmaybe-uninitialized] ../postg2.f:127:0: 127 | IF (NRODPR .NE. 0) GO TO 120 | Warning: 'nrodpr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o sllti2.o ../sllti2.f f77 -g -pipe -O2 -Wall -c -o zacai.o ../zacai.f ../zacai.f:86:12: 86 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o cher2k.o ../cher2k.f f77 -g -pipe -O2 -Wall -c -o dbskin.o ../dbskin.f f77 -g -pipe -O2 -Wall -c -o dpofs.o ../dpofs.f ../dpofs.f:152:15: 152 | IND = -LOG10(D1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o eisdoc.o ../eisdoc.f f77 -g -pipe -O2 -Wall -c -o ppadd.o ../ppadd.f ../ppadd.f:42:72: 42 | IF (BP(N)-BP(1)) 101,142,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:54:72: 54 | IF (MODIZ) 106,107,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:55:72: 55 | 106 IF (A(1)) 110,142,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:59:72: 59 | IF (PSGF(XL,IZ,C,A,BH)) 108,108,109 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:64:72: 64 | IF (MODIZ) 111,112,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:65:72: 65 | 111 IF (A(1)) 112,142,115 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:69:72: 69 | IF (PSGF(XR,IZ,C,A,BH)) 113,114,114 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:79:72: 79 | IF (ABS(PSG)-EPS) 118,118,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:80:72: 80 | 116 IF (PSG*PPSGF(XM,IZ,C,A,BH)) 117,118,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:112:72: 112 | IF (MODIZ) 123,122,123 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:117:72: 117 | IF (ABS(FP)) 126,126,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:120:72: 120 | 126 IF (ABS(FPP)) 132,132,127 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:124:72: 124 | IF (ABS(R1)-ABS(R2)) 129,129,128 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:130:72: 130 | IF (I3) 133,133,131 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:138:72: 138 | IF (ICV) 134,134,135 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:144:72: 144 | IF (ABS(CBP(N))-ABS(CBP(1))) 137,142,139 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:154:72: 154 | IF (AIMAG(CBP(J))) 143,140,143 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:134:0: 134 | 133 CX = CX+R1 | Warning: 'IMAGPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../ppadd.f:134:0: Warning: 'REALPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../ppadd.f:137:0: 137 | IF (ABS(R1) .GT. SCNV) GO TO 120 | Warning: 'r3' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o slpdoc.o ../slpdoc.f f77 -g -pipe -O2 -Wall -c -o zacon.o ../zacon.f ../zacon.f:69:12: 69 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zacon.f:178:0: 178 | S1R = SC1R*CSSR(KFLAG) | Warning: 'sc2r' may be used uninitialized in this function [-Wmaybe-uninitialized] ../zacon.f:179:0: 179 | S1I = SC1I*CSSR(KFLAG) | Warning: 'sc2i' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cherk.o ../cherk.f ../cherk.f:289:26: 289 | RTEMP = RTEMP + CONJG( A( L, J ) )*A( L, J ) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cherk.f:301:26: 301 | RTEMP = RTEMP + CONJG( A( L, J ) )*A( L, J ) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dbsknu.o ../dbsknu.f f77 -g -pipe -O2 -Wall -c -o dpolcf.o ../dpolcf.f ../dpolcf.f:88:72: 88 | DO 10030 I=2,NMKP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10030 at (1) ../dpolcf.f:82:0: 82 | D(1)=PTWO | Warning: 'ptwo' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o elmbak.o ../elmbak.f ../elmbak.f:90:72: 90 | 100 Z(I,J) = Z(I,J) + X * Z(MP,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -O2 -Wall -c -o ppgq8.o ../ppgq8.f ../ppgq8.f:139:72: 139 | IF (EE-AE) 40, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppgq8.f:142:72: 142 | IF (LR(L)) 60, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppgq8.f:172:72: 172 | IF (LR(L)) 100, 100, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o slvs.o ../slvs.f ../slvs.f:74:72: 74 | 320 WM(I+2) = 1.0E0/DI | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../slvs.f:76:72: 76 | 340 X(I) = WM(I+2)*X(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1) ../slvs.f:2:38: 2 | SUBROUTINE SLVS (WM, IWM, X, TEM) | 1 Warning: Unused dummy argument 'tem' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o zairy.o ../zairy.f f77 -g -pipe -O2 -Wall -c -o chfcm.o ../chfcm.f ../chfcm.f:118:17: 118 | ITRUE = SIGN (ONE, DELTA) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dbspdr.o ../dbspdr.f f77 -g -pipe -O2 -Wall -c -o dpolft.o ../dpolft.f ../dpolft.f:154:72: 154 | 3 W(I) = 1.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 3 at (1) ../dpolft.f:178:72: 178 | 9 A(I) = 0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 9 at (1) ../dpolft.f:187:72: 187 | 10 W11 = W11 + W(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../dpolft.f:194:72: 194 | 12 W11 = W11 + W(I)*A(K4PI)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 12 at (1) ../dpolft.f:212:72: 212 | 15 SIGJ = SIGJ + W(I)*((Y(I)-R(I)) - A(K5PI))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1) ../dpolft.f:217:72: 217 | IF (EPS) 24,26,27 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dpolft.f:251:72: 251 | 19 W11 = W11 + W(I)*A(K4PI)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 19 at (1) ../dpolft.f:261:72: 261 | 20 TEMD1 = TEMD1 + TEMD2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../dpolft.f:278:72: 278 | 21 SIGJ = SIGJ + W(I)*((Y(I)-R(I)) - A(K5PI))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 21 at (1) ../dpolft.f:283:72: 283 | IF (EPS) 23,26,27 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dpolft.f:229:0: 229 | IF (J .GT. 1) A(K1PJ) = W11/W1 | Warning: 'w1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dpolft.f:355:0: 355 | 36 EPS = SQRT(SIG/XM) | Warning: 'sigpas' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dpolft.f:306:0: 306 | 25 NFAIL = NFAIL + 1 | Warning: 'nfail' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dpolft.f:330:0: 330 | NDEG = JPAS | Warning: 'jpas' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dpolft.f:127:0: 127 | * K4PI,K5,K5PI,KSIG,M,MAXDEG,MOP1,NDEG,NDER,NFAIL | Warning: 'ksig' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o elmhes.o ../elmhes.f ../elmhes.f:111:72: 111 | 140 A(I,J) = A(I,J) - Y * A(M,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../elmhes.f:114:72: 114 | 150 A(J,M) = A(J,M) + Y * A(J,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) f77 -g -pipe -O2 -Wall -c -o ppgsf.o ../ppgsf.f ../ppgsf.f:2:33: 2 | FUNCTION PPGSF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ppgsf.f:2:30: 2 | FUNCTION PPGSF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'c' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o smout.o ../smout.f ../smout.f:76:72: 76 | DO 10 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../smout.f:87:72: 87 | DO 30 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../smout.f:98:72: 98 | DO 50 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1) ../smout.f:107:72: 107 | DO 70 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 70 at (1) ../smout.f:118:72: 118 | DO 90 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 90 at (1) ../smout.f:129:72: 129 | DO 110 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1) ../smout.f:140:72: 140 | DO 130 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 130 at (1) ../smout.f:149:72: 149 | DO 150 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) f77 -g -pipe -O2 -Wall -c -o zasyi.o ../zasyi.f ../zasyi.f:76:11: 76 | JL = RL+RL + 2 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zasyi.f:84:12: 84 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o chfdv.o ../chfdv.f f77 -g -pipe -O2 -Wall -c -o dbspev.o ../dbspev.f f77 -g -pipe -O2 -Wall -c -o dpolvl.o ../dpolvl.f ../dpolvl.f:181:72: 181 | DO 10090 I=2,NMKP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10090 at (1) ../dpolvl.f:97:0: 97 | YFIT=PTWO | Warning: 'ptwo' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o eltran.o ../eltran.f ../eltran.f:75:72: 75 | 60 Z(I,J) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../eltran.f:88:72: 88 | 100 Z(I,MP) = A(I,MP-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -O2 -Wall -c -o pppsf.o ../pppsf.f ../pppsf.f:2:33: 2 | FUNCTION PPPSF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../pppsf.f:2:30: 2 | FUNCTION PPPSF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'c' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o snbco.o ../snbco.f f77 -g -pipe -O2 -Wall -c -o zbesh.o ../zbesh.f ../zbesh.f:293:12: 293 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o chfev.o ../chfev.f f77 -g -pipe -O2 -Wall -c -o dbsppp.o ../dbsppp.f f77 -g -pipe -O2 -Wall -c -o dpopt.o ../dpopt.f ../dpopt.f:108:11: 108 | 20004 NEXT=PRGOPT(LAST) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:128:12: 128 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:144:13: 144 | KPRINT=PRGOPT(LAST+2) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:152:38: 152 | IF (PRGOPT(LAST+2).NE.ZERO) IDG=PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:168:42: 168 | IF(PRGOPT(LAST+2).NE.ZERO) IPAGEF = PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:183:41: 183 | IF(PRGOPT(LAST+2).NE.ZERO) ISAVE = PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:199:43: 199 | IF (PRGOPT(LAST+2).NE.ZERO) MXITLP = PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:213:18: 213 | IBASIS(I) = PRGOPT(LAST+2+I) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:277:40: 277 | IF (PRGOPT(LAST+2).NE.ZERO) ITBRC=MAX(ONE,PRGOPT(LAST+3)) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:286:10: 286 | NPP=MAX(PRGOPT(LAST+3),ONE) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:317:0: 317 | LPRG=LPRG+LDS | Warning: 'lds' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dpopt.f:70:0: 70 | ROPT(4)=COSTSC | Warning: 'costsc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dpopt.f:68:0: 68 | ROPT(2)=ASMALL | Warning: 'asmall' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dpopt.f:69:0: 69 | ROPT(3)=ABIG | Warning: 'abig' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o enorm.o ../enorm.f f77 -g -pipe -O2 -Wall -c -o ppqad.o ../ppqad.f f77 -g -pipe -O2 -Wall -c -o snbdi.o ../snbdi.f ../snbdi.f:2:43: 2 | SUBROUTINE SNBDI (ABE, LDA, N, ML, MU, IPVT, DET) | 1 Warning: Unused dummy argument 'mu' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o zbesi.o ../zbesi.f ../zbesi.f:223:12: 223 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o chfie.o ../chfie.f f77 -g -pipe -O2 -Wall -c -o dbspvd.o ../dbspvd.f f77 -g -pipe -O2 -Wall -c -o dposl.o ../dposl.f f77 -g -pipe -O2 -Wall -c -o erf.o ../erf.f ../erf.f:2:6: 2 | FUNCTION ERF (X) | 1 Warning: 'erf' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] ../erf.f:2:0: 2 | FUNCTION ERF (X) | Warning: '__result_erf' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o ppsgf.o ../ppsgf.f ../ppsgf.f:2:33: 2 | FUNCTION PPSGF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ppsgf.f:2:30: 2 | FUNCTION PPSGF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'c' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o snbfa.o ../snbfa.f f77 -g -pipe -O2 -Wall -c -o zbesj.o ../zbesj.f ../zbesj.f:214:12: 214 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o chico.o ../chico.f f77 -g -pipe -O2 -Wall -c -o dbspvn.o ../dbspvn.f f77 -g -pipe -O2 -Wall -c -o dppco.o ../dppco.f f77 -g -pipe -O2 -Wall -c -o erfc.o ../erfc.f ../erfc.f:2:6: 2 | FUNCTION ERFC (X) | 1 Warning: 'erfc' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -O2 -Wall -c -o ppspf.o ../ppspf.f ../ppspf.f:2:33: 2 | FUNCTION PPSPF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ppspf.f:2:30: 2 | FUNCTION PPSPF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'c' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o snbfs.o ../snbfs.f ../snbfs.f:237:15: 237 | IND = -LOG10(R1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o zbesk.o ../zbesk.f f77 -g -pipe -O2 -Wall -c -o chidi.o ../chidi.f f77 -g -pipe -O2 -Wall -c -o dbsqad.o ../dbsqad.f f77 -g -pipe -O2 -Wall -c -o dppdi.o ../dppdi.f f77 -g -pipe -O2 -Wall -c -o ppval.o ../ppval.f f77 -g -pipe -O2 -Wall -c -o snbir.o ../snbir.f ../snbir.f:277:12: 277 | IND = -LOG10(MAX(R1MACH(4),DNORM/XNORM)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o zbesy.o ../zbesy.f f77 -g -pipe -O2 -Wall -c -o chiev.o ../chiev.f ../chiev.f:171:72: 171 | 16 V(I) = 0. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 16 at (1) f77 -g -pipe -O2 -Wall -c -o dbsynu.o ../dbsynu.f ../dbsynu.f:280:0: 280 | S2 = CK*S2 - S1 | Warning: 's1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbsynu.f:292:0: 292 | CK = CK + RX | Warning: 'ck' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dpperm.o ../dpperm.f f77 -g -pipe -O2 -Wall -c -o exint.o ../exint.f ../exint.f:128:11: 128 | IX = TX | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../exint.f:204:11: 204 | IX = X+0.5E0 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o proc.o ../proc.f ../proc.f:50:72: 50 | 102 IF (IA) 105,105,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:60:72: 60 | 105 IF (ID) 125,125,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:77:72: 77 | IF (ABS(DEN)) 108,109,108 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:82:72: 82 | IF (NA) 113,113,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:88:72: 88 | 113 IF (M1) 114,114,115 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:89:72: 89 | 114 IF (M2) 111,111,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:90:72: 90 | 115 IF (M2) 117,117,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:91:72: 91 | 116 IF (ABS(BM1(M1))-ABS(BM2(M2))) 120,120,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:92:72: 92 | 117 IF (IBR) 118,118,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:93:72: 93 | 118 IF (ABS(BM1(M1)-BD(ID))-ABS(BM1(M1)-RT)) 111,119,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:97:72: 97 | 120 IF (IBR) 121,121,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:98:72: 98 | 121 IF (ABS(BM2(M2)-BD(ID))-ABS(BM2(M2)-RT)) 111,122,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:3:22: 3 | + B, C, D, W, U) | 1 Warning: Unused dummy argument 'u' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o snbsl.o ../snbsl.f ../snbsl.f:126:26: 123 | DO 60 K = 1, N | 2 ...... 126 | T = SDOT(LM,ABE(K-1,ML+2),LDB,B(LB),1) | 1 Warning: Array reference at (1) out of bounds (0 < 1) in loop beginning at (2) f77 -g -pipe -O2 -Wall -c -o zbinu.o ../zbinu.f ../zbinu.f:106:12: 106 | NUI = FNUL-DFNU + 1 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o chifa.o ../chifa.f f77 -g -pipe -O2 -Wall -c -o dbvalu.o ../dbvalu.f f77 -g -pipe -O2 -Wall -c -o dppfa.o ../dppfa.f f77 -g -pipe -O2 -Wall -c -o exprel.o ../exprel.f ../exprel.f:35:18: 35 | NTERMS = XN - (XN*XLN+ALNEPS)/(XLN+1.36) + 1.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o procp.o ../procp.f ../procp.f:52:72: 52 | 102 IF (IA) 105,105,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:59:72: 59 | 105 IF (ID) 128,128,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:73:72: 73 | IF (MM2-2) 109,107,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:90:72: 90 | IF (ABS(DEN)) 110,111,110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:99:72: 99 | IF (NA) 116,116,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:105:72: 105 | 116 IF (M1) 117,117,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:106:72: 106 | 117 IF (M2) 114,114,123 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:107:72: 107 | 118 IF (M2) 120,120,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:108:72: 108 | 119 IF (ABS(BM1(M1))-ABS(BM2(M2))) 123,123,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:109:72: 109 | 120 IF (IBR) 121,121,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:110:72: 110 | 121 IF (ABS(BM1(M1)-BD(ID))-ABS(BM1(M1)-RT)) 114,122,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:114:72: 114 | 123 IF (IBR) 124,124,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:115:72: 115 | 124 IF (ABS(BM2(M2)-BD(ID))-ABS(BM2(M2)-RT)) 114,125,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o snls1.o ../snls1.f f77 -g -pipe -O2 -Wall -c -o zbiry.o ../zbiry.f f77 -g -pipe -O2 -Wall -c -o chisl.o ../chisl.f f77 -g -pipe -O2 -Wall -c -o dppgq8.o ../dppgq8.f ../dppgq8.f:143:72: 143 | IF (EE-AE) 40, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dppgq8.f:146:72: 146 | IF (LR(L)) 60, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dppgq8.f:176:72: 176 | IF (LR(L)) 100, 100, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o ezfft1.o ../ezfft1.f ../ezfft1.f:36:72: 36 | IF (J-4) 102,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ezfft1.f:42:72: 42 | IF (NR) 101,105,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o prod.o ../prod.f ../prod.f:47:72: 47 | 102 IF (IA) 105,105,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:57:72: 57 | 105 IF (ID) 125,125,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:74:72: 74 | IF (DEN) 108,109,108 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:79:72: 79 | IF (NA) 113,113,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:85:72: 85 | 113 IF (M1) 114,114,115 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:86:72: 86 | 114 IF (M2) 111,111,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:87:72: 87 | 115 IF (M2) 117,117,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:88:72: 88 | 116 IF (ABS(BM1(M1))-ABS(BM2(M2))) 120,120,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:89:72: 89 | 117 IF (IBR) 118,118,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:90:72: 90 | 118 IF (ABS(BM1(M1)-BD(ID))-ABS(BM1(M1)-RT)) 111,119,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:94:72: 94 | 120 IF (IBR) 121,121,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:95:72: 95 | 121 IF (ABS(BM2(M2)-BD(ID))-ABS(BM2(M2)-RT)) 111,122,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:3:22: 3 | + B, C, D, W, U) | 1 Warning: Unused dummy argument 'u' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o snls1e.o ../snls1e.f f77 -g -pipe -O2 -Wall -c -o zbknu.o ../zbknu.f ../zbknu.f:73:12: 73 | INU = FNU+0.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zbknu.f:305:10: 305 | K = FK | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zbknu.f:442:0: 442 | CKI = CKI + RZI | Warning: 'cki' may be used uninitialized in this function [-Wmaybe-uninitialized] ../zbknu.f:441:0: 441 | CKR = CKR + RZR | Warning: 'ckr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o chkder.o ../chkder.f f77 -g -pipe -O2 -Wall -c -o dppqad.o ../dppqad.f f77 -g -pipe -O2 -Wall -c -o ezfftb.o ../ezfftb.f ../ezfftb.f:104:72: 104 | IF (N-2) 101,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o prodp.o ../prodp.f ../prodp.f:48:72: 48 | 102 IF (IA) 105,105,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:55:72: 55 | 105 IF (ID) 128,128,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:69:72: 69 | IF (MM2-2) 109,107,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:86:72: 86 | IF (DEN) 110,111,110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:95:72: 95 | IF (NA) 116,116,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:101:72: 101 | 116 IF (M1) 117,117,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:102:72: 102 | 117 IF (M2) 114,114,123 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:103:72: 103 | 118 IF (M2) 120,120,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:104:72: 104 | 119 IF (ABS(BM1(M1))-ABS(BM2(M2))) 123,123,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:105:72: 105 | 120 IF (IBR) 121,121,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:106:72: 106 | 121 IF (ABS(BM1(M1)-BD(ID))-ABS(BM1(M1)-RT)) 114,122,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:110:72: 110 | 123 IF (IBR) 124,124,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:111:72: 111 | 124 IF (ABS(BM2(M2)-BD(ID))-ABS(BM2(M2)-RT)) 114,125,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o snrm2.o ../snrm2.f ../snrm2.f:87:72: 87 | 10 ASSIGN 30 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../snrm2.f:94:19: 94 | 20 GO TO NEXT,(30, 50, 70, 110) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../snrm2.f:96:72: 96 | ASSIGN 50 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../snrm2.f:106:72: 106 | ASSIGN 70 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../snrm2.f:112:72: 112 | ASSIGN 110 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../snrm2.f:146:72: 146 | 95 SUM = SUM + SX(J)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 95 at (1) ../snrm2.f:125:5: 125 | 110 IF (ABS(SX(I)) .LE. XMAX) GO TO 115 | 1 Warning: Label 110 at (1) defined but not used [-Wunused-label] ../snrm2.f:120:5: 120 | 70 IF (ABS(SX(I)) .GT. CUTLO) GO TO 75 | 1 Warning: Label 70 at (1) defined but not used [-Wunused-label] ../snrm2.f:101:5: 101 | 50 IF (SX(I) .EQ. ZERO) GO TO 200 | 1 Warning: Label 50 at (1) defined but not used [-Wunused-label] ../snrm2.f:126:0: 126 | SUM = ONE + SUM * (XMAX / SX(I))**2 | Warning: 'xmax' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o zbuni.o ../zbuni.f f77 -g -pipe -O2 -Wall -c -o chkpr4.o ../chkpr4.f f77 -g -pipe -O2 -Wall -c -o dppsl.o ../dppsl.f f77 -g -pipe -O2 -Wall -c -o ezfftf.o ../ezfftf.f ../ezfftf.f:75:72: 75 | IF (N-2) 101,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o prvec.o ../prvec.f f77 -g -pipe -O2 -Wall -c -o snsq.o ../snsq.f f77 -g -pipe -O2 -Wall -c -o zbunk.o ../zbunk.f f77 -g -pipe -O2 -Wall -c -o chkprm.o ../chkprm.f f77 -g -pipe -O2 -Wall -c -o dcbrt.o ../dcbrt.f ../dcbrt.f:32:30: 32 | IF (NITER.EQ.0) NITER = 1.443*LOG(-.106*LOG(0.1*REAL(D1MACH(3))) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../dcbrt.f:46:10: 46 | Z = Y | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dppval.o ../dppval.f f77 -g -pipe -O2 -Wall -c -o ezffti.o ../ezffti.f f77 -g -pipe -O2 -Wall -c -o prwpge.o ../prwpge.f f77 -g -pipe -O2 -Wall -c -o snsqe.o ../snsqe.f f77 -g -pipe -O2 -Wall -c -o zdiv.o ../zdiv.f f77 -g -pipe -O2 -Wall -c -o chksn4.o ../chksn4.f f77 -g -pipe -O2 -Wall -c -o dcdot.o ../dcdot.f f77 -g -pipe -O2 -Wall -c -o dprvec.o ../dprvec.f f77 -g -pipe -O2 -Wall -c -o fac.o ../fac.f ../fac.f:57:13: 57 | NMAX = XMAX - 1. | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o prwvir.o ../prwvir.f ../prwvir.f:45:13: 45 | IPAGEF=SX(3) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o sods.o ../sods.f f77 -g -pipe -O2 -Wall -c -o zexp.o ../zexp.f f77 -g -pipe -O2 -Wall -c -o chksng.o ../chksng.f f77 -g -pipe -O2 -Wall -c -o dcfod.o ../dcfod.f f77 -g -pipe -O2 -Wall -c -o dprwpg.o ../dprwpg.f f77 -g -pipe -O2 -Wall -c -o fc.o ../fc.f f77 -g -pipe -O2 -Wall -c -o psgf.o ../psgf.f ../psgf.f:25:72: 25 | IF (MOD(IZ,2)) 103,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o somn.o ../somn.f f77 -g -pipe -O2 -Wall -c -o zkscl.o ../zkscl.f f77 -g -pipe -O2 -Wall -c -o chpco.o ../chpco.f f77 -g -pipe -O2 -Wall -c -o dcg.o ../dcg.f ../dcg.f:310:0: 310 | BK = BKNUM/BKDEN | Warning: 'bkden' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dprwvr.o ../dprwvr.f ../dprwvr.f:45:13: 45 | IPAGEF=SX(3) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o fcmn.o ../fcmn.f ../fcmn.f:225:16: 225 | L = PTEMP(IDATA) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o psi.o ../psi.f ../psi.f:98:10: 98 | N = X | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../psi.f:2:0: 2 | FUNCTION PSI (X) | Warning: '__result_psi' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o sopenm.o ../sopenm.f f77 -g -pipe -O2 -Wall -c -o zlog.o ../zlog.f f77 -g -pipe -O2 -Wall -c -o chpdi.o ../chpdi.f f77 -g -pipe -O2 -Wall -c -o dcgn.o ../dcgn.f ../dcgn.f:334:0: 334 | BK = BKNUM/BKDEN | Warning: 'bkden' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dpsi.o ../dpsi.f ../dpsi.f:122:10: 122 | N = X | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpsi.f:2:0: 2 | DOUBLE PRECISION FUNCTION DPSI (X) | Warning: '__result_dpsi' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o fdjac1.o ../fdjac1.f f77 -g -pipe -O2 -Wall -c -o psifn.o ../psifn.f f77 -g -pipe -O2 -Wall -c -o sorth.o ../sorth.f f77 -g -pipe -O2 -Wall -c -o zmlri.o ../zmlri.f ../zmlri.f:35:12: 35 | IAZ = AZ | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zmlri.f:36:13: 36 | IFNU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o chpfa.o ../chpfa.f f77 -g -pipe -O2 -Wall -c -o dcgs.o ../dcgs.f f77 -g -pipe -O2 -Wall -c -o dpsifn.o ../dpsifn.f f77 -g -pipe -O2 -Wall -c -o fdjac3.o ../fdjac3.f f77 -g -pipe -O2 -Wall -c -o psixn.o ../psixn.f f77 -g -pipe -O2 -Wall -c -o sos.o ../sos.f f77 -g -pipe -O2 -Wall -c -o zmlt.o ../zmlt.f f77 -g -pipe -O2 -Wall -c -o chpmv.o ../chpmv.f f77 -g -pipe -O2 -Wall -c -o dchdc.o ../dchdc.f f77 -g -pipe -O2 -Wall -c -o dpsixn.o ../dpsixn.f f77 -g -pipe -O2 -Wall -c -o fdump.o ../fdump.f f77 -g -pipe -O2 -Wall -c -o pvalue.o ../pvalue.f ../pvalue.f:73:72: 73 | 1 YP(I) = 0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) ../pvalue.f:99:72: 99 | 5 A(I) = 0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 5 at (1) ../pvalue.f:119:72: 119 | 6 YP(N) = DIF*A(K3PN) + N*A(K3PN-1) - A(K1I)*A(K4PN) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 6 at (1) ../pvalue.f:127:72: 127 | 7 A(K3PN) = YP(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 7 at (1) ../pvalue.f:129:72: 129 | 9 A(K3P1) = VAL | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 9 at (1) ../pvalue.f:64:15: 64 | MAXORD = A(1) + 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../pvalue.f:68:13: 68 | NORD = A(K3) + 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o soseqs.o ../soseqs.f ../soseqs.f:392:0: 392 | IF (FN1 .GT. 5.0*FMIN .OR. FN2 .GT. 5.0*FMIN) IFLAG = 6 | Warning: 'fmin' may be used uninitialized in this function [-Wmaybe-uninitialized] ../soseqs.f:254:0: 254 | KD = ISV - K | Warning: 'isv' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o zrati.o ../zrati.f ../zrati.f:35:12: 35 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zrati.f:37:13: 37 | MAGZ = AZ | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o chpr.o ../chpr.f ../chpr.f:99:0: 99 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dchdd.o ../dchdd.f f77 -g -pipe -O2 -Wall -c -o dpsort.o ../dpsort.f f77 -g -pipe -O2 -Wall -c -o fftdoc.o ../fftdoc.f f77 -g -pipe -O2 -Wall -c -o pythag.o ../pythag.f f77 -g -pipe -O2 -Wall -c -o sossol.o ../sossol.f f77 -g -pipe -O2 -Wall -c -o zs1s2.o ../zs1s2.f f77 -g -pipe -O2 -Wall -c -o chpr2.o ../chpr2.f ../chpr2.f:110:0: 110 | INTEGER I, INFO, IX, IY, J, JX, JY, K, KK, KX, KY | Warning: 'ky' may be used uninitialized in this function [-Wmaybe-uninitialized] ../chpr2.f:191:0: 191 | IX = KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../chpr2.f:110:0: 110 | INTEGER I, INFO, IX, IY, J, JX, JY, K, KK, KX, KY | Warning: 'jy' may be used uninitialized in this function [-Wmaybe-uninitialized] ../chpr2.f:110:0: Warning: 'jx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dchex.o ../dchex.f f77 -g -pipe -O2 -Wall -c -o dptsl.o ../dptsl.f f77 -g -pipe -O2 -Wall -c -o figi.o ../figi.f ../figi.f:86:72: 86 | IF (E2(I)) 1000, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o qag.o ../qag.f f77 -g -pipe -O2 -Wall -c -o spbco.o ../spbco.f f77 -g -pipe -O2 -Wall -c -o zseri.o ../zseri.f f77 -g -pipe -O2 -Wall -c -o chpsl.o ../chpsl.f f77 -g -pipe -O2 -Wall -c -o dchfcm.o ../dchfcm.f ../dchfcm.f:119:17: 119 | ITRUE = DSIGN (ONE, DELTA) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dqag.o ../dqag.f f77 -g -pipe -O2 -Wall -c -o figi2.o ../figi2.f ../figi2.f:86:72: 86 | 50 Z(I,J) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../figi2.f:90:72: 90 | IF (H) 900, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o qage.o ../qage.f f77 -g -pipe -O2 -Wall -c -o spbdi.o ../spbdi.f f77 -g -pipe -O2 -Wall -c -o zshch.o ../zshch.f f77 -g -pipe -O2 -Wall -c -o chu.o ../chu.f ../chu.f:58:10: 58 | N = AINTB | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dchfdv.o ../dchfdv.f f77 -g -pipe -O2 -Wall -c -o dqage.o ../dqage.f f77 -g -pipe -O2 -Wall -c -o fulmat.o ../fulmat.f ../fulmat.f:45:13: 45 | 10 NEXT = PRGOPT(LP) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../fulmat.f:54:12: 54 | 20 KEY = PRGOPT(LP+1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../fulmat.f:63:17: 63 | IFLAG(4) = PRGOPT(LP+3) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../fulmat.f:64:17: 64 | IFLAG(5) = PRGOPT(LP+4) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../fulmat.f:65:17: 65 | IFLAG(6) = PRGOPT(LP+5) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o qagi.o ../qagi.f f77 -g -pipe -O2 -Wall -c -o spbfa.o ../spbfa.f f77 -g -pipe -O2 -Wall -c -o zsqrt.o ../zsqrt.f f77 -g -pipe -O2 -Wall -c -o cinvit.o ../cinvit.f ../cinvit.f:147:72: 147 | 160 X = X + PYTHAG(AR(I,J),AI(I,J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../cinvit.f:277:72: 277 | 860 RV1(I) = Y | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 860 at (1) ../cinvit.f:280:0: 280 | RV1(J) = RV1(J) - EPS3 * X | Warning: 'ukroot' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cinvit.f:259:0: 259 | X = RV1(J) | Warning: 'j' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cinvit.f:257:0: 257 | IF (NORM .LT. GROWTO) GO TO 840 | Warning: 'growto' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cinvit.f:280:0: 280 | RV1(J) = RV1(J) - EPS3 * X | Warning: 'eps3' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dchfev.o ../dchfev.f f77 -g -pipe -O2 -Wall -c -o dqagi.o ../dqagi.f f77 -g -pipe -O2 -Wall -c -o fundoc.o ../fundoc.f f77 -g -pipe -O2 -Wall -c -o qagie.o ../qagie.f ../qagie.f:428:0: 428 | SMALL = SMALL*0.5E+00 | Warning: 'small' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qagie.f:388:0: 388 | 40 IF(IERRO.EQ.3.OR.ERLARG.LE.ERTEST) GO TO 60 | Warning: 'ertest' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qagie.f:378:0: 378 | ERLARG = ERLARG-ERLAST | Warning: 'erlarg' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o spbsl.o ../spbsl.f f77 -g -pipe -O2 -Wall -c -o zuchk.o ../zuchk.f f77 -g -pipe -O2 -Wall -c -o ckscl.o ../ckscl.f f77 -g -pipe -O2 -Wall -c -o dchfie.o ../dchfie.f f77 -g -pipe -O2 -Wall -c -o dqagie.o ../dqagie.f ../dqagie.f:422:0: 422 | SMALL = SMALL*0.5D+00 | Warning: 'small' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqagie.f:383:0: 383 | 40 IF(IERRO.EQ.3.OR.ERLARG.LE.ERTEST) GO TO 60 | Warning: 'ertest' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqagie.f:373:0: 373 | ERLARG = ERLARG-ERLAST | Warning: 'erlarg' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o fzero.o ../fzero.f f77 -g -pipe -O2 -Wall -c -o qagp.o ../qagp.f f77 -g -pipe -O2 -Wall -c -o speli4.o ../speli4.f ../speli4.f:290:72: 290 | DO 444 I=IS,MS | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 444 at (1) f77 -g -pipe -O2 -Wall -c -o zunhj.o ../zunhj.f f77 -g -pipe -O2 -Wall -c -o clbeta.o ../clbeta.f f77 -g -pipe -O2 -Wall -c -o dchkw.o ../dchkw.f f77 -g -pipe -O2 -Wall -c -o dqagp.o ../dqagp.f f77 -g -pipe -O2 -Wall -c -o gami.o ../gami.f f77 -g -pipe -O2 -Wall -c -o qagpe.o ../qagpe.f ../qagpe.f:311:72: 311 | DO 20 J = IP1,NINTP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) ../qagpe.f:543:0: 543 | IF(IERRO.EQ.3) ABSERR = ABSERR+CORREC | Warning: 'correc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qagpe.f:366:0: 366 | IORD(K) = IORD(I) | Warning: 'k' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o spelip.o ../spelip.f f77 -g -pipe -O2 -Wall -c -o zuni1.o ../zuni1.f f77 -g -pipe -O2 -Wall -c -o clngam.o ../clngam.f ../clngam.f:35:13: 35 | N = -0.30*LOG(R1MACH(3)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../clngam.f:74:10: 74 | 30 N = SQRT (BOUND**2 - Y**2) - X + 1.0 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dchu.o ../dchu.f ../dchu.f:58:10: 58 | N = AINTB | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dqagpe.o ../dqagpe.f ../dqagpe.f:308:72: 308 | DO 20 J = IP1,NINTP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) ../dqagpe.f:535:0: 535 | IF(IERRO.EQ.3) ABSERR = ABSERR+CORREC | Warning: 'correc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqagpe.f:361:0: 361 | IORD(K) = IORD(I) | Warning: 'k' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o gamic.o ../gamic.f ../gamic.f:71:11: 71 | MA = A + 0.5*SGA | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../gamic.f:95:0: 95 | IF (A.LT.X) RETURN | Warning: '__result_gamic' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o qags.o ../qags.f f77 -g -pipe -O2 -Wall -c -o spenc.o ../spenc.f f77 -g -pipe -O2 -Wall -c -o zuni2.o ../zuni2.f ../zuni2.f:73:12: 73 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o clnrel.o ../clnrel.f f77 -g -pipe -O2 -Wall -c -o dchud.o ../dchud.f f77 -g -pipe -O2 -Wall -c -o dqags.o ../dqags.f f77 -g -pipe -O2 -Wall -c -o gamit.o ../gamit.f f77 -g -pipe -O2 -Wall -c -o qagse.o ../qagse.f ../qagse.f:419:0: 419 | SMALL = SMALL*0.5E+00 | Warning: 'small' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qagse.f:377:0: 377 | 40 IF(IERRO.EQ.3.OR.ERLARG.LE.ERTEST) GO TO 60 | Warning: 'ertest' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qagse.f:367:0: 367 | ERLARG = ERLARG-ERLAST | Warning: 'erlarg' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qagse.f:433:0: 433 | IF(IERRO.EQ.3) ABSERR = ABSERR+CORREC | Warning: 'correc' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o spigmr.o ../spigmr.f ../spigmr.f:378:0: 378 | IF (RHO .LT. R0NRM) GO TO 150 | Warning: 'rho' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o zunik.o ../zunik.f f77 -g -pipe -O2 -Wall -c -o clog10.o ../clog10.f f77 -g -pipe -O2 -Wall -c -o dckder.o ../dckder.f f77 -g -pipe -O2 -Wall -c -o dqagse.o ../dqagse.f ../dqagse.f:415:0: 415 | SMALL = SMALL*0.5D+00 | Warning: 'small' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqagse.f:374:0: 374 | 40 IF(IERRO.EQ.3.OR.ERLARG.LE.ERTEST) GO TO 60 | Warning: 'ertest' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqagse.f:364:0: 364 | ERLARG = ERLARG-ERLAST | Warning: 'erlarg' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqagse.f:429:0: 429 | IF(IERRO.EQ.3) ABSERR = ABSERR+CORREC | Warning: 'correc' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o gamlim.o ../gamlim.f f77 -g -pipe -O2 -Wall -c -o qawc.o ../qawc.f f77 -g -pipe -O2 -Wall -c -o spincw.o ../spincw.f ../spincw.f:2:68: 2 | SUBROUTINE SPINCW (MRELAS, NVARS, LMX, LBM, NPP, JSTRT, IBASIS, | 1 Warning: Unused dummy argument 'ibasis' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o zunk1.o ../zunk1.f ../zunk1.f:253:12: 253 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zunk1.f:33:0: 33 | INTEGER I, IB, IFLAG, IFN, IL, INIT, INU, IUF, K, KDFLG, KFLAG, | Warning: 'iflag' may be used uninitialized in this function [-Wmaybe-uninitialized] ../zunk1.f:209:0: 209 | C1R = CSRR(KFLAG) | Warning: 'kflag' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cmgnbn.o ../cmgnbn.f ../cmgnbn.f:289:15: 289 | 112 IPSTOR = REAL(W(IWW1)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dcoef.o ../dcoef.f ../dcoef.f:128:14: 128 | KFLAG = 0.5D0 * LOG10(EPS) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dcoef.f:2:54: 2 | SUBROUTINE DCOEF (YH, YP, NCOMP, NROWB, NFC, NIC, B, BETA, COEF, | 1 Warning: Unused dummy argument 'nic' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o dqawc.o ../dqawc.f f77 -g -pipe -O2 -Wall -c -o gamln.o ../gamln.f ../gamln.f:143:11: 143 | NZ = Z | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../gamln.f:158:11: 158 | MZ = ZM + 1 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../gamln.f:185:11: 185 | NZ = ZINC | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../gamln.f:163:0: 163 | ZINC = ZMIN - NZ | Warning: 'nz' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o qawce.o ../qawce.f f77 -g -pipe -O2 -Wall -c -o spinit.o ../spinit.f ../spinit.f:3:13: 3 | + INFO, AMAT, CSC, COSTSC, COLNRM, XLAMDA, ANORM, RHS, RHSNRM, | 1 Warning: Unused dummy argument 'info' at (1) [-Wunused-dummy-argument] ../spinit.f:184:0: 184 | RHS(I-NVARS)=RHS(I-NVARS)+SCALR | Warning: 'scalr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o zunk2.o ../zunk2.f ../zunk2.f:85:12: 85 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zunk2.f:40:0: 40 | INTEGER I, IB, IFLAG, IFN, IL, IN, INU, IUF, K, KDFLG, KFLAG, KK, | Warning: 'iflag' may be used uninitialized in this function [-Wmaybe-uninitialized] ../zunk2.f:264:0: 264 | C1R = CSRR(KFLAG) | Warning: 'kflag' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cmlri.o ../cmlri.f ../cmlri.f:31:12: 31 | IAZ = AZ | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cmlri.f:32:13: 32 | IFNU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dcopy.o ../dcopy.f ../dcopy.f:49:72: 49 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o dqawce.o ../dqawce.f f77 -g -pipe -O2 -Wall -c -o gamma.o ../gamma.f ../gamma.f:2:6: 2 | FUNCTION GAMMA (X) | 1 Warning: 'gamma' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] ../gamma.f:82:10: 82 | N = X | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o qawf.o ../qawf.f f77 -g -pipe -O2 -Wall -c -o splp.o ../splp.f ../splp.f:1578:11: 1578 | 20008 NEXT=PRGOPT(LAST) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../splp.f:1597:12: 1597 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../splp.f:1605:10: 1605 | LMX=PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../splp.f:1606:10: 1606 | LBM=PRGOPT(LAST+4) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o zuoik.o ../zuoik.f f77 -g -pipe -O2 -Wall -c -o cmpcsg.o ../cmpcsg.f f77 -g -pipe -O2 -Wall -c -o dcopym.o ../dcopym.f ../dcopym.f:39:72: 39 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -O2 -Wall -c -o dqawf.o ../dqawf.f f77 -g -pipe -O2 -Wall -c -o gamr.o ../gamr.f f77 -g -pipe -O2 -Wall -c -o qawfe.o ../qawfe.f ../qawfe.f:280:10: 280 | 10 L = ABS(OMEGA) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../qawfe.f:371:0: 371 | IF(IER.GE.1.AND.IER.NE.7) ABSERR = ABSERR+DRL | Warning: 'drl' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qawfe.f:328:0: 328 | 20 PSUM(NUMRL2) = PSUM(LL)+RSLST(LST) | Warning: 'll' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o splpce.o ../splpce.f f77 -g -pipe -O2 -Wall -c -o zwrsk.o ../zwrsk.f f77 -g -pipe -O2 -Wall -c -o cmposd.o ../cmposd.f ../cmposd.f:210:0: 210 | GO TO (146,148),NODDPR | Warning: 'noddpr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dcosdg.o ../dcosdg.f ../dcosdg.f:31:10: 31 | N = ABS(X)/90.D0 + 0.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dqawfe.o ../dqawfe.f ../dqawfe.f:279:10: 279 | 10 L = ABS(OMEGA) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dqawfe.f:369:0: 369 | IF(IER.GE.1.AND.IER.NE.7) ABSERR = ABSERR+DRL | Warning: 'drl' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqawfe.f:327:0: 327 | 20 PSUM(NUMRL2) = PSUM(LL)+RSLST(LST) | Warning: 'll' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o gamrn.o ../gamrn.f f77 -g -pipe -O2 -Wall -c -o qawo.o ../qawo.f f77 -g -pipe -O2 -Wall -c -o splpdm.o ../splpdm.f ../splpdm.f:3:47: 3 | + IBASIS, IMAT, IBRC, IPR, IWR, IND, IBB, ANORM, EPS, UU, GG, | 1 Warning: Unused dummy argument 'ibb' at (1) [-Wunused-dummy-argument] ../splpdm.f:2:43: 2 | SUBROUTINE SPLPDM (MRELAS, NVARS, LMX, LBM, NREDC, INFO, IOPT, | 1 Warning: Unused dummy argument 'lmx' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o cmposn.o ../cmposn.f ../cmposn.f:345:0: 345 | IF (NROD .NE. 0) GO TO 173 | Warning: 'nrod' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cmposn.f:137:0: 137 | IF (NRODPR .NE. 0) GO TO 121 | Warning: 'nrodpr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dcot.o ../dcot.f ../dcot.f:81:12: 81 | IFN = MOD (AINTY, 2.0D0) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dqawo.o ../dqawo.f f77 -g -pipe -O2 -Wall -c -o gaus8.o ../gaus8.f ../gaus8.f:142:72: 142 | IF (EE-AE) 40, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../gaus8.f:145:72: 145 | IF (LR(L)) 60, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../gaus8.f:175:72: 175 | IF (LR(L)) 100, 100, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../gaus8.f:101:14: 101 | NBITS = ANIB | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../gaus8.f:115:12: 115 | NIB = ANIB | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o qawoe.o ../qawoe.f ../qawoe.f:464:0: 464 | 70 IF(IERRO.EQ.3.OR.ERLARG.LE.ERTEST) GO TO 90 | Warning: 'ertest' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qawoe.f:442:0: 442 | ERLARG = ERLARG-ERLAST | Warning: 'erlarg' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qawoe.f:521:0: 521 | IF(IERRO.EQ.3) ABSERR = ABSERR+CORREC | Warning: 'correc' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o splpfe.o ../splpfe.f f77 -g -pipe -O2 -Wall -c -o cmposp.o ../cmposp.f ../cmposp.f:55:15: 55 | IPSTOR = REAL(W(1)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cmposp.f:100:15: 100 | IPSTOR = REAL(W(1)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dcov.o ../dcov.f ../dcov.f:194:72: 194 | 120 R(I,I)=WA1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../dcov.f:252:72: 252 | DO 290 J=I,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 290 at (1) f77 -g -pipe -O2 -Wall -c -o dqawoe.o ../dqawoe.f ../dqawoe.f:460:0: 460 | 70 IF(IERRO.EQ.3.OR.ERLARG.LE.ERTEST) GO TO 90 | Warning: 'ertest' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqawoe.f:439:0: 439 | ERLARG = ERLARG-ERLAST | Warning: 'erlarg' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqawoe.f:516:0: 516 | IF(IERRO.EQ.3) ABSERR = ABSERR+CORREC | Warning: 'correc' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o genbun.o ../genbun.f ../genbun.f:291:15: 291 | 112 IPSTOR = W(IWW1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o qaws.o ../qaws.f f77 -g -pipe -O2 -Wall -c -o splpfl.o ../splpfl.f ../splpfl.f:3:12: 3 | + IBB, THETA, DIRNRM, RPRNRM, CSC, WW, BL, BU, ERP, RPRIM, | 1 Warning: Unused dummy argument 'ibb' at (1) [-Wunused-dummy-argument] f77 -g -pipe -O2 -Wall -c -o cmptr3.o ../cmptr3.f ../cmptr3.f:63:0: 63 | 105 IF (N .NE. L3) GO TO 107 | Warning: 'l3' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cmptr3.f:59:0: 59 | 103 IF (N .NE. L2) GO TO 105 | Warning: 'l2' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cmptr3.f:55:0: 55 | IF (N .NE. L1) GO TO 103 | Warning: 'l1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dcpplt.o ../dcpplt.f f77 -g -pipe -O2 -Wall -c -o dqaws.o ../dqaws.f f77 -g -pipe -O2 -Wall -c -o h12.o ../h12.f ../h12.f:56:72: 56 | 10 CL=MAX(ABS(U(1,J)),CL) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../h12.f:57:72: 57 | IF (CL) 130,130,20 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../h12.f:61:72: 61 | 30 SM=SM+(U(1,J)*CLINV)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../h12.f:63:72: 63 | IF (U(1,LPIVOT)) 50,50,40 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../h12.f:70:72: 70 | 60 IF (CL) 130,130,70 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../h12.f:75:72: 75 | IF (B) 80,130,130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../h12.f:88:72: 88 | 90 I3=I3+ICE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) ../h12.f:89:72: 89 | IF (SM) 100,120,100 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../h12.f:94:72: 94 | 110 I4=I4+ICE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) f77 -g -pipe -O2 -Wall -c -o qawse.o ../qawse.f f77 -g -pipe -O2 -Wall -c -o splpmn.o ../splpmn.f ../splpmn.f:204:72: 204 | ASSIGN 20013 TO NPR004 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:213:72: 213 | 20014 ASSIGN 20018 TO NPR005 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:215:72: 215 | 20018 ASSIGN 20019 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:217:72: 217 | 20019 ASSIGN 20020 TO NPR007 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:220:72: 220 | ASSIGN 20024 TO NPR008 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:233:72: 233 | ASSIGN 20029 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:235:72: 235 | 20029 ASSIGN 20030 TO NPR010 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:237:72: 237 | 20030 ASSIGN 20031 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:239:72: 239 | 20031 ASSIGN 20032 TO NPR008 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:249:72: 249 | ASSIGN 20036 TO NPR007 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:251:72: 251 | 20036 ASSIGN 20037 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:253:72: 253 | 20037 ASSIGN 20038 TO NPR010 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:255:72: 255 | 20038 ASSIGN 20039 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:257:72: 257 | 20039 ASSIGN 20040 TO NPR008 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:266:72: 266 | ASSIGN 20044 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:283:72: 283 | ASSIGN 20050 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:288:72: 288 | 20035 ASSIGN 20051 TO NPR011 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:384:72: 384 | ASSIGN 20096 TO NPR012 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:443:18: 443 | GO TO NPR010, (20030,20038) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:445:72: 445 | 30009 ASSIGN 20134 TO NPR013 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:447:72: 447 | 20134 ASSIGN 20135 TO NPR014 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:453:72: 453 | 20139 ASSIGN 20141 TO NPR015 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:464:72: 464 | 20153 ASSIGN 20154 TO NPR005 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:475:18: 475 | GO TO NPR009, (20029,20037,20044,20050) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:549:18: 549 | GO TO NPR004, (20013,20204,20242) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:590:18: 590 | GO TO NPR007, (20020,20036) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:613:72: 613 | ASSIGN 20204 TO NPR004 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:625:18: 625 | GO TO NPR005, (20018,20154,20243) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:681:18: 681 | GO TO NPR008, (20024,20032,20040) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:691:18: 691 | GO TO NPR014, (20135,20246) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:696:72: 696 | ASSIGN 20233 TO NPR011 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:700:72: 700 | ASSIGN 20237 TO NPR012 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:721:72: 721 | ASSIGN 20242 TO NPR004 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:723:72: 723 | 20242 ASSIGN 20243 TO NPR005 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:725:72: 725 | 20243 ASSIGN 20244 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:727:72: 727 | 20244 ASSIGN 20245 TO NPR013 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:729:72: 729 | 20245 ASSIGN 20246 TO NPR014 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:741:72: 741 | 20249 ASSIGN 20251 TO NPR015 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:754:18: 754 | GO TO NPR006, (20019,20031,20039,20244,20275) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:775:18: 775 | GO TO NPR013, (20134,20245,20267) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:784:18: 784 | GO TO NPR015, (20141,20251) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:816:72: 816 | 30011 ASSIGN 20267 TO NPR013 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:827:72: 827 | 20268 ASSIGN 20275 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:883:18: 883 | GO TO NPR011, (20051,20233) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:951:18: 951 | GO TO NPR012, (20096,20237) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:831:5: 831 | 20275 I=1 | 1 Warning: Label 20275 at (1) defined but not used [-Wunused-label] ../splpmn.f:818:5: 818 | 20267 IF (.NOT.(COSTSC.NE.ZERO)) GO TO 20268 | 1 Warning: Label 20267 at (1) defined but not used [-Wunused-label] ../splpmn.f:731:5: 731 | 20246 CONTINUE | 1 Warning: Label 20246 at (1) defined but not used [-Wunused-label] ../splpmn.f:725:5: 725 | 20243 ASSIGN 20244 TO NPR006 | 1 Warning: Label 20243 at (1) defined but not used [-Wunused-label] ../splpmn.f:723:5: 723 | 20242 ASSIGN 20243 TO NPR005 | 1 Warning: Label 20242 at (1) defined but not used [-Wunused-label] ../splpmn.f:615:5: 615 | 20204 CONTINUE | 1 Warning: Label 20204 at (1) defined but not used [-Wunused-label] ../splpmn.f:506:10: 506 | 20159 KEY=AMAT(4) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../splpmn.f:265:0: 265 | COSTSC=SCOSTS | Warning: 'scosts' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpmn.f:417:0: 417 | 20116 RHS(I)=RHS(I)+AIJ*SCALR | Warning: 'scalr' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpmn.f:595:0: 595 | 20194 NTRIES=NTRIES+1 | Warning: 'ntries' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpmn.f:293:0: 293 | 20052 IF (.NOT.((.NOT.FEAS).AND.(.NOT.UNBND))) GO TO 10001 | Warning: 'feas' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cmptrx.o ../cmptrx.f f77 -g -pipe -O2 -Wall -c -o dcscal.o ../dcscal.f ../dcscal.f:74:20: 74 | IP = -0.5D0*P | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o dqawse.o ../dqawse.f f77 -g -pipe -O2 -Wall -c -o hfti.o ../hfti.f ../hfti.f:186:72: 186 | 30 H(L)=H(L)+A(I,L)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../hfti.f:201:72: 201 | 60 A(I,LMAX)=TMP | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../hfti.f:207:72: 207 | 80 CALL H12 (2,J,J+1,M,A(1,J),1,H(J),B,1,MDB,NB) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../hfti.f:226:72: 226 | 120 TMP=TMP+B(I,JB)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../hfti.f:227:72: 227 | 130 RNORM(JB)=SQRT(TMP) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../hfti.f:233:72: 233 | DO 150 I=1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) ../hfti.f:234:72: 234 | 150 B(I,JB)=SZERO | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../hfti.f:243:72: 243 | 170 CALL H12 (1,I,KP1,N,A(I,1),MDA,G(I),A,MDA,1,I-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../hfti.f:258:72: 258 | 190 SM=SM+A(I,J)*DBLE(B(J,JB)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../hfti.f:260:72: 260 | 210 B(I,JB)=(B(I,JB)-SM1)/A(I,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../hfti.f:266:72: 266 | 220 B(J,JB)=SZERO | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../hfti.f:268:72: 268 | 230 CALL H12 (2,I,KP1,N,A(I,1),MDA,G(I),B(1,JB),1,MDB,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../hfti.f:259:18: 259 | 200 SM1=SM | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] f77 -g -pipe -O2 -Wall -c -o qc25c.o ../qc25c.f f77 -g -pipe -O2 -Wall -c -o splpmu.o ../splpmu.f ../splpmu.f:73:72: 73 | ASSIGN 20009 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmu.f:84:72: 84 | ASSIGN 20013 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmu.f:95:72: 95 | ASSIGN 20017 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmu.f:130:72: 130 | ASSIGN 20028 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmu.f:193:72: 193 | ASSIGN 20042 TO NPR003 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmu.f:293:72: 293 | 20039 ASSIGN 20074 TO NPR003 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmu.f:378:72: 378 | 20029 ASSIGN 20109 TO NPR003 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmu.f:402:18: 402 | GO TO NPR001, (20009,20013,20017,20028) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmu.f:431:18: 431 | GO TO NPR003, (20042,20074,20109) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmu.f:286:0: 286 | RG(ABS(IBASIS(IENTER)))= GQ/WP**2 | Warning: 'wp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpmu.f:119:0: 119 | 20019 IF ((N20018-K).LT.0) GO TO 20020 | Warning: 'n20018' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpmu.f:115:0: 115 | K=1 | Warning: 'k' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpmu.f:265:0: 265 | RG(J)=MAX(RG(J)-TWO*ALPHA*GAMMA+ALPHA**2*GQ,ONE+ALPHA**2) | Warning: 'gq' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpmu.f:97:0: 97 | 20017 THETA=-SCALR-THETA | Warning: 'scalr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o cnbco.o ../cnbco.f f77 -g -pipe -O2 -Wall -c -o dcsevl.o ../dcsevl.f ../dcsevl.f:62:0: 62 | DCSEVL = 0.5D0*(B0-B2) | Warning: 'b2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o dqc25c.o ../dqc25c.f f77 -g -pipe -O2 -Wall -c -o hkseq.o ../hkseq.f f77 -g -pipe -O2 -Wall -c -o qc25f.o ../qc25f.f ../qc25f.f:111:0: 111 | INTEGER I,IERS,INTEGR,ISYM,J,K,KSAVE,M,MAXP1,MOMCOM,NEVAL, | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -O2 -Wall -c -o splpup.o ../splpup.f ../splpup.f:196:0: 196 | ELSEIF (ABS(AIJ).GT.AMX) THEN | Warning: 'amx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpup.f:153:0: 153 | ELSEIF (ABS(AIJ).LT.AMN) THEN | Warning: 'amn' may be used uninitialized in this function [-Wmaybe-uninitialized] ar r libslatec.a aaaaaa.o cnbdi.o dcv.o dqc25f.o hpperm.o qc25s.o spoco.o acosh.o cnbfa.o ddaini.o dqc25s.o hpsort.o qcheb.o spodi.o ai.o cnbfs.o ddajac.o dqcheb.o hqr.o qelg.o spofa.o aie.o cnbir.o ddanrm.o dqdota.o hqr2.o qform.o spofs.o albeta.o cnbsl.o ddaslv.o dqdoti.o hstart.o qk15.o spoir.o algams.o combak.o ddassl.o dqelg.o hstcrt.o qk15i.o spopt.o ali.o comhes.o ddastp.o dqform.o hstcs1.o qk15w.o sposl.o alngam.o comlr.o ddatrp.o dqk15.o hstcsp.o qk21.o sppco.o alnrel.o comlr2.o ddaws.o dqk15i.o hstcyl.o qk31.o sppdi.o asinh.o compb.o ddawts.o dqk15w.o hstplr.o qk41.o spperm.o asyik.o comqr.o ddcor.o dqk21.o hstssp.o qk51.o sppfa.o asyjy.o comqr2.o ddcst.o dqk31.o htrib3.o qk61.o sppsl.o atanh.o cortb.o ddeabm.o dqk41.o htribk.o qmomo.o spsort.o avint.o corth.o ddebdf.o dqk51.o htrid3.o qnc79.o sptsl.o bakvec.o cosdg.o dderkf.o dqk61.o htridi.o qng.o sqrdc.o balanc.o cosgen.o ddes.o dqmomo.o hvnrm.o qpdoc.o sqrsl.o balbak.o cosqb.o ddntl.o dqnc79.o hw3crt.o qpsrt.o sreadp.o bandr.o cosqb1.o ddntp.o dqng.o hwscrt.o qrfac.o srlcal.o bandv.o cosqf.o ddoglg.o dqpsrt.o hwscs1.o qrsolv.o srot.o bcrh.o cosqf1.o ddot.o dqrdc.o hwscsp.o qs2i1d.o srotg.o bdiff.o cosqi.o ddpsc.o dqrfac.o hwscyl.o qs2i1r.o srotm.o besi.o cost.o ddpst.o dqrsl.o hwsplr.o qwgtc.o srotmg.o besi0.o costi.o ddriv1.o dqrslv.o hwsss1.o qwgtf.o ss2lt.o besi0e.o cot.o ddriv2.o dqwgtc.o hwsssp.o qwgts.o ss2y.o besi1.o cpadd.o ddriv3.o dqwgtf.o i1mach.o qzhes.o ssbmv.o besi1e.o cpbco.o ddscl.o dqwgts.o i1merg.o qzit.o sscal.o besj.o cpbdi.o ddstp.o drc.o icamax.o qzval.o ssd2s.o besj0.o cpbfa.o ddzro.o drc3jj.o icopy.o qzvec.o ssdbcg.o besj1.o cpbsl.o de1.o drc3jm.o idamax.o r1mach.o ssdcg.o besk.o cpevl.o deabm.o drc6j.o idloc.o r1mpyq.o ssdcgn.o besk0.o cpevlr.o debdf.o drd.o imtql1.o r1updt.o ssdcgs.o besk0e.o cpoco.o defc.o dreadp.o imtql2.o r9aimp.o ssdgmr.o besk1.o cpodi.o defcmn.o dreort.o imtqlv.o r9atn1.o ssdi.o besk1e.o cpofa.o defe4.o drf.o indxa.o r9chu.o ssdomn.o beskes.o cpofs.o defehl.o drj.o indxb.o r9gmic.o ssds.o besknu.o cpoir.o defer.o indxc.o r9gmit.o ssdscl.o besks.o cposl.o dei.o drkfs.o initds.o r9knus.o ssgs.o besy.o cppco.o denorm.o drlcal.o inits.o r9lgic.o ssiccg.o besy0.o cppdi.o derf.o drot.o intrv.o r9lgit.o ssico.o besy1.o cppfa.o derfc.o drotg.o intyd.o r9lgmc.o ssics.o besynu.o cppsl.o derkf.o drotm.o invit.o r9ln2r.o ssidi.o beta.o cpqr79.o derkfs.o drotmg.o inxca.o r9pak.o ssiev.o betai.o cproc.o des.o drsco.o inxcb.o r9upak.o ssifa.o bfqad.o cprocp.o ds2lt.o inxcc.o radb2.o ssilur.o bi.o cprod.o dexint.o ds2y.o iploc.o radb3.o ssilus.o bie.o cprodp.o dexprl.o dsbmv.o ipperm.o radb4.o ssisl.o binom.o cpsi.o dfac.o dscal.o ipsort.o radb5.o ssjac.o bint4.o cptsl.o dfc.o dsd2s.o isamax.o radbg.o ssli.o bintk.o cpzero.o dfcmn.o dsdbcg.o isdbcg.o radf2.o ssli2.o bisect.o cqrdc.o dfdjc1.o dsdcg.o isdcg.o radf3.o ssllti.o bkias.o cqrsl.o dfdjc3.o dsdcgn.o isdcgn.o radf4.o sslubc.o bkisr.o crati.o dfehl.o dsdcgs.o isdcgs.o radf5.o sslucn.o bksol.o crotg.o dfspvd.o dsdgmr.o isdgmr.o radfg.o sslucs.o blktr1.o cs1s2.o dfspvn.o dsdi.o isdir.o rand.o sslugm.o blktri.o cscal.o dfulmt.o dsdomn.o isdomn.o ratqr.o sslui.o bndacc.o cscale.o dfzero.o dsdot.o isort.o rc.o sslui2.o bndsol.o cseri.o dgami.o dsds.o issbcg.o rc3jj.o sslui4.o bnfac.o csevl.o dgamic.o dsdscl.o isscg.o rc3jm.o ssluom.o bnslv.o cshch.o dgamit.o dsgs.o isscgn.o rc6j.o ssluti.o bqr.o csico.o dgamlm.o dsiccg.o isscgs.o rd.o ssmmi2.o bsgq8.o csidi.o dgamln.o dsico.o issgmr.o rebak.o ssmmti.o bskin.o csifa.o dgamma.o dsics.o issir.o rebakb.o ssmtv.o bspdoc.o csinh.o dgamr.o dsidi.o issomn.o reduc.o ssmv.o bspdr.o csisl.o dgamrn.o dsifa.o iswap.o reduc2.o ssort.o bspev.o cspco.o dgaus8.o dsilur.o ivout.o reort.o sspco.o bsplvd.o cspdi.o dgbco.o dsilus.o j4save.o rf.o sspdi.o bsplvn.o cspfa.o dgbdi.o dsindg.o jairy.o rfftb.o sspev.o bsppp.o cspsl.o dgbfa.o dsisl.o la05ad.o rfftb1.o sspfa.o bspvd.o csroot.o dgbmv.o dsjac.o la05as.o rfftf.o sspmv.o bspvn.o csrot.o dgbsl.o dsli.o la05bd.o rfftf1.o sspr.o bsqad.o csscal.o dgeco.o dsli2.o la05bs.o rffti.o sspr2.o bsrh.o csvdc.o dgedi.o dsllti.o la05cd.o rffti1.o sspsl.o bvalu.o cswap.o dgefa.o dslubc.o la05cs.o rg.o ssvdc.o csymm.o dgefs.o dslucn.o la05ed.o rgauss.o sswap.o csyr2k.o dgemm.o dslucs.o la05es.o rgg.o ssymm.o csyrk.o dgemv.o dslugm.o llsia.o rj.o ssymv.o c0lgmc.o ctan.o dger.o dslui.o lmpar.o ssyr.o c1merg.o ctanh.o dgesl.o dslui2.o lpdp.o rpqr79.o ssyr2.o c9lgmc.o ctbmv.o dglss.o dslui4.o lsame.o rpzero.o ssyr2k.o c9ln2r.o ctbsv.o dgmres.o dsluom.o lsei.o rs.o ssyrk.o cacai.o ctpmv.o dgtsl.o dsluti.o lsi.o rsb.o stbmv.o cacon.o ctpsv.o dh12.o dslvs.o lsod.o rsco.o stbsv.o cacos.o ctrco.o dhels.o dsmmi2.o lssods.o rsg.o steps.o cacosh.o ctrdi.o dheqr.o dsmmti.o lssuds.o rsgab.o stin.o cairy.o ctrmm.o dhfti.o dsmtv.o macon.o rsgba.o stod.o carg.o ctrmv.o dhkseq.o dsmv.o rsp.o stor1.o casin.o ctrsl.o dhstrt.o dsort.o mc20ad.o rst.o stout.o casinh.o ctrsm.o dhvnrm.o dsos.o mc20as.o rt.o stpmv.o casyi.o ctrsv.o dintp.o dsoseq.o mgsbv.o runif.o stpsv.o catan.o cuchk.o dintrv.o dsossl.o minfit.o rwupdt.o strco.o catan2.o cunhj.o dintyd.o dspco.o minso4.o s1merg.o strdi.o catanh.o cuni1.o dir.o dspdi.o minsol.o sasum.o strmm.o caxpy.o cuni2.o djairy.o dspenc.o mpadd.o saxpy.o strmv.o cbabk2.o cunik.o dlbeta.o dspfa.o mpadd2.o sbcg.o strsl.o cbal.o cunk1.o dlgams.o dsplp.o mpadd3.o sbhin.o strsm.o cbesh.o cunk2.o dli.o dspmv.o mpblas.o sbocls.o strsv.o cbesi.o cuoik.o dllsia.o dspr.o mpcdm.o sbols.o stway.o cbesj.o cv.o dllti2.o dspr2.o mpchk.o sbolsm.o suds.o cbesk.o cwrsk.o dlngam.o dspsl.o mpcmd.o scasum.o svco.o cbesy.o d1mach.o dlnrel.o dsteps.o mpdivi.o scg.o svd.o cbeta.o d1merg.o dlpdoc.o dstod.o mperr.o scgn.o svecs.o cbinu.o d1mpyq.o dlpdp.o dstor1.o mpmaxr.o scgs.o svout.o cbiry.o d1updt.o dlsei.o dstway.o mpmlp.o schdc.o swritp.o cbknu.o d9aimp.o dlsi.o dsuds.o mpmul.o schdd.o sxlcal.o cblkt1.o d9atn1.o dlsod.o dsvco.o mpmul2.o schex.o tevlc.o cblktr.o d9b0mp.o dlssud.o dsvdc.o mpmuli.o schkw.o tevls.o cbrt.o d9b1mp.o dmacon.o dswap.o mpnzr.o schud.o tinvit.o cbuni.o d9chu.o dmgsbv.o dsymm.o mpovfl.o sclosm.o tql1.o cbunk.o d9gmic.o dmout.o dsymv.o mpstr.o scnrm2.o tql2.o ccbrt.o d9gmit.o dmpar.o dsyr.o mpunfl.o scoef.o tqlrat.o cchdc.o d9knus.o dnbco.o dsyr2.o numxer.o scopy.o trbak1.o cchdd.o d9lgic.o dnbdi.o dsyr2k.o ohtrol.o scopym.o trbak3.o cchex.o d9lgit.o dnbfa.o dsyrk.o ohtror.o scov.o tred1.o cchud.o d9lgmc.o dnbfs.o dtbmv.o ortbak.o scpplt.o tred2.o ccmpb.o d9ln2r.o dnbsl.o dtbsv.o orthes.o sdaini.o tred3.o ccopy.o d9pak.o dnls1.o dtin.o ortho4.o sdajac.o tri3.o ccosh.o d9upak.o dnls1e.o dtout.o orthog.o sdanrm.o tridib.o ccot.o dacosh.o dnrm2.o dtpmv.o orthol.o sdaslv.o tridq.o cdcdot.o dai.o dnsq.o dtpsv.o orthor.o sdassl.o tris4.o cdcor.o daie.o dnsqe.o dtrco.o ortran.o sdastp.o trisp.o cdcst.o dasinh.o dogleg.o dtrdi.o passb.o sdatrp.o trix.o cdiv.o dasum.o dohtrl.o dtrmm.o passb2.o sdawts.o tsturm.o cdntl.o dasyik.o domn.o dtrmv.o passb3.o sdcor.o u11ls.o cdntp.o dasyjy.o dorth.o dtrsl.o passb4.o sdcst.o u11us.o cdotc.o datanh.o dorthr.o dtrsm.o passb5.o sdntl.o u12ls.o cdotu.o davint.o dp1vlu.o dtrsv.o passf.o sdntp.o u12us.o cdpsc.o daws.o dpbco.o du11ls.o passf2.o sdot.o ulsia.o cdpst.o daxpy.o dpbdi.o du11us.o passf3.o sdpsc.o usrmat.o cdriv1.o dbcg.o dpbfa.o du12ls.o passf4.o sdpst.o vnwrms.o cdriv2.o dbdiff.o dpbsl.o du12us.o passf5.o sdriv1.o wnlit.o cdriv3.o dbesi.o dpchbs.o dulsia.o pchbs.o sdriv2.o wnlsm.o cdscl.o dbesi0.o dpchce.o dusrmt.o pchce.o sdriv3.o wnlt1.o cdstp.o dbesi1.o dpchci.o dvecs.o pchci.o sdscl.o wnlt2.o cdzro.o dbesj.o dpchcm.o dvnrms.o pchcm.o sdsdot.o wnlt3.o cexprl.o dbesj0.o dpchcs.o dvout.o pchcs.o sdstp.o wnnls.o cfftb.o dbesj1.o dpchdf.o dwnlit.o pchdf.o sdzro.o xadd.o cfftb1.o dbesk.o dpchfd.o dwnlsm.o pchdoc.o sepeli.o xadj.o cfftf.o dbesk0.o dpchfe.o dwnlt1.o pchfd.o sepx4.o xc210.o cfftf1.o dbesk1.o dpchia.o dwnlt2.o pchfe.o sgbco.o xcon.o cffti.o dbesks.o dpchic.o dwnlt3.o pchia.o sgbdi.o xerbla.o cffti1.o dbesy.o dpchid.o dwnnls.o pchic.o sgbfa.o xerclr.o cfod.o dbesy0.o dpchim.o dwritp.o pchid.o sgbmv.o xercnt.o cg.o dbesy1.o dpchkt.o dwupdt.o pchim.o sgbsl.o xerdmp.o cgamma.o dbeta.o dpchng.o dx.o pchkt.o sgeco.o xerhlt.o cgamr.o dbetai.o dpchsp.o dx4.o pchngs.o sgedi.o xermax.o cgbco.o dbfqad.o dpchst.o dxadd.o pchsp.o sgeev.o xermsg.o cgbdi.o dbhin.o dpchsw.o dxadj.o pchst.o sgefa.o xerprn.o cgbfa.o dbi.o dpcoef.o dxc210.o pchsw.o sgefs.o xersve.o cgbmv.o dbie.o dpfqad.o dxcon.o pcoef.o sgeir.o xgetf.o cgbsl.o dbinom.o dpigmr.o dxlcal.o pfqad.o sgemm.o xgetua.o cgeco.o dbint4.o dpincw.o dxlegf.o pgsf.o sgemv.o xgetun.o cgedi.o dbintk.o dpinit.o dxnrmp.o pimach.o sger.o xlegf.o cgeev.o dbkias.o dpintm.o dxpmu.o pinitm.o sgesl.o xnrmp.o cgefa.o dbkisr.o dpjac.o dxpmup.o pjac.o sglss.o xpmu.o cgefs.o dbksol.o dplint.o dxpnrm.o pnnzrs.o sgmres.o xpmup.o cgeir.o dbndac.o dplpce.o dxpqnu.o poch.o sgtsl.o xpnrm.o cgemm.o dbndsl.o dplpdm.o dxpsi.o poch1.o shels.o xpqnu.o cgemv.o dbnfac.o dplpfe.o dxqmu.o pois3d.o sheqr.o xpsi.o cgerc.o dbnslv.o dplpfl.o dxqnu.o poisd2.o sindg.o xqmu.o cgeru.o dbocls.o dplpmn.o dxred.o poisn2.o sinqb.o xqnu.o cgesl.o dbols.o dplpmu.o dxset.o poisp2.o sinqf.o xred.o cgtsl.o dbolsm.o dplpup.o dy.o poistg.o sinqi.o xset.o ch.o dbsgq8.o dpnnzr.o dy4.o polcof.o sint.o xsetf.o chbmv.o dbsi0e.o dpoch.o dyairy.o polfit.o sinti.o xsetua.o chemm.o dbsi1e.o dpoch1.o e1.o polint.o sintrp.o xsetun.o chemv.o dbsk0e.o dpoco.o efc.o polyvl.o sir.o yairy.o cher.o dbsk1e.o dpodi.o efcmn.o pos3d1.o zabs.o cher2.o dbskes.o dpofa.o ei.o postg2.o sllti2.o zacai.o cher2k.o dbskin.o dpofs.o eisdoc.o ppadd.o slpdoc.o zacon.o cherk.o dbsknu.o dpolcf.o elmbak.o ppgq8.o slvs.o zairy.o chfcm.o dbspdr.o dpolft.o elmhes.o ppgsf.o smout.o zasyi.o chfdv.o dbspev.o dpolvl.o eltran.o pppsf.o snbco.o zbesh.o chfev.o dbsppp.o dpopt.o enorm.o ppqad.o snbdi.o zbesi.o chfie.o dbspvd.o dposl.o erf.o ppsgf.o snbfa.o zbesj.o chico.o dbspvn.o dppco.o erfc.o ppspf.o snbfs.o zbesk.o chidi.o dbsqad.o dppdi.o ppval.o snbir.o zbesy.o chiev.o dbsynu.o dpperm.o exint.o proc.o snbsl.o zbinu.o chifa.o dbvalu.o dppfa.o exprel.o procp.o snls1.o zbiry.o chisl.o dppgq8.o ezfft1.o prod.o snls1e.o zbknu.o chkder.o dppqad.o ezfftb.o prodp.o snrm2.o zbuni.o chkpr4.o dppsl.o ezfftf.o prvec.o snsq.o zbunk.o chkprm.o dcbrt.o dppval.o ezffti.o prwpge.o snsqe.o zdiv.o chksn4.o dcdot.o dprvec.o fac.o prwvir.o sods.o zexp.o chksng.o dcfod.o dprwpg.o fc.o psgf.o somn.o zkscl.o chpco.o dcg.o dprwvr.o fcmn.o psi.o sopenm.o zlog.o chpdi.o dcgn.o dpsi.o fdjac1.o psifn.o sorth.o zmlri.o chpfa.o dcgs.o dpsifn.o fdjac3.o psixn.o sos.o zmlt.o chpmv.o dchdc.o dpsixn.o fdump.o pvalue.o soseqs.o zrati.o chpr.o dchdd.o dpsort.o fftdoc.o pythag.o sossol.o zs1s2.o chpr2.o dchex.o dptsl.o figi.o qag.o spbco.o zseri.o chpsl.o dchfcm.o dqag.o figi2.o qage.o spbdi.o zshch.o chu.o dchfdv.o dqage.o fulmat.o qagi.o spbfa.o zsqrt.o cinvit.o dchfev.o dqagi.o fundoc.o qagie.o spbsl.o zuchk.o ckscl.o dchfie.o dqagie.o fzero.o qagp.o speli4.o zunhj.o clbeta.o dchkw.o dqagp.o gami.o qagpe.o spelip.o zuni1.o clngam.o dchu.o dqagpe.o gamic.o qags.o spenc.o zuni2.o clnrel.o dchud.o dqags.o gamit.o qagse.o spigmr.o zunik.o clog10.o dckder.o dqagse.o gamlim.o qawc.o spincw.o zunk1.o cmgnbn.o dcoef.o dqawc.o gamln.o qawce.o spinit.o zunk2.o cmlri.o dcopy.o dqawce.o gamma.o qawf.o splp.o zuoik.o cmpcsg.o dcopym.o dqawf.o gamr.o qawfe.o splpce.o zwrsk.o cmposd.o dcosdg.o dqawfe.o gamrn.o qawo.o splpdm.o cmposn.o dcot.o dqawo.o gaus8.o qawoe.o splpfe.o cmposp.o dcov.o dqawoe.o genbun.o qaws.o splpfl.o cmptr3.o dcpplt.o dqaws.o h12.o qawse.o splpmn.o cmptrx.o dcscal.o dqawse.o hfti.o qc25c.o splpmu.o cnbco.o dcsevl.o dqc25c.o hkseq.o qc25f.o splpup.o; ranlib libslatec.a ar: creating libslatec.a make[1]: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1/static' make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' make: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1' cd dynamic; make make[1]: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1/dynamic' make[1]: warning: jobserver unavailable: using -j1. Add '+' to parent make rule. make[1]: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1/dynamic' make[1]: Entering directory '/usr/src/RPM/BUILD/libslatec-4.1/dynamic' f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o aaaaaa.o ../aaaaaa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cnbdi.o ../cnbdi.f ../cnbdi.f:2:43: 2 | SUBROUTINE CNBDI (ABE, LDA, N, ML, MU, IPVT, DET) | 1 Warning: Unused dummy argument 'mu' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcv.o ../dcv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqc25f.o ../dqc25f.f ../dqc25f.f:115:0: 115 | INTEGER I,IERS,INTEGR,ISYM,J,K,KSAVE,M,MOMCOM,NEVAL,MAXP1, | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hpperm.o ../hpperm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qc25s.o ../qc25s.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spoco.o ../spoco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o acosh.o ../acosh.f ../acosh.f:2:6: 2 | FUNCTION ACOSH (X) | 1 Warning: 'acosh' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cnbfa.o ../cnbfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddaini.o ../ddaini.f ../ddaini.f:94:72: 94 | 100 PHI(I,2)=YPRIME(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../ddaini.f:108:72: 108 | 250 Y(I)=Y(I)+H*YPRIME(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../ddaini.f:141:72: 141 | 320 DELTA(I)=DELTA(I)*DAMP | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../ddaini.f:151:72: 151 | 330 YPRIME(I)=YPRIME(I)-CJ*DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 330 at (1) ../ddaini.f:187:72: 187 | 410 DELTA(I)=MIN(Y(I),0.0D0) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1) ../ddaini.f:194:72: 194 | 420 YPRIME(I)=YPRIME(I)-CJ*DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1) ../ddaini.f:211:72: 211 | 510 E(I)=Y(I)-PHI(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../ddaini.f:230:72: 230 | 610 YPRIME(I)=PHI(I,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 610 at (1) ../ddaini.f:163:0: 163 | 340 RATE=(DELNRM/OLDNRM)**(1.0D0/M) | Warning: 'oldnrm' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqc25s.o ../dqc25s.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hpsort.o ../hpsort.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qcheb.o ../qcheb.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spodi.o ../spodi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ai.o ../ai.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cnbfs.o ../cnbfs.f ../cnbfs.f:239:15: 239 | IND = -LOG10(R1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddajac.o ../ddajac.f ../ddajac.f:87:72: 87 | 110 WM(NPDM1+I)=0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../ddajac.f:108:72: 108 | 220 WM(NROW+L)=(E(L)-DELTA(L))*DELINV | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../ddajac.f:127:72: 127 | 410 WM(NPDM1+I)=0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1) ../ddajac.f:152:72: 152 | 510 YPRIME(N)=YPRIME(N)+CJ*DEL | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../ddajac.f:167:72: 167 | 520 WM(II+I)=(E(I)-DELTA(I))*DELINV | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 520 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqcheb.o ../dqcheb.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hqr.o ../hqr.f ../hqr.f:92:72: 92 | 40 NORM = NORM + ABS(H(I,J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../hqr.f:130:72: 130 | 120 H(I,I) = H(I,I) - X | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../hqr.f:180:0: 180 | 170 S = SIGN(SQRT(P*P+Q*Q+R*R),P) | Warning: 'r' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hqr.f:180:0: Warning: 'q' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hqr.f:180:0: Warning: 'p' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hqr.f:78:0: 78 | INTEGER I,J,K,L,M,N,EN,LL,MM,NA,NM,IGH,ITN,ITS,LOW,MP2,ENM2,IERR | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qelg.o ../qelg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spofa.o ../spofa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o aie.o ../aie.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cnbir.o ../cnbir.f ../cnbir.f:277:12: 277 | IND = -LOG10(MAX(R1MACH(4),DNORM/XNORM)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddanrm.o ../ddanrm.f ../ddanrm.f:41:72: 41 | 20 SUM = SUM + ((V(I)/WT(I))/VMAX)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../ddanrm.f:2:62: 2 | DOUBLE PRECISION FUNCTION DDANRM (NEQ, V, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'ipar' at (1) [-Wunused-dummy-argument] ../ddanrm.f:2:56: 2 | DOUBLE PRECISION FUNCTION DDANRM (NEQ, V, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'rpar' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqdota.o ../dqdota.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hqr2.o ../hqr2.f ../hqr2.f:110:72: 110 | 40 NORM = NORM + ABS(H(I,J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../hqr2.f:148:72: 148 | 120 H(I,I) = H(I,I) - X | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../hqr2.f:306:72: 306 | IF (Q) 710, 600, 800 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hqr2.f:319:72: 319 | 610 R = R + H(I,J) * H(J,EN) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 610 at (1) ../hqr2.f:410:72: 410 | 820 Z(I,J) = H(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 820 at (1) ../hqr2.f:420:72: 420 | DO 880 I = LOW, IGH | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 880 at (1) ../hqr2.f:424:72: 424 | 860 ZZ = ZZ + Z(I,K) * H(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 860 at (1) ../hqr2.f:394:0: 394 | 1 H(I,NA),H(I,EN)) | Warning: 'r' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hqr2.f:339:0: 339 | T = (X * S - ZZ * R) / Q | Warning: 's' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hqr2.f:198:0: 198 | 170 S = SIGN(SQRT(P*P+Q*Q+R*R),P) | Warning: 'p' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hqr2.f:95:0: 95 | INTEGER I,J,K,L,M,N,EN,II,JJ,LL,MM,NA,NM,NN | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qform.o ../qform.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spofs.o ../spofs.f ../spofs.f:151:15: 151 | IND = -LOG10(R1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o albeta.o ../albeta.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cnbsl.o ../cnbsl.f ../cnbsl.f:126:27: 123 | DO 60 K = 1, N | 2 ...... 126 | T = CDOTC(LM,ABE(K-1,ML+2),LDB,B(LB),1) | 1 Warning: Array reference at (1) out of bounds (0 < 1) in loop beginning at (2) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddaslv.o ../ddaslv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqdoti.o ../dqdoti.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hstart.o ../hstart.f ../hstart.f:169:72: 169 | 10 PV(J) = SPY(J) - YP(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../hstart.f:175:72: 175 | 30 PV(J) = SPY(J) - YP(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../hstart.f:207:72: 207 | 50 YP(J) = YPRIME(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../hstart.f:213:72: 213 | 70 YP(J) = ETOL(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../hstart.f:234:72: 234 | 130 PV(J) = Y(J) + DELX*YP(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../hstart.f:240:72: 240 | 140 PV(J) = YP(J) - YPRIME(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../hstart.f:246:72: 246 | 160 PV(J) = YP(J) - SF(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../hstart.f:251:72: 251 | 180 YP(J) = YP(J)/ETOL(J)**POWER | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../hstart.f:254:72: 254 | 200 YP(J) = YP(J)/ETOL(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../hstart.f:275:72: 275 | 250 YP(J) = DY | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../hstart.f:251:0: 251 | 180 YP(J) = YP(J)/ETOL(J)**POWER | Warning: 'power' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qk15.o ../qk15.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spoir.o ../spoir.f ../spoir.f:175:23: 175 | WORK(J,N+1) = -WORK(J,N+1) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../spoir.f:191:12: 191 | IND = -LOG10(MAX(R1MACH(4),DNORM/XNORM)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o algams.o ../algams.f ../algams.f:34:12: 34 | INT = MOD (-AINT(X), 2.0) + 0.1 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o combak.o ../combak.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddassl.o ../ddassl.f ../ddassl.f:1164:72: 1164 | 370 RWORK(ITEMP + I - 1) = H*YPRIME(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 370 at (1) ../ddassl.f:1297:72: 1297 | 524 ATOL(I)=R*ATOL(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 524 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqelg.o ../dqelg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hstcrt.o ../hstcrt.f ../hstcrt.f:379:72: 379 | IF (ELMBDA) 133,126,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qk15i.o ../qk15i.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spopt.o ../spopt.f ../spopt.f:108:11: 108 | 20004 NEXT=PRGOPT(LAST) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:128:12: 128 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:144:13: 144 | KPRINT=PRGOPT(LAST+2) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:152:38: 152 | IF (PRGOPT(LAST+2).NE.ZERO) IDG=PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:168:42: 168 | IF(PRGOPT(LAST+2).NE.ZERO) IPAGEF = PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:183:41: 183 | IF(PRGOPT(LAST+2).NE.ZERO) ISAVE = PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:199:43: 199 | IF (PRGOPT(LAST+2).NE.ZERO) MXITLP = PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:213:18: 213 | IBASIS(I) = PRGOPT(LAST+2+I) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:277:40: 277 | IF (PRGOPT(LAST+2).NE.ZERO) ITBRC=MAX(ONE,PRGOPT(LAST+3)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:286:10: 286 | NPP=MAX(PRGOPT(LAST+3),ONE) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../spopt.f:317:0: 317 | LPRG=LPRG+LDS | Warning: 'lds' may be used uninitialized in this function [-Wmaybe-uninitialized] ../spopt.f:70:0: 70 | ROPT(4)=COSTSC | Warning: 'costsc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../spopt.f:68:0: 68 | ROPT(2)=ASMALL | Warning: 'asmall' may be used uninitialized in this function [-Wmaybe-uninitialized] ../spopt.f:69:0: 69 | ROPT(3)=ABIG | Warning: 'abig' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ali.o ../ali.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o comhes.o ../comhes.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddastp.o ../ddastp.f ../ddastp.f:224:72: 224 | 260 PHI(I,J)=BETA(J)*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) ../ddastp.f:245:72: 245 | 310 YPRIME(I)=0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1) ../ddastp.f:249:72: 249 | 320 YPRIME(I)=YPRIME(I)+GAMMA(J)*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../ddastp.f:286:72: 286 | 345 E(I)=0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 345 at (1) ../ddastp.f:295:72: 295 | 355 DELTA(I) = DELTA(I) * TEMP1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 355 at (1) ../ddastp.f:305:72: 305 | 360 YPRIME(I)=YPRIME(I)-CJ*DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../ddastp.f:351:72: 351 | 377 DELTA(I) = MIN(Y(I),0.0D0) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 377 at (1) ../ddastp.f:355:72: 355 | 378 E(I) = E(I) - DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 378 at (1) ../ddastp.f:386:72: 386 | 405 DELTA(I) = PHI(I,KP1) + E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 405 at (1) ../ddastp.f:394:72: 394 | 415 DELTA(I) = PHI(I,K) + DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 415 at (1) ../ddastp.f:439:72: 439 | 510 DELTA(I)=E(I)-PHI(I,KP2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../ddastp.f:484:72: 484 | 580 PHI(I,KP2)=E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 580 at (1) ../ddastp.f:487:72: 487 | 590 PHI(I,KP1)=PHI(I,KP1)+E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 590 at (1) ../ddastp.f:490:72: 490 | DO 595 I=1,NEQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 595 at (1) ../ddastp.f:491:72: 491 | 595 PHI(I,J)=PHI(I,J)+PHI(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 595 at (1) ../ddastp.f:514:72: 514 | 610 PHI(I,J)=TEMP1*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 610 at (1) ../ddastp.f:518:72: 518 | 640 PSI(I-1)=PSI(I)-H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 640 at (1) ../ddastp.f:445:0: 445 | 520 IF(TERKM1.LE.MIN(TERK,TERKP1))GO TO 540 | Warning: 'terkm1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../ddastp.f:470:0: 470 | R=(2.0D0*EST+0.0001D0)**(-1.0D0/TEMP2) | Warning: 'erkm1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqform.o ../dqform.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hstcs1.o ../hstcs1.f ../hstcs1.f:135:72: 135 | 129 IF (ELMBDA) 137,131,130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qk15w.o ../qk15w.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sposl.o ../sposl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o alngam.o ../alngam.f ../alngam.f:57:0: 57 | IF (X.GT.0.) RETURN | Warning: '__result_alngam' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o comlr.o ../comlr.f ../comlr.f:80:0: 80 | INTEGER I,J,L,M,N,EN,LL,MM,NM,IGH,IM1,ITN,ITS,LOW,MP1,ENM1,IERR | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../comlr.f:151:0: 151 | IF (M .EQ. L) GO TO 420 | Warning: 'l' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddatrp.o ../ddatrp.f ../ddatrp.f:50:72: 50 | 10 YPOUT(I)=0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../ddatrp.f:60:72: 60 | 20 YPOUT(I)=YPOUT(I)+D*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqk15.o ../dqk15.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hstcsp.o ../hstcsp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qk21.o ../qk21.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sppco.o ../sppco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o alnrel.o ../alnrel.f ../alnrel.f:2:0: 2 | FUNCTION ALNREL (X) | Warning: '__result_alnrel' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o comlr2.o ../comlr2.f ../comlr2.f:115:72: 115 | DO 100 J = 1, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../comlr2.f:309:72: 309 | DO 720 J = I, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 720 at (1) ../comlr2.f:365:72: 365 | DO 880 I = LOW, IGH | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 880 at (1) ../comlr2.f:104:0: 104 | INTEGER I,J,K,L,M,N,EN,II,JJ,LL,MM,NM,NN,IGH,IM1,IP1 | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../comlr2.f:211:0: 211 | IF (M .EQ. L) GO TO 420 | Warning: 'l' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddaws.o ../ddaws.f ../ddaws.f:192:15: 192 | EPS = D1MACH(3) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqk15i.o ../dqk15i.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hstcyl.o ../hstcyl.f ../hstcyl.f:414:72: 414 | IF (ELMBDA) 130,123,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qk31.o ../qk31.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sppdi.o ../sppdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o asinh.o ../asinh.f ../asinh.f:2:6: 2 | FUNCTION ASINH (X) | 1 Warning: 'asinh' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o compb.o ../compb.f ../compb.f:36:72: 36 | IF (ARG) 119,101,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:50:72: 50 | IF (NB) 108,108,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:60:72: 60 | IF (IERROR) 118,105,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:71:72: 71 | IF (NPP) 117,110,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:78:72: 78 | IF (ARG) 119,111,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:83:72: 83 | IF (IERROR) 118,113,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:96:72: 96 | IF (J2-N2M2) 114,114,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:99:72: 99 | IF (J2-N2M2) 114,114,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../compb.f:2:25: 2 | SUBROUTINE COMPB (N, IERROR, AN, BN, CN, B, AH, BH) | 1 Warning: Unused dummy argument 'n' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddawts.o ../ddawts.f ../ddawts.f:2:64: 2 | SUBROUTINE DDAWTS (NEQ, IWT, RTOL, ATOL, Y, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'ipar' at (1) [-Wunused-dummy-argument] ../ddawts.f:2:58: 2 | SUBROUTINE DDAWTS (NEQ, IWT, RTOL, ATOL, Y, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'rpar' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqk15w.o ../dqk15w.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hstplr.o ../hstplr.f ../hstplr.f:430:72: 430 | IF (ELMBDA) 133,125,124 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hstplr.f:488:0: 488 | A1 = (A1-DLRSQ*A2/16.)/N | Warning: 'a2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qk41.o ../qk41.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spperm.o ../spperm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o asyik.o ../asyik.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o comqr.o ../comqr.f ../comqr.f:85:0: 85 | INTEGER I,J,L,N,EN,LL,NM,IGH,ITN,ITS,LOW,LP1,ENM1,IERR | Warning: 'l' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddcor.o ../ddcor.f ../ddcor.f:41:72: 41 | 100 SAVE1(I) = (H*SAVE2(I) - YH(I,2) - SAVE1(I))/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../ddcor.f:50:72: 50 | 105 SAVE1(I) = H*SAVE2(I) - YH(I,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 105 at (1) ../ddcor.f:54:72: 54 | 130 SAVE2(I) = H*SAVE2(I) - YH(I,2) - SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../ddcor.f:66:72: 66 | 150 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../ddcor.f:68:72: 68 | DO 160 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 160 at (1) ../ddcor.f:69:72: 69 | 160 SAVE2(I) = SAVE2(I) - A(I,J)*(YH(J,2) + SAVE1(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../ddcor.f:81:72: 81 | 180 SAVE2(I) = H*SAVE2(I) - A(I,1)*(YH(I,2) + SAVE1(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../ddcor.f:93:72: 93 | 140 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../ddcor.f:95:72: 95 | DO 170 I = 1,NDE | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 170 at (1) ../ddcor.f:96:72: 96 | 170 SAVE2(I) = SAVE2(I) - A(I,J)*(YH(J,2) + SAVE1(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../ddcor.f:102:72: 102 | 200 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../ddcor.f:106:72: 106 | 205 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 205 at (1) ../ddcor.f:112:72: 112 | 230 SAVE2(I) = H*SAVE2(I) - YH(I,2) - SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../ddcor.f:124:72: 124 | 250 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../ddcor.f:127:72: 127 | DO 260 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../ddcor.f:142:72: 142 | 280 SAVE2(I) = H*SAVE2(I) - A(I,1)*(YH(I,2) + SAVE1(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../ddcor.f:154:72: 154 | 270 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../ddcor.f:157:72: 157 | DO 290 I = MAX(ML+1, MW+1-J), MIN(MW+NDE-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 290 at (1) ../ddcor.f:166:72: 166 | 300 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../ddcor.f:170:72: 170 | 305 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 305 at (1) ../ddcor.f:184:72: 184 | 320 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../ddcor.f:188:72: 188 | 325 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 325 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqk21.o ../dqk21.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hstssp.o ../hstssp.f ../hstssp.f:502:72: 502 | IF (ELMBDA) 139,131,130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hstssp.f:565:0: 565 | A1 = (A1-DLRSQ*A3/16.)/N | Warning: 'a3' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hstssp.f:573:0: 573 | A1 = (A1-DLRSQ*A2/16.)/N | Warning: 'a2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qk51.o ../qk51.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sppfa.o ../sppfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o asyjy.o ../asyjy.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o comqr2.o ../comqr2.f ../comqr2.f:117:72: 117 | DO 100 J = 1, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../comqr2.f:125:72: 125 | IF (IEND) 180, 150, 105 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../comqr2.f:353:72: 353 | DO 720 J = I, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 720 at (1) ../comqr2.f:408:72: 408 | DO 880 I = LOW, IGH | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 880 at (1) ../comqr2.f:105:0: 105 | INTEGER I,J,K,L,M,N,EN,II,JJ,LL,NM,NN,IGH,IP1 | Warning: 'l' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddcst.o ../ddcst.f ../ddcst.f:41:72: 41 | 10 FACTRL(I) = I*FACTRL(I-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../ddcst.f:48:72: 48 | 30 SUM = SUM - GAMMA(J)/(I-J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../ddcst.f:49:72: 49 | 40 GAMMA(I+1) = SUM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../ddcst.f:57:72: 57 | 50 EL(I,J) = (J-1)*EL(I,J-1) + EL(I-1,J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../ddcst.f:58:72: 58 | 60 EL(J+1,J) = 1.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../ddcst.f:62:72: 62 | DO 80 I = 3,J+1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 80 at (1) ../ddcst.f:63:72: 63 | 80 EL(I,J) = EL(I,J)/((I-1)*FACTRL(J-1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../ddcst.f:67:72: 67 | 100 TQ(3,J) = -1.D0/GAMMA(J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../ddcst.f:75:72: 75 | 120 EL(I,J) = J*EL(I,J-1) + EL(I-1,J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../ddcst.f:76:72: 76 | 130 EL(J+1,J) = 1.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../ddcst.f:80:72: 80 | DO 150 I = 1,J+1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) ../ddcst.f:81:72: 81 | 150 EL(I,J) = EL(I,J)/(FACTRL(J)*SUM) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../ddcst.f:85:72: 85 | 170 TQ(3,J) = (J+2)/EL(1,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../ddcst.f:97:72: 97 | 180 SUM = SUM - GAMMA(J)/(I-J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../ddcst.f:98:72: 98 | 190 GAMMA(I+1) = SUM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../ddcst.f:103:72: 103 | 200 EL(1+I,1) = -(I+1)*SUM*GAMMA(I+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqk31.o ../dqk31.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o htrib3.o ../htrib3.f ../htrib3.f:83:72: 83 | DO 50 J = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qk61.o ../qk61.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sppsl.o ../sppsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o atanh.o ../atanh.f ../atanh.f:2:6: 2 | FUNCTION ATANH (X) | 1 Warning: 'atanh' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cortb.o ../cortb.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddeabm.o ../ddeabm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqk41.o ../dqk41.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o htribk.o ../htribk.f ../htribk.f:87:72: 87 | DO 50 J = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qmomo.o ../qmomo.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spsort.o ../spsort.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o avint.o ../avint.f ../avint.f:82:72: 82 | IF (XLO-XUP) 3,100,200 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../avint.f:136:72: 136 | IF (I-ISTART) 30,30,35 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../avint.f:156:12: 156 | ANS = SUM + CA*(SYU**3-SYL3)/R3 + CB*RP5*(SYU**2-SYL2) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../avint.f:157:0: 157 | 1 + CC*(SYU-SYL) | Warning: 'cc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../avint.f:157:0: Warning: 'cb' may be used uninitialized in this function [-Wmaybe-uninitialized] ../avint.f:157:0: Warning: 'ca' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o corth.o ../corth.f ../corth.f:88:72: 88 | 90 SCALE = SCALE + ABS(AR(I,M-1)) + ABS(AI(I,M-1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddebdf.o ../ddebdf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqk51.o ../dqk51.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o htrid3.o ../htrid3.f ../htrid3.f:97:72: 97 | 120 SCALE = SCALE + ABS(A(I,K)) + ABS(A(K,I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qnc79.o ../qnc79.f ../qnc79.f:185:72: 185 | IF (EE-TEST) 150,150,170 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../qnc79.f:203:72: 203 | IF (LR(L)) 190,190,210 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../qnc79.f:253:72: 253 | IF (LR(L)) 230,230,240 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../qnc79.f:106:16: 106 | NBITS = R1MACH(5)*I1MACH(11)/0.30102000E0 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../qnc79.f:122:12: 122 | NIB = 0.5E0 - LOG(C)/LOG(2.0E0) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sptsl.o ../sptsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bakvec.o ../bakvec.f ../bakvec.f:96:72: 96 | DO 120 I = 2, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 120 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cosdg.o ../cosdg.f ../cosdg.f:31:10: 31 | N = ABS(X)/90.0 + 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dderkf.o ../dderkf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqk61.o ../dqk61.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o htridi.o ../htridi.f ../htridi.f:89:72: 89 | 100 D(I) = AR(I,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../htridi.f:99:72: 99 | 120 SCALE = SCALE + ABS(AR(I,K)) + ABS(AI(I,K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../htridi.f:165:72: 165 | DO 260 K = 1, J | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qng.o ../qng.f ../qng.f:339:0: 339 | 2 (0.2E+03*ABSERR/RESASC)**1.5E+00) | Warning: 'resasc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qng.f:341:0: 341 | 1 ((EPMACH*0.5E+02)*RESABS,ABSERR) | Warning: 'resabs' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qng.f:336:0: 336 | ABSERR = ABS((RES87-RES43)*HLGTH) | Warning: 'res43' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sqrdc.o ../sqrdc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o balanc.o ../balanc.f ../balanc.f:144:72: 144 | 180 SCALE(I) = 1.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../balanc.f:178:72: 178 | 250 A(I,J) = A(I,J) * G | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../balanc.f:181:72: 181 | 260 A(J,I) = A(J,I) * F | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cosgen.o ../cosgen.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddes.o ../ddes.f ../ddes.f:278:72: 278 | 215 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 215 at (1) ../ddes.f:290:72: 290 | 230 YY(L) = Y(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../ddes.f:324:72: 324 | 270 Y(L) = YY(L) + DT*YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../ddes.f:338:72: 338 | 290 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../ddes.f:362:72: 362 | 320 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../ddes.f:390:72: 390 | 370 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 370 at (1) ../ddes.f:412:72: 412 | 390 ATOL(L) = EPS*ATOL(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 390 at (1) ../ddes.f:415:72: 415 | 410 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqmomo.o ../dqmomo.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hvnrm.o ../hvnrm.f ../hvnrm.f:29:72: 29 | 10 HVNRM=MAX(HVNRM,ABS(V(K))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qpdoc.o ../qpdoc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sqrsl.o ../sqrsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o balbak.o ../balbak.f ../balbak.f:80:72: 80 | 100 Z(I,J) = Z(I,J) * S | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../balbak.f:89:13: 89 | K = SCALE(I) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cosqb.o ../cosqb.f ../cosqb.f:76:72: 76 | IF (N-2) 101,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddntl.o ../ddntl.f ../ddntl.f:123:72: 123 | 155 A(I,1) = 0.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 155 at (1) ../ddntl.f:153:72: 153 | 170 SAVE1(I) = SAVE2(I)/MAX(1.D0, YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../ddntl.f:157:72: 157 | 180 YH(I,2) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../ddntl.f:160:72: 160 | 20 FAC(I) = SQRT(UROUND) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqnc79.o ../dqnc79.f ../dqnc79.f:188:72: 188 | IF (EE-TEST) 150,150,170 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dqnc79.f:206:72: 206 | IF (LR(L)) 190,190,210 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dqnc79.f:256:72: 256 | IF (LR(L)) 230,230,240 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dqnc79.f:109:16: 109 | NBITS = D1MACH(5)*I1MACH(14)/0.30102000D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dqnc79.f:125:12: 125 | NIB = 0.5D0 - LOG(C)/LOG(2.0D0) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hw3crt.o ../hw3crt.f ../hw3crt.f:525:72: 525 | 158 IF (ELMBDA) 172,160,159 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qpsrt.o ../qpsrt.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sreadp.o ../sreadp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bandr.o ../bandr.f ../bandr.f:99:72: 99 | 30 D(J) = 1.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../bandr.f:106:72: 106 | 40 Z(J,K) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../bandr.f:112:72: 112 | IF (M1 - 1) 900, 800, 70 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../bandr.f:231:72: 231 | 610 A(J,L) = DMINRT * A(J,L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 610 at (1) ../bandr.f:245:72: 245 | 640 Z(L,J) = DMINRT * Z(L,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 640 at (1) ../bandr.f:254:72: 254 | 810 E(J) = SQRT(D(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 810 at (1) ../bandr.f:261:72: 261 | 820 Z(J,K) = E(K) * Z(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 820 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cosqb1.o ../cosqb1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddntp.o ../ddntp.f ../ddntp.f:27:72: 27 | 10 Y(I) = YH(I,NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../ddntp.f:31:72: 31 | DO 20 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) ../ddntp.f:32:72: 32 | 20 Y(I) = YH(I,J) + R*Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../ddntp.f:37:72: 37 | 40 FACTOR = FACTOR*(NQ+1-KK) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../ddntp.f:39:72: 39 | 50 Y(I) = FACTOR*YH(I,NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../ddntp.f:45:72: 45 | 60 FACTOR = FACTOR*(J-KK) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../ddntp.f:47:72: 47 | 70 Y(I) = FACTOR*YH(I,J) + R*Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../ddntp.f:50:72: 50 | 100 Y(I) = Y(I)*H**(-KUSED) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqng.o ../dqng.f ../dqng.f:377:0: 377 | 1 ABSERR = RESASC*MIN(0.1D+01,(0.2D+03*ABSERR/RESASC)**1.5D+00) | Warning: 'resasc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqng.f:379:0: 379 | 1 ((EPMACH*0.5D+02)*RESABS,ABSERR) | Warning: 'resabs' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqng.f:375:0: 375 | ABSERR = ABS((RES87-RES43)*HLGTH) | Warning: 'res43' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hwscrt.o ../hwscrt.f ../hwscrt.f:405:72: 405 | IF (ELMBDA) 144,137,136 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qrfac.o ../qrfac.f ../qrfac.f:2:56: 2 | SUBROUTINE QRFAC (M, N, A, LDA, PIVOT, IPVT, LIPVT, SIGMA, ACNORM, | 1 Warning: Unused dummy argument 'lipvt' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o srlcal.o ../srlcal.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bandv.o ../bandv.f ../bandv.f:307:72: 307 | 640 XU = XU + RV6(I) * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 640 at (1) ../bandv.f:310:72: 310 | 660 RV6(I) = RV6(I) - XU * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 660 at (1) ../bandv.f:317:72: 317 | 720 NORM = NORM + ABS(RV6(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 720 at (1) ../bandv.f:328:72: 328 | 760 RV6(I) = XU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 760 at (1) ../bandv.f:341:72: 341 | 860 U = U + RV6(I)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 860 at (1) ../bandv.f:346:72: 346 | 900 Z(I,R) = RV6(I) * XU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 900 at (1) ../bandv.f:2:61: 2 | SUBROUTINE BANDV (NM, N, MBW, A, E21, M, W, Z, IERR, NV, RV, RV6) | 1 Warning: Unused dummy argument 'nv' at (1) [-Wunused-dummy-argument] ../bandv.f:179:0: 179 | IF (ORDER * (X1 - X0) .LE. 0.0E0) X1 = X0 + ORDER * EPS3 | Warning: 'x0' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bandv.f:330:0: 330 | RV6(ITS) = RV6(ITS) - EPS4 * UK | Warning: 'uk' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bandv.f:178:0: 178 | GROUP = GROUP + 1 | Warning: 'group' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bandv.f:330:0: 330 | RV6(ITS) = RV6(ITS) - EPS4 * UK | Warning: 'eps4' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bandv.f:179:0: 179 | IF (ORDER * (X1 - X0) .LE. 0.0E0) X1 = X0 + ORDER * EPS3 | Warning: 'eps3' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bandv.f:177:0: 177 | 100 IF (ABS(X1-X0) .GE. EPS2) GO TO 80 | Warning: 'eps2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cosqf.o ../cosqf.f ../cosqf.f:76:72: 76 | IF (N-2) 102,101,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddoglg.o ../ddoglg.f ../ddoglg.f:2:33: 2 | SUBROUTINE DDOGLG (N, R, LR, DIAG, QTB, DELTA, X, WA1, WA2) | 1 Warning: Unused dummy argument 'lr' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqpsrt.o ../dqpsrt.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hwscs1.o ../hwscs1.f ../hwscs1.f:33:72: 33 | IF (SINT(I)) 101,102,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:136:72: 136 | 124 IF (ELMBDA) 132,125,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:139:72: 139 | IF (ICTR) 126,127,126 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:178:72: 178 | 148 IF (MBDCND-3) 155,149,155 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:203:72: 203 | IF (ISING) 161,170,161 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:206:72: 206 | IF (ICTR) 162,163,162 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:236:72: 236 | IF (IFLG-1) 174,173,174 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:237:72: 237 | 174 IF (NBDCND) 177,175,177 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:241:72: 241 | 177 IF (MBDCND) 180,178,180 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:246:72: 246 | IF (ICTR) 181,188,181 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:247:72: 247 | 181 IF (ISING) 186,182,186 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwscs1.f:253:0: 253 | XP = (F(ITS,1)-YPH)/YPS | Warning: 'yps' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hwscs1.f:186:0: 186 | F(I,2) = F(I,2)-AR*F(I,1)/RS2 | Warning: 'ar' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hwscs1.f:171:0: 171 | F(M,J) = F(M,J)-CT*F(M+1,J)/R(J)**2 | Warning: 'ct' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qrsolv.o ../qrsolv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o srot.o ../srot.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bcrh.o ../bcrh.f ../bcrh.f:25:72: 25 | IF (SGN*F(X,IZ,C,A,BH)) 103,105,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../bcrh.f:30:72: 30 | IF (DX-CNV) 105,105,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cosqf1.o ../cosqf1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddot.o ../ddot.f ../ddot.f:50:72: 50 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqrdc.o ../dqrdc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hwscsp.o ../hwscsp.f ../hwscsp.f:386:72: 386 | IF (NCK-L) 105,105,104 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qs2i1d.o ../qs2i1d.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o srotg.o ../srotg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bdiff.o ../bdiff.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cosqi.o ../cosqi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddpsc.o ../ddpsc.f ../ddpsc.f:28:72: 28 | DO 10 J2 = J1,NQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../ddpsc.f:30:72: 30 | DO 10 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../ddpsc.f:31:72: 31 | 10 YH(I,J) = YH(I,J) + YH(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../ddpsc.f:34:72: 34 | DO 30 J2 = J1,NQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../ddpsc.f:36:72: 36 | DO 30 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../ddpsc.f:37:72: 37 | 30 YH(I,J) = YH(I,J) - YH(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqrfac.o ../dqrfac.f ../dqrfac.f:2:57: 2 | SUBROUTINE DQRFAC (M, N, A, LDA, PIVOT, IPVT, LIPVT, SIGMA, | 1 Warning: Unused dummy argument 'lipvt' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hwscyl.o ../hwscyl.f ../hwscyl.f:437:72: 437 | IF (ELMBDA) 146,136,135 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qs2i1r.o ../qs2i1r.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o srotm.o ../srotm.f ../srotm.f:69:72: 69 | IF (SFLAG) 50,10,30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../srotm.f:108:72: 108 | IF (SFLAG) 120,80,100 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besi.o ../besi.f ../besi.f:113:72: 113 | IF (N-1) 590, 10, 20 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besi.f:117:72: 117 | IF (X) 600, 30, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besi.f:118:72: 118 | 30 IF (ALPHA) 580, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besi.f:270:72: 270 | IF (NN-1) 340, 290, 130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besi.f:280:72: 280 | IF (NN-1) 340, 310, 320 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besi.f:88:0: 88 | 1 N, NN, NS, NZ | Warning: 'ns' may be used uninitialized in this function [-Wmaybe-uninitialized] ../besi.f:205:0: 205 | 160 IF (KM.NE.0) GO TO 170 | Warning: 'km' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cost.o ../cost.f ../cost.f:76:72: 76 | IF (N-2) 106,101,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddpst.o ../ddpst.f ../ddpst.f:51:72: 51 | DO 110 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1) ../ddpst.f:52:72: 52 | 110 DFDY(I,J) = FACTOR*DFDY(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../ddpst.f:85:72: 85 | 140 DFDY(I,J) = (SAVE1(I) - SAVE2(I))*FACTOR | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../ddpst.f:114:72: 114 | 190 DFDY(I,I) = DFDY(I,I) + 1.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../ddpst.f:122:72: 122 | DO 210 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 210 at (1) ../ddpst.f:123:72: 123 | 210 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../ddpst.f:131:72: 131 | 230 DFDY(I,I) = DFDY(I,I) + A(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../ddpst.f:139:72: 139 | DO 220 I = 1,NDE | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 220 at (1) ../ddpst.f:140:72: 140 | 220 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../ddpst.f:154:72: 154 | DO 260 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../ddpst.f:155:72: 155 | 260 DFDY(I,J) = FACTOR*DFDY(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) ../ddpst.f:182:72: 182 | 290 Y(K) = Y(K) + DY | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../ddpst.f:201:72: 201 | 300 DFDY(I,K) = FACTOR*(SAVE1(I+K-MW) - SAVE2(I+K-MW)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../ddpst.f:231:72: 231 | DO 345 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 345 at (1) ../ddpst.f:232:72: 232 | 345 DFDYMX = MAX(DFDYMX, ABS(DFDY(I,J))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 345 at (1) ../ddpst.f:236:72: 236 | DO 350 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 350 at (1) ../ddpst.f:237:72: 237 | 350 BND = BND + (DFDY(I,J)/DFDYMX)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 350 at (1) ../ddpst.f:243:72: 243 | 360 DFDY(MW,J) = DFDY(MW,J) + 1.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../ddpst.f:251:72: 251 | DO 380 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 380 at (1) ../ddpst.f:252:72: 252 | 380 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../ddpst.f:260:72: 260 | 400 DFDY(MW,J) = DFDY(MW,J) + A(J,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 400 at (1) ../ddpst.f:268:72: 268 | DO 390 I = MAX(ML+1, MW+1-J), MIN(MW+NDE-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 390 at (1) ../ddpst.f:269:72: 269 | 390 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 390 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqrsl.o ../dqrsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hwsplr.o ../hwsplr.f ../hwsplr.f:452:72: 452 | IF (ELMBDA) 144,136,135 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsplr.f:512:15: 512 | IWSTOR = W(ID4+1)+3*MUNK | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qwgtc.o ../qwgtc.f ../qwgtc.f:2:47: 2 | REAL FUNCTION QWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'kp' at (1) [-Wunused-dummy-argument] ../qwgtc.f:2:35: 2 | REAL FUNCTION QWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'p2' at (1) [-Wunused-dummy-argument] ../qwgtc.f:2:39: 2 | REAL FUNCTION QWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'p3' at (1) [-Wunused-dummy-argument] ../qwgtc.f:2:43: 2 | REAL FUNCTION QWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'p4' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o srotmg.o ../srotmg.f ../srotmg.f:137:15: 137 | GO TO IGO,(120,150,180,210) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../srotmg.f:143:72: 143 | ASSIGN 120 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../srotmg.f:155:72: 155 | ASSIGN 150 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../srotmg.f:168:72: 168 | ASSIGN 180 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../srotmg.f:179:72: 179 | ASSIGN 210 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../srotmg.f:188:72: 188 | IF (SFLAG) 250,230,240 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../srotmg.f:182:5: 182 | 210 CONTINUE | 1 Warning: Label 210 at (1) defined but not used [-Wunused-label] ../srotmg.f:171:5: 171 | 180 CONTINUE | 1 Warning: Label 180 at (1) defined but not used [-Wunused-label] ../srotmg.f:158:5: 158 | 150 CONTINUE | 1 Warning: Label 150 at (1) defined but not used [-Wunused-label] ../srotmg.f:146:5: 146 | 120 CONTINUE | 1 Warning: Label 120 at (1) defined but not used [-Wunused-label] ../srotmg.f:185:0: 185 | SH22=SH22*GAM | Warning: 'sh22' may be used uninitialized in this function [-Wmaybe-uninitialized] ../srotmg.f:184:0: 184 | SH21=SH21*GAM | Warning: 'sh21' may be used uninitialized in this function [-Wmaybe-uninitialized] ../srotmg.f:191:0: 191 | SPARAM(4)=SH12 | Warning: 'sh12' may be used uninitialized in this function [-Wmaybe-uninitialized] ../srotmg.f:194:0: 194 | SPARAM(2)=SH11 | Warning: 'sh11' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besi0.o ../besi0.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o costi.o ../costi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddriv1.o ../ddriv1.f ../ddriv1.f:347:72: 347 | 20 IWORK(I) = WORK(I+LENWCM) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../ddriv1.f:354:72: 354 | 40 WORK(I+LENWCM) = IWORK(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../ddriv1.f:347:21: 347 | 20 IWORK(I) = WORK(I+LENWCM) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqrslv.o ../dqrslv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hwsss1.o ../hwsss1.f ../hwsss1.f:41:72: 41 | IF (SINT(I)) 101,102,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:90:72: 90 | IF (ISP) 116,116,113 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:102:72: 102 | 116 IF (INP) 120,120,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:155:72: 155 | 131 IF (ELMBDA) 138,132,132 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:158:72: 158 | IF (INP) 134,134,133 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:160:72: 160 | 134 IF (ISP) 136,136,135 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:170:72: 170 | 139 IF (NBDCND-3) 146,140,146 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:184:72: 184 | 147 IF (NBDCND-3) 154,148,154 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:215:72: 215 | IF (ISING) 165,176,165 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:218:72: 218 | IF (INP) 167,167,166 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:220:72: 220 | 167 IF (ISP) 169,169,168 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:260:72: 260 | IF (ISING) 186,186,179 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:261:72: 261 | 179 IF (INP) 183,183,180 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:262:72: 262 | 180 IF (ISP) 181,181,186 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:267:72: 267 | 183 IF (ISP) 186,186,184 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:272:72: 272 | 186 IF (INP) 193,193,187 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:280:72: 280 | IF (ISP) 189,189,194 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:292:72: 292 | 193 IF (ISP) 209,209,194 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:300:72: 300 | IF (INP) 196,196,200 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:314:72: 314 | IF (ISING) 202,202,201 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:318:72: 318 | 202 IF (ABS(DNN)-ABS(DSN)) 204,204,203 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:338:72: 338 | 209 IF (NBDCND) 212,210,212 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../hwsss1.f:320:0: 320 | RTS = RTS-RTN*DSN/DNN | Warning: 'dsn' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hwsss1.f:325:0: 325 | RTN = RTN-RTS*DNN/DSN | Warning: 'dnn' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hwsss1.f:312:0: 312 | 200 RTN = F(1,1)-DFN | Warning: 'dfn' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hwsss1.f:195:0: 195 | F(M+1,J) = F(M+1,J)-TDT*BDTF(J)*CT | Warning: 'ct' may be used uninitialized in this function [-Wmaybe-uninitialized] ../hwsss1.f:177:0: 177 | F(2,J) = F(2,J)-AT*F(1,J) | Warning: 'at' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qwgtf.o ../qwgtf.f ../qwgtf.f:2:39: 2 | REAL FUNCTION QWGTF (X, OMEGA, P2, P3, P4, INTEGR) | 1 Warning: Unused dummy argument 'p2' at (1) [-Wunused-dummy-argument] ../qwgtf.f:2:43: 2 | REAL FUNCTION QWGTF (X, OMEGA, P2, P3, P4, INTEGR) | 1 Warning: Unused dummy argument 'p3' at (1) [-Wunused-dummy-argument] ../qwgtf.f:2:47: 2 | REAL FUNCTION QWGTF (X, OMEGA, P2, P3, P4, INTEGR) | 1 Warning: Unused dummy argument 'p4' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ss2lt.o ../ss2lt.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besi0e.o ../besi0e.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cot.o ../cot.f ../cot.f:73:12: 73 | IFN = MOD (AINTY, 2.) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddriv2.o ../ddriv2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqwgtc.o ../dqwgtc.f ../dqwgtc.f:2:60: 2 | DOUBLE PRECISION FUNCTION DQWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'kp' at (1) [-Wunused-dummy-argument] ../dqwgtc.f:2:48: 2 | DOUBLE PRECISION FUNCTION DQWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'p2' at (1) [-Wunused-dummy-argument] ../dqwgtc.f:2:52: 2 | DOUBLE PRECISION FUNCTION DQWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'p3' at (1) [-Wunused-dummy-argument] ../dqwgtc.f:2:56: 2 | DOUBLE PRECISION FUNCTION DQWGTC (X, C, P2, P3, P4, KP) | 1 Warning: Unused dummy argument 'p4' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hwsssp.o ../hwsssp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qwgts.o ../qwgts.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ss2y.o ../ss2y.f ../ss2y.f:2:47: 2 | SUBROUTINE SS2Y (N, NELT, IA, JA, A, ISYM) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besi1.o ../besi1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cpadd.o ../cpadd.f ../cpadd.f:42:72: 42 | IF (BP(N)-BP(1)) 101,142,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:54:72: 54 | IF (MODIZ) 106,107,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:55:72: 55 | 106 IF (A(1)) 110,142,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:59:72: 59 | IF (PGSF(XL,IZ,C,A,BH)) 108,108,109 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:64:72: 64 | IF (MODIZ) 111,112,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:65:72: 65 | 111 IF (A(1)) 112,142,115 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:69:72: 69 | IF (PGSF(XR,IZ,C,A,BH)) 113,114,114 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:79:72: 79 | IF (ABS(PSG)-EPS) 118,118,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:80:72: 80 | 116 IF (PSG*PPGSF(XM,IZ,C,A,BH)) 117,118,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:112:72: 112 | IF (MODIZ) 123,122,123 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:117:72: 117 | IF (ABS(FP)) 126,126,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:120:72: 120 | 126 IF (ABS(FPP)) 132,132,127 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:124:72: 124 | IF (ABS(R1)-ABS(R2)) 129,129,128 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:130:72: 130 | IF (I3) 133,133,131 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:138:72: 138 | IF (ICV) 134,134,135 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:144:72: 144 | IF (ABS(CBP(N))-ABS(CBP(1))) 137,142,139 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:154:72: 154 | IF (AIMAG(CBP(J))) 143,140,143 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cpadd.f:134:0: 134 | 133 CX = CX+R1 | Warning: 'IMAGPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cpadd.f:134:0: Warning: 'REALPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cpadd.f:137:0: 137 | IF (ABS(R1) .GT. SCNV) GO TO 120 | Warning: 'r3' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddriv3.o ../ddriv3.f ../ddriv3.f:979:72: 979 | 30 WORK(I+IYH-1) = Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../ddriv3.f:1179:72: 1179 | 190 Y(I) = WORK(I+IYH-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../ddriv3.f:1192:72: 1192 | 230 WORK(I+IYWT-1) = 1.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../ddriv3.f:1196:72: 1196 | 250 WORK(I+IYWT-1) = EWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../ddriv3.f:1203:72: 1203 | 280 WORK(I+IYWT-1) = ABS(Y(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../ddriv3.f:1253:72: 1253 | 340 WORK(I+ISAVE2-1) = WORK(I+ISAVE2-1)/WORK(I+IA-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1) ../ddriv3.f:1293:72: 1293 | 380 WORK(I+IYWT-1) = MAX(EWT(1), ABS(Y(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../ddriv3.f:1296:72: 1296 | 400 WORK(I+IYWT-1) = MAX(EWT(I), ABS(Y(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 400 at (1) ../ddriv3.f:1300:72: 1300 | 420 WORK(I+ISAVE2-1) = Y(I)/WORK(I+IYWT-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1) ../ddriv3.f:1401:72: 1401 | 480 Y(J) = WORK(IYH+J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 480 at (1) ../ddriv3.f:1483:72: 1483 | 570 Y(I) = WORK(I+IYH-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 570 at (1) ../ddriv3.f:879:0: 879 | ISAVE1 = IYWT + N | Warning: 'iywt' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqwgtf.o ../dqwgtf.f ../dqwgtf.f:2:52: 2 | DOUBLE PRECISION FUNCTION DQWGTF (X, OMEGA, P2, P3, P4, INTEGR) | 1 Warning: Unused dummy argument 'p2' at (1) [-Wunused-dummy-argument] ../dqwgtf.f:2:56: 2 | DOUBLE PRECISION FUNCTION DQWGTF (X, OMEGA, P2, P3, P4, INTEGR) | 1 Warning: Unused dummy argument 'p3' at (1) [-Wunused-dummy-argument] ../dqwgtf.f:2:60: 2 | DOUBLE PRECISION FUNCTION DQWGTF (X, OMEGA, P2, P3, P4, INTEGR) | 1 Warning: Unused dummy argument 'p4' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o i1mach.o ../i1mach.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qzhes.o ../qzhes.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssbmv.o ../ssbmv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besi1e.o ../besi1e.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cpbco.o ../cpbco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddscl.o ../ddscl.f ../ddscl.f:32:72: 32 | DO 10 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../ddscl.f:33:72: 33 | 10 YH(I,J+1) = YH(I,J+1)*R1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqwgts.o ../dqwgts.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o i1merg.o ../i1merg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qzit.o ../qzit.f ../qzit.f:290:0: 290 | 200 S = ABS(A1) + ABS(A2) + ABS(A3) | Warning: 'a3' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sscal.o ../sscal.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besj.o ../besj.f ../besj.f:111:72: 111 | IF (N-1) 720, 10, 20 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besj.f:114:72: 114 | IF (X) 730, 30, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besj.f:115:72: 115 | 30 IF (ALPHA) 710, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besj.f:236:72: 236 | IF (NN-1) 440, 390, 130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../besj.f:246:72: 246 | IF (NN-1) 440, 410, 420 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cpbdi.o ../cpbdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddstp.o ../ddstp.f ../ddstp.f:117:72: 117 | 115 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 115 at (1) ../ddstp.f:136:72: 136 | 125 SAVE1(I) = 0.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) ../ddstp.f:160:72: 160 | 132 DFDY(1,I) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 132 at (1) ../ddstp.f:165:72: 165 | 134 DFDY(1,I) = SAVE1(I) - DFDY(1,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 134 at (1) ../ddstp.f:174:72: 174 | 136 DFDY(1,I) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 136 at (1) ../ddstp.f:186:72: 186 | 140 Y(I) = YH(I,1) + EL(1,NQ)*SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../ddstp.f:225:72: 225 | 180 SAVE2(I) = SAVE1(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../ddstp.f:228:72: 228 | 185 SAVE2(I) = SAVE1(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 185 at (1) ../ddstp.f:247:72: 247 | 190 SAVE2(I) = YH(I,NQ+1)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../ddstp.f:250:72: 250 | 195 SAVE2(I) = YH(I,NQ+1)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 195 at (1) ../ddstp.f:278:72: 278 | 215 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 215 at (1) ../ddstp.f:297:72: 297 | DO 230 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 230 at (1) ../ddstp.f:298:72: 298 | 230 YH(I,J) = YH(I,J) + EL(J,NQ)*SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../ddstp.f:300:72: 300 | 235 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 235 at (1) ../ddstp.f:367:72: 367 | 250 YH(I,MAXORD+1) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../ddstp.f:386:72: 386 | 270 SAVE2(I) = YH(I,NQ+1)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../ddstp.f:389:72: 389 | 275 SAVE2(I) = YH(I,NQ+1)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 275 at (1) ../ddstp.f:400:72: 400 | 290 SAVE2(I) = (SAVE1(I) - YH(I,MAXORD+1))/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../ddstp.f:422:72: 422 | 360 YH(I,NQ+2) = SAVE1(I)*EL(NQ+1,NQ)/(NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../ddstp.f:442:72: 442 | 405 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 405 at (1) ../ddstp.f:456:72: 456 | 435 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 435 at (1) ../ddstp.f:179:0: 179 | IF (ITER .GT. 0) TREND = MAX(.9D0*TREND, D/D1) | Warning: 'd1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o drc.o ../drc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o icamax.o ../icamax.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qzval.o ../qzval.f ../qzval.f:191:0: 191 | IF (AN .LT. ABS(E) * BN) GO TO 455 | Warning: 'e' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qzval.f:191:0: Warning: 'an' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssd2s.o ../ssd2s.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besj0.o ../besj0.f ../besj0.f:2:6: 2 | FUNCTION BESJ0 (X) | 1 Warning: 'besj0' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cpbfa.o ../cpbfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ddzro.o ../ddzro.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o drc3jj.o ../drc3jj.f ../drc3jj.f:203:72: 203 | IF(NDIM-NFIN) 21, 23, 23 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jj.f:236:72: 236 | IF(LSTEP-2) 32, 32, 31 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jj.f:279:72: 279 | 70 THRCOF(I) = THRCOF(I) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../drc3jj.f:289:72: 289 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jj.f:366:72: 366 | 130 THRCOF(INDEX) = THRCOF(INDEX) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../drc3jj.f:391:72: 391 | 210 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../drc3jj.f:398:72: 398 | 212 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 212 at (1) ../drc3jj.f:413:72: 413 | IF(SIGN1*SIGN2) 235,235,236 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jj.f:419:72: 419 | 240 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../drc3jj.f:425:72: 425 | 251 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 251 at (1) ../drc3jj.f:399:0: 399 | SUMUNI = SUMFOR + RATIO*RATIO*SUMBAC | Warning: 'sumbac' may be used uninitialized in this function [-Wmaybe-uninitialized] ../drc3jj.f:258:0: 258 | 60 C2 = - L1 * OLDFAC / DENOM | Warning: 'denom' may be used uninitialized in this function [-Wmaybe-uninitialized] ../drc3jj.f:289:0: 289 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | Warning: 'c1old' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o icopy.o ../icopy.f ../icopy.f:42:72: 42 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qzvec.o ../qzvec.f ../qzvec.f:122:72: 122 | 610 R = R + (BETM * A(I,J) - ALFM * B(I,J)) * B(J,EN) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 610 at (1) ../qzvec.f:237:72: 237 | DO 880 I = 1, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 880 at (1) ../qzvec.f:241:72: 241 | 860 ZZ = ZZ + Z(I,K) * B(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 860 at (1) ../qzvec.f:258:72: 258 | 900 Z(I,J) = Z(I,J) / D | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 900 at (1) ../qzvec.f:223:0: 223 | 785 T1 = (-R - ZZ * B(I+1,NA) + Z1 * B(I+1,EN)) / Y | Warning: 'zz' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qzvec.f:224:0: 224 | T2 = (-S - ZZ * B(I+1,EN) - Z1 * B(I+1,NA)) / Y | Warning: 'z1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qzvec.f:221:0: 221 | TI = -SA - X * B(I+1,EN) - X1 * B(I+1,NA) | Warning: 'x1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qzvec.f:221:0: Warning: 'x' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qzvec.f:224:0: 224 | T2 = (-S - ZZ * B(I+1,EN) - Z1 * B(I+1,NA)) / Y | Warning: 's' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qzvec.f:223:0: 223 | 785 T1 = (-R - ZZ * B(I+1,NA) + Z1 * B(I+1,EN)) / Y | Warning: 'r' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssdbcg.o ../ssdbcg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besj1.o ../besj1.f ../besj1.f:2:6: 2 | FUNCTION BESJ1 (X) | 1 Warning: 'besj1' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cpbsl.o ../cpbsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o de1.o ../de1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o drc3jm.o ../drc3jm.f ../drc3jm.f:204:72: 204 | IF(NDIM-NFIN) 21, 23, 23 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jm.f:237:72: 237 | IF(LSTEP-2) 32, 32, 31 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jm.f:275:72: 275 | 70 THRCOF(I) = THRCOF(I) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../drc3jm.f:286:72: 286 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jm.f:359:72: 359 | 111 THRCOF(INDEX) = THRCOF(INDEX) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 111 at (1) ../drc3jm.f:384:72: 384 | 210 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../drc3jm.f:391:72: 391 | 212 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 212 at (1) ../drc3jm.f:406:72: 406 | IF(SIGN1*SIGN2) 235,235,236 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc3jm.f:412:72: 412 | 240 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../drc3jm.f:418:72: 418 | 251 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 251 at (1) ../drc3jm.f:392:0: 392 | SUMUNI = SUMFOR + RATIO*RATIO*SUMBAC | Warning: 'sumbac' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o idamax.o ../idamax.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o r1mach.o ../r1mach.f f951: Warning: Nonconforming tab character in column 1 of line 72 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 74 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 77 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 410 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 411 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 412 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 413 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 414 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 415 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 416 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 417 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 418 [-Wtabs] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssdcg.o ../ssdcg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besk.o ../besk.f ../besk.f:198:0: 198 | TM = TM + TRX | Warning: 'trx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../besk.f:198:0: Warning: 'tm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../besk.f:192:0: 192 | Y(2) = S2 | Warning: 's2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cpevl.o ../cpevl.f ../cpevl.f:60:72: 60 | DO 1 I=1,MINI | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 1 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o deabm.o ../deabm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o drc6j.o ../drc6j.f ../drc6j.f:208:72: 208 | IF(NDIM-NFIN) 21, 23, 23 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc6j.f:243:72: 243 | IF(LSTEP-2) 32, 32, 31 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc6j.f:288:72: 288 | 70 SIXCOF(I) = SIXCOF(I) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../drc6j.f:299:72: 299 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc6j.f:378:72: 378 | 130 SIXCOF(INDEX) = SIXCOF(INDEX) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../drc6j.f:402:72: 402 | 210 SIXCOF(N) = RATIO * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../drc6j.f:409:72: 409 | 212 SIXCOF(N) = RATIO * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 212 at (1) ../drc6j.f:424:72: 424 | IF(SIGN1*SIGN2) 235,235,236 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drc6j.f:430:72: 430 | 240 SIXCOF(N) = CNORM * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../drc6j.f:436:72: 436 | 251 SIXCOF(N) = CNORM * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 251 at (1) ../drc6j.f:410:0: 410 | SUMUNI = SUMFOR + RATIO*RATIO*SUMBAC | Warning: 'sumbac' may be used uninitialized in this function [-Wmaybe-uninitialized] ../drc6j.f:266:0: 266 | 60 C2 = - L1 * OLDFAC / DENOM | Warning: 'denom' may be used uninitialized in this function [-Wmaybe-uninitialized] ../drc6j.f:299:0: 299 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | Warning: 'c1old' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o idloc.o ../idloc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o r1mpyq.o ../r1mpyq.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssdcgn.o ../ssdcgn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besk0.o ../besk0.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cpevlr.o ../cpevlr.f ../cpevlr.f:25:72: 25 | DO 1 I=1,MINI | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 1 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o debdf.o ../debdf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o drd.o ../drd.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o imtql1.o ../imtql1.f ../imtql1.f:79:72: 79 | 100 E(I-1) = E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o r1updt.o ../r1updt.f ../r1updt.f:2:36: 2 | SUBROUTINE R1UPDT (M, N, S, LS, U, V, W, SING) | 1 Warning: Unused dummy argument 'ls' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssdcgs.o ../ssdcgs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besk0e.o ../besk0e.f ../besk0e.f:2:0: 2 | FUNCTION BESK0E (X) | Warning: '__result_besk0e' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cpoco.o ../cpoco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o defc.o ../defc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dreadp.o ../dreadp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o imtql2.o ../imtql2.f ../imtql2.f:99:72: 99 | 100 E(I-1) = E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o r9aimp.o ../r9aimp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssdgmr.o ../ssdgmr.f ../ssdgmr.f:2:68: 2 | SUBROUTINE SSDGMR (N, B, X, NELT, IA, JA, A, ISYM, NSAVE, ITOL, | 1 Warning: Unused dummy argument 'itol' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besk1.o ../besk1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cpodi.o ../cpodi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o defcmn.o ../defcmn.f ../defcmn.f:142:13: 142 | L = PTEMP(IDATA) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dreort.o ../dreort.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o imtqlv.o ../imtqlv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o r9atn1.o ../r9atn1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssdi.o ../ssdi.f ../ssdi.f:2:47: 2 | SUBROUTINE SSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ssdi.f:2:40: 2 | SUBROUTINE SSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../ssdi.f:2:53: 2 | SUBROUTINE SSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../ssdi.f:2:44: 2 | SUBROUTINE SSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besk1e.o ../besk1e.f ../besk1e.f:2:0: 2 | FUNCTION BESK1E (X) | Warning: '__result_besk1e' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cpofa.o ../cpofa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o defe4.o ../defe4.f ../defe4.f:47:72: 47 | DO 30 J=JS,NS | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o drf.o ../drf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o indxa.o ../indxa.f ../indxa.f:22:72: 22 | IF (I-NM) 102,102,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o r9chu.o ../r9chu.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssdomn.o ../ssdomn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o beskes.o ../beskes.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cpofs.o ../cpofs.f ../cpofs.f:156:15: 156 | IND = -LOG10(R1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o defehl.o ../defehl.f ../defehl.f:58:72: 58 | 230 YS(K)=Y(K)+CH*YP(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../defehl.f:63:72: 63 | 240 YS(K)=Y(K)+CH*(YP(K)+3.*F1(K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../defehl.f:68:72: 68 | 250 YS(K)=Y(K)+CH*(1932.*YP(K)+(7296.*F2(K)-7200.*F1(K))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../defehl.f:74:72: 74 | 1 (29440.*F2(K)-32832.*F1(K))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) ../defehl.f:80:72: 80 | 1 (41040.*F1(K)-28352.*F2(K))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../defehl.f:88:72: 88 | 1 (3953664.*F2(K)+277020.*F5(K))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o drj.o ../drj.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o indxb.o ../indxb.f ../indxb.f:24:72: 24 | IF (IR) 107,101,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../indxb.f:25:72: 25 | 101 IF (I-NM) 102,102,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../indxb.f:34:72: 34 | IF (I-IPL-NM) 105,105,104 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../indxb.f:37:72: 37 | 105 IF (I+IPL-NM) 107,107,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o r9gmic.o ../r9gmic.f ../r9gmic.f:40:11: 40 | MA = A - 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssds.o ../ssds.f ../ssds.f:2:34: 2 | SUBROUTINE SSDS (N, NELT, IA, JA, A, ISYM, DINV) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../ssds.f:2:47: 2 | SUBROUTINE SSDS (N, NELT, IA, JA, A, ISYM, DINV) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besknu.o ../besknu.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cpoir.o ../cpoir.f ../cpoir.f:200:12: 200 | IND = -LOG10(MAX(R1MACH(4),DNORM/XNORM)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o defer.o ../defer.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o indxc.o ../indxc.f ../indxc.f:22:72: 22 | IF (IDXC+NC-1-NM) 102,102,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o r9gmit.o ../r9gmit.f ../r9gmit.f:36:11: 36 | MA = A + 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../r9gmit.f:37:25: 37 | IF (A.LT.0.0) MA = A - 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../r9gmit.f:2:48: 2 | FUNCTION R9GMIT (A, X, ALGAP1, SGNGAM, ALX) | 1 Warning: Unused dummy argument 'alx' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssdscl.o ../ssdscl.f ../ssdscl.f:2:49: 2 | SUBROUTINE SSDSCL (N, NELT, IA, JA, A, ISYM, X, B, DINV, JOB, | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besks.o ../besks.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cposl.o ../cposl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dei.o ../dei.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o drkfs.o ../drkfs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o initds.o ../initds.f ../initds.f:49:0: 49 | 20 IF (I .EQ. NOS) CALL XERMSG ('SLATEC', 'INITDS', | Warning: 'i' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o r9knus.o ../r9knus.f ../r9knus.f:133:15: 133 | NTERMS = MAX (2.0, 11.0+(8.*ALNZ-25.19-ALNEPS)/(4.28-ALNZ)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssgs.o ../ssgs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besy.o ../besy.f ../besy.f:157:0: 157 | TM = TM + TRX | Warning: 'trx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../besy.f:157:0: Warning: 'tm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../besy.f:151:0: 151 | Y(2) = S2 | Warning: 's2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cppco.o ../cppco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o denorm.o ../denorm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o drlcal.o ../drlcal.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o inits.o ../inits.f ../inits.f:48:0: 48 | 20 IF (I .EQ. NOS) CALL XERMSG ('SLATEC', 'INITS', | Warning: 'i' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o r9lgic.o ../r9lgic.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssiccg.o ../ssiccg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besy0.o ../besy0.f ../besy0.f:2:6: 2 | FUNCTION BESY0 (X) | 1 Warning: 'besy0' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cppdi.o ../cppdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o derf.o ../derf.f ../derf.f:2:6: 2 | DOUBLE PRECISION FUNCTION DERF (X) | 1 Warning: 'derf' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] ../derf.f:2:0: 2 | DOUBLE PRECISION FUNCTION DERF (X) | Warning: '__result_derf' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o drot.o ../drot.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o intrv.o ../intrv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o r9lgit.o ../r9lgit.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssico.o ../ssico.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besy1.o ../besy1.f ../besy1.f:2:6: 2 | FUNCTION BESY1 (X) | 1 Warning: 'besy1' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cppfa.o ../cppfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o derfc.o ../derfc.f ../derfc.f:2:6: 2 | DOUBLE PRECISION FUNCTION DERFC (X) | 1 Warning: 'derfc' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o drotg.o ../drotg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o intyd.o ../intyd.f ../intyd.f:70:72: 70 | 10 IC = IC*JJ | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../intyd.f:73:72: 73 | 20 DKY(I) = C*YH(I,L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../intyd.f:83:72: 83 | 30 IC = IC*JJ | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../intyd.f:86:72: 86 | 40 DKY(I) = C*YH(I,JP1) + S*DKY(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../intyd.f:91:72: 91 | 60 DKY(I) = R*DKY(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o r9lgmc.o ../r9lgmc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssics.o ../ssics.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o besynu.o ../besynu.f ../besynu.f:275:0: 275 | S2 = CK*S2 - S1 | Warning: 's1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../besynu.f:287:0: 287 | CK = CK + RX | Warning: 'ck' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cppsl.o ../cppsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o derkf.o ../derkf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o drotm.o ../drotm.f ../drotm.f:71:72: 71 | IF (DFLAG) 50,10,30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drotm.f:110:72: 110 | IF (DFLAG) 120,80,100 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o invit.o ../invit.f ../invit.f:167:72: 167 | 160 X = X + ABS(A(I,J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../invit.f:208:72: 208 | 300 RM1(J,I) = A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../invit.f:237:72: 237 | 380 RM1(J,I) = RM1(J,I) - X * RM1(J,MP) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../invit.f:251:72: 251 | 460 Y = Y - RM1(J,I) * RV1(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 460 at (1) ../invit.f:270:72: 270 | 540 RM1(1,I) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 540 at (1) ../invit.f:406:72: 406 | 860 RV1(I) = Y | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 860 at (1) ../invit.f:409:0: 409 | RV1(J) = RV1(J) - EPS3 * X | Warning: 'ukroot' may be used uninitialized in this function [-Wmaybe-uninitialized] ../invit.f:127:0: 127 | INTEGER I,J,K,L,M,N,S,II,IP,MM,MP,NM,NS,N1,UK,IP1,ITS,KM1,IERR | Warning: 'ns' may be used uninitialized in this function [-Wmaybe-uninitialized] ../invit.f:384:0: 384 | X = RV1(J) | Warning: 'j' may be used uninitialized in this function [-Wmaybe-uninitialized] ../invit.f:382:0: 382 | IF (NORM .LT. GROWTO) GO TO 840 | Warning: 'growto' may be used uninitialized in this function [-Wmaybe-uninitialized] ../invit.f:409:0: 409 | RV1(J) = RV1(J) - EPS3 * X | Warning: 'eps3' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o r9ln2r.o ../r9ln2r.f ../r9ln2r.f:2:0: 2 | FUNCTION R9LN2R (X) | Warning: '__result_r9ln2r' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssidi.o ../ssidi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o beta.o ../beta.f ../beta.f:42:0: 42 | IF (A+B.LT.XMAX) RETURN | Warning: '__result_beta' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cpqr79.o ../cpqr79.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o derkfs.o ../derkfs.f ../derkfs.f:307:72: 307 | 75 F1(K)=TOL | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 75 at (1) ../derkfs.f:337:72: 337 | 90 Y(K)=Y(K)+DT*YP(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) ../derkfs.f:471:72: 471 | 350 EEOET=MAX(EEOET,EE/ET) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 350 at (1) ../derkfs.f:507:72: 507 | 525 Y(K)=YS(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 525 at (1) ../derkfs.f:590:72: 590 | 939 ATOL(K)=TOLFAC*ATOL(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 939 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o drotmg.o ../drotmg.f ../drotmg.f:141:15: 141 | GO TO IGO,(120,150,180,210) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../drotmg.f:147:72: 147 | ASSIGN 120 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../drotmg.f:159:72: 159 | ASSIGN 150 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../drotmg.f:172:72: 172 | ASSIGN 180 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../drotmg.f:183:72: 183 | ASSIGN 210 TO IGO | 1 Warning: Deleted feature: ASSIGN statement at (1) ../drotmg.f:192:72: 192 | IF (DFLAG) 250,230,240 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../drotmg.f:186:5: 186 | 210 CONTINUE | 1 Warning: Label 210 at (1) defined but not used [-Wunused-label] ../drotmg.f:175:5: 175 | 180 CONTINUE | 1 Warning: Label 180 at (1) defined but not used [-Wunused-label] ../drotmg.f:162:5: 162 | 150 CONTINUE | 1 Warning: Label 150 at (1) defined but not used [-Wunused-label] ../drotmg.f:150:5: 150 | 120 CONTINUE | 1 Warning: Label 120 at (1) defined but not used [-Wunused-label] ../drotmg.f:189:0: 189 | DH22=DH22*GAM | Warning: 'dh22' may be used uninitialized in this function [-Wmaybe-uninitialized] ../drotmg.f:188:0: 188 | DH21=DH21*GAM | Warning: 'dh21' may be used uninitialized in this function [-Wmaybe-uninitialized] ../drotmg.f:195:0: 195 | DPARAM(4)=DH12 | Warning: 'dh12' may be used uninitialized in this function [-Wmaybe-uninitialized] ../drotmg.f:198:0: 198 | DPARAM(2)=DH11 | Warning: 'dh11' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o inxca.o ../inxca.f ../inxca.f:22:72: 22 | IF (I-NM) 102,102,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o r9pak.o ../r9pak.f ../r9pak.f:38:16: 38 | NMIN = A1N2B*I1MACH(12) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../r9pak.f:39:16: 39 | NMAX = A1N2B*I1MACH(13) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssiev.o ../ssiev.f ../ssiev.f:96:72: 96 | DO 10 I=1,J | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o betai.o ../betai.f ../betai.f:78:10: 78 | N = MAX (ALNEPS/LOG(Y), 4.0E0) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../betai.f:89:11: 89 | IB = MAX (XB/ALNSML, 0.0E0) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../betai.f:95:10: 95 | N = Q | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cproc.o ../cproc.f ../cproc.f:49:72: 49 | IF (ID) 109,109,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:64:72: 64 | IF (ABS(DEN)) 105,106,105 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:71:72: 71 | 109 IF (M1) 110,110,112 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:72:72: 72 | 110 IF (M2) 121,121,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:76:72: 76 | 112 IF (M2) 113,113,114 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:80:72: 80 | 114 IF (ABS(BM1(M1))-ABS(BM2(M2))) 116,116,115 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:87:72: 87 | IF (MM-2) 120,118,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:100:72: 100 | 121 IF (IA) 124,124,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:110:72: 110 | 124 IF (IFLG) 125,125,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cproc.f:3:23: 3 | + B, C, D, W, YY) | 1 Warning: Unused dummy argument 'yy' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o des.o ../des.f ../des.f:281:72: 281 | 215 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 215 at (1) ../des.f:293:72: 293 | 230 YY(L) = Y(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../des.f:327:72: 327 | 270 Y(L) = YY(L) + DT*YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../des.f:341:72: 341 | 290 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../des.f:365:72: 365 | 320 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../des.f:393:72: 393 | 370 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 370 at (1) ../des.f:415:72: 415 | 390 ATOL(L) = EPS*ATOL(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 390 at (1) ../des.f:418:72: 418 | 410 YPOUT(L) = YP(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o drsco.o ../drsco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o inxcb.o ../inxcb.f ../inxcb.f:22:72: 22 | IF (IR) 107,101,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../inxcb.f:23:72: 23 | 101 IF (I-NM) 102,102,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../inxcb.f:32:72: 32 | IF (I-IPL-NM) 105,105,104 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../inxcb.f:35:72: 35 | 105 IF (I+IPL-NM) 107,107,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o r9upak.o ../r9upak.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssifa.o ../ssifa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bfqad.o ../bfqad.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cprocp.o ../cprocp.f ../cprocp.f:52:72: 52 | IF (ID) 111,111,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:66:72: 66 | IF (MM2-2) 106,104,104 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:83:72: 83 | IF (ABS(DEN)) 107,108,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:92:72: 92 | 111 IF (M1) 112,112,114 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:93:72: 93 | 112 IF (M2) 123,123,113 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:97:72: 97 | 114 IF (M2) 115,115,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:101:72: 101 | 116 IF (ABS(BM1(M1))-ABS(BM2(M2))) 118,118,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:112:72: 112 | IF (MM-2) 122,120,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:122:72: 122 | 123 IF (IA) 126,126,124 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:132:72: 132 | 126 IF (IFLG) 127,127,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprocp.f:3:23: 3 | + B, C, D, U, YY) | 1 Warning: Unused dummy argument 'yy' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ds2lt.o ../ds2lt.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o inxcc.o ../inxcc.f ../inxcc.f:22:72: 22 | IF (IDXC+NC-1-NM) 102,102,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o radb2.o ../radb2.f ../radb2.f:27:72: 27 | IF (IDO-2) 107,105,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssilur.o ../ssilur.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bi.o ../bi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cprod.o ../cprod.f ../cprod.f:48:72: 48 | IF (ID) 109,109,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:63:72: 63 | IF (ABS(DEN)) 105,106,105 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:70:72: 70 | 109 IF (M1) 110,110,112 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:71:72: 71 | 110 IF (M2) 121,121,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:75:72: 75 | 112 IF (M2) 113,113,114 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:79:72: 79 | 114 IF (ABS(BM1(M1))-ABS(BM2(M2))) 116,116,115 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:86:72: 86 | IF (MM-2) 120,118,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:99:72: 99 | 121 IF (IA) 124,124,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprod.f:109:72: 109 | 124 IF (IFLG) 125,125,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dexint.o ../dexint.f ../dexint.f:133:11: 133 | IX = TX | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dexint.f:210:11: 210 | IX = TX | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ds2y.o ../ds2y.f ../ds2y.f:2:47: 2 | SUBROUTINE DS2Y (N, NELT, IA, JA, A, ISYM) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o iploc.o ../iploc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o radb3.o ../radb3.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssilus.o ../ssilus.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bie.o ../bie.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cprodp.o ../cprodp.f ../cprodp.f:53:72: 53 | IF (ID) 111,111,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:67:72: 67 | IF (MM2-2) 106,104,104 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:84:72: 84 | IF (ABS(DEN)) 107,108,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:93:72: 93 | 111 IF (M1) 112,112,114 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:94:72: 94 | 112 IF (M2) 123,123,113 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:98:72: 98 | 114 IF (M2) 115,115,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:102:72: 102 | 116 IF (ABS(BM1(M1))-ABS(BM2(M2))) 118,118,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:113:72: 113 | IF (MM-2) 122,120,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:123:72: 123 | 123 IF (IA) 126,126,124 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cprodp.f:133:72: 133 | 126 IF (IFLG) 127,127,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dexprl.o ../dexprl.f ../dexprl.f:37:18: 37 | NTERMS = XN - (XN*XLN+ALNEPS)/(XLN+1.36D0) + 1.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsbmv.o ../dsbmv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ipperm.o ../ipperm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o radb4.o ../radb4.f ../radb4.f:37:72: 37 | IF (IDO-2) 107,105,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssisl.o ../ssisl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o binom.o ../binom.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cpsi.o ../cpsi.f ../cpsi.f:47:17: 47 | NTERM = -0.30*LOG(R1MACH(3)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cpsi.f:88:10: 88 | 30 N = SQRT(BOUND**2-Y**2) - X + 1.0 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dfac.o ../dfac.f ../dfac.f:62:13: 62 | NMAX = XMAX - 1.D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dscal.o ../dscal.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ipsort.o ../ipsort.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o radb5.o ../radb5.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssjac.o ../ssjac.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bint4.o ../bint4.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cptsl.o ../cptsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dfc.o ../dfc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsd2s.o ../dsd2s.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o isamax.o ../isamax.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o radbg.o ../radbg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssli.o ../ssli.f ../ssli.f:2:47: 2 | SUBROUTINE SSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ssli.f:2:40: 2 | SUBROUTINE SSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../ssli.f:2:53: 2 | SUBROUTINE SSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../ssli.f:2:44: 2 | SUBROUTINE SSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bintk.o ../bintk.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cpzero.o ../cpzero.f ../cpzero.f:96:72: 96 | 13 R(I)=MAX(X,.001*ABS(TEMP))*CMPLX(COS(U),SIN(U))+TEMP | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 13 at (1) ../cpzero.f:113:72: 113 | 17 IF(J .NE. I) TEMP=TEMP*(R(I)-R(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 17 at (1) ../cpzero.f:117:72: 117 | 15 R(I)=R(I)-T(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1) ../cpzero.f:132:72: 132 | 23 S(NR)=MAX(S(NR),(ABS(TEMP)/X)**(1./I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 23 at (1) ../cpzero.f:133:72: 133 | 25 S(NR)=1./S(NR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 25 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dfcmn.o ../dfcmn.f ../dfcmn.f:226:16: 226 | L = PTEMP(IDATA) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsdbcg.o ../dsdbcg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o isdbcg.o ../isdbcg.f ../isdbcg.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isdbcg.f:3:58: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] ../isdbcg.f:3:70: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'pp' at (1) [-Wunused-dummy-argument] ../isdbcg.f:3:62: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'rr' at (1) [-Wunused-dummy-argument] ../isdbcg.f:3:66: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'zz' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o radf2.o ../radf2.f ../radf2.f:27:72: 27 | IF (IDO-2) 107,105,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssli2.o ../ssli2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bisect.o ../bisect.f ../bisect.f:219:0: 219 | S2 = S1 + ABS(X0 - XU) | Warning: 'xu' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bisect.f:219:0: Warning: 'x0' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bisect.f:154:0: 154 | 100 IF (R .EQ. M) GO TO 1001 | Warning: 'r' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bisect.f:254:0: 254 | R = R + M2 - M1 + 1 | Warning: 'm2' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bisect.f:240:0: 240 | RV4(M1) = X1 | Warning: 'm1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../bisect.f:237:0: 237 | 360 IF (S .GE. K) GO TO 400 | Warning: 'k' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cqrdc.o ../cqrdc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dfdjc1.o ../dfdjc1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsdcg.o ../dsdcg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o isdcg.o ../isdcg.f ../isdcg.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, DZ, RWORK, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isdcg.f:3:58: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, DZ, RWORK, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o radf3.o ../radf3.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssllti.o ../ssllti.f ../ssllti.f:2:49: 2 | SUBROUTINE SSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ssllti.f:2:42: 2 | SUBROUTINE SSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../ssllti.f:2:55: 2 | SUBROUTINE SSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../ssllti.f:2:46: 2 | SUBROUTINE SSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bkias.o ../bkias.f ../bkias.f:150:0: 150 | ERR = ERR*RAT | Warning: 'rat' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cqrsl.o ../cqrsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dfdjc3.o ../dfdjc3.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsdcgn.o ../dsdcgn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o isdcgn.o ../isdcgn.f ../isdcgn.f:4:15: 4 | + P, ATP, ATZ, DZ, ATDZ, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'atp' at (1) [-Wunused-dummy-argument] ../isdcgn.f:3:41: 3 | + MTTVEC, MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isdcgn.f:2:69: 2 | INTEGER FUNCTION ISDCGN (N, B, X, NELT, IA, JA, A, ISYM, MATVEC, | 1 Warning: Unused dummy argument 'matvec' at (1) [-Wunused-dummy-argument] ../isdcgn.f:4:10: 4 | + P, ATP, ATZ, DZ, ATDZ, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] ../isdcgn.f:3:71: 3 | + MTTVEC, MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, | 1 Warning: Unused dummy argument 'z' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o radf4.o ../radf4.f ../radf4.f:35:72: 35 | IF (IDO-2) 107,105,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sslubc.o ../sslubc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bkisr.o ../bkisr.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o crati.o ../crati.f ../crati.f:32:12: 32 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../crati.f:35:13: 35 | MAGZ = AZ | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dfehl.o ../dfehl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsdcgs.o ../dsdcgs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o isdcgs.o ../isdcgs.f ../isdcgs.f:3:33: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isdcgs.f:3:67: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] ../isdcgs.f:3:70: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'q' at (1) [-Wunused-dummy-argument] ../isdcgs.f:3:64: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'r0' at (1) [-Wunused-dummy-argument] ../isdcgs.f:4:10: 4 | + U, V1, V2, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'u' at (1) [-Wunused-dummy-argument] ../isdcgs.f:4:14: 4 | + U, V1, V2, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'v1' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o radf5.o ../radf5.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sslucn.o ../sslucn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bksol.o ../bksol.f ../bksol.f:42:72: 42 | 10 X(J)=X(J)*A(M) - SDOT(K,A(M+1),1,X(J+1),1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o crotg.o ../crotg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dfspvd.o ../dfspvd.f ../dfspvd.f:38:72: 38 | 11 VNIKX(J-1,IDERVM) = VNIKX(J,IDERIV) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 11 at (1) ../dfspvd.f:45:72: 45 | 19 A(I,J) = 0.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 19 at (1) ../dfspvd.f:46:72: 46 | 20 A(I,I) = 1.D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../dfspvd.f:59:72: 59 | 24 A(L,J) = (A(L,J) - A(L,J-1))/DIFF*FKMD | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 24 at (1) ../dfspvd.f:66:72: 66 | 30 DO 40 I=1,K | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 40 at (1) ../dfspvd.f:70:72: 70 | 35 V = A(I,J)*VNIKX(J,M) + V | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 35 at (1) ../dfspvd.f:71:72: 71 | 40 VNIKX(I,M) = V | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsdgmr.o ../dsdgmr.f ../dsdgmr.f:2:68: 2 | SUBROUTINE DSDGMR (N, B, X, NELT, IA, JA, A, ISYM, NSAVE, ITOL, | 1 Warning: Unused dummy argument 'itol' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o isdgmr.o ../isdgmr.f ../isdgmr.f:2:35: 2 | INTEGER FUNCTION ISDGMR (N, B, X, XL, NELT, IA, JA, A, ISYM, | 1 Warning: Unused dummy argument 'b' at (1) [-Wunused-dummy-argument] ../isdgmr.f:3:39: 3 | + MSOLVE, NMSL, ITOL, TOL, ITMAX, ITER, ERR, IUNIT, R, Z, DZ, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isdgmr.f:4:37: 4 | + RWORK, IWORK, RNRM, BNRM, SB, SX, JSCAL, KMP, LGMR, MAXL, | 1 Warning: Unused dummy argument 'sb' at (1) [-Wunused-dummy-argument] ../isdgmr.f:3:63: 3 | + MSOLVE, NMSL, ITOL, TOL, ITMAX, ITER, ERR, IUNIT, R, Z, DZ, | 1 Warning: Unused dummy argument 'z' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o radfg.o ../radfg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sslucs.o ../sslucs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o blktr1.o ../blktr1.f ../blktr1.f:53:72: 53 | IF (I-NM) 101,101,108 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:58:72: 58 | IF (I-IF) 102,108,108 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:66:72: 66 | IF (IPI2-NM) 105,105,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:81:72: 81 | IF (NPP) 132,110,132 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:123:72: 123 | IF (I-I2-IZR) 117,114,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:124:72: 124 | 114 IF (I-NM) 115,115,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:137:72: 137 | IF (I-NM) 117,119,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:145:72: 145 | IF (NCMPLX) 121,122,121 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:188:72: 188 | IF (IPI2-IZR) 127,128,127 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:189:72: 189 | 127 IF (I-IZR) 130,131,130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:217:72: 217 | IF (I-NM) 133,133,143 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:227:72: 227 | IF (I-I2) 134,134,136 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:234:72: 234 | 137 IF (IPI2-NM) 140,140,138 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktr1.f:2:34: 2 | SUBROUTINE BLKTR1 (N, AN, BN, CN, M, AM, BM, CM, IDIMY, Y, B, W1, | 1 Warning: Unused dummy argument 'bn' at (1) [-Wunused-dummy-argument] ../blktr1.f:2:26: 2 | SUBROUTINE BLKTR1 (N, AN, BN, CN, M, AM, BM, CM, IDIMY, Y, B, W1, | 1 Warning: Unused dummy argument 'n' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cs1s2.o ../cs1s2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dfspvn.o ../dfspvn.f ../dfspvn.f:44:72: 44 | 26 VMPREV = VM*DELTAM(JP1ML) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 26 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsdi.o ../dsdi.f ../dsdi.f:2:47: 2 | SUBROUTINE DSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../dsdi.f:2:40: 2 | SUBROUTINE DSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../dsdi.f:2:53: 2 | SUBROUTINE DSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../dsdi.f:2:44: 2 | SUBROUTINE DSDI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o isdir.o ../isdir.f ../isdir.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, DZ, RWORK, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rand.o ../rand.f ../rand.f:2:6: 2 | FUNCTION RAND (R) | 1 Warning: 'rand' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] ../rand.f:117:12: 117 | 20 IX1 = MOD(R,1.)*4194304. + 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sslugm.o ../sslugm.f ../sslugm.f:2:68: 2 | SUBROUTINE SSLUGM (N, B, X, NELT, IA, JA, A, ISYM, NSAVE, ITOL, | 1 Warning: Unused dummy argument 'itol' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o blktri.o ../blktri.f ../blktri.f:207:72: 207 | IF (M-5) 101,102,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:210:72: 210 | 102 IF (NM-3) 103,104,104 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:213:72: 213 | 104 IF (IDIMY-M) 105,106,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:218:72: 218 | IF (NPP) 107,108,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:224:72: 224 | IF (NH-IK) 110,110,109 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:229:72: 229 | IF (NPP) 111,112,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:244:72: 244 | 113 IF (IERROR) 119,114,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:250:72: 250 | IF (IFLG) 116,115,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../blktri.f:253:72: 253 | 116 IF (MP) 117,118,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cscal.o ../cscal.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dfulmt.o ../dfulmt.f ../dfulmt.f:46:13: 46 | 10 NEXT = PRGOPT(LP) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dfulmt.f:55:12: 55 | 20 KEY = PRGOPT(LP+1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dfulmt.f:64:17: 64 | IFLAG(4) = PRGOPT(LP+3) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dfulmt.f:65:17: 65 | IFLAG(5) = PRGOPT(LP+4) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dfulmt.f:66:17: 66 | IFLAG(6) = PRGOPT(LP+5) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsdomn.o ../dsdomn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o isdomn.o ../isdomn.f ../isdomn.f:3:69: 3 | + NSAVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, AP, | 1 Warning: Unused dummy argument 'ap' at (1) [-Wunused-dummy-argument] ../isdomn.f:4:23: 4 | + EMAP, DZ, CSAV, RWORK, IWORK, AK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'csav' at (1) [-Wunused-dummy-argument] ../isdomn.f:4:13: 4 | + EMAP, DZ, CSAV, RWORK, IWORK, AK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'emap' at (1) [-Wunused-dummy-argument] ../isdomn.f:3:32: 3 | + NSAVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, AP, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isdomn.f:3:65: 3 | + NSAVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, AP, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ratqr.o ../ratqr.f ../ratqr.f:146:72: 146 | 20 W(I) = D(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../ratqr.f:177:72: 177 | 110 W(I) = W(I) - TOT | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../ratqr.f:262:72: 262 | 500 W(I) = -W(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 500 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sslui.o ../sslui.f ../sslui.f:2:48: 2 | SUBROUTINE SSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../sslui.f:2:41: 2 | SUBROUTINE SSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../sslui.f:2:54: 2 | SUBROUTINE SSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../sslui.f:2:45: 2 | SUBROUTINE SSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bndacc.o ../bndacc.f ../bndacc.f:218:72: 218 | DO 10 J=1,NBP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../bndacc.f:225:72: 225 | DO 20 J=1,NBP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) ../bndacc.f:245:72: 245 | DO 50 I=1,K | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cscale.o ../cscale.f ../cscale.f:35:72: 35 | 5 COLS(K)=SDOT(NROW,A(1,K),1,A(1,K),1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 5 at (1) ../cscale.f:45:72: 45 | 30 SCALES(K)=1. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../cscale.f:64:72: 64 | 80 A(J,K)=S*A(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../cscale.f:72:72: 72 | 200 ANORM=ANORM+ROWS(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../cscale.f:56:12: 56 | IP=-0.5*P | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dfzero.o ../dfzero.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsdot.o ../dsdot.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o isort.o ../isort.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rc.o ../rc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sslui2.o ../sslui2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bndsol.o ../bndsol.f ../bndsol.f:229:72: 229 | 70 IF (G(I,L+1)) 80,130,80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../bndsol.f:230:72: 230 | 80 X(I)=(X(I)-S)/G(I,L+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../bndsol.f:244:72: 244 | IF (G(J,L+1)) 120,130,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../bndsol.f:245:72: 245 | 120 X(J)=(X(J)-S)/G(J,L+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cseri.o ../cseri.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgami.o ../dgami.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsds.o ../dsds.f ../dsds.f:2:34: 2 | SUBROUTINE DSDS (N, NELT, IA, JA, A, ISYM, DINV) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../dsds.f:2:47: 2 | SUBROUTINE DSDS (N, NELT, IA, JA, A, ISYM, DINV) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o issbcg.o ../issbcg.f ../issbcg.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../issbcg.f:3:58: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] ../issbcg.f:3:70: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'pp' at (1) [-Wunused-dummy-argument] ../issbcg.f:3:62: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'rr' at (1) [-Wunused-dummy-argument] ../issbcg.f:3:66: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, RR, ZZ, PP, | 1 Warning: Unused dummy argument 'zz' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rc3jj.o ../rc3jj.f ../rc3jj.f:202:72: 202 | IF(NDIM-NFIN) 21, 23, 23 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jj.f:235:72: 235 | IF(LSTEP-2) 32, 32, 31 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jj.f:278:72: 278 | 70 THRCOF(I) = THRCOF(I) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../rc3jj.f:288:72: 288 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jj.f:365:72: 365 | 130 THRCOF(INDEX) = THRCOF(INDEX) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../rc3jj.f:390:72: 390 | 210 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../rc3jj.f:397:72: 397 | 212 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 212 at (1) ../rc3jj.f:412:72: 412 | IF(SIGN1*SIGN2) 235,235,236 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jj.f:418:72: 418 | 240 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../rc3jj.f:424:72: 424 | 251 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 251 at (1) ../rc3jj.f:398:0: 398 | SUMUNI = SUMFOR + RATIO*RATIO*SUMBAC | Warning: 'sumbac' may be used uninitialized in this function [-Wmaybe-uninitialized] ../rc3jj.f:257:0: 257 | 60 C2 = - L1 * OLDFAC / DENOM | Warning: 'denom' may be used uninitialized in this function [-Wmaybe-uninitialized] ../rc3jj.f:288:0: 288 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | Warning: 'c1old' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sslui4.o ../sslui4.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bnfac.o ../bnfac.f ../bnfac.f:87:72: 87 | IF (NROWM1) 120, 110, 10 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o csevl.o ../csevl.f ../csevl.f:62:0: 62 | CSEVL = 0.5E0*(B0-B2) | Warning: 'b2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgamic.o ../dgamic.f ../dgamic.f:97:0: 97 | IF (A.LT.X) RETURN | Warning: '__result_dgamic' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsdscl.o ../dsdscl.f ../dsdscl.f:2:49: 2 | SUBROUTINE DSDSCL (N, NELT, IA, JA, A, ISYM, X, B, DINV, JOB, | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o isscg.o ../isscg.f ../isscg.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, DZ, RWORK, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isscg.f:3:58: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, DZ, RWORK, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rc3jm.o ../rc3jm.f ../rc3jm.f:203:72: 203 | IF(NDIM-NFIN) 21, 23, 23 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jm.f:236:72: 236 | IF(LSTEP-2) 32, 32, 31 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jm.f:274:72: 274 | 70 THRCOF(I) = THRCOF(I) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../rc3jm.f:285:72: 285 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jm.f:358:72: 358 | 111 THRCOF(INDEX) = THRCOF(INDEX) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 111 at (1) ../rc3jm.f:383:72: 383 | 210 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../rc3jm.f:390:72: 390 | 212 THRCOF(N) = RATIO * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 212 at (1) ../rc3jm.f:405:72: 405 | IF(SIGN1*SIGN2) 235,235,236 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc3jm.f:411:72: 411 | 240 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../rc3jm.f:417:72: 417 | 251 THRCOF(N) = CNORM * THRCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 251 at (1) ../rc3jm.f:391:0: 391 | SUMUNI = SUMFOR + RATIO*RATIO*SUMBAC | Warning: 'sumbac' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssluom.o ../ssluom.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bnslv.o ../bnslv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cshch.o ../cshch.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgamit.o ../dgamit.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsgs.o ../dsgs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o isscgn.o ../isscgn.f ../isscgn.f:4:15: 4 | + P, ATP, ATZ, DZ, ATDZ, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'atp' at (1) [-Wunused-dummy-argument] ../isscgn.f:3:41: 3 | + MTTVEC, MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isscgn.f:2:69: 2 | INTEGER FUNCTION ISSCGN (N, B, X, NELT, IA, JA, A, ISYM, MATVEC, | 1 Warning: Unused dummy argument 'matvec' at (1) [-Wunused-dummy-argument] ../isscgn.f:4:10: 4 | + P, ATP, ATZ, DZ, ATDZ, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] ../isscgn.f:3:71: 3 | + MTTVEC, MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, | 1 Warning: Unused dummy argument 'z' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rc6j.o ../rc6j.f ../rc6j.f:208:72: 208 | IF(NDIM-NFIN) 21, 23, 23 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc6j.f:243:72: 243 | IF(LSTEP-2) 32, 32, 31 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc6j.f:288:72: 288 | 70 SIXCOF(I) = SIXCOF(I) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../rc6j.f:299:72: 299 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc6j.f:378:72: 378 | 130 SIXCOF(INDEX) = SIXCOF(INDEX) / SRHUGE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../rc6j.f:402:72: 402 | 210 SIXCOF(N) = RATIO * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../rc6j.f:409:72: 409 | 212 SIXCOF(N) = RATIO * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 212 at (1) ../rc6j.f:424:72: 424 | IF(SIGN1*SIGN2) 235,235,236 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rc6j.f:430:72: 430 | 240 SIXCOF(N) = CNORM * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../rc6j.f:436:72: 436 | 251 SIXCOF(N) = CNORM * SIXCOF(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 251 at (1) ../rc6j.f:410:0: 410 | SUMUNI = SUMFOR + RATIO*RATIO*SUMBAC | Warning: 'sumbac' may be used uninitialized in this function [-Wmaybe-uninitialized] ../rc6j.f:266:0: 266 | 60 C2 = - L1 * OLDFAC / DENOM | Warning: 'denom' may be used uninitialized in this function [-Wmaybe-uninitialized] ../rc6j.f:299:0: 299 | 80 IF(C1OLD-ABS(C1)) 100, 100, 30 | Warning: 'c1old' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssluti.o ../ssluti.f ../ssluti.f:2:49: 2 | SUBROUTINE SSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ssluti.f:2:42: 2 | SUBROUTINE SSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../ssluti.f:2:55: 2 | SUBROUTINE SSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../ssluti.f:2:46: 2 | SUBROUTINE SSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bqr.o ../bqr.f ../bqr.f:155:72: 155 | 80 A(I,MB) = A(I,MB) - G | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../bqr.f:158:72: 158 | 100 RV(K) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../bqr.f:168:72: 168 | 110 RV(K) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../bqr.f:223:72: 223 | 180 SCALE = SCALE + ABS(RV(K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../bqr.f:228:72: 228 | 190 S = S + (RV(K)/SCALE)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../bqr.f:253:72: 253 | 240 RV(K) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../bqr.f:281:72: 281 | DO 320 K = 1, M1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 320 at (1) ../bqr.f:294:72: 294 | 380 A(I,MB) = A(I,MB) - G | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../bqr.f:2:50: 2 | SUBROUTINE BQR (NM, N, MB, A, T, R, IERR, NV, RV) | 1 Warning: Unused dummy argument 'nv' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o csico.o ../csico.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgamlm.o ../dgamlm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsiccg.o ../dsiccg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o isscgs.o ../isscgs.f ../isscgs.f:3:33: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../isscgs.f:3:67: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] ../isscgs.f:3:70: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'q' at (1) [-Wunused-dummy-argument] ../isscgs.f:3:64: 3 | + MSOLVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, R0, P, Q, | 1 Warning: Unused dummy argument 'r0' at (1) [-Wunused-dummy-argument] ../isscgs.f:4:10: 4 | + U, V1, V2, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'u' at (1) [-Wunused-dummy-argument] ../isscgs.f:4:14: 4 | + U, V1, V2, RWORK, IWORK, AK, BK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'v1' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rd.o ../rd.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssmmi2.o ../ssmmi2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bsgq8.o ../bsgq8.f ../bsgq8.f:139:72: 139 | IF (EE-AE) 40, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../bsgq8.f:142:72: 142 | IF (LR(L)) 60, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../bsgq8.f:172:72: 172 | IF (LR(L)) 100, 100, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o csidi.o ../csidi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgamln.o ../dgamln.f ../dgamln.f:143:11: 143 | NZ = Z | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dgamln.f:158:11: 158 | MZ = ZM + 1 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dgamln.f:185:11: 185 | NZ = ZINC | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dgamln.f:163:0: 163 | ZINC = ZMIN - NZ | Warning: 'nz' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsico.o ../dsico.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o issgmr.o ../issgmr.f ../issgmr.f:2:35: 2 | INTEGER FUNCTION ISSGMR (N, B, X, XL, NELT, IA, JA, A, ISYM, | 1 Warning: Unused dummy argument 'b' at (1) [-Wunused-dummy-argument] ../issgmr.f:3:39: 3 | + MSOLVE, NMSL, ITOL, TOL, ITMAX, ITER, ERR, IUNIT, R, Z, DZ, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../issgmr.f:4:37: 4 | + RWORK, IWORK, RNRM, BNRM, SB, SX, JSCAL, KMP, LGMR, MAXL, | 1 Warning: Unused dummy argument 'sb' at (1) [-Wunused-dummy-argument] ../issgmr.f:3:63: 3 | + MSOLVE, NMSL, ITOL, TOL, ITMAX, ITER, ERR, IUNIT, R, Z, DZ, | 1 Warning: Unused dummy argument 'z' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rebak.o ../rebak.f ../rebak.f:77:72: 77 | DO 100 II = 1, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../rebak.f:84:72: 84 | 60 X = X - B(K,I) * Z(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssmmti.o ../ssmmti.f ../ssmmti.f:2:49: 2 | SUBROUTINE SSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ssmmti.f:2:42: 2 | SUBROUTINE SSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../ssmmti.f:2:55: 2 | SUBROUTINE SSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../ssmmti.f:2:46: 2 | SUBROUTINE SSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bskin.o ../bskin.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o csifa.o ../csifa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgamma.o ../dgamma.f ../dgamma.f:2:6: 2 | DOUBLE PRECISION FUNCTION DGAMMA (X) | 1 Warning: 'dgamma' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] ../dgamma.f:97:10: 97 | N = X | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsics.o ../dsics.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o issir.o ../issir.f ../issir.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, DZ, RWORK, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rebakb.o ../rebakb.f ../rebakb.f:77:72: 77 | DO 100 II = 1, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../rebakb.f:84:72: 84 | 60 X = X + B(I,K) * Z(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssmtv.o ../ssmtv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bspdoc.o ../bspdoc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o csinh.o ../csinh.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgamr.o ../dgamr.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsidi.o ../dsidi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o issomn.o ../issomn.f ../issomn.f:3:69: 3 | + NSAVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, AP, | 1 Warning: Unused dummy argument 'ap' at (1) [-Wunused-dummy-argument] ../issomn.f:4:23: 4 | + EMAP, DZ, CSAV, RWORK, IWORK, AK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'csav' at (1) [-Wunused-dummy-argument] ../issomn.f:4:13: 4 | + EMAP, DZ, CSAV, RWORK, IWORK, AK, BNRM, SOLNRM) | 1 Warning: Unused dummy argument 'emap' at (1) [-Wunused-dummy-argument] ../issomn.f:3:32: 3 | + NSAVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, AP, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] ../issomn.f:3:65: 3 | + NSAVE, ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, R, Z, P, AP, | 1 Warning: Unused dummy argument 'p' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o reduc.o ../reduc.f ../reduc.f:87:72: 87 | DO 80 J = I, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 80 at (1) ../reduc.f:92:72: 92 | 20 X = X - B(I,K) * B(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../reduc.f:107:72: 107 | DO 200 J = I, NN | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 200 at (1) ../reduc.f:112:72: 112 | 160 X = X - B(I,K) * A(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../reduc.f:120:72: 120 | DO 300 I = J, NN | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 300 at (1) ../reduc.f:126:72: 126 | 220 X = X - A(K,J) * B(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../reduc.f:131:72: 131 | 260 X = X - A(J,K) * B(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssmv.o ../ssmv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bspdr.o ../bspdr.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o csisl.o ../csisl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgamrn.o ../dgamrn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsifa.o ../dsifa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o iswap.o ../iswap.f ../iswap.f:47:72: 47 | IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o reduc2.o ../reduc2.f ../reduc2.f:89:72: 89 | DO 80 J = I, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 80 at (1) ../reduc2.f:94:72: 94 | 20 X = X - B(I,K) * B(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../reduc2.f:108:72: 108 | DO 200 J = 1, I | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 200 at (1) ../reduc2.f:114:72: 114 | 120 X = X + A(K,I) * B(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../reduc2.f:119:72: 119 | 160 X = X + A(I,K) * B(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../reduc2.f:128:72: 128 | DO 300 J = 1, I | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 300 at (1) ../reduc2.f:133:72: 133 | 260 X = X + A(K,J) * B(K,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssort.o ../ssort.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bspev.o ../bspev.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cspco.o ../cspco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgaus8.o ../dgaus8.f ../dgaus8.f:148:72: 148 | IF (EE-AE) 40, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dgaus8.f:151:72: 151 | IF (LR(L)) 60, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dgaus8.f:181:72: 181 | IF (LR(L)) 100, 100, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dgaus8.f:107:14: 107 | NBITS = ANIB | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dgaus8.f:121:12: 121 | NIB = ANIB | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsilur.o ../dsilur.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ivout.o ../ivout.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o reort.o ../reort.f ../reort.f:159:72: 159 | 65 Y(J,L) = Y(J,L)*VNORM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 65 at (1) ../reort.f:172:72: 172 | 80 YP(J) = YP(J) / YPNM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../reort.f:174:72: 174 | 90 W(J) = C * W(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sspco.o ../sspco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bsplvd.o ../bsplvd.f ../bsplvd.f:35:72: 35 | 11 VNIKX(J-1,IDERVM) = VNIKX(J,IDERIV) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 11 at (1) ../bsplvd.f:42:72: 42 | 19 A(I,J) = 0. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 19 at (1) ../bsplvd.f:43:72: 43 | 20 A(I,I) = 1. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../bsplvd.f:56:72: 56 | 24 A(L,J) = (A(L,J) - A(L,J-1))/DIFF*FKMD | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 24 at (1) ../bsplvd.f:63:72: 63 | 30 DO 40 I=1,K | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 40 at (1) ../bsplvd.f:67:72: 67 | 35 V = A(I,J)*VNIKX(J,M) + V | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 35 at (1) ../bsplvd.f:68:72: 68 | 40 VNIKX(I,M) = V | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cspdi.o ../cspdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgbco.o ../dgbco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsilus.o ../dsilus.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o j4save.o ../j4save.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rf.o ../rf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sspdi.o ../sspdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bsplvn.o ../bsplvn.f ../bsplvn.f:41:72: 41 | 26 VMPREV = VM*DELTAM(JP1ML) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 26 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cspfa.o ../cspfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgbdi.o ../dgbdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsindg.o ../dsindg.f ../dsindg.f:30:10: 30 | N = ABS(X)/90.D0 + 0.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o jairy.o ../jairy.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rfftb.o ../rfftb.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sspev.o ../sspev.f ../sspev.f:113:72: 113 | 25 V(I,J) = 0. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 25 at (1) ../sspev.f:114:72: 114 | 30 V(I,I) = 1. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bsppp.o ../bsppp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cspsl.o ../cspsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgbfa.o ../dgbfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsisl.o ../dsisl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o la05ad.o ../la05ad.f ../la05ad.f:189:0: 189 | IF (ABS(A(KJ)).LT.AMAX*U) GO TO 180 | Warning: 'kj' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05ad.f:192:0: 192 | JP = J | Warning: 'jp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05ad.f:191:0: 191 | IPP = I | Warning: 'ipp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05ad.f:141:0: 141 | KR = IP(J,2) - 1 | Warning: 'kr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rfftb1.o ../rfftb1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sspfa.o ../sspfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bspvd.o ../bspvd.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o csroot.o ../csroot.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgbmv.o ../dgbmv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsjac.o ../dsjac.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o la05as.o ../la05as.f ../la05as.f:186:0: 186 | IF (ABS(A(KJ)).LT.AMAX*U) GO TO 180 | Warning: 'kj' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05as.f:189:0: 189 | JP = J | Warning: 'jp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05as.f:188:0: 188 | IPP = I | Warning: 'ipp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05as.f:138:0: 138 | KR = IP(J,2) - 1 | Warning: 'kr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rfftf.o ../rfftf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sspmv.o ../sspmv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bspvn.o ../bspvn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o csrot.o ../csrot.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgbsl.o ../dgbsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsli.o ../dsli.f ../dsli.f:2:47: 2 | SUBROUTINE DSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../dsli.f:2:40: 2 | SUBROUTINE DSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../dsli.f:2:53: 2 | SUBROUTINE DSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../dsli.f:2:44: 2 | SUBROUTINE DSLI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o la05bd.o ../la05bd.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rfftf1.o ../rfftf1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sspr.o ../sspr.f ../sspr.f:96:0: 96 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bsqad.o ../bsqad.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o csscal.o ../csscal.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgeco.o ../dgeco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsli2.o ../dsli2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o la05bs.o ../la05bs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rffti.o ../rffti.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sspr2.o ../sspr2.f ../sspr2.f:107:0: 107 | INTEGER I, INFO, IX, IY, J, JX, JY, K, KK, KX, KY | Warning: 'ky' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sspr2.f:107:0: Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sspr2.f:107:0: Warning: 'jy' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sspr2.f:107:0: Warning: 'jx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bsrh.o ../bsrh.f ../bsrh.f:25:72: 25 | IF (SGN*F(X,IZ,C,A,BH)) 103,105,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../bsrh.f:30:72: 30 | IF (DX-CNV) 105,105,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o csvdc.o ../csvdc.f ../csvdc.f:382:0: 382 | IF (LS .NE. L) GO TO 490 | Warning: 'ls' may be used uninitialized in this function [-Wmaybe-uninitialized] ../csvdc.f:371:0: 371 | IF (LS .EQ. L) GO TO 480 | Warning: 'l' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgedi.o ../dgedi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsllti.o ../dsllti.f ../dsllti.f:2:49: 2 | SUBROUTINE DSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../dsllti.f:2:42: 2 | SUBROUTINE DSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../dsllti.f:2:55: 2 | SUBROUTINE DSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../dsllti.f:2:46: 2 | SUBROUTINE DSLLTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o la05cd.o ../la05cd.f ../la05cd.f:244:72: 244 | IF (II-LAST1) 560, 590, 560 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../la05cd.f:73:0: 73 | IF (I.EQ.IM) M = II | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05cd.f:76:0: 76 | LAST = II | Warning: 'last' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rffti1.o ../rffti1.f ../rffti1.f:61:72: 61 | IF (J-4) 102,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../rffti1.f:67:72: 67 | IF (NR) 101,105,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sspsl.o ../sspsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o bvalu.o ../bvalu.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cswap.o ../cswap.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgefa.o ../dgefa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dslubc.o ../dslubc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o la05cs.o ../la05cs.f ../la05cs.f:245:72: 245 | IF (II-LAST1) 560, 590, 560 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../la05cs.f:74:0: 74 | IF (I.EQ.IM) M = II | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../la05cs.f:77:0: 77 | LAST = II | Warning: 'last' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rg.o ../rg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssvdc.o ../ssvdc.f ../ssvdc.f:368:0: 368 | L = L + 1 | Warning: 'ls' may be used uninitialized in this function [-Wmaybe-uninitialized] ../ssvdc.f:345:0: 345 | IF (LS .EQ. L) GO TO 440 | Warning: 'l' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o csymm.o ../csymm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgefs.o ../dgefs.f ../dgefs.f:153:15: 153 | IND = -LOG10(D1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dslucn.o ../dslucn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o la05ed.o ../la05ed.f ../la05ed.f:2:46: 2 | SUBROUTINE LA05ED (A, IRN, IP, N, IW, IA, REALS) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rgauss.o ../rgauss.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sswap.o ../sswap.f ../sswap.f:50:72: 50 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o csyr2k.o ../csyr2k.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgemm.o ../dgemm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dslucs.o ../dslucs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o la05es.o ../la05es.f ../la05es.f:2:46: 2 | SUBROUTINE LA05ES (A, IRN, IP, N, IW, IA, REALS) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rgg.o ../rgg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssymm.o ../ssymm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o csyrk.o ../csyrk.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgemv.o ../dgemv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dslugm.o ../dslugm.f ../dslugm.f:2:68: 2 | SUBROUTINE DSLUGM (N, B, X, NELT, IA, JA, A, ISYM, NSAVE, ITOL, | 1 Warning: Unused dummy argument 'itol' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o llsia.o ../llsia.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rj.o ../rj.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssymv.o ../ssymv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o c0lgmc.o ../c0lgmc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ctan.o ../ctan.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dger.o ../dger.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dslui.o ../dslui.f ../dslui.f:2:48: 2 | SUBROUTINE DSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../dslui.f:2:41: 2 | SUBROUTINE DSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../dslui.f:2:54: 2 | SUBROUTINE DSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../dslui.f:2:45: 2 | SUBROUTINE DSLUI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o lmpar.o ../lmpar.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssyr.o ../ssyr.f ../ssyr.f:99:0: 99 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o c1merg.o ../c1merg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ctanh.o ../ctanh.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgesl.o ../dgesl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dslui2.o ../dslui2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o lpdp.o ../lpdp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rpqr79.o ../rpqr79.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssyr2.o ../ssyr2.f ../ssyr2.f:110:0: 110 | INTEGER I, INFO, IX, IY, J, JX, JY, KX, KY | Warning: 'ky' may be used uninitialized in this function [-Wmaybe-uninitialized] ../ssyr2.f:110:0: Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../ssyr2.f:110:0: Warning: 'jy' may be used uninitialized in this function [-Wmaybe-uninitialized] ../ssyr2.f:110:0: Warning: 'jx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o c9lgmc.o ../c9lgmc.f ../c9lgmc.f:51:17: 51 | NTERM = -0.30*LOG(R1MACH(3)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ctbmv.o ../ctbmv.f ../ctbmv.f:151:0: 151 | INTEGER I, INFO, IX, J, JX, KPLUS1, KX, L | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dglss.o ../dglss.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dslui4.o ../dslui4.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o lsame.o ../lsame.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rpzero.o ../rpzero.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssyr2k.o ../ssyr2k.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o c9ln2r.o ../c9ln2r.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ctbsv.o ../ctbsv.f ../ctbsv.f:231:0: 231 | KX = KX + ( N - 1 )*INCX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgmres.o ../dgmres.f ../dgmres.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, SB, SX, RGWK, LRGW, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsluom.o ../dsluom.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o lsei.o ../lsei.f ../lsei.f:491:13: 491 | LINK = PRGOPT(1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../lsei.f:506:15: 506 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../lsei.f:521:16: 521 | NEXT = PRGOPT(LINK) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../lsei.f:577:0: 577 | IF (I.NE.IMAX) CALL SSWAP (NP1, W(I,1), MDW, W(IMAX,1), MDW) | Warning: 'imax' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rs.o ../rs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ssyrk.o ../ssyrk.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cacai.o ../cacai.f ../cacai.f:81:12: 81 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ctpmv.o ../ctpmv.f ../ctpmv.f:110:0: 110 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dgtsl.o ../dgtsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsluti.o ../dsluti.f ../dsluti.f:2:49: 2 | SUBROUTINE DSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../dsluti.f:2:42: 2 | SUBROUTINE DSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../dsluti.f:2:55: 2 | SUBROUTINE DSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../dsluti.f:2:46: 2 | SUBROUTINE DSLUTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o lsi.o ../lsi.f ../lsi.f:93:13: 93 | LINK = PRGOPT(1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../lsi.f:96:15: 96 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../lsi.f:100:16: 100 | NEXT = PRGOPT(LINK) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rsb.o ../rsb.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o stbmv.o ../stbmv.f ../stbmv.f:150:0: 150 | INTEGER I, INFO, IX, J, JX, KPLUS1, KX, L | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cacon.o ../cacon.f ../cacon.f:60:12: 60 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cacon.f:133:0: 133 | S1 = SC1*CSS(KFLAG) | Warning: 'IMAGPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cacon.f:133:0: Warning: 'REALPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ctpsv.o ../ctpsv.f ../ctpsv.f:113:0: 113 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dh12.o ../dh12.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dslvs.o ../dslvs.f ../dslvs.f:2:39: 2 | SUBROUTINE DSLVS (WM, IWM, X, TEM) | 1 Warning: Unused dummy argument 'tem' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o lsod.o ../lsod.f ../lsod.f:257:72: 257 | 210 YPOUT(L) = YH(L,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../lsod.f:271:72: 271 | 225 EWT(L) = TOL | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 225 at (1) ../lsod.f:281:72: 281 | 230 YH(L,2) = H*YH(L,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../lsod.f:314:72: 314 | 280 Y(L) = YH(L,1) + (DT/H)*YH(L,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../lsod.f:367:72: 367 | 360 ATOL(L) = TOLFAC*ATOL(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../lsod.f:404:72: 404 | 555 YPOUT(L) = YH(L,2)/H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 555 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rsco.o ../rsco.f ../rsco.f:40:72: 40 | 10 RLS(I) = RSAV(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../rsco.f:42:72: 42 | 20 ILS(I) = ISAV(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o stbsv.o ../stbsv.f ../stbsv.f:300:0: 300 | TEMP = X( JX ) | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cacos.o ../cacos.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ctrco.o ../ctrco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dhels.o ../dhels.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsmmi2.o ../dsmmi2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o lssods.o ../lssods.f ../lssods.f:152:72: 152 | DO 10 K=1,M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../lssods.f:153:72: 153 | 10 Q(K,J)=A(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../lssods.f:173:72: 173 | 13 DIV(K)=DIAG(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 13 at (1) ../lssods.f:183:72: 183 | 20 X(K)=0. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../lssods.f:196:72: 196 | 30 R(K)=B(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../lssods.f:211:72: 211 | DO 35 K=J,M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 35 at (1) ../lssods.f:212:72: 212 | 35 R(K)=R(K)+GAMMA*Q(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 35 at (1) ../lssods.f:221:72: 221 | 40 Z(K)=(R(K)-SDOT(L,Q(K,KP),NRDA,Z(KP),1))/DIV(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../lssods.f:230:72: 230 | 50 Z(K)=0. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../lssods.f:235:72: 235 | DO 55 J=IRP,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 55 at (1) ../lssods.f:236:72: 236 | 55 Z(J)=Z(J)+GAM*Q(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 55 at (1) ../lssods.f:244:72: 244 | 65 X(L)=X(L)+Z(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 65 at (1) ../lssods.f:267:72: 267 | 85 R(K)=-SDSDOT(N,-B(K),A(K,1),NRDA,X(1),1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 85 at (1) ../lssods.f:293:72: 293 | 100 ZNRM0=ZNORM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rsg.o ../rsg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o steps.o ../steps.f ../steps.f:212:72: 212 | 10 ROUND = ROUND + (Y(L)/WT(L))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../steps.f:229:72: 229 | 20 PHI(L,2) = 0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../steps.f:251:72: 251 | 25 PHI(L,15) = 0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 25 at (1) ../steps.f:290:72: 290 | 105 SIG(I+1) = REALI*ALPHA(I)*SIG(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 105 at (1) ../steps.f:301:72: 301 | 115 W(IQ) = V(IQ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 115 at (1) ../steps.f:328:72: 328 | 125 W(I) = V(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) ../steps.f:339:72: 339 | 135 W(IQ) = V(IQ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 135 at (1) ../steps.f:358:72: 358 | 145 W(IQ) = W(IQ) - TEMP6*W(IQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 145 at (1) ../steps.f:359:72: 359 | 150 G(I) = W(1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../steps.f:379:72: 379 | 205 PHI(L,I) = TEMP1*PHI(L,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 205 at (1) ../steps.f:387:72: 387 | 220 P(L) = 0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../steps.f:394:72: 394 | 225 PHI(L,I) = PHI(L,I) + PHI(L,IP1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 225 at (1) ../steps.f:400:72: 400 | 235 PHI(L,16) = (P(L) - Y(L)) - TAU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 235 at (1) ../steps.f:403:72: 403 | 245 P(L) = Y(L) + H*P(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 245 at (1) ../steps.f:417:72: 417 | IF(KM2)265,260,255 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../steps.f:420:72: 420 | 265 ERK = ERK + (TEMP4*TEMP3)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 265 at (1) ../steps.f:421:72: 421 | IF(KM2)280,275,270 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../steps.f:431:72: 431 | IF(KM2)299,290,285 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../steps.f:457:72: 457 | 305 PHI(L,I) = TEMP1*(PHI(L,I) - PHI(L,IP1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 305 at (1) ../steps.f:461:72: 461 | 315 PSI(I-1) = PSI(I) - H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 315 at (1) ../steps.f:468:72: 468 | IF(IFAIL - 3) 335,330,325 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../steps.f:499:72: 499 | 405 P(L) = TEMP3 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 405 at (1) ../steps.f:504:72: 504 | 415 P(L) = TEMP3 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 415 at (1) ../steps.f:511:72: 511 | 425 PHI(L,KP2) = PHI(L,KP1) - PHI(L,KP2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 425 at (1) ../steps.f:514:72: 514 | 430 PHI(L,I) = PHI(L,I) + PHI(L,KP1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 430 at (1) ../steps.f:528:72: 528 | 440 ERKP1 = ERKP1 + (PHI(L,KP2)/WT(L))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 440 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cacosh.o ../cacosh.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ctrdi.o ../ctrdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dheqr.o ../dheqr.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsmmti.o ../dsmmti.f ../dsmmti.f:2:49: 2 | SUBROUTINE DSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../dsmmti.f:2:42: 2 | SUBROUTINE DSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ia' at (1) [-Wunused-dummy-argument] ../dsmmti.f:2:55: 2 | SUBROUTINE DSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'isym' at (1) [-Wunused-dummy-argument] ../dsmmti.f:2:46: 2 | SUBROUTINE DSMMTI (N, B, X, NELT, IA, JA, A, ISYM, RWORK, IWORK) | 1 Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o lssuds.o ../lssuds.f ../lssuds.f:152:72: 152 | DO 10 J=1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../lssuds.f:153:72: 153 | 10 Q(J,K)=A(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../lssuds.f:174:72: 174 | 20 DIV(K)=DIAG(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../lssuds.f:199:72: 199 | 45 X(K)=B(KP) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 45 at (1) ../lssuds.f:201:72: 201 | 50 S(K)=X(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../lssuds.f:219:72: 219 | DO 55 J=IRP,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 55 at (1) ../lssuds.f:220:72: 220 | 55 S(J)=S(J)+GAM*Q(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 55 at (1) ../lssuds.f:233:72: 233 | 65 S(K)=(S(K)-SDOT(K-1,Q(K,1),NRDA,S(1),1))/DIV(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 65 at (1) ../lssuds.f:246:72: 246 | DO 80 K=J,M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 80 at (1) ../lssuds.f:247:72: 247 | 80 X(K)=X(K)+GAMMA*Q(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../lssuds.f:252:72: 252 | 85 X(K)=X(K)*SCALES(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 85 at (1) ../lssuds.f:265:72: 265 | DO 100 JR=1,IRANK | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../lssuds.f:269:72: 269 | DO 100 I=J,M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../lssuds.f:270:72: 270 | 100 U(I,K)=U(I,K)+GAMMA*Q(J,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rsgab.o ../rsgab.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o stin.o ../stin.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cairy.o ../cairy.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ctrmm.o ../ctrmm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dhfti.o ../dhfti.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsmtv.o ../dsmtv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o macon.o ../macon.f ../macon.f:29:11: 29 | LPAR=0.5*DD | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../macon.f:30:9: 30 | KE=0.5+0.75*DD | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rsgba.o ../rsgba.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o stod.o ../stod.f ../stod.f:166:72: 166 | 125 EL(I) = ELCO(I,NQ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) ../stod.f:187:72: 187 | 155 EL(I) = ELCO(I,NQ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 155 at (1) ../stod.f:210:72: 210 | DO 180 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 180 at (1) ../stod.f:211:72: 211 | 180 YH(I,J) = YH(I,J)*R | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../stod.f:231:72: 231 | 210 YH1(I) = YH1(I) + YH1(I+NYH) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../stod.f:242:72: 242 | 230 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../stod.f:259:72: 259 | 260 ACOR(I) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) ../stod.f:267:72: 267 | 290 Y(I) = SAVF(I) - ACOR(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../stod.f:271:72: 271 | 300 ACOR(I) = SAVF(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../stod.f:279:72: 279 | 360 Y(I) = H*SAVF(I) - (YH(I,2) + ACOR(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../stod.f:285:72: 285 | 380 Y(I) = YH(I,1) + EL(1)*ACOR(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../stod.f:317:72: 317 | 440 YH1(I) = YH1(I) - YH1(I+NYH) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 440 at (1) ../stod.f:351:72: 351 | DO 470 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 470 at (1) ../stod.f:352:72: 352 | 470 YH(I,J) = YH(I,J) + EL(J)*ACOR(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 470 at (1) ../stod.f:358:72: 358 | 490 YH(I,LMAX) = ACOR(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 490 at (1) ../stod.f:373:72: 373 | 510 YH1(I) = YH1(I) - YH1(I+NYH) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../stod.f:393:72: 393 | 530 SAVF(I) = ACOR(I) - YH(I,LMAX) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 530 at (1) ../stod.f:420:72: 420 | 600 YH(I,NEWQ+1) = ACOR(I)*R | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 600 at (1) ../stod.f:450:72: 450 | 645 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 645 at (1) ../stod.f:454:72: 454 | 650 YH(I,2) = H*SAVF(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 650 at (1) ../stod.f:473:72: 473 | 695 ACOR(I) = ACOR(I)*R | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 695 at (1) ../stod.f:295:0: 295 | IF (M .GE. 2 .AND. DEL .GT. 2.0E0*DELP) GO TO 410 | Warning: 'delp' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o carg.o ../carg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ctrmv.o ../ctrmv.f ../ctrmv.f:113:0: 113 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dhkseq.o ../dhkseq.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsmv.o ../dsmv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rsp.o ../rsp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o stor1.o ../stor1.f ../stor1.f:39:72: 39 | 10 U(J) = YH(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../stor1.f:46:72: 46 | 20 V(J) = 0. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../stor1.f:54:72: 54 | 40 V(J) = YP(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../stor1.f:58:72: 58 | 60 V(J) = C * YP(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o casin.o ../casin.f ../casin.f:34:18: 34 | NTERMS = -0.4343*LOG(R1MACH(3)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ctrsl.o ../ctrsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dhstrt.o ../dhstrt.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsort.o ../dsort.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mc20ad.o ../mc20ad.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rst.o ../rst.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o stout.o ../stout.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o casinh.o ../casinh.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ctrsm.o ../ctrsm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dhvnrm.o ../dhvnrm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsos.o ../dsos.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mc20as.o ../mc20as.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rt.o ../rt.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o stpmv.o ../stpmv.f ../stpmv.f:110:0: 110 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o casyi.o ../casyi.f ../casyi.f:64:11: 64 | JL = RL+RL + 2 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../casyi.f:72:12: 72 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ctrsv.o ../ctrsv.f ../ctrsv.f:116:0: 116 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dintp.o ../dintp.f ../dintp.f:79:72: 79 | 10 W(IQ) = XIQ/TEMP1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../dintp.f:93:72: 93 | 40 GDI = OW(KP2-I) - ALPHA(I)*GDI | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../dintp.f:109:72: 109 | 70 W(JQ) = GAMMA*W(JQ) - ALP*W(JQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../dintp.f:111:72: 111 | 80 C(I+1) = GAMMA*C(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../dintp.f:124:72: 124 | 100 YPOUT(L) = 0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../dintp.f:132:72: 132 | 110 YPOUT(L) = YPOUT(L) + TEMP3*PHI(L,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../dintp.f:138:72: 138 | 1 (YPOUT(L) + (C(1) + RMU*OG(1))*PHI(L,1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../dintp.f:85:0: 85 | GDI = 1.0D0/TEMP1 | Warning: 'temp1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsoseq.o ../dsoseq.f ../dsoseq.f:3:47: 3 | + NCJS, NSRRC, NSRI, IPRINT, FMAX, C, NC, B, P, TEMP, X, Y, FAC, | 1 Warning: Unused dummy argument 'nc' at (1) [-Wunused-dummy-argument] ../dsoseq.f:475:0: 475 | IF (FN1 .GT. 5.0D0*FMIN .OR. FN2 .GT. 5.0D0*FMIN) | Warning: 'fmin' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dsoseq.f:295:0: 295 | KD = ISV - K | Warning: 'isv' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mgsbv.o ../mgsbv.f ../mgsbv.f:141:72: 141 | 50 KJ=KJ+NN-J | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../mgsbv.f:159:72: 159 | 65 KJ=KJ+NFCC-K | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 65 at (1) ../mgsbv.f:169:72: 169 | 70 A(L,NR)=T | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../mgsbv.f:199:72: 199 | 90 A(I,J)=A(I,J)-P(JP)*A(I,NR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) ../mgsbv.f:211:72: 211 | 95 A(L,J)=A(L,J)+PJP*A(K,NR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 95 at (1) ../mgsbv.f:239:72: 239 | 130 V(I)=V(I)-W(LR)*A(I,NR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../mgsbv.f:246:72: 246 | 135 V(L)=V(L)-W(LR)*A(K,NR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 135 at (1) ../mgsbv.f:80:0: 80 | 10 JP=0 | Warning: 'jp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../mgsbv.f:108:0: 108 | IF (N .NE. NFCC) LIX=2*IX-1 | Warning: 'ix' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o runif.o ../runif.f ../runif.f:73:10: 73 | 20 J = T(NOLD+1)*FLOATN + 1. | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o stpsv.o ../stpsv.f ../stpsv.f:113:0: 113 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o catan.o ../catan.f ../catan.f:35:18: 35 | NTERMS = -0.4343*LOG(R1MACH(3)) + 1.0 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cuchk.o ../cuchk.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dintrv.o ../dintrv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsossl.o ../dsossl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o minfit.o ../minfit.f ../minfit.f:116:72: 116 | 120 SCALE = SCALE + ABS(A(K,I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../minfit.f:135:72: 135 | 140 S = S + A(K,I) * A(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../minfit.f:139:72: 139 | DO 150 K = I, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) ../minfit.f:149:72: 149 | 170 S = S + A(K,I) * B(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../minfit.f:153:72: 153 | DO 180 K = I, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 180 at (1) ../minfit.f:158:72: 158 | 200 A(K,I) = SCALE * A(K,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../minfit.f:167:72: 167 | 220 SCALE = SCALE + ABS(A(I,K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../minfit.f:182:72: 182 | 240 RV1(K) = A(I,K) / H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../minfit.f:190:72: 190 | 250 S = S + A(J,K) * A(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../minfit.f:192:72: 192 | DO 260 K = L, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../minfit.f:197:72: 197 | 280 A(I,K) = SCALE * A(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../minfit.f:210:72: 210 | 320 A(J,I) = (A(I,J) / A(I,L)) / G | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../minfit.f:216:72: 216 | 340 S = S + A(I,K) * A(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1) ../minfit.f:218:72: 218 | DO 350 K = L, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 350 at (1) ../minfit.f:237:72: 237 | DO 500 J = 1, IP | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 500 at (1) ../minfit.f:348:72: 348 | 690 A(J,K) = -A(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 690 at (1) ../minfit.f:95:0: 95 | INTEGER I,J,K,L,M,N,II,IP,I1,KK,K1,LL,L1,M1,NM,ITS,IERR | Warning: 'l1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o rwupdt.o ../rwupdt.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o strco.o ../strco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o catan2.o ../catan2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cunhj.o ../cunhj.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dintyd.o ../dintyd.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dspco.o ../dspco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o minso4.o ../minso4.f ../minso4.f:2:50: 2 | SUBROUTINE MINSO4 (USOL, IDMN, ZN, ZM, PERTB) | 1 Warning: Unused dummy argument 'pertb' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o s1merg.o ../s1merg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o strdi.o ../strdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o catanh.o ../catanh.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cuni1.o ../cuni1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dir.o ../dir.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dspdi.o ../dspdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o minsol.o ../minsol.f ../minsol.f:2:50: 2 | SUBROUTINE MINSOL (USOL, IDMN, ZN, ZM, PERTB) | 1 Warning: Unused dummy argument 'pertb' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sasum.o ../sasum.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o strmm.o ../strmm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o caxpy.o ../caxpy.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cuni2.o ../cuni2.f ../cuni2.f:66:12: 66 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o djairy.o ../djairy.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dspenc.o ../dspenc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpadd.o ../mpadd.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o saxpy.o ../saxpy.f ../saxpy.f:51:72: 51 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o strmv.o ../strmv.f ../strmv.f:113:0: 113 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cbabk2.o ../cbabk2.f ../cbabk2.f:93:13: 93 | K = SCALE(I) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cunik.o ../cunik.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dlbeta.o ../dlbeta.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dspfa.o ../dspfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpadd2.o ../mpadd2.f ../mpadd2.f:72:72: 72 | IF (ED) 90, 70, 120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpadd2.f:76:72: 76 | IF (X(J+2) - Y(J+2)) 100, 80, 130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sbcg.o ../sbcg.f ../sbcg.f:335:0: 335 | BK = BKNUM/BKDEN | Warning: 'bkden' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o strsl.o ../strsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cbal.o ../cbal.f ../cbal.f:157:72: 157 | 180 SCALE(I) = 1.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cunk1.o ../cunk1.f ../cunk1.f:207:12: 207 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cunk1.f:28:0: 28 | INTEGER I, IB, IFLAG, IFN, IL, INIT, INU, IUF, K, KDFLG, KFLAG, | Warning: 'iflag' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cunk1.f:171:0: 171 | C1 = CSR(KFLAG) | Warning: 'kflag' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dlgams.o ../dlgams.f ../dlgams.f:33:12: 33 | INT = MOD (-AINT(X), 2.0D0) + 0.1D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsplp.o ../dsplp.f ../dsplp.f:1580:11: 1580 | 20008 NEXT=PRGOPT(LAST) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dsplp.f:1599:12: 1599 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dsplp.f:1607:10: 1607 | LMX=PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dsplp.f:1608:10: 1608 | LBM=PRGOPT(LAST+4) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpadd3.o ../mpadd3.f ../mpadd3.f:81:72: 81 | 100 R(I+1) = R(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sbhin.o ../sbhin.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o strsm.o ../strsm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cbesh.o ../cbesh.f ../cbesh.f:285:12: 285 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cunk2.o ../cunk2.f ../cunk2.f:69:12: 69 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cunk2.f:33:0: 33 | INTEGER I, IB, IFLAG, IFN, IL, IN, INU, IUF, K, KDFLG, KFLAG, KK, | Warning: 'iflag' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cunk2.f:209:0: 209 | C1 = CSR(KFLAG) | Warning: 'kflag' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dli.o ../dli.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dspmv.o ../dspmv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpblas.o ../mpblas.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sbocls.o ../sbocls.f ../sbocls.f:1121:0: 1121 | IF (ANORM.GT.ZERO) WT = WT/ANORM | Warning: 'srelpr' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sbocls.f:994:0: 994 | IF (ACCUM .OR. PRETRI) THEN | Warning: 'pretri' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sbocls.f:715:0: 715 | LOCACC = LP + 2 | Warning: 'locacc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sbocls.f:1138:0: 1138 | * RNORM,MODE,RW(LRW),IW(LIW)) | Warning: 'lbou' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sbocls.f:1012:0: 1012 | IF (MCON.GT.0 .AND. FILTER) THEN | Warning: 'filter' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o strsv.o ../strsv.f ../strsv.f:116:0: 116 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cbesi.o ../cbesi.f ../cbesi.f:215:12: 215 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cuoik.o ../cuoik.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dllsia.o ../dllsia.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dspr.o ../dspr.f ../dspr.f:96:0: 96 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpcdm.o ../mpcdm.f ../mpcdm.f:41:72: 41 | IF (DX) 20, 10, 30 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpcdm.f:70:72: 70 | 80 DJ = DJ - DBLE(R(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../mpcdm.f:76:72: 76 | IF (IE) 90, 130, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sbols.o ../sbols.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o stway.o ../stway.f ../stway.f:47:72: 47 | 25 STOWA(KSJ)=YHP(KSJ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 25 at (1) ../stway.f:62:72: 62 | 125 YHP(KSJ)=STOWA(KSJ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) ../stway.f:70:72: 70 | 175 BACKSPACE NTAPE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 175 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cbesj.o ../cbesj.f ../cbesj.f:208:12: 208 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cv.o ../cv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dllti2.o ../dllti2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dspr2.o ../dspr2.f ../dspr2.f:107:0: 107 | INTEGER I, INFO, IX, IY, J, JX, JY, K, KK, KX, KY | Warning: 'ky' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dspr2.f:107:0: Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dspr2.f:107:0: Warning: 'jy' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dspr2.f:107:0: Warning: 'jx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpchk.o ../mpchk.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sbolsm.o ../sbolsm.f ../sbolsm.f:1046:5: 1046 | 350 JDROP = JDROP1 + JDROP2 | 1 Warning: Label 350 at (1) defined but not used [-Wunused-label] ../sbolsm.f:837:0: 837 | JBIG = JMAG | Warning: 'jmag' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sbolsm.f:832:0: 832 | JBIG = JLARGE | Warning: 'jlarge' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sbolsm.f:1045:0: 1045 | 340 IF (JDROP1+JDROP2.LE.0 .OR. NSETB.LE.0) GO TO 580 | Warning: 'jdrop2' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sbolsm.f:972:0: 972 | JDROP1 = J | Warning: 'jdrop1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o suds.o ../suds.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cbesk.o ../cbesk.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cwrsk.o ../cwrsk.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dlngam.o ../dlngam.f ../dlngam.f:59:0: 59 | IF (X.GT.0.D0) RETURN | Warning: '__result_dlngam' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dspsl.o ../dspsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpcmd.o ../mpcmd.f ../mpcmd.f:48:0: 48 | 20 DZ = DZ*(DB**(X(2)-TM)) | Warning: 'tm' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o scasum.o ../scasum.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o svco.o ../svco.f ../svco.f:40:72: 40 | 10 RSAV(I) = RLS(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../svco.f:42:72: 42 | 20 ISAV(I) = ILS(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cbesy.o ../cbesy.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d1mach.o ../d1mach.f f951: Warning: Nonconforming tab character in column 1 of line 73 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 75 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 78 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 493 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 494 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 495 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 496 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 497 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 498 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 499 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 500 [-Wtabs] f951: Warning: Nonconforming tab character in column 1 of line 501 [-Wtabs] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dlnrel.o ../dlnrel.f ../dlnrel.f:2:0: 2 | DOUBLE PRECISION FUNCTION DLNREL (X) | Warning: '__result_dlnrel' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsteps.o ../dsteps.f ../dsteps.f:221:72: 221 | 10 ROUND = ROUND + (Y(L)/WT(L))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../dsteps.f:238:72: 238 | 20 PHI(L,2) = 0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../dsteps.f:260:72: 260 | 25 PHI(L,15) = 0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 25 at (1) ../dsteps.f:299:72: 299 | 105 SIG(I+1) = REALI*ALPHA(I)*SIG(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 105 at (1) ../dsteps.f:310:72: 310 | 115 W(IQ) = V(IQ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 115 at (1) ../dsteps.f:337:72: 337 | 125 W(I) = V(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) ../dsteps.f:348:72: 348 | 135 W(IQ) = V(IQ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 135 at (1) ../dsteps.f:367:72: 367 | 145 W(IQ) = W(IQ) - TEMP6*W(IQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 145 at (1) ../dsteps.f:368:72: 368 | 150 G(I) = W(1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../dsteps.f:388:72: 388 | 205 PHI(L,I) = TEMP1*PHI(L,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 205 at (1) ../dsteps.f:396:72: 396 | 220 P(L) = 0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../dsteps.f:403:72: 403 | 225 PHI(L,I) = PHI(L,I) + PHI(L,IP1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 225 at (1) ../dsteps.f:409:72: 409 | 235 PHI(L,16) = (P(L) - Y(L)) - TAU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 235 at (1) ../dsteps.f:412:72: 412 | 245 P(L) = Y(L) + H*P(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 245 at (1) ../dsteps.f:426:72: 426 | IF(KM2)265,260,255 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dsteps.f:429:72: 429 | 265 ERK = ERK + (TEMP4*TEMP3)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 265 at (1) ../dsteps.f:430:72: 430 | IF(KM2)280,275,270 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dsteps.f:440:72: 440 | IF(KM2)299,290,285 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dsteps.f:466:72: 466 | 305 PHI(L,I) = TEMP1*(PHI(L,I) - PHI(L,IP1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 305 at (1) ../dsteps.f:470:72: 470 | 315 PSI(I-1) = PSI(I) - H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 315 at (1) ../dsteps.f:477:72: 477 | IF(IFAIL - 3) 335,330,325 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dsteps.f:508:72: 508 | 405 P(L) = TEMP3 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 405 at (1) ../dsteps.f:513:72: 513 | 415 P(L) = TEMP3 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 415 at (1) ../dsteps.f:520:72: 520 | 425 PHI(L,KP2) = PHI(L,KP1) - PHI(L,KP2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 425 at (1) ../dsteps.f:523:72: 523 | 430 PHI(L,I) = PHI(L,I) + PHI(L,KP1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 430 at (1) ../dsteps.f:537:72: 537 | 440 ERKP1 = ERKP1 + (PHI(L,KP2)/WT(L))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 440 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpdivi.o ../mpdivi.f ../mpdivi.f:35:72: 35 | IF (J) 30, 10, 40 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpdivi.f:68:72: 68 | IF (R1) 210, 70, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpdivi.f:80:72: 80 | 90 C = B*(C - J*R(K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) ../mpdivi.f:85:72: 85 | 110 C = B*(C - J*R(K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../mpdivi.f:100:72: 100 | IF (C-J1) 140, 150, 160 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o scg.o ../scg.f ../scg.f:308:0: 308 | BK = BKNUM/BKDEN | Warning: 'bkden' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o svd.o ../svd.f ../svd.f:103:72: 103 | DO 100 J = 1, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../svd.f:120:72: 120 | 120 SCALE = SCALE + ABS(U(K,I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../svd.f:139:72: 139 | 140 S = S + U(K,I) * U(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../svd.f:143:72: 143 | DO 150 K = I, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) ../svd.f:148:72: 148 | 200 U(K,I) = SCALE * U(K,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../svd.f:157:72: 157 | 220 SCALE = SCALE + ABS(U(I,K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../svd.f:172:72: 172 | 240 RV1(K) = U(I,K) / H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1) ../svd.f:180:72: 180 | 250 S = S + U(J,K) * U(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../svd.f:182:72: 182 | DO 260 K = L, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../svd.f:187:72: 187 | 280 U(I,K) = SCALE * U(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../svd.f:201:72: 201 | 320 V(J,I) = (U(I,J) / U(I,L)) / G | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../svd.f:207:72: 207 | 340 S = S + U(I,K) * V(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1) ../svd.f:209:72: 209 | DO 350 K = L, N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 350 at (1) ../svd.f:235:72: 235 | 420 U(I,J) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1) ../svd.f:244:72: 244 | 440 S = S + U(K,I) * U(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 440 at (1) ../svd.f:248:72: 248 | DO 450 K = I, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 450 at (1) ../svd.f:253:72: 253 | 470 U(J,I) = U(J,I) / G | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 470 at (1) ../svd.f:258:72: 258 | 480 U(J,I) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 480 at (1) ../svd.f:372:72: 372 | 690 V(J,K) = -V(J,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 690 at (1) ../svd.f:92:0: 92 | INTEGER I,J,K,L,M,N,II,I1,KK,K1,LL,L1,MN,NM,ITS,IERR | Warning: 'l1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cbeta.o ../cbeta.f ../cbeta.f:44:0: 44 | IF (REAL(A)+REAL(B).LT.XMAX) RETURN | Warning: '__result_cbeta' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d1merg.o ../d1merg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dlpdoc.o ../dlpdoc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dstod.o ../dstod.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mperr.o ../mperr.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o scgn.o ../scgn.f ../scgn.f:333:0: 333 | BK = BKNUM/BKDEN | Warning: 'bkden' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o svecs.o ../svecs.f ../svecs.f:50:72: 50 | 6 YHP(K,LNFC+1)=YHP(K,LNFCC+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 6 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cbinu.o ../cbinu.f ../cbinu.f:100:12: 100 | NUI = FNUL-DFNU + 1 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d1mpyq.o ../d1mpyq.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dlpdp.o ../dlpdp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dstor1.o ../dstor1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpmaxr.o ../mpmaxr.f ../mpmaxr.f:34:72: 34 | 10 X(I+2) = IT | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o scgs.o ../scgs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o svout.o ../svout.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cbiry.o ../cbiry.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d1updt.o ../d1updt.f ../d1updt.f:2:36: 2 | SUBROUTINE D1UPDT (M, N, S, LS, U, V, W, SING) | 1 Warning: Unused dummy argument 'ls' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dlsei.o ../dlsei.f ../dlsei.f:492:13: 492 | LINK = PRGOPT(1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dlsei.f:507:15: 507 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dlsei.f:522:16: 522 | NEXT = PRGOPT(LINK) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dlsei.f:578:0: 578 | IF (I.NE.IMAX) CALL DSWAP (NP1, W(I,1), MDW, W(IMAX,1), MDW) | Warning: 'imax' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dstway.o ../dstway.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpmlp.o ../mpmlp.f ../mpmlp.f:25:72: 25 | 10 U(I) = U(I) + W*V(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o schdc.o ../schdc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o swritp.o ../swritp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cbknu.o ../cbknu.f ../cbknu.f:65:12: 65 | INU = FNU+0.5E0 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cbknu.f:256:10: 256 | K = FK | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cbknu.f:430:0: 430 | Y(2) = S2 | Warning: 'IMAGPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cbknu.f:430:0: Warning: 'REALPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cbknu.f:356:0: 356 | CK = CK + RZ | Warning: 'IMAGPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cbknu.f:356:0: Warning: 'REALPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d9aimp.o ../d9aimp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dlsi.o ../dlsi.f ../dlsi.f:95:13: 95 | LINK = PRGOPT(1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dlsi.f:98:15: 98 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dlsi.f:102:16: 102 | NEXT = PRGOPT(LINK) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsuds.o ../dsuds.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpmul.o ../mpmul.f ../mpmul.f:53:72: 53 | 20 R(I) = 0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../mpmul.f:72:72: 72 | 30 R(J1) = RI - B*C | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../mpmul.f:84:72: 84 | 50 R(J1) = RI - B*C | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o schdd.o ../schdd.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sxlcal.o ../sxlcal.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cblkt1.o ../cblkt1.f ../cblkt1.f:55:72: 55 | IF (I-NM) 101,101,108 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:60:72: 60 | IF (I-IF) 102,108,108 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:68:72: 68 | IF (IPI2-NM) 105,105,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:83:72: 83 | IF (NPP) 132,110,132 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:125:72: 125 | IF (I-I2-IZR) 117,114,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:126:72: 126 | 114 IF (I-NM) 115,115,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:139:72: 139 | IF (I-NM) 117,119,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:147:72: 147 | IF (NCMPLX) 121,122,121 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:190:72: 190 | IF (IPI2-IZR) 127,128,127 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:191:72: 191 | 127 IF (I-IZR) 130,131,130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:219:72: 219 | IF (I-NM) 133,133,143 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:229:72: 229 | IF (I-I2) 134,134,136 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:236:72: 236 | 137 IF (IPI2-NM) 140,140,138 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblkt1.f:2:34: 2 | SUBROUTINE CBLKT1 (N, AN, BN, CN, M, AM, BM, CM, IDIMY, Y, B, W1, | 1 Warning: Unused dummy argument 'bn' at (1) [-Wunused-dummy-argument] ../cblkt1.f:2:26: 2 | SUBROUTINE CBLKT1 (N, AN, BN, CN, M, AM, BM, CM, IDIMY, Y, B, W1, | 1 Warning: Unused dummy argument 'n' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d9atn1.o ../d9atn1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dlsod.o ../dlsod.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsvco.o ../dsvco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpmul2.o ../mpmul2.f ../mpmul2.f:39:72: 39 | IF (J) 20, 10, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpmul2.f:71:72: 71 | 60 R(I+4) = RI - B*C | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../mpmul2.f:79:72: 79 | 70 R(I) = RI - B*C | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../mpmul2.f:84:72: 84 | 90 R(I+1) = R(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) ../mpmul2.f:89:72: 89 | IF (C) 130, 100, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpmul2.f:106:72: 106 | 120 R(I+4) = RI - B*IS | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../mpmul2.f:107:72: 107 | IF (C) 130, 100, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpmul2.f:73:0: 73 | IF (RI.LT.0) GO TO 130 | Warning: 'ri' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o schex.o ../schex.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o tevlc.o ../tevlc.f ../tevlc.f:138:0: 138 | IF (ABS(E2(L)) .LE. ABS(C/H)) GO TO 108 | Warning: 'c' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cblktr.o ../cblktr.f ../cblktr.f:210:72: 210 | IF (M-5) 101,102,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:213:72: 213 | 102 IF (NM-3) 103,104,104 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:216:72: 216 | 104 IF (IDIMY-M) 105,106,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:221:72: 221 | IF (NPP) 107,108,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:227:72: 227 | IF (NH-IK) 110,110,109 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:232:72: 232 | IF (NPP) 111,112,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:247:72: 247 | 113 IF (IERROR) 119,114,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:253:72: 253 | IF (IFLG) 116,115,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cblktr.f:256:72: 256 | 116 IF (MP) 117,118,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d9b0mp.o ../d9b0mp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dlssud.o ../dlssud.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsvdc.o ../dsvdc.f ../dsvdc.f:368:0: 368 | L = L + 1 | Warning: 'ls' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dsvdc.f:345:0: 345 | IF (LS .EQ. L) GO TO 440 | Warning: 'l' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpmuli.o ../mpmuli.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o schkw.o ../schkw.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o tevls.o ../tevls.f ../tevls.f:138:0: 138 | IF (ABS(E2(L)) .LE. ABS(C/H)) GO TO 108 | Warning: 'c' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cbrt.o ../cbrt.f ../cbrt.f:31:30: 31 | IF (NITER.EQ.0) NITER = 1.443*LOG(-.106*LOG(0.1*R1MACH(3))) + 1. | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d9b1mp.o ../d9b1mp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dmacon.o ../dmacon.f ../dmacon.f:28:13: 28 | LPAR = 0.5D0*DD | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dmacon.f:29:11: 29 | KE = 0.5D0 + 0.75D0*DD | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dswap.o ../dswap.f ../dswap.f:50:72: 50 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpnzr.o ../mpnzr.f ../mpnzr.f:58:72: 58 | 70 R(J) = R(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../mpnzr.f:61:72: 61 | 80 R(J) = 0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../mpnzr.f:70:72: 70 | IF (R(T+1) - B2) 150, 100, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpnzr.f:78:72: 78 | 120 R(I) = 0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../mpnzr.f:86:72: 86 | IF (R(IT) - B2) 150, 140, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../mpnzr.f:100:72: 100 | 180 Z(I+2) = R(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o schud.o ../schud.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o tinvit.o ../tinvit.f ../tinvit.f:146:72: 146 | 500 NORM = MAX(NORM, ABS(D(I)) + ABS(E(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 500 at (1) ../tinvit.f:217:72: 217 | 640 XU = XU + RV6(I) * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 640 at (1) ../tinvit.f:220:72: 220 | 660 RV6(I) = RV6(I) - XU * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 660 at (1) ../tinvit.f:227:72: 227 | 720 NORM = NORM + ABS(RV6(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 720 at (1) ../tinvit.f:240:72: 240 | 760 RV6(I) = RV6(I) * XU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 760 at (1) ../tinvit.f:265:72: 265 | 860 U = U + RV6(I)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 860 at (1) ../tinvit.f:270:72: 270 | 880 Z(I,R) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 880 at (1) ../tinvit.f:273:72: 273 | 900 Z(I,R) = RV6(I) * XU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 900 at (1) ../tinvit.f:187:0: 187 | RV1(I-1) = U | Warning: 'u' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cbuni.o ../cbuni.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d9chu.o ../d9chu.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dmgsbv.o ../dmgsbv.f ../dmgsbv.f:70:0: 70 | 1 IX, IZ, J, JK, JP, JQ, JY, JZ, K, KD, KJ, KP, L, LIX, LPAR, | Warning: 'jp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dmgsbv.f:124:0: 124 | IF (N .NE. NFCC) LIX = 2*IX - 1 | Warning: 'ix' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsymm.o ../dsymm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpovfl.o ../mpovfl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sclosm.o ../sclosm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o tql1.o ../tql1.f ../tql1.f:77:72: 77 | 100 E(I-1) = E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../tql1.f:110:72: 110 | 140 D(I) = D(I) - H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cbunk.o ../cbunk.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d9gmic.o ../d9gmic.f ../d9gmic.f:47:10: 47 | M = -(A - 0.5D0) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dmout.o ../dmout.f ../dmout.f:78:72: 78 | DO 5 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 5 at (1) ../dmout.f:89:72: 89 | DO 10 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../dmout.f:100:72: 100 | DO 30 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../dmout.f:111:72: 111 | DO 50 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1) ../dmout.f:120:72: 120 | DO 70 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 70 at (1) ../dmout.f:131:72: 131 | DO 85 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 85 at (1) ../dmout.f:140:72: 140 | DO 90 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 90 at (1) ../dmout.f:151:72: 151 | DO 110 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1) ../dmout.f:162:72: 162 | DO 130 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 130 at (1) ../dmout.f:171:72: 171 | DO 150 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsymv.o ../dsymv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpstr.o ../mpstr.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o scnrm2.o ../scnrm2.f ../scnrm2.f:89:72: 89 | 10 ASSIGN 30 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../scnrm2.f:98:19: 98 | GO TO NEXT,(30, 50, 70, 90, 110) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../scnrm2.f:100:72: 100 | ASSIGN 50 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../scnrm2.f:110:72: 110 | ASSIGN 70 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../scnrm2.f:115:72: 115 | 100 ASSIGN 110 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../scnrm2.f:141:72: 141 | 85 ASSIGN 90 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../scnrm2.f:160:16: 160 | GO TO NEXT,( 50, 70, 90, 110 ) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../scnrm2.f:168:0: 168 | IF (SCALE) SCNRM2 = SCNRM2 * XMAX | Warning: 'xmax' may be used uninitialized in this function [-Wmaybe-uninitialized] ../scnrm2.f:168:0: Warning: 'scale' may be used uninitialized in this function [-Wmaybe-uninitialized] ../scnrm2.f:151:0: 151 | 90 IF (ABSX .GE. HITEST) GO TO 100 | Warning: 'hitest' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o tql2.o ../tql2.f ../tql2.f:94:72: 94 | 100 E(I-1) = E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../tql2.f:127:72: 127 | 140 D(I) = D(I) - H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ccbrt.o ../ccbrt.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d9gmit.o ../d9gmit.f ../d9gmit.f:43:11: 43 | MA = A + 0.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../d9gmit.f:44:26: 44 | IF (A.LT.0.D0) MA = A - 0.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../d9gmit.f:2:65: 2 | DOUBLE PRECISION FUNCTION D9GMIT (A, X, ALGAP1, SGNGAM, ALX) | 1 Warning: Unused dummy argument 'alx' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dmpar.o ../dmpar.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsyr.o ../dsyr.f ../dsyr.f:99:0: 99 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o mpunfl.o ../mpunfl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o scoef.o ../scoef.f ../scoef.f:87:72: 87 | 1 BY(K,L) = SDOT(NCOMP,B(K,1),NROWB,YH(1,J),1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) ../scoef.f:128:72: 128 | 14 COEF(K)=0. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 14 at (1) ../scoef.f:135:72: 135 | DO 15 I=J,NFCC | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 15 at (1) ../scoef.f:136:72: 136 | 15 COEF(I)=COEF(I)+GAM*BY(J,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1) ../scoef.f:140:72: 140 | 20 COEF(K)=WORK(KI) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../scoef.f:153:72: 153 | 30 BN = MAX(BN,ABS(B(1,K))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../scoef.f:113:14: 113 | KFLAG = 0.5 * LOG10(EPS) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../scoef.f:2:54: 2 | SUBROUTINE SCOEF (YH, YP, NCOMP, NROWB, NFC, NIC, B, BETA, COEF, | 1 Warning: Unused dummy argument 'nic' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o tqlrat.o ../tqlrat.f ../tqlrat.f:85:72: 85 | 100 E2(I-1) = E2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../tqlrat.f:117:72: 117 | 140 D(I) = D(I) - H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../tqlrat.f:143:0: 143 | IF (ABS(E2(L)) .LE. ABS(C/H)) GO TO 210 | Warning: 'c' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cchdc.o ../cchdc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d9knus.o ../d9knus.f ../d9knus.f:108:15: 108 | ETA = 0.1D0*D1MACH(3) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../d9knus.f:116:18: 116 | ALNEPS = LOG (0.1D0*D1MACH(3)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../d9knus.f:162:15: 162 | NTERMS = MAX (2.0, 11.0+(8.*REAL(ALNZ)-25.19-ALNEPS) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dnbco.o ../dnbco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsyr2.o ../dsyr2.f ../dsyr2.f:110:0: 110 | INTEGER I, INFO, IX, IY, J, JX, JY, KX, KY | Warning: 'ky' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dsyr2.f:110:0: Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dsyr2.f:110:0: Warning: 'jy' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dsyr2.f:110:0: Warning: 'jx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o numxer.o ../numxer.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o scopy.o ../scopy.f ../scopy.f:49:72: 49 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o trbak1.o ../trbak1.f ../trbak1.f:88:72: 88 | 110 S = S + A(I,K) * Z(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../trbak1.f:94:72: 94 | 120 Z(K,J) = Z(K,J) + S * A(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cchdd.o ../cchdd.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d9lgic.o ../d9lgic.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dnbdi.o ../dnbdi.f ../dnbdi.f:2:43: 2 | SUBROUTINE DNBDI (ABE, LDA, N, ML, MU, IPVT, DET) | 1 Warning: Unused dummy argument 'mu' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsyr2k.o ../dsyr2k.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ohtrol.o ../ohtrol.f ../ohtrol.f:48:72: 48 | 10 Q(L,J)=Q(L,J)+QS*Q(L,KIR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o scopym.o ../scopym.f ../scopym.f:40:72: 40 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o trbak3.o ../trbak3.f ../trbak3.f:2:34: 2 | SUBROUTINE TRBAK3 (NM, N, NV, A, M, Z) | 1 Warning: Unused dummy argument 'nv' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cchex.o ../cchex.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d9lgit.o ../d9lgit.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dnbfa.o ../dnbfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dsyrk.o ../dsyrk.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ohtror.o ../ohtror.f ../ohtror.f:48:72: 48 | 10 Q(J,L)=Q(J,L)+QS*Q(KIR,L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o scov.o ../scov.f ../scov.f:185:72: 185 | 120 R(I,I)=WA1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../scov.f:243:72: 243 | DO 290 J=I,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 290 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o tred1.o ../tred1.f ../tred1.f:75:72: 75 | 100 D(I) = A(I,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../tred1.f:85:72: 85 | 120 SCALE = SCALE + ABS(A(I,K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../tred1.f:110:72: 110 | 180 G = G + A(J,K) * A(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../tred1.f:116:72: 116 | 200 G = G + A(K,J) * A(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../tred1.f:129:72: 129 | DO 260 K = 1, J | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../tred1.f:134:72: 134 | 280 A(I,K) = SCALE * A(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cchud.o ../cchud.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d9lgmc.o ../d9lgmc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dnbfs.o ../dnbfs.f ../dnbfs.f:238:15: 238 | IND = -LOG10(D1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dtbmv.o ../dtbmv.f ../dtbmv.f:150:0: 150 | INTEGER I, INFO, IX, J, JX, KPLUS1, KX, L | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ortbak.o ../ortbak.f ../ortbak.f:91:72: 91 | 100 ORT(I) = A(I,MP-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../ortbak.f:97:72: 97 | 110 G = G + ORT(I) * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../ortbak.f:103:72: 103 | 120 Z(I,J) = Z(I,J) + G * ORT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o scpplt.o ../scpplt.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o tred2.o ../tred2.f ../tred2.f:74:72: 74 | DO 100 J = 1, I | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1) ../tred2.f:88:72: 88 | 120 SCALE = SCALE + ABS(Z(I,K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../tred2.f:111:72: 111 | 180 G = G + Z(J,K) * Z(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../tred2.f:117:72: 117 | 200 G = G + Z(K,J) * Z(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../tred2.f:130:72: 130 | DO 260 K = 1, J | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../tred2.f:148:72: 148 | 340 G = G + Z(I,K) * Z(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1) ../tred2.f:150:72: 150 | DO 360 K = 1, L | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 360 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ccmpb.o ../ccmpb.f ../ccmpb.f:36:72: 36 | IF (ARG) 119,101,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:50:72: 50 | IF (NB) 108,108,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:60:72: 60 | IF (IERROR) 118,105,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:71:72: 71 | IF (NPP) 117,110,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:78:72: 78 | IF (ARG) 119,111,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:83:72: 83 | IF (IERROR) 118,113,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:96:72: 96 | IF (J2-N2M2) 114,114,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:99:72: 99 | IF (J2-N2M2) 114,114,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ccmpb.f:2:25: 2 | SUBROUTINE CCMPB (N, IERROR, AN, BN, CN, B, AH, BH) | 1 Warning: Unused dummy argument 'n' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d9ln2r.o ../d9ln2r.f ../d9ln2r.f:134:15: 134 | EPS = D1MACH(3) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../d9ln2r.f:2:0: 2 | DOUBLE PRECISION FUNCTION D9LN2R (X) | Warning: '__result_d9ln2r' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dnbsl.o ../dnbsl.f ../dnbsl.f:126:26: 123 | DO 60 K = 1, N | 2 ...... 126 | T = DDOT(LM,ABE(K-1,ML+2),LDB,B(LB),1) | 1 Warning: Array reference at (1) out of bounds (0 < 1) in loop beginning at (2) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dtbsv.o ../dtbsv.f ../dtbsv.f:300:0: 300 | TEMP = X( JX ) | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o orthes.o ../orthes.f ../orthes.f:83:72: 83 | 90 SCALE = SCALE + ABS(A(I,M-1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) ../orthes.f:109:72: 109 | 120 A(I,J) = A(I,J) - F * ORT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../orthes.f:124:72: 124 | 150 A(I,J) = A(I,J) - F * ORT(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdaini.o ../sdaini.f ../sdaini.f:92:72: 92 | 100 PHI(I,2)=YPRIME(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../sdaini.f:106:72: 106 | 250 Y(I)=Y(I)+H*YPRIME(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../sdaini.f:139:72: 139 | 320 DELTA(I)=DELTA(I)*DAMP | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../sdaini.f:149:72: 149 | 330 YPRIME(I)=YPRIME(I)-CJ*DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 330 at (1) ../sdaini.f:185:72: 185 | 410 DELTA(I)=MIN(Y(I),0.0E0) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1) ../sdaini.f:192:72: 192 | 420 YPRIME(I)=YPRIME(I)-CJ*DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1) ../sdaini.f:209:72: 209 | 510 E(I)=Y(I)-PHI(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../sdaini.f:228:72: 228 | 610 YPRIME(I)=PHI(I,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 610 at (1) ../sdaini.f:161:0: 161 | 340 RATE=(DELNRM/OLDNRM)**(1.0E0/M) | Warning: 'oldnrm' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o tred3.o ../tred3.f ../tred3.f:130:72: 130 | DO 260 K = 1, J | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../tred3.f:2:29: 2 | SUBROUTINE TRED3 (N, NV, A, D, E, E2) | 1 Warning: Unused dummy argument 'nv' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ccopy.o ../ccopy.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d9pak.o ../d9pak.f ../d9pak.f:40:16: 40 | NMIN = A1N2B*I1MACH(15) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../d9pak.f:41:16: 41 | NMAX = A1N2B*I1MACH(16) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dnls1.o ../dnls1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dtin.o ../dtin.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ortho4.o ../ortho4.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdajac.o ../sdajac.f ../sdajac.f:86:72: 86 | 110 WM(NPDM1+I)=0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../sdajac.f:107:72: 107 | 220 WM(NROW+L)=(E(L)-DELTA(L))*DELINV | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../sdajac.f:126:72: 126 | 410 WM(NPDM1+I)=0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1) ../sdajac.f:151:72: 151 | 510 YPRIME(N)=YPRIME(N)+CJ*DEL | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../sdajac.f:166:72: 166 | 520 WM(II+I)=(E(I)-DELTA(I))*DELINV | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 520 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o tri3.o ../tri3.f ../tri3.f:62:0: 62 | 105 IF (N .NE. L3) GO TO 107 | Warning: 'l3' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tri3.f:58:0: 58 | 103 IF (N .NE. L2) GO TO 105 | Warning: 'l2' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tri3.f:54:0: 54 | IF (N .NE. L1) GO TO 103 | Warning: 'l1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ccosh.o ../ccosh.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o d9upak.o ../d9upak.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dnls1e.o ../dnls1e.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dtout.o ../dtout.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o orthog.o ../orthog.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdanrm.o ../sdanrm.f ../sdanrm.f:41:72: 41 | 20 SUM = SUM + ((V(I)/WT(I))/VMAX)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../sdanrm.f:2:50: 2 | REAL FUNCTION SDANRM (NEQ, V, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'ipar' at (1) [-Wunused-dummy-argument] ../sdanrm.f:2:44: 2 | REAL FUNCTION SDANRM (NEQ, V, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'rpar' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o tridib.o ../tridib.f ../tridib.f:158:72: 158 | 60 IF (S - M1) 65, 73, 70 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../tridib.f:170:72: 170 | 80 IF (S - M22) 65, 85, 70 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../tridib.f:276:0: 276 | R = R + M2 - M1 + 1 | Warning: 'm2' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tridib.f:259:0: 259 | 360 IF (S .GE. K) GO TO 400 | Warning: 'k' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tridib.f:176:0: 176 | 100 IF (R .EQ. M) GO TO 1001 | Warning: 'r' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tridib.f:170:0: 170 | 80 IF (S - M22) 65, 85, 70 | Warning: 'm22' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ccot.o ../ccot.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dacosh.o ../dacosh.f ../dacosh.f:2:6: 2 | DOUBLE PRECISION FUNCTION DACOSH (X) | 1 Warning: 'dacosh' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dnrm2.o ../dnrm2.f ../dnrm2.f:88:72: 88 | 10 ASSIGN 30 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dnrm2.f:95:19: 95 | 20 GO TO NEXT,(30, 50, 70, 110) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dnrm2.f:97:72: 97 | ASSIGN 50 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dnrm2.f:107:72: 107 | ASSIGN 70 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dnrm2.f:113:72: 113 | ASSIGN 110 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dnrm2.f:147:72: 147 | 95 SUM = SUM + DX(J)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 95 at (1) ../dnrm2.f:126:5: 126 | 110 IF (ABS(DX(I)) .LE. XMAX) GO TO 115 | 1 Warning: Label 110 at (1) defined but not used [-Wunused-label] ../dnrm2.f:121:5: 121 | 70 IF (ABS(DX(I)) .GT. CUTLO) GO TO 75 | 1 Warning: Label 70 at (1) defined but not used [-Wunused-label] ../dnrm2.f:102:5: 102 | 50 IF (DX(I) .EQ. ZERO) GO TO 200 | 1 Warning: Label 50 at (1) defined but not used [-Wunused-label] ../dnrm2.f:127:0: 127 | SUM = ONE + SUM * (XMAX / DX(I))**2 | Warning: 'xmax' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dtpmv.o ../dtpmv.f ../dtpmv.f:110:0: 110 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o orthol.o ../orthol.f ../orthol.f:155:72: 155 | 20 A(L,JCOL)=ASAVE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../orthol.f:181:72: 181 | 35 A(L,J)=A(L,J)+AS*A(L,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 35 at (1) ../orthol.f:182:72: 182 | 40 COLS(J)=COLS(J)-A(K,J)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../orthol.f:133:0: 133 | IF (SIGMA .GE. 0.99*COLS(J)) GO TO 10 | Warning: 'sigma' may be used uninitialized in this function [-Wmaybe-uninitialized] ../orthol.f:124:0: 124 | KP=K+1 | Warning: 'kp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../orthol.f:154:0: 154 | A(L,K)=A(L,JCOL) | Warning: 'jcol' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdaslv.o ../sdaslv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o tridq.o ../tridq.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdcdot.o ../cdcdot.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dai.o ../dai.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dnsq.o ../dnsq.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dtpsv.o ../dtpsv.f ../dtpsv.f:113:0: 113 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o orthor.o ../orthor.f ../orthor.f:153:72: 153 | 20 A(JROW,L)=ASAVE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../orthor.f:179:72: 179 | 35 A(J,L)=A(J,L)+AS*A(K,L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 35 at (1) ../orthor.f:180:72: 180 | 40 ROWS(J)=ROWS(J)-A(J,K)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../orthor.f:134:0: 134 | IF (SIGMA .GE. 0.99*ROWS(J)) GO TO 10 | Warning: 'sigma' may be used uninitialized in this function [-Wmaybe-uninitialized] ../orthor.f:125:0: 125 | KP=K+1 | Warning: 'kp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../orthor.f:143:0: 143 | KPIVOT(K)=KPIVOT(JROW) | Warning: 'jrow' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdassl.o ../sdassl.f ../sdassl.f:1158:72: 1158 | 370 RWORK(ITEMP + I - 1) = H*YPRIME(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 370 at (1) ../sdassl.f:1291:72: 1291 | 524 ATOL(I)=R*ATOL(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 524 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o tris4.o ../tris4.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdcor.o ../cdcor.f ../cdcor.f:42:72: 42 | 100 SAVE1(I) = (H*SAVE2(I) - YH(I,2) - SAVE1(I))/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../cdcor.f:51:72: 51 | 105 SAVE1(I) = H*SAVE2(I) - YH(I,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 105 at (1) ../cdcor.f:55:72: 55 | 130 SAVE2(I) = H*SAVE2(I) - YH(I,2) - SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../cdcor.f:67:72: 67 | 150 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../cdcor.f:69:72: 69 | DO 160 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 160 at (1) ../cdcor.f:70:72: 70 | 160 SAVE2(I) = SAVE2(I) - A(I,J)*(YH(J,2) + SAVE1(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../cdcor.f:82:72: 82 | 180 SAVE2(I) = H*SAVE2(I) - A(I,1)*(YH(I,2) + SAVE1(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../cdcor.f:94:72: 94 | 140 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../cdcor.f:96:72: 96 | DO 170 I = 1,NDE | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 170 at (1) ../cdcor.f:97:72: 97 | 170 SAVE2(I) = SAVE2(I) - A(I,J)*(YH(J,2) + SAVE1(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../cdcor.f:103:72: 103 | 200 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../cdcor.f:107:72: 107 | 205 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), ABS(YWT(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 205 at (1) ../cdcor.f:113:72: 113 | 230 SAVE2(I) = H*SAVE2(I) - YH(I,2) - SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../cdcor.f:125:72: 125 | 250 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../cdcor.f:128:72: 128 | DO 260 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../cdcor.f:143:72: 143 | 280 SAVE2(I) = H*SAVE2(I) - A(I,1)*(YH(I,2) + SAVE1(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../cdcor.f:155:72: 155 | 270 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../cdcor.f:158:72: 158 | DO 290 I = MAX(ML+1, MW+1-J), MIN(MW+NDE-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 290 at (1) ../cdcor.f:167:72: 167 | 300 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../cdcor.f:171:72: 171 | 305 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), ABS(YWT(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 305 at (1) ../cdcor.f:185:72: 185 | 320 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../cdcor.f:189:72: 189 | 325 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), ABS(YWT(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 325 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o daie.o ../daie.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dnsqe.o ../dnsqe.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dtrco.o ../dtrco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ortran.o ../ortran.f ../ortran.f:78:72: 78 | 60 Z(I,J) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../ortran.f:92:72: 92 | 100 ORT(I) = A(I,MP-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../ortran.f:98:72: 98 | 110 G = G + ORT(I) * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../ortran.f:104:72: 104 | 120 Z(I,J) = Z(I,J) + G * ORT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdastp.o ../sdastp.f ../sdastp.f:222:72: 222 | 260 PHI(I,J)=BETA(J)*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) ../sdastp.f:243:72: 243 | 310 YPRIME(I)=0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1) ../sdastp.f:247:72: 247 | 320 YPRIME(I)=YPRIME(I)+GAMMA(J)*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../sdastp.f:284:72: 284 | 345 E(I)=0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 345 at (1) ../sdastp.f:293:72: 293 | 355 DELTA(I) = DELTA(I) * TEMP1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 355 at (1) ../sdastp.f:303:72: 303 | 360 YPRIME(I)=YPRIME(I)-CJ*DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../sdastp.f:349:72: 349 | 377 DELTA(I) = MIN(Y(I),0.0E0) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 377 at (1) ../sdastp.f:353:72: 353 | 378 E(I) = E(I) - DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 378 at (1) ../sdastp.f:384:72: 384 | 405 DELTA(I) = PHI(I,KP1) + E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 405 at (1) ../sdastp.f:392:72: 392 | 415 DELTA(I) = PHI(I,K) + DELTA(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 415 at (1) ../sdastp.f:437:72: 437 | 510 DELTA(I)=E(I)-PHI(I,KP2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../sdastp.f:482:72: 482 | 580 PHI(I,KP2)=E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 580 at (1) ../sdastp.f:485:72: 485 | 590 PHI(I,KP1)=PHI(I,KP1)+E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 590 at (1) ../sdastp.f:488:72: 488 | DO 595 I=1,NEQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 595 at (1) ../sdastp.f:489:72: 489 | 595 PHI(I,J)=PHI(I,J)+PHI(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 595 at (1) ../sdastp.f:512:72: 512 | 610 PHI(I,J)=TEMP1*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 610 at (1) ../sdastp.f:516:72: 516 | 640 PSI(I-1)=PSI(I)-H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 640 at (1) ../sdastp.f:443:0: 443 | 520 IF(TERKM1.LE.MIN(TERK,TERKP1))GO TO 540 | Warning: 'terkm1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../sdastp.f:468:0: 468 | R=(2.0E0*EST+0.0001E0)**(-1.0E0/TEMP2) | Warning: 'erkm1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o trisp.o ../trisp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdcst.o ../cdcst.f ../cdcst.f:41:72: 41 | 10 FACTRL(I) = I*FACTRL(I-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../cdcst.f:48:72: 48 | 30 SUM = SUM - GAMMA(J)/(I-J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../cdcst.f:49:72: 49 | 40 GAMMA(I+1) = SUM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../cdcst.f:57:72: 57 | 50 EL(I,J) = (J-1)*EL(I,J-1) + EL(I-1,J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../cdcst.f:58:72: 58 | 60 EL(J+1,J) = 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../cdcst.f:62:72: 62 | DO 80 I = 3,J+1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 80 at (1) ../cdcst.f:63:72: 63 | 80 EL(I,J) = EL(I,J)/((I-1)*FACTRL(J-1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../cdcst.f:67:72: 67 | 100 TQ(3,J) = -1.E0/GAMMA(J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../cdcst.f:75:72: 75 | 120 EL(I,J) = J*EL(I,J-1) + EL(I-1,J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../cdcst.f:76:72: 76 | 130 EL(J+1,J) = 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../cdcst.f:80:72: 80 | DO 150 I = 1,J+1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) ../cdcst.f:81:72: 81 | 150 EL(I,J) = EL(I,J)/(FACTRL(J)*SUM) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../cdcst.f:85:72: 85 | 170 TQ(3,J) = (J+2)/EL(1,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../cdcst.f:97:72: 97 | 180 SUM = SUM - GAMMA(J)/(I-J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../cdcst.f:98:72: 98 | 190 GAMMA(I+1) = SUM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../cdcst.f:103:72: 103 | 200 EL(1+I,1) = -(I+1)*SUM*GAMMA(I+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dasinh.o ../dasinh.f ../dasinh.f:2:6: 2 | DOUBLE PRECISION FUNCTION DASINH (X) | 1 Warning: 'dasinh' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dogleg.o ../dogleg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dtrdi.o ../dtrdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o passb.o ../passb.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdatrp.o ../sdatrp.f ../sdatrp.f:50:72: 50 | 10 YPOUT(I)=0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../sdatrp.f:60:72: 60 | 20 YPOUT(I)=YPOUT(I)+D*PHI(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o trix.o ../trix.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdiv.o ../cdiv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dasum.o ../dasum.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dohtrl.o ../dohtrl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dtrmm.o ../dtrmm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o passb2.o ../passb2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdawts.o ../sdawts.f ../sdawts.f:2:64: 2 | SUBROUTINE SDAWTS (NEQ, IWT, RTOL, ATOL, Y, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'ipar' at (1) [-Wunused-dummy-argument] ../sdawts.f:2:58: 2 | SUBROUTINE SDAWTS (NEQ, IWT, RTOL, ATOL, Y, WT, RPAR, IPAR) | 1 Warning: Unused dummy argument 'rpar' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o tsturm.o ../tsturm.f ../tsturm.f:188:72: 188 | 160 Z(I,R) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../tsturm.f:267:72: 267 | 500 NORM = MAX(NORM, ABS(D(I)) + ABS(E(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 500 at (1) ../tsturm.f:337:72: 337 | 640 XU = XU + RV6(I) * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 640 at (1) ../tsturm.f:340:72: 340 | 660 RV6(I) = RV6(I) - XU * Z(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 660 at (1) ../tsturm.f:347:72: 347 | 720 NORM = NORM + ABS(RV6(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 720 at (1) ../tsturm.f:360:72: 360 | 760 RV6(I) = RV6(I) * XU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 760 at (1) ../tsturm.f:381:72: 381 | 860 U = U + RV6(I)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 860 at (1) ../tsturm.f:386:72: 386 | 880 Z(I,R) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 880 at (1) ../tsturm.f:389:72: 389 | 900 Z(I,R) = RV6(I) * XU | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 900 at (1) ../tsturm.f:230:0: 230 | S2 = S1 + ABS(X0 - XU) | Warning: 'xu' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tsturm.f:230:0: Warning: 'x0' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tsturm.f:185:0: 185 | R = R + 1 | Warning: 'r' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tsturm.f:251:0: 251 | RV4(M1) = X1 | Warning: 'm1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../tsturm.f:248:0: 248 | 360 IF (S .GE. K) GO TO 400 | Warning: 'k' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdntl.o ../cdntl.f ../cdntl.f:124:72: 124 | 155 A(I,1) = 0.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 155 at (1) ../cdntl.f:154:72: 154 | 170 SAVE1(I) = SAVE2(I)/MAX(1.E0, ABS(YWT(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../cdntl.f:158:72: 158 | 180 YH(I,2) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../cdntl.f:161:72: 161 | 20 FAC(I) = SQRT(UROUND) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dasyik.o ../dasyik.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o domn.o ../domn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dtrmv.o ../dtrmv.f ../dtrmv.f:113:0: 113 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o passb3.o ../passb3.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdcor.o ../sdcor.f ../sdcor.f:40:72: 40 | 100 SAVE1(I) = (H*SAVE2(I) - YH(I,2) - SAVE1(I))/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../sdcor.f:49:72: 49 | 105 SAVE1(I) = H*SAVE2(I) - YH(I,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 105 at (1) ../sdcor.f:53:72: 53 | 130 SAVE2(I) = H*SAVE2(I) - YH(I,2) - SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../sdcor.f:65:72: 65 | 150 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../sdcor.f:67:72: 67 | DO 160 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 160 at (1) ../sdcor.f:68:72: 68 | 160 SAVE2(I) = SAVE2(I) - A(I,J)*(YH(J,2) + SAVE1(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../sdcor.f:80:72: 80 | 180 SAVE2(I) = H*SAVE2(I) - A(I,1)*(YH(I,2) + SAVE1(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../sdcor.f:92:72: 92 | 140 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../sdcor.f:94:72: 94 | DO 170 I = 1,NDE | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 170 at (1) ../sdcor.f:95:72: 95 | 170 SAVE2(I) = SAVE2(I) - A(I,J)*(YH(J,2) + SAVE1(J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../sdcor.f:101:72: 101 | 200 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) ../sdcor.f:105:72: 105 | 205 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 205 at (1) ../sdcor.f:111:72: 111 | 230 SAVE2(I) = H*SAVE2(I) - YH(I,2) - SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../sdcor.f:123:72: 123 | 250 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../sdcor.f:126:72: 126 | DO 260 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../sdcor.f:141:72: 141 | 280 SAVE2(I) = H*SAVE2(I) - A(I,1)*(YH(I,2) + SAVE1(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../sdcor.f:153:72: 153 | 270 SAVE2(I) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../sdcor.f:156:72: 156 | DO 290 I = MAX(ML+1, MW+1-J), MIN(MW+NDE-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 290 at (1) ../sdcor.f:165:72: 165 | 300 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../sdcor.f:169:72: 169 | 305 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 305 at (1) ../sdcor.f:183:72: 183 | 320 SAVE2(I) = SAVE2(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../sdcor.f:187:72: 187 | 325 SAVE2(I) = SAVE2(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 325 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o u11ls.o ../u11ls.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdntp.o ../cdntp.f ../cdntp.f:28:72: 28 | 10 Y(I) = YH(I,NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../cdntp.f:32:72: 32 | DO 20 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) ../cdntp.f:33:72: 33 | 20 Y(I) = YH(I,J) + R*Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../cdntp.f:38:72: 38 | 40 FACTOR = FACTOR*(NQ+1-KK) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../cdntp.f:40:72: 40 | 50 Y(I) = FACTOR*YH(I,NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../cdntp.f:46:72: 46 | 60 FACTOR = FACTOR*(J-KK) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../cdntp.f:48:72: 48 | 70 Y(I) = FACTOR*YH(I,J) + R*Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../cdntp.f:51:72: 51 | 100 Y(I) = Y(I)*H**(-KUSED) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dasyjy.o ../dasyjy.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dorth.o ../dorth.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dtrsl.o ../dtrsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o passb4.o ../passb4.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdcst.o ../sdcst.f ../sdcst.f:40:72: 40 | 10 FACTRL(I) = I*FACTRL(I-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../sdcst.f:47:72: 47 | 30 SUM = SUM - GAMMA(J)/(I-J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../sdcst.f:48:72: 48 | 40 GAMMA(I+1) = SUM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../sdcst.f:56:72: 56 | 50 EL(I,J) = (J-1)*EL(I,J-1) + EL(I-1,J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../sdcst.f:57:72: 57 | 60 EL(J+1,J) = 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../sdcst.f:61:72: 61 | DO 80 I = 3,J+1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 80 at (1) ../sdcst.f:62:72: 62 | 80 EL(I,J) = EL(I,J)/((I-1)*FACTRL(J-1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../sdcst.f:66:72: 66 | 100 TQ(3,J) = -1.E0/GAMMA(J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../sdcst.f:74:72: 74 | 120 EL(I,J) = J*EL(I,J-1) + EL(I-1,J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../sdcst.f:75:72: 75 | 130 EL(J+1,J) = 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../sdcst.f:79:72: 79 | DO 150 I = 1,J+1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) ../sdcst.f:80:72: 80 | 150 EL(I,J) = EL(I,J)/(FACTRL(J)*SUM) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../sdcst.f:84:72: 84 | 170 TQ(3,J) = (J+2)/EL(1,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../sdcst.f:96:72: 96 | 180 SUM = SUM - GAMMA(J)/(I-J+2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../sdcst.f:97:72: 97 | 190 GAMMA(I+1) = SUM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../sdcst.f:102:72: 102 | 200 EL(1+I,1) = -(I+1)*SUM*GAMMA(I+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o u11us.o ../u11us.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdotc.o ../cdotc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o datanh.o ../datanh.f ../datanh.f:2:6: 2 | DOUBLE PRECISION FUNCTION DATANH (X) | 1 Warning: 'datanh' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dorthr.o ../dorthr.f ../dorthr.f:140:0: 140 | IF (SIGMA .GE. 0.99D0*ROWS(J)) GO TO 50 | Warning: 'sigma' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dorthr.f:73:0: 73 | INTEGER IFLAG, IRANK, ISCALE, J, JROW, K, KP, KPIVOT(*), L, M, | Warning: 'kp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dorthr.f:152:0: 152 | KPIVOT(K) = KPIVOT(JROW) | Warning: 'jrow' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dtrsm.o ../dtrsm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o passb5.o ../passb5.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdntl.o ../sdntl.f ../sdntl.f:122:72: 122 | 155 A(I,1) = 0.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 155 at (1) ../sdntl.f:152:72: 152 | 170 SAVE1(I) = SAVE2(I)/MAX(1.E0, YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../sdntl.f:156:72: 156 | 180 YH(I,2) = H*SAVE2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../sdntl.f:159:72: 159 | 20 FAC(I) = SQRT(UROUND) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o u12ls.o ../u12ls.f ../u12ls.f:41:72: 41 | DO 406 I=1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 406 at (1) ../u12ls.f:115:72: 115 | DO 460 I=KP1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 460 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdotu.o ../cdotu.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o davint.o ../davint.f ../davint.f:196:0: 196 | 1 + CB*RP5*(SYU**2 - SYL2) + CC*(SYU - SYL) | Warning: 'cc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../davint.f:196:0: Warning: 'cb' may be used uninitialized in this function [-Wmaybe-uninitialized] ../davint.f:196:0: Warning: 'ca' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dp1vlu.o ../dp1vlu.f ../dp1vlu.f:76:72: 76 | 1 YP(I) = 0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) ../dp1vlu.f:102:72: 102 | 5 A(I) = 0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 5 at (1) ../dp1vlu.f:122:72: 122 | 6 YP(N) = DIF*A(K3PN) + N*A(K3PN-1) - A(K1I)*A(K4PN) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 6 at (1) ../dp1vlu.f:130:72: 130 | 7 A(K3PN) = YP(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 7 at (1) ../dp1vlu.f:132:72: 132 | 9 A(K3P1) = VAL | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 9 at (1) ../dp1vlu.f:67:15: 67 | MAXORD = A(1) + 0.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dp1vlu.f:71:13: 71 | NORD = A(K3) + 0.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dtrsv.o ../dtrsv.f ../dtrsv.f:116:0: 116 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o passf.o ../passf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdntp.o ../sdntp.f ../sdntp.f:27:72: 27 | 10 Y(I) = YH(I,NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../sdntp.f:31:72: 31 | DO 20 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) ../sdntp.f:32:72: 32 | 20 Y(I) = YH(I,J) + R*Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../sdntp.f:37:72: 37 | 40 FACTOR = FACTOR*(NQ+1-KK) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../sdntp.f:39:72: 39 | 50 Y(I) = FACTOR*YH(I,NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../sdntp.f:45:72: 45 | 60 FACTOR = FACTOR*(J-KK) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../sdntp.f:47:72: 47 | 70 Y(I) = FACTOR*YH(I,J) + R*Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../sdntp.f:50:72: 50 | 100 Y(I) = Y(I)*H**(-KUSED) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o u12us.o ../u12us.f ../u12us.f:41:72: 41 | DO 406 I=1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 406 at (1) ../u12us.f:113:72: 113 | DO 460 I=KP1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 460 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdpsc.o ../cdpsc.f ../cdpsc.f:28:72: 28 | DO 10 J2 = J1,NQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../cdpsc.f:30:72: 30 | DO 10 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../cdpsc.f:31:72: 31 | 10 YH(I,J) = YH(I,J) + YH(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../cdpsc.f:34:72: 34 | DO 30 J2 = J1,NQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../cdpsc.f:36:72: 36 | DO 30 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../cdpsc.f:37:72: 37 | 30 YH(I,J) = YH(I,J) - YH(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o daws.o ../daws.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpbco.o ../dpbco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o du11ls.o ../du11ls.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o passf2.o ../passf2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdot.o ../sdot.f ../sdot.f:50:72: 50 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ulsia.o ../ulsia.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdpst.o ../cdpst.f ../cdpst.f:51:72: 51 | DO 110 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1) ../cdpst.f:52:72: 52 | 110 DFDY(I,J) = FACTOR*DFDY(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../cdpst.f:84:72: 84 | 140 DFDY(I,J) = (SAVE1(I) - SAVE2(I))*CFCTR | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../cdpst.f:113:72: 113 | 190 DFDY(I,I) = DFDY(I,I) + 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../cdpst.f:121:72: 121 | DO 210 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 210 at (1) ../cdpst.f:122:72: 122 | 210 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../cdpst.f:130:72: 130 | 230 DFDY(I,I) = DFDY(I,I) + A(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../cdpst.f:138:72: 138 | DO 220 I = 1,NDE | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 220 at (1) ../cdpst.f:139:72: 139 | 220 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../cdpst.f:153:72: 153 | DO 260 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../cdpst.f:154:72: 154 | 260 DFDY(I,J) = FACTOR*DFDY(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) ../cdpst.f:180:72: 180 | 290 Y(K) = Y(K) + DY | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../cdpst.f:191:72: 191 | 300 DFDY(I,K) = CFCTR*(SAVE1(I+K-MW) - SAVE2(I+K-MW)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../cdpst.f:221:72: 221 | DO 345 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 345 at (1) ../cdpst.f:230:72: 230 | DO 350 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 350 at (1) ../cdpst.f:239:72: 239 | 360 DFDY(MW,J) = DFDY(MW,J) + 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../cdpst.f:247:72: 247 | DO 380 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 380 at (1) ../cdpst.f:248:72: 248 | 380 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../cdpst.f:256:72: 256 | 400 DFDY(MW,J) = DFDY(MW,J) + A(J,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 400 at (1) ../cdpst.f:264:72: 264 | DO 390 I = MAX(ML+1, MW+1-J), MIN(MW+NDE-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 390 at (1) ../cdpst.f:265:72: 265 | 390 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 390 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o daxpy.o ../daxpy.f ../daxpy.f:51:72: 51 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpbdi.o ../dpbdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o du11us.o ../du11us.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o passf3.o ../passf3.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdpsc.o ../sdpsc.f ../sdpsc.f:28:72: 28 | DO 10 J2 = J1,NQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../sdpsc.f:30:72: 30 | DO 10 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../sdpsc.f:31:72: 31 | 10 YH(I,J) = YH(I,J) + YH(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../sdpsc.f:34:72: 34 | DO 30 J2 = J1,NQ | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../sdpsc.f:36:72: 36 | DO 30 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../sdpsc.f:37:72: 37 | 30 YH(I,J) = YH(I,J) - YH(I,J+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o usrmat.o ../usrmat.f ../usrmat.f:34:20: 34 | IFLAG(2)=-DATTRV(1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../usrmat.f:35:21: 35 | IFLAG(3)= DATTRV(2) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../usrmat.f:53:18: 53 | I=DATTRV(L) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../usrmat.f:61:20: 61 | IFLAG(3)=DATTRV(L+1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../usrmat.f:2:50: 2 | SUBROUTINE USRMAT (I, J, AIJ, INDCAT, PRGOPT, DATTRV, IFLAG) | 1 Warning: Unused dummy argument 'prgopt' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdriv1.o ../cdriv1.f ../cdriv1.f:349:72: 349 | 20 IWORK(I) = WORK(I+LENWCM) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../cdriv1.f:356:72: 356 | 40 WORK(I+LENWCM) = IWORK(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../cdriv1.f:349:21: 349 | 20 IWORK(I) = WORK(I+LENWCM) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbcg.o ../dbcg.f ../dbcg.f:337:0: 337 | BK = BKNUM/BKDEN | Warning: 'bkden' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpbfa.o ../dpbfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o du12ls.o ../du12ls.f ../du12ls.f:43:72: 43 | DO 406 I=1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 406 at (1) ../du12ls.f:117:72: 117 | DO 460 I=KP1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 460 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o passf4.o ../passf4.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdpst.o ../sdpst.f ../sdpst.f:50:72: 50 | DO 110 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1) ../sdpst.f:51:72: 51 | 110 DFDY(I,J) = FACTOR*DFDY(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../sdpst.f:84:72: 84 | 140 DFDY(I,J) = (SAVE1(I) - SAVE2(I))*FACTOR | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../sdpst.f:113:72: 113 | 190 DFDY(I,I) = DFDY(I,I) + 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../sdpst.f:121:72: 121 | DO 210 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 210 at (1) ../sdpst.f:122:72: 122 | 210 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../sdpst.f:130:72: 130 | 230 DFDY(I,I) = DFDY(I,I) + A(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../sdpst.f:138:72: 138 | DO 220 I = 1,NDE | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 220 at (1) ../sdpst.f:139:72: 139 | 220 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../sdpst.f:153:72: 153 | DO 260 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 260 at (1) ../sdpst.f:154:72: 154 | 260 DFDY(I,J) = FACTOR*DFDY(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) ../sdpst.f:181:72: 181 | 290 Y(K) = Y(K) + DY | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../sdpst.f:200:72: 200 | 300 DFDY(I,K) = FACTOR*(SAVE1(I+K-MW) - SAVE2(I+K-MW)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1) ../sdpst.f:230:72: 230 | DO 345 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 345 at (1) ../sdpst.f:231:72: 231 | 345 DFDYMX = MAX(DFDYMX, ABS(DFDY(I,J))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 345 at (1) ../sdpst.f:235:72: 235 | DO 350 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 350 at (1) ../sdpst.f:236:72: 236 | 350 BND = BND + (DFDY(I,J)/DFDYMX)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 350 at (1) ../sdpst.f:242:72: 242 | 360 DFDY(MW,J) = DFDY(MW,J) + 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../sdpst.f:250:72: 250 | DO 380 I = MAX(ML+1, MW+1-J), MIN(MW+N-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 380 at (1) ../sdpst.f:251:72: 251 | 380 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../sdpst.f:259:72: 259 | 400 DFDY(MW,J) = DFDY(MW,J) + A(J,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 400 at (1) ../sdpst.f:267:72: 267 | DO 390 I = MAX(ML+1, MW+1-J), MIN(MW+NDE-J, MW+ML) | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 390 at (1) ../sdpst.f:268:72: 268 | 390 DFDY(I,J) = DFDY(I,J) + A(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 390 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o vnwrms.o ../vnwrms.f ../vnwrms.f:38:72: 38 | 10 SUM = SUM + (V(I)/W(I))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdriv2.o ../cdriv2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbdiff.o ../dbdiff.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpbsl.o ../dpbsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o du12us.o ../du12us.f ../du12us.f:43:72: 43 | DO 406 I=1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 406 at (1) ../du12us.f:115:72: 115 | DO 460 I=KP1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 460 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o passf5.o ../passf5.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdriv1.o ../sdriv1.f ../sdriv1.f:344:72: 344 | 20 IWORK(I) = WORK(I+LENWCM) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../sdriv1.f:351:72: 351 | 40 WORK(I+LENWCM) = IWORK(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../sdriv1.f:344:21: 344 | 20 IWORK(I) = WORK(I+LENWCM) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o wnlit.o ../wnlit.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdriv3.o ../cdriv3.f ../cdriv3.f:984:72: 984 | 30 WORK(I+IYH-1) = Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../cdriv3.f:1009:72: 1009 | DO 35 I = 1,13 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 35 at (1) ../cdriv3.f:1010:72: 1010 | 35 EL(I,J) = WORK(I+IEL+(J-1)*13-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 35 at (1) ../cdriv3.f:1012:72: 1012 | DO 40 I = 1,3 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 40 at (1) ../cdriv3.f:1013:72: 1013 | 40 TQ(I,J) = WORK(I+ITQ+(J-1)*3-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../cdriv3.f:1197:72: 1197 | 190 Y(I) = WORK(I+IYH-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../cdriv3.f:1210:72: 1210 | 230 WORK(I+IYWT-1) = 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../cdriv3.f:1214:72: 1214 | 250 WORK(I+IYWT-1) = EWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../cdriv3.f:1221:72: 1221 | 280 WORK(I+IYWT-1) = Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../cdriv3.f:1271:72: 1271 | 340 WORK(I+ISAVE2-1) = WORK(I+ISAVE2-1)/WORK(I+IA-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1) ../cdriv3.f:1311:72: 1311 | 380 WORK(I+IYWT-1) = MAX(EWT(1), ABS(Y(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../cdriv3.f:1314:72: 1314 | 400 WORK(I+IYWT-1) = MAX(EWT(I), ABS(Y(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 400 at (1) ../cdriv3.f:1318:72: 1318 | 420 WORK(I+ISAVE2-1) = Y(I)/WORK(I+IYWT-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1) ../cdriv3.f:1413:72: 1413 | 480 Y(J) = WORK(IYH+J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 480 at (1) ../cdriv3.f:1495:72: 1495 | 570 Y(I) = WORK(I+IYH-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 570 at (1) ../cdriv3.f:1509:72: 1509 | DO 582 I = 1,13 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 582 at (1) ../cdriv3.f:1510:72: 1510 | 582 WORK(I+IEL+(J-1)*13-1) = EL(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 582 at (1) ../cdriv3.f:1512:72: 1512 | DO 584 I = 1,3 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 584 at (1) ../cdriv3.f:1513:72: 1513 | 584 WORK(I+ITQ+(J-1)*3-1) = TQ(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 584 at (1) ../cdriv3.f:1530:72: 1530 | 662 Y(I) = WORK(I + IYH - 1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 662 at (1) ../cdriv3.f:1544:72: 1544 | DO 664 I = 1,13 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 664 at (1) ../cdriv3.f:1545:72: 1545 | 664 WORK(I+IEL+(J-1)*13-1) = EL(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 664 at (1) ../cdriv3.f:1547:72: 1547 | DO 666 I = 1,3 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 666 at (1) ../cdriv3.f:1548:72: 1548 | 666 WORK(I+ITQ+(J-1)*3-1) = TQ(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 666 at (1) ../cdriv3.f:959:15: 959 | AE = WORK(IMACH1) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:988:17: 988 | UROUND = WORK(IMACH4) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:991:15: 991 | AE = WORK(IMACH1) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1002:13: 1002 | AVGH = WORK(IAVGH) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1003:15: 1003 | AVGORD = WORK(IAVGRD) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1004:13: 1004 | HOLD = WORK(IHOLD) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1005:11: 1005 | RC = WORK(IRC) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1006:13: 1006 | RMAX = WORK(IRMAX) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1007:14: 1007 | TREND = WORK(ITREND) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1010:20: 1010 | 35 EL(I,J) = WORK(I+IEL+(J-1)*13-1) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1013:20: 1013 | 40 TQ(I,J) = WORK(I+ITQ+(J-1)*3-1) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1014:10: 1014 | T = WORK(IT) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1015:10: 1015 | H = WORK(IH) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1016:14: 1016 | HSIGN = WORK(IHSIGN) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1037:22: 1037 | TROOT = WORK(ITOUT) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1058:26: 1058 | TROOT = WORK(JTROOT) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1064:26: 1064 | TROOT = WORK(JTROOT) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1387:18: 1387 | GLAST = WORK(I+IGNOW-1) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:1438:22: 1438 | TROOT = WORK(I+ITROOT-1) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cdriv3.f:882:0: 882 | ISAVE1 = IYWT + N | Warning: 'iywt' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbesi.o ../dbesi.f ../dbesi.f:118:72: 118 | IF (N-1) 590, 10, 20 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesi.f:122:72: 122 | IF (X) 600, 30, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesi.f:123:72: 123 | 30 IF (ALPHA) 580, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesi.f:275:72: 275 | IF (NN-1) 340, 290, 130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesi.f:285:72: 285 | IF (NN-1) 340, 310, 320 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesi.f:93:0: 93 | 1 N, NN, NS, NZ | Warning: 'ns' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbesi.f:210:0: 210 | 160 IF (KM.NE.0) GO TO 170 | Warning: 'km' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchbs.o ../dpchbs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dulsia.o ../dulsia.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchbs.o ../pchbs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdriv2.o ../sdriv2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o wnlsm.o ../wnlsm.f ../wnlsm.f:126:13: 126 | LINK = PRGOPT(1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../wnlsm.f:141:15: 141 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../wnlsm.f:154:16: 154 | NEXT = PRGOPT(LINK) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../wnlsm.f:81:0: 81 | * JCON, JP, KEY, KRANK, L1, LAST, LINK, M, ME, NEXT, NIV, NLINK, | Warning: 'jcon' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdscl.o ../cdscl.f ../cdscl.f:33:72: 33 | DO 10 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../cdscl.f:34:72: 34 | 10 YH(I,J+1) = YH(I,J+1)*R1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbesi0.o ../dbesi0.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchce.o ../dpchce.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dusrmt.o ../dusrmt.f ../dusrmt.f:35:20: 35 | IFLAG(2)=-DATTRV(1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dusrmt.f:36:21: 36 | IFLAG(3)= DATTRV(2) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dusrmt.f:54:18: 54 | I=DATTRV(L) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dusrmt.f:62:20: 62 | IFLAG(3)=DATTRV(L+1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dusrmt.f:2:50: 2 | SUBROUTINE DUSRMT (I, J, AIJ, INDCAT, PRGOPT, DATTRV, IFLAG) | 1 Warning: Unused dummy argument 'prgopt' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchce.o ../pchce.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdriv3.o ../sdriv3.f ../sdriv3.f:977:72: 977 | 30 WORK(I+IYH-1) = Y(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../sdriv3.f:1177:72: 1177 | 190 Y(I) = WORK(I+IYH-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../sdriv3.f:1190:72: 1190 | 230 WORK(I+IYWT-1) = 1.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../sdriv3.f:1194:72: 1194 | 250 WORK(I+IYWT-1) = EWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../sdriv3.f:1201:72: 1201 | 280 WORK(I+IYWT-1) = ABS(Y(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1) ../sdriv3.f:1251:72: 1251 | 340 WORK(I+ISAVE2-1) = WORK(I+ISAVE2-1)/WORK(I+IA-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1) ../sdriv3.f:1291:72: 1291 | 380 WORK(I+IYWT-1) = MAX(EWT(1), ABS(Y(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1) ../sdriv3.f:1294:72: 1294 | 400 WORK(I+IYWT-1) = MAX(EWT(I), ABS(Y(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 400 at (1) ../sdriv3.f:1298:72: 1298 | 420 WORK(I+ISAVE2-1) = Y(I)/WORK(I+IYWT-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1) ../sdriv3.f:1399:72: 1399 | 480 Y(J) = WORK(IYH+J-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 480 at (1) ../sdriv3.f:1481:72: 1481 | 570 Y(I) = WORK(I+IYH-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 570 at (1) ../sdriv3.f:877:0: 877 | ISAVE1 = IYWT + N | Warning: 'iywt' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o wnlt1.o ../wnlt1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdstp.o ../cdstp.f ../cdstp.f:118:72: 118 | 115 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 115 at (1) ../cdstp.f:137:72: 137 | 125 SAVE1(I) = 0.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) ../cdstp.f:161:72: 161 | 132 DFDY(1,I) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 132 at (1) ../cdstp.f:166:72: 166 | 134 DFDY(1,I) = SAVE1(I) - DFDY(1,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 134 at (1) ../cdstp.f:175:72: 175 | 136 DFDY(1,I) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 136 at (1) ../cdstp.f:187:72: 187 | 140 Y(I) = YH(I,1) + EL(1,NQ)*SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../cdstp.f:226:72: 226 | 180 SAVE2(I) = SAVE1(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../cdstp.f:229:72: 229 | 185 SAVE2(I) = SAVE1(I)/MAX(ABS(Y(I)), ABS(YWT(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 185 at (1) ../cdstp.f:248:72: 248 | 190 SAVE2(I) = YH(I,NQ+1)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../cdstp.f:251:72: 251 | 195 SAVE2(I) = YH(I,NQ+1)/MAX(ABS(Y(I)), ABS(YWT(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 195 at (1) ../cdstp.f:279:72: 279 | 215 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 215 at (1) ../cdstp.f:298:72: 298 | DO 230 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 230 at (1) ../cdstp.f:299:72: 299 | 230 YH(I,J) = YH(I,J) + EL(J,NQ)*SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../cdstp.f:301:72: 301 | 235 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 235 at (1) ../cdstp.f:368:72: 368 | 250 YH(I,MAXORD+1) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../cdstp.f:387:72: 387 | 270 SAVE2(I) = YH(I,NQ+1)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../cdstp.f:390:72: 390 | 275 SAVE2(I) = YH(I,NQ+1)/MAX(ABS(Y(I)), ABS(YWT(I))) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 275 at (1) ../cdstp.f:401:72: 401 | 290 SAVE2(I) = (SAVE1(I) - YH(I,MAXORD+1))/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../cdstp.f:423:72: 423 | 360 YH(I,NQ+2) = SAVE1(I)*EL(NQ+1,NQ)/(NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../cdstp.f:443:72: 443 | 405 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 405 at (1) ../cdstp.f:457:72: 457 | 435 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 435 at (1) ../cdstp.f:180:0: 180 | IF (ITER .GT. 0) TREND = MAX(.9E0*TREND, D/D1) | Warning: 'd1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbesi1.o ../dbesi1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchci.o ../dpchci.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dvecs.o ../dvecs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchci.o ../pchci.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdscl.o ../sdscl.f ../sdscl.f:32:72: 32 | DO 10 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../sdscl.f:33:72: 33 | 10 YH(I,J+1) = YH(I,J+1)*R1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o wnlt2.o ../wnlt2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cdzro.o ../cdzro.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbesj.o ../dbesj.f ../dbesj.f:116:72: 116 | IF (N-1) 720, 10, 20 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesj.f:119:72: 119 | IF (X) 730, 30, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesj.f:120:72: 120 | 30 IF (ALPHA) 710, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesj.f:241:72: 241 | IF (NN-1) 440, 390, 130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbesj.f:251:72: 251 | IF (NN-1) 440, 410, 420 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchcm.o ../dpchcm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dvnrms.o ../dvnrms.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchcm.o ../pchcm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdsdot.o ../sdsdot.f ../sdsdot.f:67:15: 67 | 30 SDSDOT = DSDOT | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../sdsdot.f:76:15: 76 | SDSDOT = DSDOT | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o wnlt3.o ../wnlt3.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cexprl.o ../cexprl.f ../cexprl.f:35:18: 35 | NTERMS = XN - (XN*XLN+ALNEPS)/(XLN+1.36) + 1.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbesj0.o ../dbesj0.f ../dbesj0.f:2:6: 2 | DOUBLE PRECISION FUNCTION DBESJ0 (X) | 1 Warning: 'dbesj0' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchcs.o ../dpchcs.f ../dpchcs.f:122:72: 122 | IF ( DPCHST(SLOPE(I-1),SLOPE(I)) ) 100, 300, 900 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dpchcs.f:145:72: 145 | IF ( DPCHST(DEXT, SLOPE(I-1)) ) 200, 900, 250 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dvout.o ../dvout.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchcs.o ../pchcs.f ../pchcs.f:120:72: 120 | IF ( PCHST(SLOPE(I-1),SLOPE(I)) ) 100, 300, 900 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../pchcs.f:143:72: 143 | IF ( PCHST(DEXT, SLOPE(I-1)) ) 200, 900, 250 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdstp.o ../sdstp.f ../sdstp.f:116:72: 116 | 115 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 115 at (1) ../sdstp.f:135:72: 135 | 125 SAVE1(I) = 0.E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 125 at (1) ../sdstp.f:159:72: 159 | 132 DFDY(1,I) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 132 at (1) ../sdstp.f:164:72: 164 | 134 DFDY(1,I) = SAVE1(I) - DFDY(1,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 134 at (1) ../sdstp.f:173:72: 173 | 136 DFDY(1,I) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 136 at (1) ../sdstp.f:185:72: 185 | 140 Y(I) = YH(I,1) + EL(1,NQ)*SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../sdstp.f:224:72: 224 | 180 SAVE2(I) = SAVE1(I)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1) ../sdstp.f:227:72: 227 | 185 SAVE2(I) = SAVE1(I)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 185 at (1) ../sdstp.f:246:72: 246 | 190 SAVE2(I) = YH(I,NQ+1)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../sdstp.f:249:72: 249 | 195 SAVE2(I) = YH(I,NQ+1)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 195 at (1) ../sdstp.f:277:72: 277 | 215 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 215 at (1) ../sdstp.f:296:72: 296 | DO 230 I = 1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 230 at (1) ../sdstp.f:297:72: 297 | 230 YH(I,J) = YH(I,J) + EL(J,NQ)*SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../sdstp.f:299:72: 299 | 235 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 235 at (1) ../sdstp.f:366:72: 366 | 250 YH(I,MAXORD+1) = SAVE1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../sdstp.f:385:72: 385 | 270 SAVE2(I) = YH(I,NQ+1)/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1) ../sdstp.f:388:72: 388 | 275 SAVE2(I) = YH(I,NQ+1)/MAX(ABS(Y(I)), YWT(I)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 275 at (1) ../sdstp.f:399:72: 399 | 290 SAVE2(I) = (SAVE1(I) - YH(I,MAXORD+1))/YWT(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) ../sdstp.f:421:72: 421 | 360 YH(I,NQ+2) = SAVE1(I)*EL(NQ+1,NQ)/(NQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1) ../sdstp.f:441:72: 441 | 405 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 405 at (1) ../sdstp.f:455:72: 455 | 435 Y(I) = YH(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 435 at (1) ../sdstp.f:178:0: 178 | IF (ITER .GT. 0) TREND = MAX(.9E0*TREND, D/D1) | Warning: 'd1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o wnnls.o ../wnnls.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cfftb.o ../cfftb.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbesj1.o ../dbesj1.f ../dbesj1.f:2:6: 2 | DOUBLE PRECISION FUNCTION DBESJ1 (X) | 1 Warning: 'dbesj1' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchdf.o ../dpchdf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dwnlit.o ../dwnlit.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchdf.o ../pchdf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sdzro.o ../sdzro.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xadd.o ../xadd.f ../xadd.f:79:72: 79 | IF (I) 80, 50, 90 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cfftb1.o ../cfftb1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbesk.o ../dbesk.f ../dbesk.f:201:0: 201 | TM = TM + TRX | Warning: 'trx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbesk.f:201:0: Warning: 'tm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbesk.f:195:0: 195 | Y(2) = S2 | Warning: 's2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchfd.o ../dpchfd.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dwnlsm.o ../dwnlsm.f ../dwnlsm.f:130:13: 130 | LINK = PRGOPT(1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dwnlsm.f:146:15: 146 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dwnlsm.f:159:16: 159 | NEXT = PRGOPT(LINK) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dwnlsm.f:85:0: 85 | * JCON, JP, KEY, KRANK, L1, LAST, LINK, M, ME, NEXT, NIV, NLINK, | Warning: 'jcon' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchdoc.o ../pchdoc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sepeli.o ../sepeli.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xadj.o ../xadj.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cfftf.o ../cfftf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbesk0.o ../dbesk0.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchfe.o ../dpchfe.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dwnlt1.o ../dwnlt1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchfd.o ../pchfd.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sepx4.o ../sepx4.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xc210.o ../xc210.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cfftf1.o ../cfftf1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbesk1.o ../dbesk1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchia.o ../dpchia.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dwnlt2.o ../dwnlt2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchfe.o ../pchfe.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgbco.o ../sgbco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xcon.o ../xcon.f ../xcon.f:91:10: 91 | I = LOG10(ABS(X))/DLG10R | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../xcon.f:115:14: 115 | ITEMP = ISPACE/DLG10R | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cffti.o ../cffti.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbesks.o ../dbesks.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchic.o ../dpchic.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dwnlt3.o ../dwnlt3.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchia.o ../pchia.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgbdi.o ../sgbdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xerbla.o ../xerbla.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cffti1.o ../cffti1.f ../cffti1.f:62:72: 62 | IF (J-4) 102,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../cffti1.f:68:72: 68 | IF (NR) 101,105,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbesy.o ../dbesy.f ../dbesy.f:160:0: 160 | TM = TM + TRX | Warning: 'trx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbesy.f:160:0: Warning: 'tm' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbesy.f:154:0: 154 | Y(2) = S2 | Warning: 's2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchid.o ../dpchid.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dwnnls.o ../dwnnls.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchic.o ../pchic.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgbfa.o ../sgbfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xerclr.o ../xerclr.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cfod.o ../cfod.f ../cfod.f:82:72: 82 | 110 PC(I) = PC(I-1) + FNQM1*PC(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../cfod.f:91:72: 91 | 120 XPIN = XPIN + TSIGN*PC(I)/(I+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../cfod.f:96:72: 96 | 130 ELCO(I+1,NQ) = RQ1FAC*PC(I)/I | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../cfod.f:119:72: 119 | 210 PC(I) = PC(I-1) + FNQ*PC(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../cfod.f:123:72: 123 | 220 ELCO(I,NQ) = PC(I)/PC(2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbesy0.o ../dbesy0.f ../dbesy0.f:2:6: 2 | DOUBLE PRECISION FUNCTION DBESY0 (X) | 1 Warning: 'dbesy0' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchim.o ../dpchim.f ../dpchim.f:212:72: 212 | IF ( DPCHST(DEL1,DEL2) ) 42, 41, 45 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dwritp.o ../dwritp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchid.o ../pchid.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgbmv.o ../sgbmv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xercnt.o ../xercnt.f ../xercnt.f:2:67: 2 | SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) | 1 Warning: Unused dummy argument 'kontrl' at (1) [-Wunused-dummy-argument] ../xercnt.f:2:59: 2 | SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) | 1 Warning: Unused dummy argument 'level' at (1) [-Wunused-dummy-argument] ../xercnt.f:2:31: 2 | SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) | 1 Warning: Unused dummy argument 'librar' at (1) [-Wunused-dummy-argument] ../xercnt.f:2:46: 2 | SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) | 1 Warning: Unused dummy argument 'messg' at (1) [-Wunused-dummy-argument] ../xercnt.f:2:52: 2 | SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) | 1 Warning: Unused dummy argument 'nerr' at (1) [-Wunused-dummy-argument] ../xercnt.f:2:39: 2 | SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) | 1 Warning: Unused dummy argument 'subrou' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cg.o ../cg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbesy1.o ../dbesy1.f ../dbesy1.f:2:6: 2 | DOUBLE PRECISION FUNCTION DBESY1 (X) | 1 Warning: 'dbesy1' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchkt.o ../dpchkt.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dwupdt.o ../dwupdt.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchim.o ../pchim.f ../pchim.f:209:72: 209 | IF ( PCHST(DEL1,DEL2) ) 42, 41, 45 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgbsl.o ../sgbsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xerdmp.o ../xerdmp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgamma.o ../cgamma.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbeta.o ../dbeta.f ../dbeta.f:41:0: 41 | IF (A+B.LT.XMAX) RETURN | Warning: '__result_dbeta' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchng.o ../dpchng.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dx.o ../dx.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchkt.o ../pchkt.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgeco.o ../sgeco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xerhlt.o ../xerhlt.f ../xerhlt.f:2:30: 2 | SUBROUTINE XERHLT (MESSG) | 1 Warning: Unused dummy argument 'messg' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgamr.o ../cgamr.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbetai.o ../dbetai.f ../dbetai.f:78:10: 78 | N = MAX (ALNEPS/LOG(Y), 4.0D0) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dbetai.f:90:11: 90 | IB = MAX (XB/ALNSML, 0.0D0) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dbetai.f:96:10: 96 | N = Q | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchsp.o ../dpchsp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dx4.o ../dx4.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchngs.o ../pchngs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgedi.o ../sgedi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xermax.o ../xermax.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgbco.o ../cgbco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbfqad.o ../dbfqad.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchst.o ../dpchst.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxadd.o ../dxadd.f ../dxadd.f:79:72: 79 | IF (I) 80, 50, 90 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchsp.o ../pchsp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgeev.o ../sgeev.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xermsg.o ../xermsg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgbdi.o ../cgbdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbhin.o ../dbhin.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpchsw.o ../dpchsw.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxadj.o ../dxadj.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchst.o ../pchst.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgefa.o ../sgefa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xerprn.o ../xerprn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgbfa.o ../cgbfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbi.o ../dbi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpcoef.o ../dpcoef.f ../dpcoef.f:68:72: 68 | 1 TC(I) = TC(I)/FAC | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) ../dpcoef.f:76:72: 76 | 3 TC(NEW) = SAVE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 3 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxc210.o ../dxc210.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pchsw.o ../pchsw.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgefs.o ../sgefs.f ../sgefs.f:152:15: 152 | IND = -LOG10(R1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xersve.o ../xersve.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgbmv.o ../cgbmv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbie.o ../dbie.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpfqad.o ../dpfqad.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxcon.o ../dxcon.f ../dxcon.f:91:10: 91 | I = LOG10(ABS(X))/DLG10R | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dxcon.f:115:14: 115 | ITEMP = ISPACE/DLG10R | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pcoef.o ../pcoef.f ../pcoef.f:68:72: 68 | 1 TC(I) = TC(I)/FAC | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) ../pcoef.f:76:72: 76 | 3 TC(NEW) = SAVE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 3 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgeir.o ../sgeir.f ../sgeir.f:191:12: 191 | IND = -LOG10(MAX(R1MACH(4),DNORM/XNORM)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xgetf.o ../xgetf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgbsl.o ../cgbsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbinom.o ../dbinom.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpigmr.o ../dpigmr.f ../dpigmr.f:383:0: 383 | IF (RHO .LT. R0NRM) GO TO 150 | Warning: 'rho' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxlcal.o ../dxlcal.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pfqad.o ../pfqad.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgemm.o ../sgemm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xgetua.o ../xgetua.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgeco.o ../cgeco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbint4.o ../dbint4.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpincw.o ../dpincw.f ../dpincw.f:2:68: 2 | SUBROUTINE DPINCW (MRELAS, NVARS, LMX, LBM, NPP, JSTRT, IBASIS, | 1 Warning: Unused dummy argument 'ibasis' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxlegf.o ../dxlegf.f ../dxlegf.f:141:72: 141 | 290 IPQA(I)=0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pgsf.o ../pgsf.f ../pgsf.f:25:72: 25 | IF (MOD(IZ,2)) 103,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgemv.o ../sgemv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xgetun.o ../xgetun.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgedi.o ../cgedi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbintk.o ../dbintk.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpinit.o ../dpinit.f ../dpinit.f:3:13: 3 | + INFO, AMAT, CSC, COSTSC, COLNRM, XLAMDA, ANORM, RHS, RHSNRM, | 1 Warning: Unused dummy argument 'info' at (1) [-Wunused-dummy-argument] ../dpinit.f:186:0: 186 | RHS(I-NVARS)=RHS(I-NVARS)+SCALR | Warning: 'scalr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxnrmp.o ../dxnrmp.f ../dxnrmp.f:154:13: 154 | ISIG = LOG10(2.0D0*NU*(5.0D0+TX**2)) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dxnrmp.f:161:13: 161 | ISIG = LOG10(2.0D0*NU*(5.0D0+ABS(DARG*TX))) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pimach.o ../pimach.f ../pimach.f:2:26: 2 | FUNCTION PIMACH (DUM) | 1 Warning: Unused dummy argument 'dum' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sger.o ../sger.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xlegf.o ../xlegf.f ../xlegf.f:141:72: 141 | 290 IPQA(I)=0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgeev.o ../cgeev.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbkias.o ../dbkias.f ../dbkias.f:151:0: 151 | ERR = ERR*RAT | Warning: 'rat' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpintm.o ../dpintm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxpmu.o ../dxpmu.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pinitm.o ../pinitm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgesl.o ../sgesl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xnrmp.o ../xnrmp.f ../xnrmp.f:154:13: 154 | ISIG = LOG10(2.0*NU*(5.0+TX**2)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../xnrmp.f:161:13: 161 | ISIG = LOG10(2.0*NU*(5.0+ABS(SARG*TX))) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgefa.o ../cgefa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbkisr.o ../dbkisr.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpjac.o ../dpjac.f ../dpjac.f:2:27: 2 | SUBROUTINE DPJAC (NEQ, Y, YH, NYH, EWT, FTEM, SAVF, WM, IWM, DF, | 1 Warning: Unused dummy argument 'neq' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxpmup.o ../dxpmup.f ../dxpmup.f:54:72: 54 | 220 CALL DXADJ(PROD,IPROD,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pjac.o ../pjac.f ../pjac.f:80:72: 80 | 110 WM(I+2) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../pjac.f:84:72: 84 | 120 WM(I+2) = WM(I+2)*CON | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../pjac.f:99:72: 99 | 220 WM(I+J1) = (FTEM(I) - SAVF(I))*FAC | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../pjac.f:108:72: 108 | 250 J = J + (N + 1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) ../pjac.f:117:72: 117 | 310 Y(I) = Y(I) + R*(H*SAVF(I) - YH(I,2)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1) ../pjac.f:139:72: 139 | 410 WM(I+2) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1) ../pjac.f:143:72: 143 | 420 WM(I+2) = WM(I+2)*CON | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1) ../pjac.f:160:72: 160 | 530 Y(I) = Y(I) + R | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 530 at (1) ../pjac.f:171:72: 171 | 540 WM(II+I) = (FTEM(I) - SAVF(I))*FAC | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 540 at (1) ../pjac.f:179:72: 179 | 580 II = II + MEBAND | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 580 at (1) ../pjac.f:2:26: 2 | SUBROUTINE PJAC (NEQ, Y, YH, NYH, EWT, FTEM, SAVF, WM, IWM, F, | 1 Warning: Unused dummy argument 'neq' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sglss.o ../sglss.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xpmu.o ../xpmu.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgefs.o ../cgefs.f ../cgefs.f:153:15: 153 | IND = -LOG10(R1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbksol.o ../dbksol.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dplint.o ../dplint.f ../dplint.f:51:72: 51 | DO 10010 I=1,KM1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10010 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxpnrm.o ../dxpnrm.f ../dxpnrm.f:60:72: 60 | 510 CALL DXADJ(PROD,IPROD,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../dxpnrm.f:29:8: 29 | L=(MU2-MU1)+(NU2-NU1+1.5D0) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pnnzrs.o ../pnnzrs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgmres.o ../sgmres.f ../sgmres.f:3:25: 3 | + ITOL, TOL, ITMAX, ITER, ERR, IERR, IUNIT, SB, SX, RGWK, LRGW, | 1 Warning: Unused dummy argument 'itmax' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xpmup.o ../xpmup.f ../xpmup.f:54:72: 54 | 220 CALL XADJ(PROD,IPROD,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgeir.o ../cgeir.f ../cgeir.f:191:12: 191 | IND = -LOG10(MAX(R1MACH(4),DNORM/XNORM)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbndac.o ../dbndac.f ../dbndac.f:217:72: 217 | DO 10 J=1,NBP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../dbndac.f:224:72: 224 | DO 20 J=1,NBP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) ../dbndac.f:244:72: 244 | DO 50 I=1,K | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dplpce.o ../dplpce.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxpqnu.o ../dxpqnu.f ../dxpqnu.f:58:72: 58 | 50 CALL DXADJ(FACTMU,IF,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../dxpqnu.f:103:72: 103 | 77 CALL DXADJ(X1,IPQ,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 77 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o poch.o ../poch.f ../poch.f:45:10: 45 | N = X | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../poch.f:60:10: 60 | N = ABS(X) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sgtsl.o ../sgtsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xpnrm.o ../xpnrm.f ../xpnrm.f:60:72: 60 | 510 CALL XADJ(PROD,IPROD,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1) ../xpnrm.f:29:8: 29 | L=(MU2-MU1)+(NU2-NU1+1.5) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgemm.o ../cgemm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbndsl.o ../dbndsl.f ../dbndsl.f:228:72: 228 | 70 IF (G(I,L+1)) 80,130,80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbndsl.f:229:72: 229 | 80 X(I)=(X(I)-S)/G(I,L+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../dbndsl.f:243:72: 243 | IF (G(J,L+1)) 120,130,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbndsl.f:244:72: 244 | 120 X(J)=(X(J)-S)/G(J,L+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dplpdm.o ../dplpdm.f ../dplpdm.f:3:47: 3 | + IBASIS, IMAT, IBRC, IPR, IWR, IND, IBB, ANORM, EPS, UU, GG, | 1 Warning: Unused dummy argument 'ibb' at (1) [-Wunused-dummy-argument] ../dplpdm.f:2:43: 2 | SUBROUTINE DPLPDM (MRELAS, NVARS, LMX, LBM, NREDC, INFO, IOPT, | 1 Warning: Unused dummy argument 'lmx' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxpsi.o ../dxpsi.f ../dxpsi.f:48:72: 48 | 12 C=(C+CNUM(K)/CDENOM(K))/B**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 12 at (1) ../dxpsi.f:56:72: 56 | 15 B=B+1.D0/(N-M+A) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o poch1.o ../poch1.f ../poch1.f:82:29: 82 | IF (BP.LT.10.0) INCR = 11.0 - BP | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../poch1.f:99:15: 99 | NTERMS = -0.5*ALNEPS/ALNVAR + 1.0 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o shels.o ../shels.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xpqnu.o ../xpqnu.f ../xpqnu.f:58:72: 58 | 50 CALL XADJ(FACTMU,IF,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../xpqnu.f:103:72: 103 | 77 CALL XADJ(X1,IPQ,IERROR) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 77 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgemv.o ../cgemv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbnfac.o ../dbnfac.f ../dbnfac.f:89:72: 89 | IF (NROWM1) 120, 110, 10 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dplpfe.o ../dplpfe.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxqmu.o ../dxqmu.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pois3d.o ../pois3d.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sheqr.o ../sheqr.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xpsi.o ../xpsi.f ../xpsi.f:48:72: 48 | 12 C=(C+CNUM(K)/CDENOM(K))/B**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 12 at (1) ../xpsi.f:56:72: 56 | 15 B=B+1./(N-M+A) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgerc.o ../cgerc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbnslv.o ../dbnslv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dplpfl.o ../dplpfl.f ../dplpfl.f:3:12: 3 | + IBB, THETA, DIRNRM, RPRNRM, CSC, WW, BL, BU, ERP, RPRIM, | 1 Warning: Unused dummy argument 'ibb' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxqnu.o ../dxqnu.f ../dxqnu.f:42:8: 42 | K=(NU2-NU1+1.5D0) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o poisd2.o ../poisd2.f ../poisd2.f:207:0: 207 | GO TO (146,148),NODDPR | Warning: 'noddpr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sindg.o ../sindg.f ../sindg.f:31:10: 31 | N = ABS(X)/90.0 + 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xqmu.o ../xqmu.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgeru.o ../cgeru.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbocls.o ../dbocls.f ../dbocls.f:995:0: 995 | IF (ACCUM .OR. PRETRI) THEN | Warning: 'pretri' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbocls.f:715:0: 715 | LOCACC = LP + 2 | Warning: 'locacc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbocls.f:1139:0: 1139 | * RNORM,MODE,RW(LRW),IW(LIW)) | Warning: 'lbou' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbocls.f:1013:0: 1013 | IF (MCON.GT.0 .AND. FILTER) THEN | Warning: 'filter' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbocls.f:1122:0: 1122 | IF (ANORM.GT.ZERO) WT = WT/ANORM | Warning: 'drelpr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dplpmn.o ../dplpmn.f ../dplpmn.f:203:72: 203 | ASSIGN 20013 TO NPR004 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:212:72: 212 | 20014 ASSIGN 20018 TO NPR005 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:214:72: 214 | 20018 ASSIGN 20019 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:216:72: 216 | 20019 ASSIGN 20020 TO NPR007 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:219:72: 219 | ASSIGN 20024 TO NPR008 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:232:72: 232 | ASSIGN 20029 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:234:72: 234 | 20029 ASSIGN 20030 TO NPR010 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:236:72: 236 | 20030 ASSIGN 20031 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:238:72: 238 | 20031 ASSIGN 20032 TO NPR008 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:248:72: 248 | ASSIGN 20036 TO NPR007 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:250:72: 250 | 20036 ASSIGN 20037 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:252:72: 252 | 20037 ASSIGN 20038 TO NPR010 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:254:72: 254 | 20038 ASSIGN 20039 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:256:72: 256 | 20039 ASSIGN 20040 TO NPR008 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:265:72: 265 | ASSIGN 20044 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:282:72: 282 | ASSIGN 20050 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:287:72: 287 | 20035 ASSIGN 20051 TO NPR011 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:383:72: 383 | ASSIGN 20096 TO NPR012 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:442:18: 442 | GO TO NPR010, (20030,20038) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:444:72: 444 | 30009 ASSIGN 20134 TO NPR013 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:446:72: 446 | 20134 ASSIGN 20135 TO NPR014 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:452:72: 452 | 20139 ASSIGN 20141 TO NPR015 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:463:72: 463 | 20153 ASSIGN 20154 TO NPR005 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:474:18: 474 | GO TO NPR009, (20029,20037,20044,20050) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:548:18: 548 | GO TO NPR004, (20013,20204,20242) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:589:18: 589 | GO TO NPR007, (20020,20036) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:612:72: 612 | ASSIGN 20204 TO NPR004 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:624:18: 624 | GO TO NPR005, (20018,20154,20243) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:681:18: 681 | GO TO NPR008, (20024,20032,20040) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:691:18: 691 | GO TO NPR014, (20135,20246) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:696:72: 696 | ASSIGN 20233 TO NPR011 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:700:72: 700 | ASSIGN 20237 TO NPR012 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:721:72: 721 | ASSIGN 20242 TO NPR004 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:723:72: 723 | 20242 ASSIGN 20243 TO NPR005 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:725:72: 725 | 20243 ASSIGN 20244 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:727:72: 727 | 20244 ASSIGN 20245 TO NPR013 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:729:72: 729 | 20245 ASSIGN 20246 TO NPR014 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:741:72: 741 | 20249 ASSIGN 20251 TO NPR015 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:754:18: 754 | GO TO NPR006, (20019,20031,20039,20244,20275) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:775:18: 775 | GO TO NPR013, (20134,20245,20267) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:784:18: 784 | GO TO NPR015, (20141,20251) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:816:72: 816 | 30011 ASSIGN 20267 TO NPR013 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:827:72: 827 | 20268 ASSIGN 20275 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmn.f:883:18: 883 | GO TO NPR011, (20051,20233) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:951:18: 951 | GO TO NPR012, (20096,20237) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmn.f:831:5: 831 | 20275 I=1 | 1 Warning: Label 20275 at (1) defined but not used [-Wunused-label] ../dplpmn.f:818:5: 818 | 20267 IF (.NOT.(COSTSC.NE.ZERO)) GO TO 20268 | 1 Warning: Label 20267 at (1) defined but not used [-Wunused-label] ../dplpmn.f:731:5: 731 | 20246 CONTINUE | 1 Warning: Label 20246 at (1) defined but not used [-Wunused-label] ../dplpmn.f:725:5: 725 | 20243 ASSIGN 20244 TO NPR006 | 1 Warning: Label 20243 at (1) defined but not used [-Wunused-label] ../dplpmn.f:723:5: 723 | 20242 ASSIGN 20243 TO NPR005 | 1 Warning: Label 20242 at (1) defined but not used [-Wunused-label] ../dplpmn.f:614:5: 614 | 20204 CONTINUE | 1 Warning: Label 20204 at (1) defined but not used [-Wunused-label] ../dplpmn.f:505:10: 505 | 20159 KEY=AMAT(4) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dplpmn.f:264:0: 264 | COSTSC=SCOSTS | Warning: 'scosts' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpmn.f:416:0: 416 | 20116 RHS(I)=RHS(I)+AIJ*SCALR | Warning: 'scalr' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpmn.f:594:0: 594 | 20194 NTRIES=NTRIES+1 | Warning: 'ntries' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpmn.f:292:0: 292 | 20052 IF (.NOT.((.NOT.FEAS).AND.(.NOT.UNBND))) GO TO 10001 | Warning: 'feas' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxred.o ../dxred.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o poisn2.o ../poisn2.f ../poisn2.f:341:0: 341 | IF (NROD .NE. 0) GO TO 173 | Warning: 'nrod' may be used uninitialized in this function [-Wmaybe-uninitialized] ../poisn2.f:133:0: 133 | IF (NRODPR .NE. 0) GO TO 121 | Warning: 'nrodpr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sinqb.o ../sinqb.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xqnu.o ../xqnu.f ../xqnu.f:42:8: 42 | K=(NU2-NU1+1.5) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgesl.o ../cgesl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbols.o ../dbols.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dplpmu.o ../dplpmu.f ../dplpmu.f:74:72: 74 | ASSIGN 20009 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmu.f:85:72: 85 | ASSIGN 20013 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmu.f:96:72: 96 | ASSIGN 20017 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmu.f:131:72: 131 | ASSIGN 20028 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmu.f:194:72: 194 | ASSIGN 20042 TO NPR003 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmu.f:294:72: 294 | 20039 ASSIGN 20074 TO NPR003 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmu.f:379:72: 379 | 20029 ASSIGN 20109 TO NPR003 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../dplpmu.f:403:18: 403 | GO TO NPR001, (20009,20013,20017,20028) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmu.f:432:18: 432 | GO TO NPR003, (20042,20074,20109) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../dplpmu.f:287:0: 287 | RG(ABS(IBASIS(IENTER)))= GQ/WP**2 | Warning: 'wp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpmu.f:120:0: 120 | 20019 IF ((N20018-K).LT.0) GO TO 20020 | Warning: 'n20018' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpmu.f:116:0: 116 | K=1 | Warning: 'k' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpmu.f:266:0: 266 | RG(J)=MAX(RG(J)-TWO*ALPHA*GAMMA+ALPHA**2*GQ,ONE+ALPHA**2) | Warning: 'gq' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpmu.f:98:0: 98 | 20017 THETA=-SCALR-THETA | Warning: 'scalr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dxset.o ../dxset.f ../dxset.f:252:11: 252 | 14 LX = 0.5D0*LOG10(DZEROX)/DLG10R | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o poisp2.o ../poisp2.f ../poisp2.f:51:15: 51 | IPSTOR = W(1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../poisp2.f:96:15: 96 | IPSTOR = W(1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sinqf.o ../sinqf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xred.o ../xred.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cgtsl.o ../cgtsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbolsm.o ../dbolsm.f ../dbolsm.f:1049:5: 1049 | 350 JDROP = JDROP1 + JDROP2 | 1 Warning: Label 350 at (1) defined but not used [-Wunused-label] ../dbolsm.f:840:0: 840 | JBIG = JMAG | Warning: 'jmag' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbolsm.f:835:0: 835 | JBIG = JLARGE | Warning: 'jlarge' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbolsm.f:1048:0: 1048 | 340 IF (JDROP1+JDROP2.LE.0 .OR. NSETB.LE.0) GO TO 580 | Warning: 'jdrop2' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbolsm.f:975:0: 975 | JDROP1 = J | Warning: 'jdrop1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dplpup.o ../dplpup.f ../dplpup.f:196:0: 196 | ELSEIF (ABS(AIJ).GT.AMX) THEN | Warning: 'amx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dplpup.f:153:0: 153 | ELSEIF (ABS(AIJ).LT.AMN) THEN | Warning: 'amn' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dy.o ../dy.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o poistg.o ../poistg.f ../poistg.f:274:15: 274 | IPSTOR = W(IWW1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sinqi.o ../sinqi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xset.o ../xset.f ../xset.f:252:11: 252 | 14 LX = 0.5*LOG10(DZEROX)/DLG10R | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ch.o ../ch.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbsgq8.o ../dbsgq8.f ../dbsgq8.f:141:72: 141 | IF (EE-AE) 40, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbsgq8.f:144:72: 144 | IF (LR(L)) 60, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dbsgq8.f:174:72: 174 | IF (LR(L)) 100, 100, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpnnzr.o ../dpnnzr.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dy4.o ../dy4.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o polcof.o ../polcof.f ../polcof.f:86:72: 86 | DO 10030 I=2,NMKP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10030 at (1) ../polcof.f:80:0: 80 | D(1)=PTWO | Warning: 'ptwo' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sint.o ../sint.f ../sint.f:76:72: 76 | IF (N-2) 101,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xsetf.o ../xsetf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chbmv.o ../chbmv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbsi0e.o ../dbsi0e.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpoch.o ../dpoch.f ../dpoch.f:48:10: 48 | N = X | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpoch.f:51:11: 51 | IA = A | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpoch.f:64:10: 64 | N = ABS(X) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dyairy.o ../dyairy.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o polfit.o ../polfit.f ../polfit.f:149:72: 149 | 3 W(I) = 1.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 3 at (1) ../polfit.f:173:72: 173 | 9 A(I) = 0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 9 at (1) ../polfit.f:182:72: 182 | 10 W11 = W11 + W(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../polfit.f:189:72: 189 | 12 W11 = W11 + W(I)*A(K4PI)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 12 at (1) ../polfit.f:207:72: 207 | 15 SIGJ = SIGJ + W(I)*((Y(I)-R(I)) - A(K5PI))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1) ../polfit.f:212:72: 212 | IF (EPS) 24,26,27 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../polfit.f:246:72: 246 | 19 W11 = W11 + W(I)*A(K4PI)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 19 at (1) ../polfit.f:256:72: 256 | 20 TEMD1 = TEMD1 + TEMD2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../polfit.f:273:72: 273 | 21 SIGJ = SIGJ + W(I)*((Y(I)-R(I)) - A(K5PI))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 21 at (1) ../polfit.f:278:72: 278 | IF (EPS) 23,26,27 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../polfit.f:199:16: 199 | A(K2+1) = TEMD1 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../polfit.f:205:15: 205 | R(I) = TEMD2 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../polfit.f:206:18: 206 | A(K5PI) = TEMD2 - DBLE(R(I)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../polfit.f:234:15: 234 | A(JP1) = TEMD1/DBLE(W11) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../polfit.f:258:18: 258 | A(K2PJ+1) = TEMD1 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../polfit.f:271:15: 271 | R(I) = TEMD2 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../polfit.f:272:18: 272 | A(K5PI) = TEMD2 - DBLE(R(I)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] ../polfit.f:224:0: 224 | IF (J .GT. 1) A(K1PJ) = W11/W1 | Warning: 'w1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../polfit.f:350:0: 350 | 36 EPS = SQRT(SIG/XM) | Warning: 'sigpas' may be used uninitialized in this function [-Wmaybe-uninitialized] ../polfit.f:301:0: 301 | 25 NFAIL = NFAIL + 1 | Warning: 'nfail' may be used uninitialized in this function [-Wmaybe-uninitialized] ../polfit.f:325:0: 325 | NDEG = JPAS | Warning: 'jpas' may be used uninitialized in this function [-Wmaybe-uninitialized] ../polfit.f:157:0: 157 | KSIG = 1 | Warning: 'ksig' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sinti.o ../sinti.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xsetua.o ../xsetua.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chemm.o ../chemm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbsi1e.o ../dbsi1e.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpoch1.o ../dpoch1.f ../dpoch1.f:97:31: 97 | IF (BP.LT.10.0D0) INCR = 11.0D0 - BP | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpoch1.f:114:15: 114 | NTERMS = -0.5D0*ALNEPS/ALNVAR + 1.0D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o e1.o ../e1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o polint.o ../polint.f ../polint.f:50:72: 50 | DO 10010 I=1,KM1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10010 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sintrp.o ../sintrp.f ../sintrp.f:73:72: 73 | 10 W(IQ) = XIQ/TEMP1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../sintrp.f:87:72: 87 | 40 GDI = OW(KP2-I) - ALPHA(I)*GDI | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1) ../sintrp.f:103:72: 103 | 70 W(JQ) = GAMMA*W(JQ) - ALP*W(JQ+1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) ../sintrp.f:105:72: 105 | 80 C(I+1) = GAMMA*C(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../sintrp.f:118:72: 118 | 100 YPOUT(L) = 0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) ../sintrp.f:126:72: 126 | 110 YPOUT(L) = YPOUT(L) + TEMP3*PHI(L,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) ../sintrp.f:132:72: 132 | 1 (YPOUT(L) + (C(1) + RMU*OG(1))*PHI(L,1)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../sintrp.f:79:0: 79 | GDI = 1.0/TEMP1 | Warning: 'temp1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o xsetun.o ../xsetun.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chemv.o ../chemv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbsk0e.o ../dbsk0e.f ../dbsk0e.f:2:0: 2 | DOUBLE PRECISION FUNCTION DBSK0E (X) | Warning: '__result_dbsk0e' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpoco.o ../dpoco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o efc.o ../efc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o polyvl.o ../polyvl.f ../polyvl.f:177:72: 177 | DO 10090 I=2,NMKP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10090 at (1) ../polyvl.f:93:0: 93 | YFIT=PTWO | Warning: 'ptwo' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sir.o ../sir.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o yairy.o ../yairy.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cher.o ../cher.f ../cher.f:103:0: 103 | INTEGER I, INFO, IX, J, JX, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbsk1e.o ../dbsk1e.f ../dbsk1e.f:2:0: 2 | DOUBLE PRECISION FUNCTION DBSK1E (X) | Warning: '__result_dbsk1e' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpodi.o ../dpodi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o efcmn.o ../efcmn.f ../efcmn.f:142:13: 142 | L = PTEMP(IDATA) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pos3d1.o ../pos3d1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zabs.o ../zabs.f ../zabs.f:2:6: 2 | DOUBLE PRECISION FUNCTION ZABS (ZR, ZI) | 1 Warning: 'zabs' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cher2.o ../cher2.f ../cher2.f:114:0: 114 | INTEGER I, INFO, IX, IY, J, JX, JY, KX, KY | Warning: 'ky' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cher2.f:194:0: 194 | IX = KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cher2.f:114:0: 114 | INTEGER I, INFO, IX, IY, J, JX, JY, KX, KY | Warning: 'jy' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cher2.f:114:0: Warning: 'jx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbskes.o ../dbskes.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpofa.o ../dpofa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ei.o ../ei.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o postg2.o ../postg2.f ../postg2.f:467:0: 467 | IF (NROD .NE. 0) GO TO 193 | Warning: 'nrod' may be used uninitialized in this function [-Wmaybe-uninitialized] ../postg2.f:127:0: 127 | IF (NRODPR .NE. 0) GO TO 120 | Warning: 'nrodpr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sllti2.o ../sllti2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zacai.o ../zacai.f ../zacai.f:86:12: 86 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cher2k.o ../cher2k.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbskin.o ../dbskin.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpofs.o ../dpofs.f ../dpofs.f:152:15: 152 | IND = -LOG10(D1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o eisdoc.o ../eisdoc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ppadd.o ../ppadd.f ../ppadd.f:42:72: 42 | IF (BP(N)-BP(1)) 101,142,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:54:72: 54 | IF (MODIZ) 106,107,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:55:72: 55 | 106 IF (A(1)) 110,142,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:59:72: 59 | IF (PSGF(XL,IZ,C,A,BH)) 108,108,109 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:64:72: 64 | IF (MODIZ) 111,112,111 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:65:72: 65 | 111 IF (A(1)) 112,142,115 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:69:72: 69 | IF (PSGF(XR,IZ,C,A,BH)) 113,114,114 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:79:72: 79 | IF (ABS(PSG)-EPS) 118,118,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:80:72: 80 | 116 IF (PSG*PPSGF(XM,IZ,C,A,BH)) 117,118,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:112:72: 112 | IF (MODIZ) 123,122,123 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:117:72: 117 | IF (ABS(FP)) 126,126,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:120:72: 120 | 126 IF (ABS(FPP)) 132,132,127 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:124:72: 124 | IF (ABS(R1)-ABS(R2)) 129,129,128 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:130:72: 130 | IF (I3) 133,133,131 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:138:72: 138 | IF (ICV) 134,134,135 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:144:72: 144 | IF (ABS(CBP(N))-ABS(CBP(1))) 137,142,139 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:154:72: 154 | IF (AIMAG(CBP(J))) 143,140,143 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppadd.f:134:0: 134 | 133 CX = CX+R1 | Warning: 'IMAGPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../ppadd.f:134:0: Warning: 'REALPART_EXPR ' may be used uninitialized in this function [-Wmaybe-uninitialized] ../ppadd.f:137:0: 137 | IF (ABS(R1) .GT. SCNV) GO TO 120 | Warning: 'r3' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o slpdoc.o ../slpdoc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zacon.o ../zacon.f ../zacon.f:69:12: 69 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zacon.f:178:0: 178 | S1R = SC1R*CSSR(KFLAG) | Warning: 'sc2r' may be used uninitialized in this function [-Wmaybe-uninitialized] ../zacon.f:179:0: 179 | S1I = SC1I*CSSR(KFLAG) | Warning: 'sc2i' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cherk.o ../cherk.f ../cherk.f:289:26: 289 | RTEMP = RTEMP + CONJG( A( L, J ) )*A( L, J ) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] ../cherk.f:301:26: 301 | RTEMP = RTEMP + CONJG( A( L, J ) )*A( L, J ) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbsknu.o ../dbsknu.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpolcf.o ../dpolcf.f ../dpolcf.f:88:72: 88 | DO 10030 I=2,NMKP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10030 at (1) ../dpolcf.f:82:0: 82 | D(1)=PTWO | Warning: 'ptwo' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o elmbak.o ../elmbak.f ../elmbak.f:90:72: 90 | 100 Z(I,J) = Z(I,J) + X * Z(MP,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ppgq8.o ../ppgq8.f ../ppgq8.f:139:72: 139 | IF (EE-AE) 40, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppgq8.f:142:72: 142 | IF (LR(L)) 60, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ppgq8.f:172:72: 172 | IF (LR(L)) 100, 100, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o slvs.o ../slvs.f ../slvs.f:74:72: 74 | 320 WM(I+2) = 1.0E0/DI | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1) ../slvs.f:76:72: 76 | 340 X(I) = WM(I+2)*X(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1) ../slvs.f:2:38: 2 | SUBROUTINE SLVS (WM, IWM, X, TEM) | 1 Warning: Unused dummy argument 'tem' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zairy.o ../zairy.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chfcm.o ../chfcm.f ../chfcm.f:118:17: 118 | ITRUE = SIGN (ONE, DELTA) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbspdr.o ../dbspdr.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpolft.o ../dpolft.f ../dpolft.f:154:72: 154 | 3 W(I) = 1.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 3 at (1) ../dpolft.f:178:72: 178 | 9 A(I) = 0.0D0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 9 at (1) ../dpolft.f:187:72: 187 | 10 W11 = W11 + W(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../dpolft.f:194:72: 194 | 12 W11 = W11 + W(I)*A(K4PI)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 12 at (1) ../dpolft.f:212:72: 212 | 15 SIGJ = SIGJ + W(I)*((Y(I)-R(I)) - A(K5PI))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1) ../dpolft.f:217:72: 217 | IF (EPS) 24,26,27 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dpolft.f:251:72: 251 | 19 W11 = W11 + W(I)*A(K4PI)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 19 at (1) ../dpolft.f:261:72: 261 | 20 TEMD1 = TEMD1 + TEMD2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1) ../dpolft.f:278:72: 278 | 21 SIGJ = SIGJ + W(I)*((Y(I)-R(I)) - A(K5PI))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 21 at (1) ../dpolft.f:283:72: 283 | IF (EPS) 23,26,27 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dpolft.f:229:0: 229 | IF (J .GT. 1) A(K1PJ) = W11/W1 | Warning: 'w1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dpolft.f:355:0: 355 | 36 EPS = SQRT(SIG/XM) | Warning: 'sigpas' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dpolft.f:306:0: 306 | 25 NFAIL = NFAIL + 1 | Warning: 'nfail' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dpolft.f:330:0: 330 | NDEG = JPAS | Warning: 'jpas' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dpolft.f:127:0: 127 | * K4PI,K5,K5PI,KSIG,M,MAXDEG,MOP1,NDEG,NDER,NFAIL | Warning: 'ksig' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o elmhes.o ../elmhes.f ../elmhes.f:111:72: 111 | 140 A(I,J) = A(I,J) - Y * A(M,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) ../elmhes.f:114:72: 114 | 150 A(J,M) = A(J,M) + Y * A(J,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ppgsf.o ../ppgsf.f ../ppgsf.f:2:33: 2 | FUNCTION PPGSF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ppgsf.f:2:30: 2 | FUNCTION PPGSF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'c' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o smout.o ../smout.f ../smout.f:76:72: 76 | DO 10 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1) ../smout.f:87:72: 87 | DO 30 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1) ../smout.f:98:72: 98 | DO 50 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1) ../smout.f:107:72: 107 | DO 70 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 70 at (1) ../smout.f:118:72: 118 | DO 90 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 90 at (1) ../smout.f:129:72: 129 | DO 110 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1) ../smout.f:140:72: 140 | DO 130 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 130 at (1) ../smout.f:149:72: 149 | DO 150 I = 1, M | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zasyi.o ../zasyi.f ../zasyi.f:76:11: 76 | JL = RL+RL + 2 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zasyi.f:84:12: 84 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chfdv.o ../chfdv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbspev.o ../dbspev.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpolvl.o ../dpolvl.f ../dpolvl.f:181:72: 181 | DO 10090 I=2,NMKP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 10090 at (1) ../dpolvl.f:97:0: 97 | YFIT=PTWO | Warning: 'ptwo' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o eltran.o ../eltran.f ../eltran.f:75:72: 75 | 60 Z(I,J) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../eltran.f:88:72: 88 | 100 Z(I,MP) = A(I,MP-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pppsf.o ../pppsf.f ../pppsf.f:2:33: 2 | FUNCTION PPPSF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../pppsf.f:2:30: 2 | FUNCTION PPPSF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'c' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o snbco.o ../snbco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zbesh.o ../zbesh.f ../zbesh.f:293:12: 293 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chfev.o ../chfev.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbsppp.o ../dbsppp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpopt.o ../dpopt.f ../dpopt.f:108:11: 108 | 20004 NEXT=PRGOPT(LAST) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:128:12: 128 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:144:13: 144 | KPRINT=PRGOPT(LAST+2) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:152:38: 152 | IF (PRGOPT(LAST+2).NE.ZERO) IDG=PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:168:42: 168 | IF(PRGOPT(LAST+2).NE.ZERO) IPAGEF = PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:183:41: 183 | IF(PRGOPT(LAST+2).NE.ZERO) ISAVE = PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:199:43: 199 | IF (PRGOPT(LAST+2).NE.ZERO) MXITLP = PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:213:18: 213 | IBASIS(I) = PRGOPT(LAST+2+I) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:277:40: 277 | IF (PRGOPT(LAST+2).NE.ZERO) ITBRC=MAX(ONE,PRGOPT(LAST+3)) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:286:10: 286 | NPP=MAX(PRGOPT(LAST+3),ONE) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpopt.f:317:0: 317 | LPRG=LPRG+LDS | Warning: 'lds' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dpopt.f:70:0: 70 | ROPT(4)=COSTSC | Warning: 'costsc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dpopt.f:68:0: 68 | ROPT(2)=ASMALL | Warning: 'asmall' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dpopt.f:69:0: 69 | ROPT(3)=ABIG | Warning: 'abig' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o enorm.o ../enorm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ppqad.o ../ppqad.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o snbdi.o ../snbdi.f ../snbdi.f:2:43: 2 | SUBROUTINE SNBDI (ABE, LDA, N, ML, MU, IPVT, DET) | 1 Warning: Unused dummy argument 'mu' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zbesi.o ../zbesi.f ../zbesi.f:223:12: 223 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chfie.o ../chfie.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbspvd.o ../dbspvd.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dposl.o ../dposl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o erf.o ../erf.f ../erf.f:2:6: 2 | FUNCTION ERF (X) | 1 Warning: 'erf' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] ../erf.f:2:0: 2 | FUNCTION ERF (X) | Warning: '__result_erf' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ppsgf.o ../ppsgf.f ../ppsgf.f:2:33: 2 | FUNCTION PPSGF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ppsgf.f:2:30: 2 | FUNCTION PPSGF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'c' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o snbfa.o ../snbfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zbesj.o ../zbesj.f ../zbesj.f:214:12: 214 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chico.o ../chico.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbspvn.o ../dbspvn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dppco.o ../dppco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o erfc.o ../erfc.f ../erfc.f:2:6: 2 | FUNCTION ERFC (X) | 1 Warning: 'erfc' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ppspf.o ../ppspf.f ../ppspf.f:2:33: 2 | FUNCTION PPSPF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument] ../ppspf.f:2:30: 2 | FUNCTION PPSPF (X, IZ, C, A, BH) | 1 Warning: Unused dummy argument 'c' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o snbfs.o ../snbfs.f ../snbfs.f:237:15: 237 | IND = -LOG10(R1MACH(4)/RCOND) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zbesk.o ../zbesk.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chidi.o ../chidi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbsqad.o ../dbsqad.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dppdi.o ../dppdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ppval.o ../ppval.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o snbir.o ../snbir.f ../snbir.f:277:12: 277 | IND = -LOG10(MAX(R1MACH(4),DNORM/XNORM)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zbesy.o ../zbesy.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chiev.o ../chiev.f ../chiev.f:171:72: 171 | 16 V(I) = 0. | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 16 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbsynu.o ../dbsynu.f ../dbsynu.f:280:0: 280 | S2 = CK*S2 - S1 | Warning: 's1' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dbsynu.f:292:0: 292 | CK = CK + RX | Warning: 'ck' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpperm.o ../dpperm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o exint.o ../exint.f ../exint.f:128:11: 128 | IX = TX | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../exint.f:204:11: 204 | IX = X+0.5E0 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o proc.o ../proc.f ../proc.f:50:72: 50 | 102 IF (IA) 105,105,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:60:72: 60 | 105 IF (ID) 125,125,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:77:72: 77 | IF (ABS(DEN)) 108,109,108 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:82:72: 82 | IF (NA) 113,113,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:88:72: 88 | 113 IF (M1) 114,114,115 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:89:72: 89 | 114 IF (M2) 111,111,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:90:72: 90 | 115 IF (M2) 117,117,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:91:72: 91 | 116 IF (ABS(BM1(M1))-ABS(BM2(M2))) 120,120,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:92:72: 92 | 117 IF (IBR) 118,118,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:93:72: 93 | 118 IF (ABS(BM1(M1)-BD(ID))-ABS(BM1(M1)-RT)) 111,119,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:97:72: 97 | 120 IF (IBR) 121,121,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:98:72: 98 | 121 IF (ABS(BM2(M2)-BD(ID))-ABS(BM2(M2)-RT)) 111,122,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../proc.f:3:22: 3 | + B, C, D, W, U) | 1 Warning: Unused dummy argument 'u' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o snbsl.o ../snbsl.f ../snbsl.f:126:26: 123 | DO 60 K = 1, N | 2 ...... 126 | T = SDOT(LM,ABE(K-1,ML+2),LDB,B(LB),1) | 1 Warning: Array reference at (1) out of bounds (0 < 1) in loop beginning at (2) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zbinu.o ../zbinu.f ../zbinu.f:106:12: 106 | NUI = FNUL-DFNU + 1 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chifa.o ../chifa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dbvalu.o ../dbvalu.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dppfa.o ../dppfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o exprel.o ../exprel.f ../exprel.f:35:18: 35 | NTERMS = XN - (XN*XLN+ALNEPS)/(XLN+1.36) + 1.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o procp.o ../procp.f ../procp.f:52:72: 52 | 102 IF (IA) 105,105,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:59:72: 59 | 105 IF (ID) 128,128,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:73:72: 73 | IF (MM2-2) 109,107,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:90:72: 90 | IF (ABS(DEN)) 110,111,110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:99:72: 99 | IF (NA) 116,116,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:105:72: 105 | 116 IF (M1) 117,117,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:106:72: 106 | 117 IF (M2) 114,114,123 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:107:72: 107 | 118 IF (M2) 120,120,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:108:72: 108 | 119 IF (ABS(BM1(M1))-ABS(BM2(M2))) 123,123,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:109:72: 109 | 120 IF (IBR) 121,121,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:110:72: 110 | 121 IF (ABS(BM1(M1)-BD(ID))-ABS(BM1(M1)-RT)) 114,122,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:114:72: 114 | 123 IF (IBR) 124,124,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../procp.f:115:72: 115 | 124 IF (ABS(BM2(M2)-BD(ID))-ABS(BM2(M2)-RT)) 114,125,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o snls1.o ../snls1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zbiry.o ../zbiry.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chisl.o ../chisl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dppgq8.o ../dppgq8.f ../dppgq8.f:143:72: 143 | IF (EE-AE) 40, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dppgq8.f:146:72: 146 | IF (LR(L)) 60, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../dppgq8.f:176:72: 176 | IF (LR(L)) 100, 100, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ezfft1.o ../ezfft1.f ../ezfft1.f:36:72: 36 | IF (J-4) 102,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../ezfft1.f:42:72: 42 | IF (NR) 101,105,101 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o prod.o ../prod.f ../prod.f:47:72: 47 | 102 IF (IA) 105,105,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:57:72: 57 | 105 IF (ID) 125,125,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:74:72: 74 | IF (DEN) 108,109,108 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:79:72: 79 | IF (NA) 113,113,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:85:72: 85 | 113 IF (M1) 114,114,115 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:86:72: 86 | 114 IF (M2) 111,111,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:87:72: 87 | 115 IF (M2) 117,117,116 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:88:72: 88 | 116 IF (ABS(BM1(M1))-ABS(BM2(M2))) 120,120,117 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:89:72: 89 | 117 IF (IBR) 118,118,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:90:72: 90 | 118 IF (ABS(BM1(M1)-BD(ID))-ABS(BM1(M1)-RT)) 111,119,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:94:72: 94 | 120 IF (IBR) 121,121,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:95:72: 95 | 121 IF (ABS(BM2(M2)-BD(ID))-ABS(BM2(M2)-RT)) 111,122,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prod.f:3:22: 3 | + B, C, D, W, U) | 1 Warning: Unused dummy argument 'u' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o snls1e.o ../snls1e.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zbknu.o ../zbknu.f ../zbknu.f:73:12: 73 | INU = FNU+0.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zbknu.f:305:10: 305 | K = FK | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zbknu.f:442:0: 442 | CKI = CKI + RZI | Warning: 'cki' may be used uninitialized in this function [-Wmaybe-uninitialized] ../zbknu.f:441:0: 441 | CKR = CKR + RZR | Warning: 'ckr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chkder.o ../chkder.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dppqad.o ../dppqad.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ezfftb.o ../ezfftb.f ../ezfftb.f:104:72: 104 | IF (N-2) 101,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o prodp.o ../prodp.f ../prodp.f:48:72: 48 | 102 IF (IA) 105,105,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:55:72: 55 | 105 IF (ID) 128,128,106 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:69:72: 69 | IF (MM2-2) 109,107,107 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:86:72: 86 | IF (DEN) 110,111,110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:95:72: 95 | IF (NA) 116,116,102 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:101:72: 101 | 116 IF (M1) 117,117,118 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:102:72: 102 | 117 IF (M2) 114,114,123 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:103:72: 103 | 118 IF (M2) 120,120,119 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:104:72: 104 | 119 IF (ABS(BM1(M1))-ABS(BM2(M2))) 123,123,120 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:105:72: 105 | 120 IF (IBR) 121,121,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:106:72: 106 | 121 IF (ABS(BM1(M1)-BD(ID))-ABS(BM1(M1)-RT)) 114,122,122 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:110:72: 110 | 123 IF (IBR) 124,124,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../prodp.f:111:72: 111 | 124 IF (ABS(BM2(M2)-BD(ID))-ABS(BM2(M2)-RT)) 114,125,125 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o snrm2.o ../snrm2.f ../snrm2.f:87:72: 87 | 10 ASSIGN 30 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../snrm2.f:94:19: 94 | 20 GO TO NEXT,(30, 50, 70, 110) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../snrm2.f:96:72: 96 | ASSIGN 50 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../snrm2.f:106:72: 106 | ASSIGN 70 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../snrm2.f:112:72: 112 | ASSIGN 110 TO NEXT | 1 Warning: Deleted feature: ASSIGN statement at (1) ../snrm2.f:146:72: 146 | 95 SUM = SUM + SX(J)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 95 at (1) ../snrm2.f:125:5: 125 | 110 IF (ABS(SX(I)) .LE. XMAX) GO TO 115 | 1 Warning: Label 110 at (1) defined but not used [-Wunused-label] ../snrm2.f:120:5: 120 | 70 IF (ABS(SX(I)) .GT. CUTLO) GO TO 75 | 1 Warning: Label 70 at (1) defined but not used [-Wunused-label] ../snrm2.f:101:5: 101 | 50 IF (SX(I) .EQ. ZERO) GO TO 200 | 1 Warning: Label 50 at (1) defined but not used [-Wunused-label] ../snrm2.f:126:0: 126 | SUM = ONE + SUM * (XMAX / SX(I))**2 | Warning: 'xmax' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zbuni.o ../zbuni.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chkpr4.o ../chkpr4.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dppsl.o ../dppsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ezfftf.o ../ezfftf.f ../ezfftf.f:75:72: 75 | IF (N-2) 101,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o prvec.o ../prvec.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o snsq.o ../snsq.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zbunk.o ../zbunk.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chkprm.o ../chkprm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcbrt.o ../dcbrt.f ../dcbrt.f:32:30: 32 | IF (NITER.EQ.0) NITER = 1.443*LOG(-.106*LOG(0.1*REAL(D1MACH(3))) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../dcbrt.f:46:10: 46 | Z = Y | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dppval.o ../dppval.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ezffti.o ../ezffti.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o prwpge.o ../prwpge.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o snsqe.o ../snsqe.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zdiv.o ../zdiv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chksn4.o ../chksn4.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcdot.o ../dcdot.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dprvec.o ../dprvec.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o fac.o ../fac.f ../fac.f:57:13: 57 | NMAX = XMAX - 1. | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o prwvir.o ../prwvir.f ../prwvir.f:45:13: 45 | IPAGEF=SX(3) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sods.o ../sods.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zexp.o ../zexp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chksng.o ../chksng.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcfod.o ../dcfod.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dprwpg.o ../dprwpg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o fc.o ../fc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o psgf.o ../psgf.f ../psgf.f:25:72: 25 | IF (MOD(IZ,2)) 103,102,103 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o somn.o ../somn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zkscl.o ../zkscl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chpco.o ../chpco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcg.o ../dcg.f ../dcg.f:310:0: 310 | BK = BKNUM/BKDEN | Warning: 'bkden' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dprwvr.o ../dprwvr.f ../dprwvr.f:45:13: 45 | IPAGEF=SX(3) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o fcmn.o ../fcmn.f ../fcmn.f:225:16: 225 | L = PTEMP(IDATA) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o psi.o ../psi.f ../psi.f:98:10: 98 | N = X | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../psi.f:2:0: 2 | FUNCTION PSI (X) | Warning: '__result_psi' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sopenm.o ../sopenm.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zlog.o ../zlog.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chpdi.o ../chpdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcgn.o ../dcgn.f ../dcgn.f:334:0: 334 | BK = BKNUM/BKDEN | Warning: 'bkden' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpsi.o ../dpsi.f ../dpsi.f:122:10: 122 | N = X | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dpsi.f:2:0: 2 | DOUBLE PRECISION FUNCTION DPSI (X) | Warning: '__result_dpsi' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o fdjac1.o ../fdjac1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o psifn.o ../psifn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sorth.o ../sorth.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zmlri.o ../zmlri.f ../zmlri.f:35:12: 35 | IAZ = AZ | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zmlri.f:36:13: 36 | IFNU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chpfa.o ../chpfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcgs.o ../dcgs.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpsifn.o ../dpsifn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o fdjac3.o ../fdjac3.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o psixn.o ../psixn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sos.o ../sos.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zmlt.o ../zmlt.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chpmv.o ../chpmv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dchdc.o ../dchdc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpsixn.o ../dpsixn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o fdump.o ../fdump.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pvalue.o ../pvalue.f ../pvalue.f:73:72: 73 | 1 YP(I) = 0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) ../pvalue.f:99:72: 99 | 5 A(I) = 0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 5 at (1) ../pvalue.f:119:72: 119 | 6 YP(N) = DIF*A(K3PN) + N*A(K3PN-1) - A(K1I)*A(K4PN) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 6 at (1) ../pvalue.f:127:72: 127 | 7 A(K3PN) = YP(N) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 7 at (1) ../pvalue.f:129:72: 129 | 9 A(K3P1) = VAL | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 9 at (1) ../pvalue.f:64:15: 64 | MAXORD = A(1) + 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../pvalue.f:68:13: 68 | NORD = A(K3) + 0.5 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o soseqs.o ../soseqs.f ../soseqs.f:392:0: 392 | IF (FN1 .GT. 5.0*FMIN .OR. FN2 .GT. 5.0*FMIN) IFLAG = 6 | Warning: 'fmin' may be used uninitialized in this function [-Wmaybe-uninitialized] ../soseqs.f:254:0: 254 | KD = ISV - K | Warning: 'isv' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zrati.o ../zrati.f ../zrati.f:35:12: 35 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zrati.f:37:13: 37 | MAGZ = AZ | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chpr.o ../chpr.f ../chpr.f:99:0: 99 | INTEGER I, INFO, IX, J, JX, K, KK, KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dchdd.o ../dchdd.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dpsort.o ../dpsort.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o fftdoc.o ../fftdoc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o pythag.o ../pythag.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o sossol.o ../sossol.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zs1s2.o ../zs1s2.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chpr2.o ../chpr2.f ../chpr2.f:110:0: 110 | INTEGER I, INFO, IX, IY, J, JX, JY, K, KK, KX, KY | Warning: 'ky' may be used uninitialized in this function [-Wmaybe-uninitialized] ../chpr2.f:191:0: 191 | IX = KX | Warning: 'kx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../chpr2.f:110:0: 110 | INTEGER I, INFO, IX, IY, J, JX, JY, K, KK, KX, KY | Warning: 'jy' may be used uninitialized in this function [-Wmaybe-uninitialized] ../chpr2.f:110:0: Warning: 'jx' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dchex.o ../dchex.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dptsl.o ../dptsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o figi.o ../figi.f ../figi.f:86:72: 86 | IF (E2(I)) 1000, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qag.o ../qag.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spbco.o ../spbco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zseri.o ../zseri.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chpsl.o ../chpsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dchfcm.o ../dchfcm.f ../dchfcm.f:119:17: 119 | ITRUE = DSIGN (ONE, DELTA) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqag.o ../dqag.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o figi2.o ../figi2.f ../figi2.f:86:72: 86 | 50 Z(I,J) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) ../figi2.f:90:72: 90 | IF (H) 900, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qage.o ../qage.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spbdi.o ../spbdi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zshch.o ../zshch.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o chu.o ../chu.f ../chu.f:58:10: 58 | N = AINTB | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dchfdv.o ../dchfdv.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqage.o ../dqage.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o fulmat.o ../fulmat.f ../fulmat.f:45:13: 45 | 10 NEXT = PRGOPT(LP) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../fulmat.f:54:12: 54 | 20 KEY = PRGOPT(LP+1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../fulmat.f:63:17: 63 | IFLAG(4) = PRGOPT(LP+3) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../fulmat.f:64:17: 64 | IFLAG(5) = PRGOPT(LP+4) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../fulmat.f:65:17: 65 | IFLAG(6) = PRGOPT(LP+5) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qagi.o ../qagi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spbfa.o ../spbfa.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zsqrt.o ../zsqrt.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cinvit.o ../cinvit.f ../cinvit.f:147:72: 147 | 160 X = X + PYTHAG(AR(I,J),AI(I,J)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1) ../cinvit.f:277:72: 277 | 860 RV1(I) = Y | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 860 at (1) ../cinvit.f:280:0: 280 | RV1(J) = RV1(J) - EPS3 * X | Warning: 'ukroot' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cinvit.f:259:0: 259 | X = RV1(J) | Warning: 'j' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cinvit.f:257:0: 257 | IF (NORM .LT. GROWTO) GO TO 840 | Warning: 'growto' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cinvit.f:280:0: 280 | RV1(J) = RV1(J) - EPS3 * X | Warning: 'eps3' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dchfev.o ../dchfev.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqagi.o ../dqagi.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o fundoc.o ../fundoc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qagie.o ../qagie.f ../qagie.f:428:0: 428 | SMALL = SMALL*0.5E+00 | Warning: 'small' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qagie.f:388:0: 388 | 40 IF(IERRO.EQ.3.OR.ERLARG.LE.ERTEST) GO TO 60 | Warning: 'ertest' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qagie.f:378:0: 378 | ERLARG = ERLARG-ERLAST | Warning: 'erlarg' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spbsl.o ../spbsl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zuchk.o ../zuchk.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o ckscl.o ../ckscl.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dchfie.o ../dchfie.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqagie.o ../dqagie.f ../dqagie.f:422:0: 422 | SMALL = SMALL*0.5D+00 | Warning: 'small' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqagie.f:383:0: 383 | 40 IF(IERRO.EQ.3.OR.ERLARG.LE.ERTEST) GO TO 60 | Warning: 'ertest' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqagie.f:373:0: 373 | ERLARG = ERLARG-ERLAST | Warning: 'erlarg' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o fzero.o ../fzero.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qagp.o ../qagp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o speli4.o ../speli4.f ../speli4.f:290:72: 290 | DO 444 I=IS,MS | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 444 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zunhj.o ../zunhj.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o clbeta.o ../clbeta.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dchkw.o ../dchkw.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqagp.o ../dqagp.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o gami.o ../gami.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qagpe.o ../qagpe.f ../qagpe.f:311:72: 311 | DO 20 J = IP1,NINTP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) ../qagpe.f:543:0: 543 | IF(IERRO.EQ.3) ABSERR = ABSERR+CORREC | Warning: 'correc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qagpe.f:366:0: 366 | IORD(K) = IORD(I) | Warning: 'k' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spelip.o ../spelip.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zuni1.o ../zuni1.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o clngam.o ../clngam.f ../clngam.f:35:13: 35 | N = -0.30*LOG(R1MACH(3)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../clngam.f:74:10: 74 | 30 N = SQRT (BOUND**2 - Y**2) - X + 1.0 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dchu.o ../dchu.f ../dchu.f:58:10: 58 | N = AINTB | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqagpe.o ../dqagpe.f ../dqagpe.f:308:72: 308 | DO 20 J = IP1,NINTP1 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1) ../dqagpe.f:535:0: 535 | IF(IERRO.EQ.3) ABSERR = ABSERR+CORREC | Warning: 'correc' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqagpe.f:361:0: 361 | IORD(K) = IORD(I) | Warning: 'k' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o gamic.o ../gamic.f ../gamic.f:71:11: 71 | MA = A + 0.5*SGA | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../gamic.f:95:0: 95 | IF (A.LT.X) RETURN | Warning: '__result_gamic' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qags.o ../qags.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spenc.o ../spenc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zuni2.o ../zuni2.f ../zuni2.f:73:12: 73 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o clnrel.o ../clnrel.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dchud.o ../dchud.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqags.o ../dqags.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o gamit.o ../gamit.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qagse.o ../qagse.f ../qagse.f:419:0: 419 | SMALL = SMALL*0.5E+00 | Warning: 'small' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qagse.f:377:0: 377 | 40 IF(IERRO.EQ.3.OR.ERLARG.LE.ERTEST) GO TO 60 | Warning: 'ertest' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qagse.f:367:0: 367 | ERLARG = ERLARG-ERLAST | Warning: 'erlarg' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qagse.f:433:0: 433 | IF(IERRO.EQ.3) ABSERR = ABSERR+CORREC | Warning: 'correc' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spigmr.o ../spigmr.f ../spigmr.f:378:0: 378 | IF (RHO .LT. R0NRM) GO TO 150 | Warning: 'rho' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zunik.o ../zunik.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o clog10.o ../clog10.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dckder.o ../dckder.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqagse.o ../dqagse.f ../dqagse.f:415:0: 415 | SMALL = SMALL*0.5D+00 | Warning: 'small' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqagse.f:374:0: 374 | 40 IF(IERRO.EQ.3.OR.ERLARG.LE.ERTEST) GO TO 60 | Warning: 'ertest' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqagse.f:364:0: 364 | ERLARG = ERLARG-ERLAST | Warning: 'erlarg' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqagse.f:429:0: 429 | IF(IERRO.EQ.3) ABSERR = ABSERR+CORREC | Warning: 'correc' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o gamlim.o ../gamlim.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qawc.o ../qawc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spincw.o ../spincw.f ../spincw.f:2:68: 2 | SUBROUTINE SPINCW (MRELAS, NVARS, LMX, LBM, NPP, JSTRT, IBASIS, | 1 Warning: Unused dummy argument 'ibasis' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zunk1.o ../zunk1.f ../zunk1.f:253:12: 253 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zunk1.f:33:0: 33 | INTEGER I, IB, IFLAG, IFN, IL, INIT, INU, IUF, K, KDFLG, KFLAG, | Warning: 'iflag' may be used uninitialized in this function [-Wmaybe-uninitialized] ../zunk1.f:209:0: 209 | C1R = CSRR(KFLAG) | Warning: 'kflag' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cmgnbn.o ../cmgnbn.f ../cmgnbn.f:289:15: 289 | 112 IPSTOR = REAL(W(IWW1)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcoef.o ../dcoef.f ../dcoef.f:128:14: 128 | KFLAG = 0.5D0 * LOG10(EPS) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dcoef.f:2:54: 2 | SUBROUTINE DCOEF (YH, YP, NCOMP, NROWB, NFC, NIC, B, BETA, COEF, | 1 Warning: Unused dummy argument 'nic' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqawc.o ../dqawc.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o gamln.o ../gamln.f ../gamln.f:143:11: 143 | NZ = Z | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../gamln.f:158:11: 158 | MZ = ZM + 1 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../gamln.f:185:11: 185 | NZ = ZINC | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../gamln.f:163:0: 163 | ZINC = ZMIN - NZ | Warning: 'nz' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qawce.o ../qawce.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o spinit.o ../spinit.f ../spinit.f:3:13: 3 | + INFO, AMAT, CSC, COSTSC, COLNRM, XLAMDA, ANORM, RHS, RHSNRM, | 1 Warning: Unused dummy argument 'info' at (1) [-Wunused-dummy-argument] ../spinit.f:184:0: 184 | RHS(I-NVARS)=RHS(I-NVARS)+SCALR | Warning: 'scalr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zunk2.o ../zunk2.f ../zunk2.f:85:12: 85 | INU = FNU | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../zunk2.f:40:0: 40 | INTEGER I, IB, IFLAG, IFN, IL, IN, INU, IUF, K, KDFLG, KFLAG, KK, | Warning: 'iflag' may be used uninitialized in this function [-Wmaybe-uninitialized] ../zunk2.f:264:0: 264 | C1R = CSRR(KFLAG) | Warning: 'kflag' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cmlri.o ../cmlri.f ../cmlri.f:31:12: 31 | IAZ = AZ | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cmlri.f:32:13: 32 | IFNU = FNU | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcopy.o ../dcopy.f ../dcopy.f:49:72: 49 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqawce.o ../dqawce.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o gamma.o ../gamma.f ../gamma.f:2:6: 2 | FUNCTION GAMMA (X) | 1 Warning: 'gamma' declared at (1) is also the name of an intrinsic. It can only be called via an explicit interface or if declared EXTERNAL. [-Wintrinsic-shadow] ../gamma.f:82:10: 82 | N = X | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qawf.o ../qawf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o splp.o ../splp.f ../splp.f:1578:11: 1578 | 20008 NEXT=PRGOPT(LAST) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../splp.f:1597:12: 1597 | KEY = PRGOPT(LAST+1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../splp.f:1605:10: 1605 | LMX=PRGOPT(LAST+3) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../splp.f:1606:10: 1606 | LBM=PRGOPT(LAST+4) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zuoik.o ../zuoik.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cmpcsg.o ../cmpcsg.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcopym.o ../dcopym.f ../dcopym.f:39:72: 39 | IF (INCX .EQ. INCY) IF (INCX-1) 5,20,60 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqawf.o ../dqawf.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o gamr.o ../gamr.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qawfe.o ../qawfe.f ../qawfe.f:280:10: 280 | 10 L = ABS(OMEGA) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../qawfe.f:371:0: 371 | IF(IER.GE.1.AND.IER.NE.7) ABSERR = ABSERR+DRL | Warning: 'drl' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qawfe.f:328:0: 328 | 20 PSUM(NUMRL2) = PSUM(LL)+RSLST(LST) | Warning: 'll' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o splpce.o ../splpce.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o zwrsk.o ../zwrsk.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cmposd.o ../cmposd.f ../cmposd.f:210:0: 210 | GO TO (146,148),NODDPR | Warning: 'noddpr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcosdg.o ../dcosdg.f ../dcosdg.f:31:10: 31 | N = ABS(X)/90.D0 + 0.5D0 | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqawfe.o ../dqawfe.f ../dqawfe.f:279:10: 279 | 10 L = ABS(OMEGA) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] ../dqawfe.f:369:0: 369 | IF(IER.GE.1.AND.IER.NE.7) ABSERR = ABSERR+DRL | Warning: 'drl' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqawfe.f:327:0: 327 | 20 PSUM(NUMRL2) = PSUM(LL)+RSLST(LST) | Warning: 'll' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o gamrn.o ../gamrn.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qawo.o ../qawo.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o splpdm.o ../splpdm.f ../splpdm.f:3:47: 3 | + IBASIS, IMAT, IBRC, IPR, IWR, IND, IBB, ANORM, EPS, UU, GG, | 1 Warning: Unused dummy argument 'ibb' at (1) [-Wunused-dummy-argument] ../splpdm.f:2:43: 2 | SUBROUTINE SPLPDM (MRELAS, NVARS, LMX, LBM, NREDC, INFO, IOPT, | 1 Warning: Unused dummy argument 'lmx' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cmposn.o ../cmposn.f ../cmposn.f:345:0: 345 | IF (NROD .NE. 0) GO TO 173 | Warning: 'nrod' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cmposn.f:137:0: 137 | IF (NRODPR .NE. 0) GO TO 121 | Warning: 'nrodpr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcot.o ../dcot.f ../dcot.f:81:12: 81 | IFN = MOD (AINTY, 2.0D0) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqawo.o ../dqawo.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o gaus8.o ../gaus8.f ../gaus8.f:142:72: 142 | IF (EE-AE) 40, 40, 50 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../gaus8.f:145:72: 145 | IF (LR(L)) 60, 60, 80 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../gaus8.f:175:72: 175 | IF (LR(L)) 100, 100, 110 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../gaus8.f:101:14: 101 | NBITS = ANIB | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../gaus8.f:115:12: 115 | NIB = ANIB | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qawoe.o ../qawoe.f ../qawoe.f:464:0: 464 | 70 IF(IERRO.EQ.3.OR.ERLARG.LE.ERTEST) GO TO 90 | Warning: 'ertest' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qawoe.f:442:0: 442 | ERLARG = ERLARG-ERLAST | Warning: 'erlarg' may be used uninitialized in this function [-Wmaybe-uninitialized] ../qawoe.f:521:0: 521 | IF(IERRO.EQ.3) ABSERR = ABSERR+CORREC | Warning: 'correc' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o splpfe.o ../splpfe.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cmposp.o ../cmposp.f ../cmposp.f:55:15: 55 | IPSTOR = REAL(W(1)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../cmposp.f:100:15: 100 | IPSTOR = REAL(W(1)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcov.o ../dcov.f ../dcov.f:194:72: 194 | 120 R(I,I)=WA1(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../dcov.f:252:72: 252 | DO 290 J=I,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 290 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqawoe.o ../dqawoe.f ../dqawoe.f:460:0: 460 | 70 IF(IERRO.EQ.3.OR.ERLARG.LE.ERTEST) GO TO 90 | Warning: 'ertest' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqawoe.f:439:0: 439 | ERLARG = ERLARG-ERLAST | Warning: 'erlarg' may be used uninitialized in this function [-Wmaybe-uninitialized] ../dqawoe.f:516:0: 516 | IF(IERRO.EQ.3) ABSERR = ABSERR+CORREC | Warning: 'correc' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o genbun.o ../genbun.f ../genbun.f:291:15: 291 | 112 IPSTOR = W(IWW1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qaws.o ../qaws.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o splpfl.o ../splpfl.f ../splpfl.f:3:12: 3 | + IBB, THETA, DIRNRM, RPRNRM, CSC, WW, BL, BU, ERP, RPRIM, | 1 Warning: Unused dummy argument 'ibb' at (1) [-Wunused-dummy-argument] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cmptr3.o ../cmptr3.f ../cmptr3.f:63:0: 63 | 105 IF (N .NE. L3) GO TO 107 | Warning: 'l3' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cmptr3.f:59:0: 59 | 103 IF (N .NE. L2) GO TO 105 | Warning: 'l2' may be used uninitialized in this function [-Wmaybe-uninitialized] ../cmptr3.f:55:0: 55 | IF (N .NE. L1) GO TO 103 | Warning: 'l1' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcpplt.o ../dcpplt.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqaws.o ../dqaws.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o h12.o ../h12.f ../h12.f:56:72: 56 | 10 CL=MAX(ABS(U(1,J)),CL) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) ../h12.f:57:72: 57 | IF (CL) 130,130,20 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../h12.f:61:72: 61 | 30 SM=SM+(U(1,J)*CLINV)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../h12.f:63:72: 63 | IF (U(1,LPIVOT)) 50,50,40 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../h12.f:70:72: 70 | 60 IF (CL) 130,130,70 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../h12.f:75:72: 75 | IF (B) 80,130,130 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../h12.f:88:72: 88 | 90 I3=I3+ICE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1) ../h12.f:89:72: 89 | IF (SM) 100,120,100 | 1 Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1) ../h12.f:94:72: 94 | 110 I4=I4+ICE | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1) f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qawse.o ../qawse.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o splpmn.o ../splpmn.f ../splpmn.f:204:72: 204 | ASSIGN 20013 TO NPR004 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:213:72: 213 | 20014 ASSIGN 20018 TO NPR005 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:215:72: 215 | 20018 ASSIGN 20019 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:217:72: 217 | 20019 ASSIGN 20020 TO NPR007 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:220:72: 220 | ASSIGN 20024 TO NPR008 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:233:72: 233 | ASSIGN 20029 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:235:72: 235 | 20029 ASSIGN 20030 TO NPR010 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:237:72: 237 | 20030 ASSIGN 20031 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:239:72: 239 | 20031 ASSIGN 20032 TO NPR008 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:249:72: 249 | ASSIGN 20036 TO NPR007 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:251:72: 251 | 20036 ASSIGN 20037 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:253:72: 253 | 20037 ASSIGN 20038 TO NPR010 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:255:72: 255 | 20038 ASSIGN 20039 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:257:72: 257 | 20039 ASSIGN 20040 TO NPR008 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:266:72: 266 | ASSIGN 20044 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:283:72: 283 | ASSIGN 20050 TO NPR009 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:288:72: 288 | 20035 ASSIGN 20051 TO NPR011 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:384:72: 384 | ASSIGN 20096 TO NPR012 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:443:18: 443 | GO TO NPR010, (20030,20038) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:445:72: 445 | 30009 ASSIGN 20134 TO NPR013 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:447:72: 447 | 20134 ASSIGN 20135 TO NPR014 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:453:72: 453 | 20139 ASSIGN 20141 TO NPR015 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:464:72: 464 | 20153 ASSIGN 20154 TO NPR005 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:475:18: 475 | GO TO NPR009, (20029,20037,20044,20050) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:549:18: 549 | GO TO NPR004, (20013,20204,20242) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:590:18: 590 | GO TO NPR007, (20020,20036) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:613:72: 613 | ASSIGN 20204 TO NPR004 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:625:18: 625 | GO TO NPR005, (20018,20154,20243) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:681:18: 681 | GO TO NPR008, (20024,20032,20040) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:691:18: 691 | GO TO NPR014, (20135,20246) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:696:72: 696 | ASSIGN 20233 TO NPR011 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:700:72: 700 | ASSIGN 20237 TO NPR012 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:721:72: 721 | ASSIGN 20242 TO NPR004 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:723:72: 723 | 20242 ASSIGN 20243 TO NPR005 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:725:72: 725 | 20243 ASSIGN 20244 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:727:72: 727 | 20244 ASSIGN 20245 TO NPR013 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:729:72: 729 | 20245 ASSIGN 20246 TO NPR014 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:741:72: 741 | 20249 ASSIGN 20251 TO NPR015 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:754:18: 754 | GO TO NPR006, (20019,20031,20039,20244,20275) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:775:18: 775 | GO TO NPR013, (20134,20245,20267) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:784:18: 784 | GO TO NPR015, (20141,20251) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:816:72: 816 | 30011 ASSIGN 20267 TO NPR013 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:827:72: 827 | 20268 ASSIGN 20275 TO NPR006 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmn.f:883:18: 883 | GO TO NPR011, (20051,20233) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:951:18: 951 | GO TO NPR012, (20096,20237) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmn.f:831:5: 831 | 20275 I=1 | 1 Warning: Label 20275 at (1) defined but not used [-Wunused-label] ../splpmn.f:818:5: 818 | 20267 IF (.NOT.(COSTSC.NE.ZERO)) GO TO 20268 | 1 Warning: Label 20267 at (1) defined but not used [-Wunused-label] ../splpmn.f:731:5: 731 | 20246 CONTINUE | 1 Warning: Label 20246 at (1) defined but not used [-Wunused-label] ../splpmn.f:725:5: 725 | 20243 ASSIGN 20244 TO NPR006 | 1 Warning: Label 20243 at (1) defined but not used [-Wunused-label] ../splpmn.f:723:5: 723 | 20242 ASSIGN 20243 TO NPR005 | 1 Warning: Label 20242 at (1) defined but not used [-Wunused-label] ../splpmn.f:615:5: 615 | 20204 CONTINUE | 1 Warning: Label 20204 at (1) defined but not used [-Wunused-label] ../splpmn.f:506:10: 506 | 20159 KEY=AMAT(4) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] ../splpmn.f:265:0: 265 | COSTSC=SCOSTS | Warning: 'scosts' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpmn.f:417:0: 417 | 20116 RHS(I)=RHS(I)+AIJ*SCALR | Warning: 'scalr' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpmn.f:595:0: 595 | 20194 NTRIES=NTRIES+1 | Warning: 'ntries' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpmn.f:293:0: 293 | 20052 IF (.NOT.((.NOT.FEAS).AND.(.NOT.UNBND))) GO TO 10001 | Warning: 'feas' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cmptrx.o ../cmptrx.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcscal.o ../dcscal.f ../dcscal.f:74:20: 74 | IP = -0.5D0*P | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqawse.o ../dqawse.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hfti.o ../hfti.f ../hfti.f:186:72: 186 | 30 H(L)=H(L)+A(I,L)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1) ../hfti.f:201:72: 201 | 60 A(I,LMAX)=TMP | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) ../hfti.f:207:72: 207 | 80 CALL H12 (2,J,J+1,M,A(1,J),1,H(J),B,1,MDB,NB) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) ../hfti.f:226:72: 226 | 120 TMP=TMP+B(I,JB)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) ../hfti.f:227:72: 227 | 130 RNORM(JB)=SQRT(TMP) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1) ../hfti.f:233:72: 233 | DO 150 I=1,N | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1) ../hfti.f:234:72: 234 | 150 B(I,JB)=SZERO | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1) ../hfti.f:243:72: 243 | 170 CALL H12 (1,I,KP1,N,A(I,1),MDA,G(I),A,MDA,1,I-1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) ../hfti.f:258:72: 258 | 190 SM=SM+A(I,J)*DBLE(B(J,JB)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1) ../hfti.f:260:72: 260 | 210 B(I,JB)=(B(I,JB)-SM1)/A(I,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1) ../hfti.f:266:72: 266 | 220 B(J,JB)=SZERO | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1) ../hfti.f:268:72: 268 | 230 CALL H12 (2,I,KP1,N,A(I,1),MDA,G(I),B(1,JB),1,MDB,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1) ../hfti.f:259:18: 259 | 200 SM1=SM | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qc25c.o ../qc25c.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o splpmu.o ../splpmu.f ../splpmu.f:73:72: 73 | ASSIGN 20009 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmu.f:84:72: 84 | ASSIGN 20013 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmu.f:95:72: 95 | ASSIGN 20017 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmu.f:130:72: 130 | ASSIGN 20028 TO NPR001 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmu.f:193:72: 193 | ASSIGN 20042 TO NPR003 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmu.f:293:72: 293 | 20039 ASSIGN 20074 TO NPR003 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmu.f:378:72: 378 | 20029 ASSIGN 20109 TO NPR003 | 1 Warning: Deleted feature: ASSIGN statement at (1) ../splpmu.f:402:18: 402 | GO TO NPR001, (20009,20013,20017,20028) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmu.f:431:18: 431 | GO TO NPR003, (20042,20074,20109) | 1 Warning: Deleted feature: Assigned GOTO statement at (1) ../splpmu.f:286:0: 286 | RG(ABS(IBASIS(IENTER)))= GQ/WP**2 | Warning: 'wp' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpmu.f:119:0: 119 | 20019 IF ((N20018-K).LT.0) GO TO 20020 | Warning: 'n20018' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpmu.f:115:0: 115 | K=1 | Warning: 'k' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpmu.f:265:0: 265 | RG(J)=MAX(RG(J)-TWO*ALPHA*GAMMA+ALPHA**2*GQ,ONE+ALPHA**2) | Warning: 'gq' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpmu.f:97:0: 97 | 20017 THETA=-SCALR-THETA | Warning: 'scalr' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o cnbco.o ../cnbco.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dcsevl.o ../dcsevl.f ../dcsevl.f:62:0: 62 | DCSEVL = 0.5D0*(B0-B2) | Warning: 'b2' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o dqc25c.o ../dqc25c.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o hkseq.o ../hkseq.f f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o qc25f.o ../qc25f.f ../qc25f.f:111:0: 111 | INTEGER I,IERS,INTEGR,ISYM,J,K,KSAVE,M,MAXP1,MOMCOM,NEVAL, | Warning: 'm' may be used uninitialized in this function [-Wmaybe-uninitialized] f77 -g -pipe -Wall -O2 -fPIC -DPIC -c -o splpup.o ../splpup.f ../splpup.f:196:0: 196 | ELSEIF (ABS(AIJ).GT.AMX) THEN | Warning: 'amx' may be used uninitialized in this function [-Wmaybe-uninitialized] ../splpup.f:153:0: 153 | ELSEIF (ABS(AIJ).LT.AMN) THEN | Warning: 'amn' may be used uninitialized in this function [-Wmaybe-uninitialized] cc -shared -Wl,-soname,libslatec.so.4 -o libslatec.so aaaaaa.o cnbdi.o dcv.o dqc25f.o hpperm.o qc25s.o spoco.o acosh.o cnbfa.o ddaini.o dqc25s.o hpsort.o qcheb.o spodi.o ai.o cnbfs.o ddajac.o dqcheb.o hqr.o qelg.o spofa.o aie.o cnbir.o ddanrm.o dqdota.o hqr2.o qform.o spofs.o albeta.o cnbsl.o ddaslv.o dqdoti.o hstart.o qk15.o spoir.o algams.o combak.o ddassl.o dqelg.o hstcrt.o qk15i.o spopt.o ali.o comhes.o ddastp.o dqform.o hstcs1.o qk15w.o sposl.o alngam.o comlr.o ddatrp.o dqk15.o hstcsp.o qk21.o sppco.o alnrel.o comlr2.o ddaws.o dqk15i.o hstcyl.o qk31.o sppdi.o asinh.o compb.o ddawts.o dqk15w.o hstplr.o qk41.o spperm.o asyik.o comqr.o ddcor.o dqk21.o hstssp.o qk51.o sppfa.o asyjy.o comqr2.o ddcst.o dqk31.o htrib3.o qk61.o sppsl.o atanh.o cortb.o ddeabm.o dqk41.o htribk.o qmomo.o spsort.o avint.o corth.o ddebdf.o dqk51.o htrid3.o qnc79.o sptsl.o bakvec.o cosdg.o dderkf.o dqk61.o htridi.o qng.o sqrdc.o balanc.o cosgen.o ddes.o dqmomo.o hvnrm.o qpdoc.o sqrsl.o balbak.o cosqb.o ddntl.o dqnc79.o hw3crt.o qpsrt.o sreadp.o bandr.o cosqb1.o ddntp.o dqng.o hwscrt.o qrfac.o srlcal.o bandv.o cosqf.o ddoglg.o dqpsrt.o hwscs1.o qrsolv.o srot.o bcrh.o cosqf1.o ddot.o dqrdc.o hwscsp.o qs2i1d.o srotg.o bdiff.o cosqi.o ddpsc.o dqrfac.o hwscyl.o qs2i1r.o srotm.o besi.o cost.o ddpst.o dqrsl.o hwsplr.o qwgtc.o srotmg.o besi0.o costi.o ddriv1.o dqrslv.o hwsss1.o qwgtf.o ss2lt.o besi0e.o cot.o ddriv2.o dqwgtc.o hwsssp.o qwgts.o ss2y.o besi1.o cpadd.o ddriv3.o dqwgtf.o i1mach.o qzhes.o ssbmv.o besi1e.o cpbco.o ddscl.o dqwgts.o i1merg.o qzit.o sscal.o besj.o cpbdi.o ddstp.o drc.o icamax.o qzval.o ssd2s.o besj0.o cpbfa.o ddzro.o drc3jj.o icopy.o qzvec.o ssdbcg.o besj1.o cpbsl.o de1.o drc3jm.o idamax.o r1mach.o ssdcg.o besk.o cpevl.o deabm.o drc6j.o idloc.o r1mpyq.o ssdcgn.o besk0.o cpevlr.o debdf.o drd.o imtql1.o r1updt.o ssdcgs.o besk0e.o cpoco.o defc.o dreadp.o imtql2.o r9aimp.o ssdgmr.o besk1.o cpodi.o defcmn.o dreort.o imtqlv.o r9atn1.o ssdi.o besk1e.o cpofa.o defe4.o drf.o indxa.o r9chu.o ssdomn.o beskes.o cpofs.o defehl.o drj.o indxb.o r9gmic.o ssds.o besknu.o cpoir.o defer.o indxc.o r9gmit.o ssdscl.o besks.o cposl.o dei.o drkfs.o initds.o r9knus.o ssgs.o besy.o cppco.o denorm.o drlcal.o inits.o r9lgic.o ssiccg.o besy0.o cppdi.o derf.o drot.o intrv.o r9lgit.o ssico.o besy1.o cppfa.o derfc.o drotg.o intyd.o r9lgmc.o ssics.o besynu.o cppsl.o derkf.o drotm.o invit.o r9ln2r.o ssidi.o beta.o cpqr79.o derkfs.o drotmg.o inxca.o r9pak.o ssiev.o betai.o cproc.o des.o drsco.o inxcb.o r9upak.o ssifa.o bfqad.o cprocp.o ds2lt.o inxcc.o radb2.o ssilur.o bi.o cprod.o dexint.o ds2y.o iploc.o radb3.o ssilus.o bie.o cprodp.o dexprl.o dsbmv.o ipperm.o radb4.o ssisl.o binom.o cpsi.o dfac.o dscal.o ipsort.o radb5.o ssjac.o bint4.o cptsl.o dfc.o dsd2s.o isamax.o radbg.o ssli.o bintk.o cpzero.o dfcmn.o dsdbcg.o isdbcg.o radf2.o ssli2.o bisect.o cqrdc.o dfdjc1.o dsdcg.o isdcg.o radf3.o ssllti.o bkias.o cqrsl.o dfdjc3.o dsdcgn.o isdcgn.o radf4.o sslubc.o bkisr.o crati.o dfehl.o dsdcgs.o isdcgs.o radf5.o sslucn.o bksol.o crotg.o dfspvd.o dsdgmr.o isdgmr.o radfg.o sslucs.o blktr1.o cs1s2.o dfspvn.o dsdi.o isdir.o rand.o sslugm.o blktri.o cscal.o dfulmt.o dsdomn.o isdomn.o ratqr.o sslui.o bndacc.o cscale.o dfzero.o dsdot.o isort.o rc.o sslui2.o bndsol.o cseri.o dgami.o dsds.o issbcg.o rc3jj.o sslui4.o bnfac.o csevl.o dgamic.o dsdscl.o isscg.o rc3jm.o ssluom.o bnslv.o cshch.o dgamit.o dsgs.o isscgn.o rc6j.o ssluti.o bqr.o csico.o dgamlm.o dsiccg.o isscgs.o rd.o ssmmi2.o bsgq8.o csidi.o dgamln.o dsico.o issgmr.o rebak.o ssmmti.o bskin.o csifa.o dgamma.o dsics.o issir.o rebakb.o ssmtv.o bspdoc.o csinh.o dgamr.o dsidi.o issomn.o reduc.o ssmv.o bspdr.o csisl.o dgamrn.o dsifa.o iswap.o reduc2.o ssort.o bspev.o cspco.o dgaus8.o dsilur.o ivout.o reort.o sspco.o bsplvd.o cspdi.o dgbco.o dsilus.o j4save.o rf.o sspdi.o bsplvn.o cspfa.o dgbdi.o dsindg.o jairy.o rfftb.o sspev.o bsppp.o cspsl.o dgbfa.o dsisl.o la05ad.o rfftb1.o sspfa.o bspvd.o csroot.o dgbmv.o dsjac.o la05as.o rfftf.o sspmv.o bspvn.o csrot.o dgbsl.o dsli.o la05bd.o rfftf1.o sspr.o bsqad.o csscal.o dgeco.o dsli2.o la05bs.o rffti.o sspr2.o bsrh.o csvdc.o dgedi.o dsllti.o la05cd.o rffti1.o sspsl.o bvalu.o cswap.o dgefa.o dslubc.o la05cs.o rg.o ssvdc.o csymm.o dgefs.o dslucn.o la05ed.o rgauss.o sswap.o csyr2k.o dgemm.o dslucs.o la05es.o rgg.o ssymm.o csyrk.o dgemv.o dslugm.o llsia.o rj.o ssymv.o c0lgmc.o ctan.o dger.o dslui.o lmpar.o ssyr.o c1merg.o ctanh.o dgesl.o dslui2.o lpdp.o rpqr79.o ssyr2.o c9lgmc.o ctbmv.o dglss.o dslui4.o lsame.o rpzero.o ssyr2k.o c9ln2r.o ctbsv.o dgmres.o dsluom.o lsei.o rs.o ssyrk.o cacai.o ctpmv.o dgtsl.o dsluti.o lsi.o rsb.o stbmv.o cacon.o ctpsv.o dh12.o dslvs.o lsod.o rsco.o stbsv.o cacos.o ctrco.o dhels.o dsmmi2.o lssods.o rsg.o steps.o cacosh.o ctrdi.o dheqr.o dsmmti.o lssuds.o rsgab.o stin.o cairy.o ctrmm.o dhfti.o dsmtv.o macon.o rsgba.o stod.o carg.o ctrmv.o dhkseq.o dsmv.o rsp.o stor1.o casin.o ctrsl.o dhstrt.o dsort.o mc20ad.o rst.o stout.o casinh.o ctrsm.o dhvnrm.o dsos.o mc20as.o rt.o stpmv.o casyi.o ctrsv.o dintp.o dsoseq.o mgsbv.o runif.o stpsv.o catan.o cuchk.o dintrv.o dsossl.o minfit.o rwupdt.o strco.o catan2.o cunhj.o dintyd.o dspco.o minso4.o s1merg.o strdi.o catanh.o cuni1.o dir.o dspdi.o minsol.o sasum.o strmm.o caxpy.o cuni2.o djairy.o dspenc.o mpadd.o saxpy.o strmv.o cbabk2.o cunik.o dlbeta.o dspfa.o mpadd2.o sbcg.o strsl.o cbal.o cunk1.o dlgams.o dsplp.o mpadd3.o sbhin.o strsm.o cbesh.o cunk2.o dli.o dspmv.o mpblas.o sbocls.o strsv.o cbesi.o cuoik.o dllsia.o dspr.o mpcdm.o sbols.o stway.o cbesj.o cv.o dllti2.o dspr2.o mpchk.o sbolsm.o suds.o cbesk.o cwrsk.o dlngam.o dspsl.o mpcmd.o scasum.o svco.o cbesy.o d1mach.o dlnrel.o dsteps.o mpdivi.o scg.o svd.o cbeta.o d1merg.o dlpdoc.o dstod.o mperr.o scgn.o svecs.o cbinu.o d1mpyq.o dlpdp.o dstor1.o mpmaxr.o scgs.o svout.o cbiry.o d1updt.o dlsei.o dstway.o mpmlp.o schdc.o swritp.o cbknu.o d9aimp.o dlsi.o dsuds.o mpmul.o schdd.o sxlcal.o cblkt1.o d9atn1.o dlsod.o dsvco.o mpmul2.o schex.o tevlc.o cblktr.o d9b0mp.o dlssud.o dsvdc.o mpmuli.o schkw.o tevls.o cbrt.o d9b1mp.o dmacon.o dswap.o mpnzr.o schud.o tinvit.o cbuni.o d9chu.o dmgsbv.o dsymm.o mpovfl.o sclosm.o tql1.o cbunk.o d9gmic.o dmout.o dsymv.o mpstr.o scnrm2.o tql2.o ccbrt.o d9gmit.o dmpar.o dsyr.o mpunfl.o scoef.o tqlrat.o cchdc.o d9knus.o dnbco.o dsyr2.o numxer.o scopy.o trbak1.o cchdd.o d9lgic.o dnbdi.o dsyr2k.o ohtrol.o scopym.o trbak3.o cchex.o d9lgit.o dnbfa.o dsyrk.o ohtror.o scov.o tred1.o cchud.o d9lgmc.o dnbfs.o dtbmv.o ortbak.o scpplt.o tred2.o ccmpb.o d9ln2r.o dnbsl.o dtbsv.o orthes.o sdaini.o tred3.o ccopy.o d9pak.o dnls1.o dtin.o ortho4.o sdajac.o tri3.o ccosh.o d9upak.o dnls1e.o dtout.o orthog.o sdanrm.o tridib.o ccot.o dacosh.o dnrm2.o dtpmv.o orthol.o sdaslv.o tridq.o cdcdot.o dai.o dnsq.o dtpsv.o orthor.o sdassl.o tris4.o cdcor.o daie.o dnsqe.o dtrco.o ortran.o sdastp.o trisp.o cdcst.o dasinh.o dogleg.o dtrdi.o passb.o sdatrp.o trix.o cdiv.o dasum.o dohtrl.o dtrmm.o passb2.o sdawts.o tsturm.o cdntl.o dasyik.o domn.o dtrmv.o passb3.o sdcor.o u11ls.o cdntp.o dasyjy.o dorth.o dtrsl.o passb4.o sdcst.o u11us.o cdotc.o datanh.o dorthr.o dtrsm.o passb5.o sdntl.o u12ls.o cdotu.o davint.o dp1vlu.o dtrsv.o passf.o sdntp.o u12us.o cdpsc.o daws.o dpbco.o du11ls.o passf2.o sdot.o ulsia.o cdpst.o daxpy.o dpbdi.o du11us.o passf3.o sdpsc.o usrmat.o cdriv1.o dbcg.o dpbfa.o du12ls.o passf4.o sdpst.o vnwrms.o cdriv2.o dbdiff.o dpbsl.o du12us.o passf5.o sdriv1.o wnlit.o cdriv3.o dbesi.o dpchbs.o dulsia.o pchbs.o sdriv2.o wnlsm.o cdscl.o dbesi0.o dpchce.o dusrmt.o pchce.o sdriv3.o wnlt1.o cdstp.o dbesi1.o dpchci.o dvecs.o pchci.o sdscl.o wnlt2.o cdzro.o dbesj.o dpchcm.o dvnrms.o pchcm.o sdsdot.o wnlt3.o cexprl.o dbesj0.o dpchcs.o dvout.o pchcs.o sdstp.o wnnls.o cfftb.o dbesj1.o dpchdf.o dwnlit.o pchdf.o sdzro.o xadd.o cfftb1.o dbesk.o dpchfd.o dwnlsm.o pchdoc.o sepeli.o xadj.o cfftf.o dbesk0.o dpchfe.o dwnlt1.o pchfd.o sepx4.o xc210.o cfftf1.o dbesk1.o dpchia.o dwnlt2.o pchfe.o sgbco.o xcon.o cffti.o dbesks.o dpchic.o dwnlt3.o pchia.o sgbdi.o xerbla.o cffti1.o dbesy.o dpchid.o dwnnls.o pchic.o sgbfa.o xerclr.o cfod.o dbesy0.o dpchim.o dwritp.o pchid.o sgbmv.o xercnt.o cg.o dbesy1.o dpchkt.o dwupdt.o pchim.o sgbsl.o xerdmp.o cgamma.o dbeta.o dpchng.o dx.o pchkt.o sgeco.o xerhlt.o cgamr.o dbetai.o dpchsp.o dx4.o pchngs.o sgedi.o xermax.o cgbco.o dbfqad.o dpchst.o dxadd.o pchsp.o sgeev.o xermsg.o cgbdi.o dbhin.o dpchsw.o dxadj.o pchst.o sgefa.o xerprn.o cgbfa.o dbi.o dpcoef.o dxc210.o pchsw.o sgefs.o xersve.o cgbmv.o dbie.o dpfqad.o dxcon.o pcoef.o sgeir.o xgetf.o cgbsl.o dbinom.o dpigmr.o dxlcal.o pfqad.o sgemm.o xgetua.o cgeco.o dbint4.o dpincw.o dxlegf.o pgsf.o sgemv.o xgetun.o cgedi.o dbintk.o dpinit.o dxnrmp.o pimach.o sger.o xlegf.o cgeev.o dbkias.o dpintm.o dxpmu.o pinitm.o sgesl.o xnrmp.o cgefa.o dbkisr.o dpjac.o dxpmup.o pjac.o sglss.o xpmu.o cgefs.o dbksol.o dplint.o dxpnrm.o pnnzrs.o sgmres.o xpmup.o cgeir.o dbndac.o dplpce.o dxpqnu.o poch.o sgtsl.o xpnrm.o cgemm.o dbndsl.o dplpdm.o dxpsi.o poch1.o shels.o xpqnu.o cgemv.o dbnfac.o dplpfe.o dxqmu.o pois3d.o sheqr.o xpsi.o cgerc.o dbnslv.o dplpfl.o dxqnu.o poisd2.o sindg.o xqmu.o cgeru.o dbocls.o dplpmn.o dxred.o poisn2.o sinqb.o xqnu.o cgesl.o dbols.o dplpmu.o dxset.o poisp2.o sinqf.o xred.o cgtsl.o dbolsm.o dplpup.o dy.o poistg.o sinqi.o xset.o ch.o dbsgq8.o dpnnzr.o dy4.o polcof.o sint.o xsetf.o chbmv.o dbsi0e.o dpoch.o dyairy.o polfit.o sinti.o xsetua.o chemm.o dbsi1e.o dpoch1.o e1.o polint.o sintrp.o xsetun.o chemv.o dbsk0e.o dpoco.o efc.o polyvl.o sir.o yairy.o cher.o dbsk1e.o dpodi.o efcmn.o pos3d1.o zabs.o cher2.o dbskes.o dpofa.o ei.o postg2.o sllti2.o zacai.o cher2k.o dbskin.o dpofs.o eisdoc.o ppadd.o slpdoc.o zacon.o cherk.o dbsknu.o dpolcf.o elmbak.o ppgq8.o slvs.o zairy.o chfcm.o dbspdr.o dpolft.o elmhes.o ppgsf.o smout.o zasyi.o chfdv.o dbspev.o dpolvl.o eltran.o pppsf.o snbco.o zbesh.o chfev.o dbsppp.o dpopt.o enorm.o ppqad.o snbdi.o zbesi.o chfie.o dbspvd.o dposl.o erf.o ppsgf.o snbfa.o zbesj.o chico.o dbspvn.o dppco.o erfc.o ppspf.o snbfs.o zbesk.o chidi.o dbsqad.o dppdi.o ppval.o snbir.o zbesy.o chiev.o dbsynu.o dpperm.o exint.o proc.o snbsl.o zbinu.o chifa.o dbvalu.o dppfa.o exprel.o procp.o snls1.o zbiry.o chisl.o dppgq8.o ezfft1.o prod.o snls1e.o zbknu.o chkder.o dppqad.o ezfftb.o prodp.o snrm2.o zbuni.o chkpr4.o dppsl.o ezfftf.o prvec.o snsq.o zbunk.o chkprm.o dcbrt.o dppval.o ezffti.o prwpge.o snsqe.o zdiv.o chksn4.o dcdot.o dprvec.o fac.o prwvir.o sods.o zexp.o chksng.o dcfod.o dprwpg.o fc.o psgf.o somn.o zkscl.o chpco.o dcg.o dprwvr.o fcmn.o psi.o sopenm.o zlog.o chpdi.o dcgn.o dpsi.o fdjac1.o psifn.o sorth.o zmlri.o chpfa.o dcgs.o dpsifn.o fdjac3.o psixn.o sos.o zmlt.o chpmv.o dchdc.o dpsixn.o fdump.o pvalue.o soseqs.o zrati.o chpr.o dchdd.o dpsort.o fftdoc.o pythag.o sossol.o zs1s2.o chpr2.o dchex.o dptsl.o figi.o qag.o spbco.o zseri.o chpsl.o dchfcm.o dqag.o figi2.o qage.o spbdi.o zshch.o chu.o dchfdv.o dqage.o fulmat.o qagi.o spbfa.o zsqrt.o cinvit.o dchfev.o dqagi.o fundoc.o qagie.o spbsl.o zuchk.o ckscl.o dchfie.o dqagie.o fzero.o qagp.o speli4.o zunhj.o clbeta.o dchkw.o dqagp.o gami.o qagpe.o spelip.o zuni1.o clngam.o dchu.o dqagpe.o gamic.o qags.o spenc.o zuni2.o clnrel.o dchud.o dqags.o gamit.o qagse.o spigmr.o zunik.o clog10.o dckder.o dqagse.o gamlim.o qawc.o spincw.o zunk1.o cmgnbn.o dcoef.o dqawc.o gamln.o qawce.o spinit.o zunk2.o cmlri.o dcopy.o dqawce.o gamma.o qawf.o splp.o zuoik.o cmpcsg.o dcopym.o dqawf.o gamr.o qawfe.o splpce.o zwrsk.o cmposd.o dcosdg.o dqawfe.o gamrn.o qawo.o splpdm.o cmposn.o dcot.o dqawo.o gaus8.o qawoe.o splpfe.o cmposp.o dcov.o dqawoe.o genbun.o qaws.o splpfl.o cmptr3.o dcpplt.o dqaws.o h12.o qawse.o splpmn.o cmptrx.o dcscal.o dqawse.o hfti.o qc25c.o splpmu.o cnbco.o dcsevl.o dqc25c.o hkseq.o qc25f.o splpup.o -lm -lgfortran -llapack make[1]: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1/dynamic' make: Leaving directory '/usr/src/RPM/BUILD/libslatec-4.1' + mv dynamic/libslatec.so dynamic/libslatec.so.4.1.0 + rm -f aaaaaa.f acosh.f ai.f aie.f albeta.f algams.f ali.f alngam.f alnrel.f asinh.f asyik.f asyjy.f atanh.f avint.f bakvec.f balanc.f balbak.f bandr.f bandv.f bcrh.f bdiff.f besi.f besi0.f besi0e.f besi1.f besi1e.f besj.f besj0.f besj1.f besk.f besk0.f besk0e.f besk1.f besk1e.f beskes.f besknu.f besks.f besy.f besy0.f besy1.f besynu.f beta.f betai.f bfqad.f bi.f bie.f binom.f bint4.f bintk.f bisect.f bkias.f bkisr.f bksol.f blktr1.f blktri.f bndacc.f bndsol.f bnfac.f bnslv.f bqr.f bsgq8.f bskin.f bspdoc.f bspdr.f bspev.f bsplvd.f bsplvn.f bsppp.f bspvd.f bspvn.f bsqad.f bsrh.f bvalu.f bvder.f bvpor.f bvsup.f c0lgmc.f c1merg.f c9lgmc.f c9ln2r.f cacai.f cacon.f cacos.f cacosh.f cairy.f carg.f casin.f casinh.f casyi.f catan.f catan2.f catanh.f caxpy.f cbabk2.f cbal.f cbesh.f cbesi.f cbesj.f cbesk.f cbesy.f cbeta.f cbinu.f cbiry.f cbknu.f cblkt1.f cblktr.f cbrt.f cbuni.f cbunk.f ccbrt.f cchdc.f cchdd.f cchex.f cchud.f ccmpb.f ccopy.f ccosh.f ccot.f cdcdot.f cdcor.f cdcst.f cdiv.f cdntl.f cdntp.f cdotc.f cdotu.f cdpsc.f cdpst.f cdriv1.f cdriv2.f cdriv3.f cdscl.f cdstp.f cdzro.f cexprl.f cfftb.f cfftb1.f cfftf.f cfftf1.f cffti.f cffti1.f cfod.f cg.f cgamma.f cgamr.f cgbco.f cgbdi.f cgbfa.f cgbmv.f cgbsl.f cgeco.f cgedi.f cgeev.f cgefa.f cgefs.f cgeir.f cgemm.f cgemv.f cgerc.f cgeru.f cgesl.f cgtsl.f ch.f chbmv.f chemm.f chemv.f cher.f cher2.f cher2k.f cherk.f chfcm.f chfdv.f chfev.f chfie.f chico.f chidi.f chiev.f chifa.f chisl.f chkder.f chkpr4.f chkprm.f chksn4.f chksng.f chpco.f chpdi.f chpfa.f chpmv.f chpr.f chpr2.f chpsl.f chu.f cinvit.f ckscl.f clbeta.f clngam.f clnrel.f clog10.f cmgnbn.f cmlri.f cmpcsg.f cmposd.f cmposn.f cmposp.f cmptr3.f cmptrx.f cnbco.f cnbdi.f cnbfa.f cnbfs.f cnbir.f cnbsl.f combak.f comhes.f comlr.f comlr2.f compb.f comqr.f comqr2.f cortb.f corth.f cosdg.f cosgen.f cosqb.f cosqb1.f cosqf.f cosqf1.f cosqi.f cost.f costi.f cot.f cpadd.f cpbco.f cpbdi.f cpbfa.f cpbsl.f cpevl.f cpevlr.f cpoco.f cpodi.f cpofa.f cpofs.f cpoir.f cposl.f cppco.f cppdi.f cppfa.f cppsl.f cpqr79.f cproc.f cprocp.f cprod.f cprodp.f cpsi.f cptsl.f cpzero.f cqrdc.f cqrsl.f crati.f crotg.f cs1s2.f cscal.f cscale.f cseri.f csevl.f cshch.f csico.f csidi.f csifa.f csinh.f csisl.f cspco.f cspdi.f cspfa.f cspsl.f csroot.f csrot.f csscal.f csvdc.f cswap.f csymm.f csyr2k.f csyrk.f ctan.f ctanh.f ctbmv.f ctbsv.f ctpmv.f ctpsv.f ctrco.f ctrdi.f ctrmm.f ctrmv.f ctrsl.f ctrsm.f ctrsv.f cuchk.f cunhj.f cuni1.f cuni2.f cunik.f cunk1.f cunk2.f cuoik.f cv.f cwrsk.f d1mach.f d1merg.f d1mpyq.f d1updt.f d9aimp.f d9atn1.f d9b0mp.f d9b1mp.f d9chu.f d9gmic.f d9gmit.f d9knus.f d9lgic.f d9lgit.f d9lgmc.f d9ln2r.f d9pak.f d9upak.f dacosh.f dai.f daie.f dasinh.f dasum.f dasyik.f dasyjy.f datanh.f davint.f daws.f daxpy.f dbcg.f dbdiff.f dbesi.f dbesi0.f dbesi1.f dbesj.f dbesj0.f dbesj1.f dbesk.f dbesk0.f dbesk1.f dbesks.f dbesy.f dbesy0.f dbesy1.f dbeta.f dbetai.f dbfqad.f dbhin.f dbi.f dbie.f dbinom.f dbint4.f dbintk.f dbkias.f dbkisr.f dbksol.f dbndac.f dbndsl.f dbnfac.f dbnslv.f dbocls.f dbols.f dbolsm.f dbsgq8.f dbsi0e.f dbsi1e.f dbsk0e.f dbsk1e.f dbskes.f dbskin.f dbsknu.f dbspdr.f dbspev.f dbsppp.f dbspvd.f dbspvn.f dbsqad.f dbsynu.f dbvalu.f dbvder.f dbvpor.f dbvsup.f dcbrt.f dcdot.f dcfod.f dcg.f dcgn.f dcgs.f dchdc.f dchdd.f dchex.f dchfcm.f dchfdv.f dchfev.f dchfie.f dchkw.f dchu.f dchud.f dckder.f dcoef.f dcopy.f dcopym.f dcosdg.f dcot.f dcov.f dcpplt.f dcscal.f dcsevl.f dcv.f ddaini.f ddajac.f ddanrm.f ddaslv.f ddassl.f ddastp.f ddatrp.f ddaws.f ddawts.f ddcor.f ddcst.f ddeabm.f ddebdf.f dderkf.f ddes.f ddntl.f ddntp.f ddoglg.f ddot.f ddpsc.f ddpst.f ddriv1.f ddriv2.f ddriv3.f ddscl.f ddstp.f ddzro.f de1.f deabm.f debdf.f defc.f defcmn.f defe4.f defehl.f defer.f dei.f denorm.f derf.f derfc.f derkf.f derkfs.f des.f dexbvp.f dexint.f dexprl.f dfac.f dfc.f dfcmn.f dfdjc1.f dfdjc3.f dfehl.f dfspvd.f dfspvn.f dfulmt.f dfzero.f dgami.f dgamic.f dgamit.f dgamlm.f dgamln.f dgamma.f dgamr.f dgamrn.f dgaus8.f dgbco.f dgbdi.f dgbfa.f dgbmv.f dgbsl.f dgeco.f dgedi.f dgefa.f dgefs.f dgemm.f dgemv.f dger.f dgesl.f dglss.f dgmres.f dgtsl.f dh12.f dhels.f dheqr.f dhfti.f dhkseq.f dhstrt.f dhvnrm.f dintp.f dintrv.f dintyd.f dir.f djairy.f dlbeta.f dlgams.f dli.f dllsia.f dllti2.f dlngam.f dlnrel.f dlpdoc.f dlpdp.f dlsei.f dlsi.f dlsod.f dlssud.f dmacon.f dmgsbv.f dmout.f dmpar.f dnbco.f dnbdi.f dnbfa.f dnbfs.f dnbsl.f dnls1.f dnls1e.f dnrm2.f dnsq.f dnsqe.f dogleg.f dohtrl.f domn.f dorth.f dorthr.f dp1vlu.f dpbco.f dpbdi.f dpbfa.f dpbsl.f dpchbs.f dpchce.f dpchci.f dpchcm.f dpchcs.f dpchdf.f dpchfd.f dpchfe.f dpchia.f dpchic.f dpchid.f dpchim.f dpchkt.f dpchng.f dpchsp.f dpchst.f dpchsw.f dpcoef.f dpfqad.f dpigmr.f dpincw.f dpinit.f dpintm.f dpjac.f dplint.f dplpce.f dplpdm.f dplpfe.f dplpfl.f dplpmn.f dplpmu.f dplpup.f dpnnzr.f dpoch.f dpoch1.f dpoco.f dpodi.f dpofa.f dpofs.f dpolcf.f dpolft.f dpolvl.f dpopt.f dposl.f dppco.f dppdi.f dpperm.f dppfa.f dppgq8.f dppqad.f dppsl.f dppval.f dprvec.f dprwpg.f dprwvr.f dpsi.f dpsifn.f dpsixn.f dpsort.f dptsl.f dqag.f dqage.f dqagi.f dqagie.f dqagp.f dqagpe.f dqags.f dqagse.f dqawc.f dqawce.f dqawf.f dqawfe.f dqawo.f dqawoe.f dqaws.f dqawse.f dqc25c.f dqc25f.f dqc25s.f dqcheb.f dqdota.f dqdoti.f dqelg.f dqform.f dqk15.f dqk15i.f dqk15w.f dqk21.f dqk31.f dqk41.f dqk51.f dqk61.f dqmomo.f dqnc79.f dqng.f dqpsrt.f dqrdc.f dqrfac.f dqrsl.f dqrslv.f dqwgtc.f dqwgtf.f dqwgts.f drc.f drc3jj.f drc3jm.f drc6j.f drd.f dreadp.f dreort.f drf.f drj.f drkfab.f drkfs.f drlcal.f drot.f drotg.f drotm.f drotmg.f drsco.f ds2lt.f ds2y.f dsbmv.f dscal.f dsd2s.f dsdbcg.f dsdcg.f dsdcgn.f dsdcgs.f dsdgmr.f dsdi.f dsdomn.f dsdot.f dsds.f dsdscl.f dsgs.f dsiccg.f dsico.f dsics.f dsidi.f dsifa.f dsilur.f dsilus.f dsindg.f dsisl.f dsjac.f dsli.f dsli2.f dsllti.f dslubc.f dslucn.f dslucs.f dslugm.f dslui.f dslui2.f dslui4.f dsluom.f dsluti.f dslvs.f dsmmi2.f dsmmti.f dsmtv.f dsmv.f dsort.f dsos.f dsoseq.f dsossl.f dspco.f dspdi.f dspenc.f dspfa.f dsplp.f dspmv.f dspr.f dspr2.f dspsl.f dsteps.f dstod.f dstor1.f dstway.f dsuds.f dsvco.f dsvdc.f dswap.f dsymm.f dsymv.f dsyr.f dsyr2.f dsyr2k.f dsyrk.f dtbmv.f dtbsv.f dtin.f dtout.f dtpmv.f dtpsv.f dtrco.f dtrdi.f dtrmm.f dtrmv.f dtrsl.f dtrsm.f dtrsv.f du11ls.f du11us.f du12ls.f du12us.f dulsia.f dusrmt.f dvecs.f dvnrms.f dvout.f dwnlit.f dwnlsm.f dwnlt1.f dwnlt2.f dwnlt3.f dwnnls.f dwritp.f dwupdt.f dx.f dx4.f dxadd.f dxadj.f dxc210.f dxcon.f dxlcal.f dxlegf.f dxnrmp.f dxpmu.f dxpmup.f dxpnrm.f dxpqnu.f dxpsi.f dxqmu.f dxqnu.f dxred.f dxset.f dy.f dy4.f dyairy.f e1.f efc.f efcmn.f ei.f eisdoc.f elmbak.f elmhes.f eltran.f enorm.f erf.f erfc.f exbvp.f exint.f exprel.f ezfft1.f ezfftb.f ezfftf.f ezffti.f fac.f fc.f fcmn.f fdjac1.f fdjac3.f fdump.f fftdoc.f figi.f figi2.f fulmat.f fundoc.f fzero.f gami.f gamic.f gamit.f gamlim.f gamln.f gamma.f gamr.f gamrn.f gaus8.f genbun.f h12.f hfti.f hkseq.f hpperm.f hpsort.f hqr.f hqr2.f hstart.f hstcrt.f hstcs1.f hstcsp.f hstcyl.f hstplr.f hstssp.f htrib3.f htribk.f htrid3.f htridi.f hvnrm.f hw3crt.f hwscrt.f hwscs1.f hwscsp.f hwscyl.f hwsplr.f hwsss1.f hwsssp.f i1mach.f i1merg.f icamax.f icopy.f idamax.f idloc.f imtql1.f imtql2.f imtqlv.f indxa.f indxb.f indxc.f initds.f inits.f intrv.f intyd.f invit.f inxca.f inxcb.f inxcc.f iploc.f ipperm.f ipsort.f isamax.f isdbcg.f isdcg.f isdcgn.f isdcgs.f isdgmr.f isdir.f isdomn.f isort.f issbcg.f isscg.f isscgn.f isscgs.f issgmr.f issir.f issomn.f iswap.f ivout.f j4save.f jairy.f la05ad.f la05as.f la05bd.f la05bs.f la05cd.f la05cs.f la05ed.f la05es.f llsia.f lmpar.f lpdp.f lsame.f lsei.f lsi.f lsod.f lssods.f lssuds.f macon.f mc20ad.f mc20as.f mgsbv.f minfit.f minso4.f minsol.f mpadd.f mpadd2.f mpadd3.f mpblas.f mpcdm.f mpchk.f mpcmd.f mpdivi.f mperr.f mpmaxr.f mpmlp.f mpmul.f mpmul2.f mpmuli.f mpnzr.f mpovfl.f mpstr.f mpunfl.f numxer.f ohtrol.f ohtror.f ortbak.f orthes.f ortho4.f orthog.f orthol.f orthor.f ortran.f passb.f passb2.f passb3.f passb4.f passb5.f passf.f passf2.f passf3.f passf4.f passf5.f pchbs.f pchce.f pchci.f pchcm.f pchcs.f pchdf.f pchdoc.f pchfd.f pchfe.f pchia.f pchic.f pchid.f pchim.f pchkt.f pchngs.f pchsp.f pchst.f pchsw.f pcoef.f pfqad.f pgsf.f pimach.f pinitm.f pjac.f pnnzrs.f poch.f poch1.f pois3d.f poisd2.f poisn2.f poisp2.f poistg.f polcof.f polfit.f polint.f polyvl.f pos3d1.f postg2.f ppadd.f ppgq8.f ppgsf.f pppsf.f ppqad.f ppsgf.f ppspf.f ppval.f proc.f procp.f prod.f prodp.f prvec.f prwpge.f prwvir.f psgf.f psi.f psifn.f psixn.f pvalue.f pythag.f qag.f qage.f qagi.f qagie.f qagp.f qagpe.f qags.f qagse.f qawc.f qawce.f qawf.f qawfe.f qawo.f qawoe.f qaws.f qawse.f qc25c.f qc25f.f qc25s.f qcheb.f qelg.f qform.f qk15.f qk15i.f qk15w.f qk21.f qk31.f qk41.f qk51.f qk61.f qmomo.f qnc79.f qng.f qpdoc.f qpsrt.f qrfac.f qrsolv.f qs2i1d.f qs2i1r.f qwgtc.f qwgtf.f qwgts.f qzhes.f qzit.f qzval.f qzvec.f r1mach.f r1mpyq.f r1updt.f r9aimp.f r9atn1.f r9chu.f r9gmic.f r9gmit.f r9knus.f r9lgic.f r9lgit.f r9lgmc.f r9ln2r.f r9pak.f r9upak.f radb2.f radb3.f radb4.f radb5.f radbg.f radf2.f radf3.f radf4.f radf5.f radfg.f rand.f ratqr.f rc.f rc3jj.f rc3jm.f rc6j.f rd.f rebak.f rebakb.f reduc.f reduc2.f reort.f rf.f rfftb.f rfftb1.f rfftf.f rfftf1.f rffti.f rffti1.f rg.f rgauss.f rgg.f rj.f rkfab.f rpqr79.f rpzero.f rs.f rsb.f rsco.f rsg.f rsgab.f rsgba.f rsp.f rst.f rt.f runif.f rwupdt.f s1merg.f sasum.f saxpy.f sbcg.f sbhin.f sbocls.f sbols.f sbolsm.f scasum.f scg.f scgn.f scgs.f schdc.f schdd.f schex.f schkw.f schud.f sclosm.f scnrm2.f scoef.f scopy.f scopym.f scov.f scpplt.f sdaini.f sdajac.f sdanrm.f sdaslv.f sdassl.f sdastp.f sdatrp.f sdawts.f sdcor.f sdcst.f sdntl.f sdntp.f sdot.f sdpsc.f sdpst.f sdriv1.f sdriv2.f sdriv3.f sdscl.f sdsdot.f sdstp.f sdzro.f sepeli.f sepx4.f sgbco.f sgbdi.f sgbfa.f sgbmv.f sgbsl.f sgeco.f sgedi.f sgeev.f sgefa.f sgefs.f sgeir.f sgemm.f sgemv.f sger.f sgesl.f sglss.f sgmres.f sgtsl.f shels.f sheqr.f sindg.f sinqb.f sinqf.f sinqi.f sint.f sinti.f sintrp.f sir.f sllti2.f slpdoc.f slvs.f smout.f snbco.f snbdi.f snbfa.f snbfs.f snbir.f snbsl.f snls1.f snls1e.f snrm2.f snsq.f snsqe.f sods.f somn.f sopenm.f sorth.f sos.f soseqs.f sossol.f spbco.f spbdi.f spbfa.f spbsl.f speli4.f spelip.f spenc.f spigmr.f spincw.f spinit.f splp.f splpce.f splpdm.f splpfe.f splpfl.f splpmn.f splpmu.f splpup.f spoco.f spodi.f spofa.f spofs.f spoir.f spopt.f sposl.f sppco.f sppdi.f spperm.f sppfa.f sppsl.f spsort.f sptsl.f sqrdc.f sqrsl.f sreadp.f srlcal.f srot.f srotg.f srotm.f srotmg.f ss2lt.f ss2y.f ssbmv.f sscal.f ssd2s.f ssdbcg.f ssdcg.f ssdcgn.f ssdcgs.f ssdgmr.f ssdi.f ssdomn.f ssds.f ssdscl.f ssgs.f ssiccg.f ssico.f ssics.f ssidi.f ssiev.f ssifa.f ssilur.f ssilus.f ssisl.f ssjac.f ssli.f ssli2.f ssllti.f sslubc.f sslucn.f sslucs.f sslugm.f sslui.f sslui2.f sslui4.f ssluom.f ssluti.f ssmmi2.f ssmmti.f ssmtv.f ssmv.f ssort.f sspco.f sspdi.f sspev.f sspfa.f sspmv.f sspr.f sspr2.f sspsl.f ssvdc.f sswap.f ssymm.f ssymv.f ssyr.f ssyr2.f ssyr2k.f ssyrk.f stbmv.f stbsv.f steps.f stin.f stod.f stor1.f stout.f stpmv.f stpsv.f strco.f strdi.f strmm.f strmv.f strsl.f strsm.f strsv.f stway.f suds.f svco.f svd.f svecs.f svout.f swritp.f sxlcal.f tevlc.f tevls.f tinvit.f tql1.f tql2.f tqlrat.f trbak1.f trbak3.f tred1.f tred2.f tred3.f tri3.f tridib.f tridq.f tris4.f trisp.f trix.f tsturm.f u11ls.f u11us.f u12ls.f u12us.f ulsia.f usrmat.f vnwrms.f wnlit.f wnlsm.f wnlt1.f wnlt2.f wnlt3.f wnnls.f xadd.f xadj.f xc210.f xcon.f xerbla.f xerclr.f xercnt.f xerdmp.f xerhlt.f xermax.f xermsg.f xerprn.f xersve.f xgetf.f xgetua.f xgetun.f xlegf.f xnrmp.f xpmu.f xpmup.f xpnrm.f xpqnu.f xpsi.f xqmu.f xqnu.f xred.f xset.f xsetf.f xsetua.f xsetun.f yairy.f zabs.f zacai.f zacon.f zairy.f zasyi.f zbesh.f zbesi.f zbesj.f zbesk.f zbesy.f zbinu.f zbiry.f zbknu.f zbuni.f zbunk.f zdiv.f zexp.f zkscl.f zlog.f zmlri.f zmlt.f zrati.f zs1s2.f zseri.f zshch.f zsqrt.f zuchk.f zunhj.f zuni1.f zuni2.f zunik.f zunk1.f zunk2.f zuoik.f zwrsk.f ++ sed -e 's/\(.*\)\.1/\1/' ++ ls aaaaaa.1 acosh.1 ai.1 aie.1 albeta.1 algams.1 ali.1 alngam.1 alnrel.1 asinh.1 asyik.1 asyjy.1 atanh.1 avint.1 bakvec.1 balanc.1 balbak.1 bandr.1 bandv.1 bcrh.1 bdiff.1 besi.1 besi0.1 besi0e.1 besi1.1 besi1e.1 besj.1 besj0.1 besj1.1 besk.1 besk0.1 besk0e.1 besk1.1 besk1e.1 beskes.1 besknu.1 besks.1 besy.1 besy0.1 besy1.1 besynu.1 beta.1 betai.1 bfqad.1 bi.1 bie.1 binom.1 bint4.1 bintk.1 bisect.1 bkias.1 bkisr.1 bksol.1 blktr1.1 blktri.1 bndacc.1 bndsol.1 bnfac.1 bnslv.1 bqr.1 bsgq8.1 bskin.1 bspdoc.1 bspdr.1 bspev.1 bsplvd.1 bsplvn.1 bsppp.1 bspvd.1 bspvn.1 bsqad.1 bsrh.1 bvalu.1 c0lgmc.1 c1merg.1 c9lgmc.1 c9ln2r.1 cacai.1 cacon.1 cacos.1 cacosh.1 cairy.1 carg.1 casin.1 casinh.1 casyi.1 catan.1 catan2.1 catanh.1 caxpy.1 cbabk2.1 cbal.1 cbesh.1 cbesi.1 cbesj.1 cbesk.1 cbesy.1 cbeta.1 cbinu.1 cbiry.1 cbknu.1 cblkt1.1 cblktr.1 cbrt.1 cbuni.1 cbunk.1 ccbrt.1 cchdc.1 cchdd.1 cchex.1 cchud.1 ccmpb.1 ccopy.1 ccosh.1 ccot.1 cdcdot.1 cdcor.1 cdcst.1 cdiv.1 cdntl.1 cdntp.1 cdotc.1 cdotu.1 cdpsc.1 cdpst.1 cdriv1.1 cdriv2.1 cdriv3.1 cdscl.1 cdstp.1 cdzro.1 cexprl.1 cfftb.1 cfftb1.1 cfftf.1 cfftf1.1 cffti.1 cffti1.1 cfod.1 cg.1 cgamma.1 cgamr.1 cgbco.1 cgbdi.1 cgbfa.1 cgbmv.1 cgbsl.1 cgeco.1 cgedi.1 cgeev.1 cgefa.1 cgefs.1 cgeir.1 cgemm.1 cgemv.1 cgerc.1 cgeru.1 cgesl.1 cgtsl.1 ch.1 chbmv.1 chemm.1 chemv.1 cher.1 cher2.1 cher2k.1 cherk.1 chfcm.1 chfdv.1 chfev.1 chfie.1 chico.1 chidi.1 chiev.1 chifa.1 chisl.1 chkder.1 chkpr4.1 chkprm.1 chksn4.1 chksng.1 chpco.1 chpdi.1 chpfa.1 chpmv.1 chpr.1 chpr2.1 chpsl.1 chu.1 cinvit.1 ckscl.1 clbeta.1 clngam.1 clnrel.1 clog10.1 cmgnbn.1 cmlri.1 cmpcsg.1 cmposd.1 cmposn.1 cmposp.1 cmptr3.1 cmptrx.1 cnbco.1 cnbdi.1 cnbfa.1 cnbfs.1 cnbir.1 cnbsl.1 combak.1 comhes.1 comlr.1 comlr2.1 compb.1 comqr.1 comqr2.1 cortb.1 corth.1 cosdg.1 cosgen.1 cosqb.1 cosqb1.1 cosqf.1 cosqf1.1 cosqi.1 cost.1 costi.1 cot.1 cpadd.1 cpbco.1 cpbdi.1 cpbfa.1 cpbsl.1 cpevl.1 cpevlr.1 cpoco.1 cpodi.1 cpofa.1 cpofs.1 cpoir.1 cposl.1 cppco.1 cppdi.1 cppfa.1 cppsl.1 cpqr79.1 cproc.1 cprocp.1 cprod.1 cprodp.1 cpsi.1 cptsl.1 cpzero.1 cqrdc.1 cqrsl.1 crati.1 crotg.1 cs1s2.1 cscal.1 cscale.1 cseri.1 csevl.1 cshch.1 csico.1 csidi.1 csifa.1 csinh.1 csisl.1 cspco.1 cspdi.1 cspfa.1 cspsl.1 csroot.1 csrot.1 csscal.1 csvdc.1 cswap.1 csymm.1 csyr2k.1 csyrk.1 ctan.1 ctanh.1 ctbmv.1 ctbsv.1 ctpmv.1 ctpsv.1 ctrco.1 ctrdi.1 ctrmm.1 ctrmv.1 ctrsl.1 ctrsm.1 ctrsv.1 cuchk.1 cunhj.1 cuni1.1 cuni2.1 cunik.1 cunk1.1 cunk2.1 cuoik.1 cv.1 cwrsk.1 d1mach.1 d1merg.1 d1mpyq.1 d1updt.1 d9aimp.1 d9atn1.1 d9b0mp.1 d9b1mp.1 d9chu.1 d9gmic.1 d9gmit.1 d9knus.1 d9lgic.1 d9lgit.1 d9lgmc.1 d9ln2r.1 d9pak.1 d9upak.1 dacosh.1 dai.1 daie.1 dasinh.1 dasum.1 dasyik.1 dasyjy.1 datanh.1 davint.1 daws.1 daxpy.1 dbcg.1 dbdiff.1 dbesi.1 dbesi0.1 dbesi1.1 dbesj.1 dbesj0.1 dbesj1.1 dbesk.1 dbesk0.1 dbesk1.1 dbesks.1 dbesy.1 dbesy0.1 dbesy1.1 dbeta.1 dbetai.1 dbfqad.1 dbhin.1 dbi.1 dbie.1 dbinom.1 dbint4.1 dbintk.1 dbkias.1 dbkisr.1 dbksol.1 dbndac.1 dbndsl.1 dbnfac.1 dbnslv.1 dbocls.1 dbols.1 dbolsm.1 dbsgq8.1 dbsi0e.1 dbsi1e.1 dbsk0e.1 dbsk1e.1 dbskes.1 dbskin.1 dbsknu.1 dbspdr.1 dbspev.1 dbsppp.1 dbspvd.1 dbspvn.1 dbsqad.1 dbsynu.1 dbvalu.1 dcbrt.1 dcdot.1 dcfod.1 dcg.1 dcgn.1 dcgs.1 dchdc.1 dchdd.1 dchex.1 dchfcm.1 dchfdv.1 dchfev.1 dchfie.1 dchkw.1 dchu.1 dchud.1 dckder.1 dcoef.1 dcopy.1 dcopym.1 dcosdg.1 dcot.1 dcov.1 dcpplt.1 dcscal.1 dcsevl.1 dcv.1 ddaini.1 ddajac.1 ddanrm.1 ddaslv.1 ddassl.1 ddastp.1 ddatrp.1 ddaws.1 ddawts.1 ddcor.1 ddcst.1 ddeabm.1 ddebdf.1 dderkf.1 ddes.1 ddntl.1 ddntp.1 ddoglg.1 ddot.1 ddpsc.1 ddpst.1 ddriv1.1 ddriv2.1 ddriv3.1 ddscl.1 ddstp.1 ddzro.1 de1.1 deabm.1 debdf.1 defc.1 defcmn.1 defe4.1 defehl.1 defer.1 dei.1 denorm.1 derf.1 derfc.1 derkf.1 derkfs.1 des.1 dexint.1 dexprl.1 dfac.1 dfc.1 dfcmn.1 dfdjc1.1 dfdjc3.1 dfehl.1 dfspvd.1 dfspvn.1 dfulmt.1 dfzero.1 dgami.1 dgamic.1 dgamit.1 dgamlm.1 dgamln.1 dgamma.1 dgamr.1 dgamrn.1 dgaus8.1 dgbco.1 dgbdi.1 dgbfa.1 dgbmv.1 dgbsl.1 dgeco.1 dgedi.1 dgefa.1 dgefs.1 dgemm.1 dgemv.1 dger.1 dgesl.1 dglss.1 dgmres.1 dgtsl.1 dh12.1 dhels.1 dheqr.1 dhfti.1 dhkseq.1 dhstrt.1 dhvnrm.1 dintp.1 dintrv.1 dintyd.1 dir.1 djairy.1 dlbeta.1 dlgams.1 dli.1 dllsia.1 dllti2.1 dlngam.1 dlnrel.1 dlpdoc.1 dlpdp.1 dlsei.1 dlsi.1 dlsod.1 dlssud.1 dmacon.1 dmgsbv.1 dmout.1 dmpar.1 dnbco.1 dnbdi.1 dnbfa.1 dnbfs.1 dnbsl.1 dnls1.1 dnls1e.1 dnrm2.1 dnsq.1 dnsqe.1 dogleg.1 dohtrl.1 domn.1 dorth.1 dorthr.1 dp1vlu.1 dpbco.1 dpbdi.1 dpbfa.1 dpbsl.1 dpchbs.1 dpchce.1 dpchci.1 dpchcm.1 dpchcs.1 dpchdf.1 dpchfd.1 dpchfe.1 dpchia.1 dpchic.1 dpchid.1 dpchim.1 dpchkt.1 dpchng.1 dpchsp.1 dpchst.1 dpchsw.1 dpcoef.1 dpfqad.1 dpigmr.1 dpincw.1 dpinit.1 dpintm.1 dpjac.1 dplint.1 dplpce.1 dplpdm.1 dplpfe.1 dplpfl.1 dplpmn.1 dplpmu.1 dplpup.1 dpnnzr.1 dpoch.1 dpoch1.1 dpoco.1 dpodi.1 dpofa.1 dpofs.1 dpolcf.1 dpolft.1 dpolvl.1 dpopt.1 dposl.1 dppco.1 dppdi.1 dpperm.1 dppfa.1 dppgq8.1 dppqad.1 dppsl.1 dppval.1 dprvec.1 dprwpg.1 dprwvr.1 dpsi.1 dpsifn.1 dpsixn.1 dpsort.1 dptsl.1 dqag.1 dqage.1 dqagi.1 dqagie.1 dqagp.1 dqagpe.1 dqags.1 dqagse.1 dqawc.1 dqawce.1 dqawf.1 dqawfe.1 dqawo.1 dqawoe.1 dqaws.1 dqawse.1 dqc25c.1 dqc25f.1 dqc25s.1 dqcheb.1 dqdota.1 dqdoti.1 dqelg.1 dqform.1 dqk15.1 dqk15i.1 dqk15w.1 dqk21.1 dqk31.1 dqk41.1 dqk51.1 dqk61.1 dqmomo.1 dqnc79.1 dqng.1 dqpsrt.1 dqrdc.1 dqrfac.1 dqrsl.1 dqrslv.1 dqwgtc.1 dqwgtf.1 dqwgts.1 drc.1 drc3jj.1 drc3jm.1 drc6j.1 drd.1 dreadp.1 dreort.1 drf.1 drj.1 drkfs.1 drlcal.1 drot.1 drotg.1 drotm.1 drotmg.1 drsco.1 ds2lt.1 ds2y.1 dsbmv.1 dscal.1 dsd2s.1 dsdbcg.1 dsdcg.1 dsdcgn.1 dsdcgs.1 dsdgmr.1 dsdi.1 dsdomn.1 dsdot.1 dsds.1 dsdscl.1 dsgs.1 dsiccg.1 dsico.1 dsics.1 dsidi.1 dsifa.1 dsilur.1 dsilus.1 dsindg.1 dsisl.1 dsjac.1 dsli.1 dsli2.1 dsllti.1 dslubc.1 dslucn.1 dslucs.1 dslugm.1 dslui.1 dslui2.1 dslui4.1 dsluom.1 dsluti.1 dslvs.1 dsmmi2.1 dsmmti.1 dsmtv.1 dsmv.1 dsort.1 dsos.1 dsoseq.1 dsossl.1 dspco.1 dspdi.1 dspenc.1 dspfa.1 dsplp.1 dspmv.1 dspr.1 dspr2.1 dspsl.1 dsteps.1 dstod.1 dstor1.1 dstway.1 dsuds.1 dsvco.1 dsvdc.1 dswap.1 dsymm.1 dsymv.1 dsyr.1 dsyr2.1 dsyr2k.1 dsyrk.1 dtbmv.1 dtbsv.1 dtin.1 dtout.1 dtpmv.1 dtpsv.1 dtrco.1 dtrdi.1 dtrmm.1 dtrmv.1 dtrsl.1 dtrsm.1 dtrsv.1 du11ls.1 du11us.1 du12ls.1 du12us.1 dulsia.1 dusrmt.1 dvecs.1 dvnrms.1 dvout.1 dwnlit.1 dwnlsm.1 dwnlt1.1 dwnlt2.1 dwnlt3.1 dwnnls.1 dwritp.1 dwupdt.1 dx.1 dx4.1 dxadd.1 dxadj.1 dxc210.1 dxcon.1 dxlcal.1 dxlegf.1 dxnrmp.1 dxpmu.1 dxpmup.1 dxpnrm.1 dxpqnu.1 dxpsi.1 dxqmu.1 dxqnu.1 dxred.1 dxset.1 dy.1 dy4.1 dyairy.1 e1.1 efc.1 efcmn.1 ei.1 eisdoc.1 elmbak.1 elmhes.1 eltran.1 enorm.1 erf.1 erfc.1 exint.1 exprel.1 ezfft1.1 ezfftb.1 ezfftf.1 ezffti.1 fac.1 fc.1 fcmn.1 fdjac1.1 fdjac3.1 fdump.1 fftdoc.1 figi.1 figi2.1 fulmat.1 fundoc.1 fzero.1 gami.1 gamic.1 gamit.1 gamlim.1 gamln.1 gamma.1 gamr.1 gamrn.1 gaus8.1 genbun.1 h12.1 hfti.1 hkseq.1 hpperm.1 hpsort.1 hqr.1 hqr2.1 hstart.1 hstcrt.1 hstcs1.1 hstcsp.1 hstcyl.1 hstplr.1 hstssp.1 htrib3.1 htribk.1 htrid3.1 htridi.1 hvnrm.1 hw3crt.1 hwscrt.1 hwscs1.1 hwscsp.1 hwscyl.1 hwsplr.1 hwsss1.1 hwsssp.1 i1mach.1 i1merg.1 icamax.1 icopy.1 idamax.1 idloc.1 imtql1.1 imtql2.1 imtqlv.1 indxa.1 indxb.1 indxc.1 initds.1 inits.1 intrv.1 intyd.1 invit.1 inxca.1 inxcb.1 inxcc.1 iploc.1 ipperm.1 ipsort.1 isamax.1 isdbcg.1 isdcg.1 isdcgn.1 isdcgs.1 isdgmr.1 isdir.1 isdomn.1 isort.1 issbcg.1 isscg.1 isscgn.1 isscgs.1 issgmr.1 issir.1 issomn.1 iswap.1 ivout.1 j4save.1 jairy.1 la05ad.1 la05as.1 la05bd.1 la05bs.1 la05cd.1 la05cs.1 la05ed.1 la05es.1 llsia.1 lmpar.1 lpdp.1 lsame.1 lsei.1 lsi.1 lsod.1 lssods.1 lssuds.1 macon.1 mc20ad.1 mc20as.1 mgsbv.1 minfit.1 minso4.1 minsol.1 mpadd.1 mpadd2.1 mpadd3.1 mpblas.1 mpcdm.1 mpchk.1 mpcmd.1 mpdivi.1 mperr.1 mpmaxr.1 mpmlp.1 mpmul.1 mpmul2.1 mpmuli.1 mpnzr.1 mpovfl.1 mpstr.1 mpunfl.1 numxer.1 ohtrol.1 ohtror.1 ortbak.1 orthes.1 ortho4.1 orthog.1 orthol.1 orthor.1 ortran.1 passb.1 passb2.1 passb3.1 passb4.1 passb5.1 passf.1 passf2.1 passf3.1 passf4.1 passf5.1 pchbs.1 pchce.1 pchci.1 pchcm.1 pchcs.1 pchdf.1 pchdoc.1 pchfd.1 pchfe.1 pchia.1 pchic.1 pchid.1 pchim.1 pchkt.1 pchngs.1 pchsp.1 pchst.1 pchsw.1 pcoef.1 pfqad.1 pgsf.1 pimach.1 pinitm.1 pjac.1 pnnzrs.1 poch.1 poch1.1 pois3d.1 poisd2.1 poisn2.1 poisp2.1 poistg.1 polcof.1 polfit.1 polint.1 polyvl.1 pos3d1.1 postg2.1 ppadd.1 ppgq8.1 ppgsf.1 pppsf.1 ppqad.1 ppsgf.1 ppspf.1 ppval.1 proc.1 procp.1 prod.1 prodp.1 prvec.1 prwpge.1 prwvir.1 psgf.1 psi.1 psifn.1 psixn.1 pvalue.1 pythag.1 qag.1 qage.1 qagi.1 qagie.1 qagp.1 qagpe.1 qags.1 qagse.1 qawc.1 qawce.1 qawf.1 qawfe.1 qawo.1 qawoe.1 qaws.1 qawse.1 qc25c.1 qc25f.1 qc25s.1 qcheb.1 qelg.1 qform.1 qk15.1 qk15i.1 qk15w.1 qk21.1 qk31.1 qk41.1 qk51.1 qk61.1 qmomo.1 qnc79.1 qng.1 qpdoc.1 qpsrt.1 qrfac.1 qrsolv.1 qs2i1d.1 qs2i1r.1 qwgtc.1 qwgtf.1 qwgts.1 qzhes.1 qzit.1 qzval.1 qzvec.1 r1mach.1 r1mpyq.1 r1updt.1 r9aimp.1 r9atn1.1 r9chu.1 r9gmic.1 r9gmit.1 r9knus.1 r9lgic.1 r9lgit.1 r9lgmc.1 r9ln2r.1 r9pak.1 r9upak.1 radb2.1 radb3.1 radb4.1 radb5.1 radbg.1 radf2.1 radf3.1 radf4.1 radf5.1 radfg.1 rand.1 ratqr.1 rc.1 rc3jj.1 rc3jm.1 rc6j.1 rd.1 rebak.1 rebakb.1 reduc.1 reduc2.1 reort.1 rf.1 rfftb.1 rfftb1.1 rfftf.1 rfftf1.1 rffti.1 rffti1.1 rg.1 rgauss.1 rgg.1 rj.1 rpqr79.1 rpzero.1 rs.1 rsb.1 rsco.1 rsg.1 rsgab.1 rsgba.1 rsp.1 rst.1 rt.1 runif.1 rwupdt.1 s1merg.1 sasum.1 saxpy.1 sbcg.1 sbhin.1 sbocls.1 sbols.1 sbolsm.1 scasum.1 scg.1 scgn.1 scgs.1 schdc.1 schdd.1 schex.1 schkw.1 schud.1 sclosm.1 scnrm2.1 scoef.1 scopy.1 scopym.1 scov.1 scpplt.1 sdaini.1 sdajac.1 sdanrm.1 sdaslv.1 sdassl.1 sdastp.1 sdatrp.1 sdawts.1 sdcor.1 sdcst.1 sdntl.1 sdntp.1 sdot.1 sdpsc.1 sdpst.1 sdriv1.1 sdriv2.1 sdriv3.1 sdscl.1 sdsdot.1 sdstp.1 sdzro.1 sepeli.1 sepx4.1 sgbco.1 sgbdi.1 sgbfa.1 sgbmv.1 sgbsl.1 sgeco.1 sgedi.1 sgeev.1 sgefa.1 sgefs.1 sgeir.1 sgemm.1 sgemv.1 sger.1 sgesl.1 sglss.1 sgmres.1 sgtsl.1 shels.1 sheqr.1 sindg.1 sinqb.1 sinqf.1 sinqi.1 sint.1 sinti.1 sintrp.1 sir.1 sllti2.1 slpdoc.1 slvs.1 smout.1 snbco.1 snbdi.1 snbfa.1 snbfs.1 snbir.1 snbsl.1 snls1.1 snls1e.1 snrm2.1 snsq.1 snsqe.1 sods.1 somn.1 sopenm.1 sorth.1 sos.1 soseqs.1 sossol.1 spbco.1 spbdi.1 spbfa.1 spbsl.1 speli4.1 spelip.1 spenc.1 spigmr.1 spincw.1 spinit.1 splp.1 splpce.1 splpdm.1 splpfe.1 splpfl.1 splpmn.1 splpmu.1 splpup.1 spoco.1 spodi.1 spofa.1 spofs.1 spoir.1 spopt.1 sposl.1 sppco.1 sppdi.1 spperm.1 sppfa.1 sppsl.1 spsort.1 sptsl.1 sqrdc.1 sqrsl.1 sreadp.1 srlcal.1 srot.1 srotg.1 srotm.1 srotmg.1 ss2lt.1 ss2y.1 ssbmv.1 sscal.1 ssd2s.1 ssdbcg.1 ssdcg.1 ssdcgn.1 ssdcgs.1 ssdgmr.1 ssdi.1 ssdomn.1 ssds.1 ssdscl.1 ssgs.1 ssiccg.1 ssico.1 ssics.1 ssidi.1 ssiev.1 ssifa.1 ssilur.1 ssilus.1 ssisl.1 ssjac.1 ssli.1 ssli2.1 ssllti.1 sslubc.1 sslucn.1 sslucs.1 sslugm.1 sslui.1 sslui2.1 sslui4.1 ssluom.1 ssluti.1 ssmmi2.1 ssmmti.1 ssmtv.1 ssmv.1 ssort.1 sspco.1 sspdi.1 sspev.1 sspfa.1 sspmv.1 sspr.1 sspr2.1 sspsl.1 ssvdc.1 sswap.1 ssymm.1 ssymv.1 ssyr.1 ssyr2.1 ssyr2k.1 ssyrk.1 stbmv.1 stbsv.1 steps.1 stin.1 stod.1 stor1.1 stout.1 stpmv.1 stpsv.1 strco.1 strdi.1 strmm.1 strmv.1 strsl.1 strsm.1 strsv.1 stway.1 suds.1 svco.1 svd.1 svecs.1 svout.1 swritp.1 sxlcal.1 tevlc.1 tevls.1 tinvit.1 tql1.1 tql2.1 tqlrat.1 trbak1.1 trbak3.1 tred1.1 tred2.1 tred3.1 tri3.1 tridib.1 tridq.1 tris4.1 trisp.1 trix.1 tsturm.1 u11ls.1 u11us.1 u12ls.1 u12us.1 ulsia.1 usrmat.1 vnwrms.1 wnlit.1 wnlsm.1 wnlt1.1 wnlt2.1 wnlt3.1 wnnls.1 xadd.1 xadj.1 xc210.1 xcon.1 xerbla.1 xerclr.1 xercnt.1 xerdmp.1 xerhlt.1 xermax.1 xermsg.1 xerprn.1 xersve.1 xgetf.1 xgetua.1 xgetun.1 xlegf.1 xnrmp.1 xpmu.1 xpmup.1 xpnrm.1 xpqnu.1 xpsi.1 xqmu.1 xqnu.1 xred.1 xset.1 xsetf.1 xsetua.1 xsetun.1 yairy.1 zabs.1 zacai.1 zacon.1 zairy.1 zasyi.1 zbesh.1 zbesi.1 zbesj.1 zbesk.1 zbesy.1 zbinu.1 zbiry.1 zbknu.1 zbuni.1 zbunk.1 zdiv.1 zexp.1 zkscl.1 zlog.1 zmlri.1 zmlt.1 zrati.1 zs1s2.1 zseri.1 zshch.1 zsqrt.1 zuchk.1 zunhj.1 zuni1.1 zuni2.1 zunik.1 zunk1.1 zunk2.1 zuoik.1 zwrsk.1 + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv aaaaaa.1 aaaaaa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv acosh.1 acosh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ai.1 ai.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv aie.1 aie.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv albeta.1 albeta.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv algams.1 algams.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ali.1 ali.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv alngam.1 alngam.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv alnrel.1 alnrel.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv asinh.1 asinh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv asyik.1 asyik.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv asyjy.1 asyjy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv atanh.1 atanh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv avint.1 avint.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bakvec.1 bakvec.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv balanc.1 balanc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv balbak.1 balbak.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bandr.1 bandr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bandv.1 bandv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bcrh.1 bcrh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bdiff.1 bdiff.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besi.1 besi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besi0.1 besi0.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besi0e.1 besi0e.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besi1.1 besi1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besi1e.1 besi1e.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besj.1 besj.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besj0.1 besj0.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besj1.1 besj1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besk.1 besk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besk0.1 besk0.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besk0e.1 besk0e.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besk1.1 besk1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besk1e.1 besk1e.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv beskes.1 beskes.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besknu.1 besknu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besks.1 besks.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besy.1 besy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besy0.1 besy0.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besy1.1 besy1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv besynu.1 besynu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv beta.1 beta.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv betai.1 betai.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bfqad.1 bfqad.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bi.1 bi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bie.1 bie.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv binom.1 binom.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bint4.1 bint4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bintk.1 bintk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bisect.1 bisect.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bkias.1 bkias.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bkisr.1 bkisr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bksol.1 bksol.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv blktr1.1 blktr1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv blktri.1 blktri.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bndacc.1 bndacc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bndsol.1 bndsol.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bnfac.1 bnfac.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bnslv.1 bnslv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bqr.1 bqr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bsgq8.1 bsgq8.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bskin.1 bskin.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bspdoc.1 bspdoc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bspdr.1 bspdr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bspev.1 bspev.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bsplvd.1 bsplvd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bsplvn.1 bsplvn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bsppp.1 bsppp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bspvd.1 bspvd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bspvn.1 bspvn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bsqad.1 bsqad.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bsrh.1 bsrh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv bvalu.1 bvalu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv c0lgmc.1 c0lgmc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv c1merg.1 c1merg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv c9lgmc.1 c9lgmc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv c9ln2r.1 c9ln2r.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cacai.1 cacai.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cacon.1 cacon.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cacos.1 cacos.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cacosh.1 cacosh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cairy.1 cairy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv carg.1 carg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv casin.1 casin.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv casinh.1 casinh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv casyi.1 casyi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv catan.1 catan.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv catan2.1 catan2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv catanh.1 catanh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv caxpy.1 caxpy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cbabk2.1 cbabk2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cbal.1 cbal.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cbesh.1 cbesh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cbesi.1 cbesi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cbesj.1 cbesj.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cbesk.1 cbesk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cbesy.1 cbesy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cbeta.1 cbeta.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cbinu.1 cbinu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cbiry.1 cbiry.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cbknu.1 cbknu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cblkt1.1 cblkt1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cblktr.1 cblktr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cbrt.1 cbrt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cbuni.1 cbuni.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cbunk.1 cbunk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ccbrt.1 ccbrt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cchdc.1 cchdc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cchdd.1 cchdd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cchex.1 cchex.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cchud.1 cchud.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ccmpb.1 ccmpb.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ccopy.1 ccopy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ccosh.1 ccosh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ccot.1 ccot.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdcdot.1 cdcdot.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdcor.1 cdcor.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdcst.1 cdcst.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdiv.1 cdiv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdntl.1 cdntl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdntp.1 cdntp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdotc.1 cdotc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdotu.1 cdotu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdpsc.1 cdpsc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdpst.1 cdpst.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdriv1.1 cdriv1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdriv2.1 cdriv2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdriv3.1 cdriv3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdscl.1 cdscl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdstp.1 cdstp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cdzro.1 cdzro.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cexprl.1 cexprl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cfftb.1 cfftb.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cfftb1.1 cfftb1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cfftf.1 cfftf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cfftf1.1 cfftf1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cffti.1 cffti.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cffti1.1 cffti1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cfod.1 cfod.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cg.1 cg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgamma.1 cgamma.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgamr.1 cgamr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgbco.1 cgbco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgbdi.1 cgbdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgbfa.1 cgbfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgbmv.1 cgbmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgbsl.1 cgbsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgeco.1 cgeco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgedi.1 cgedi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgeev.1 cgeev.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgefa.1 cgefa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgefs.1 cgefs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgeir.1 cgeir.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgemm.1 cgemm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgemv.1 cgemv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgerc.1 cgerc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgeru.1 cgeru.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgesl.1 cgesl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cgtsl.1 cgtsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ch.1 ch.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chbmv.1 chbmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chemm.1 chemm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chemv.1 chemv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cher.1 cher.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cher2.1 cher2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cher2k.1 cher2k.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cherk.1 cherk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chfcm.1 chfcm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chfdv.1 chfdv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chfev.1 chfev.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chfie.1 chfie.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chico.1 chico.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chidi.1 chidi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chiev.1 chiev.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chifa.1 chifa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chisl.1 chisl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chkder.1 chkder.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chkpr4.1 chkpr4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chkprm.1 chkprm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chksn4.1 chksn4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chksng.1 chksng.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chpco.1 chpco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chpdi.1 chpdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chpfa.1 chpfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chpmv.1 chpmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chpr.1 chpr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chpr2.1 chpr2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chpsl.1 chpsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv chu.1 chu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cinvit.1 cinvit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ckscl.1 ckscl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv clbeta.1 clbeta.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv clngam.1 clngam.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv clnrel.1 clnrel.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv clog10.1 clog10.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cmgnbn.1 cmgnbn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cmlri.1 cmlri.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cmpcsg.1 cmpcsg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cmposd.1 cmposd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cmposn.1 cmposn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cmposp.1 cmposp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cmptr3.1 cmptr3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cmptrx.1 cmptrx.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cnbco.1 cnbco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cnbdi.1 cnbdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cnbfa.1 cnbfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cnbfs.1 cnbfs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cnbir.1 cnbir.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cnbsl.1 cnbsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv combak.1 combak.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv comhes.1 comhes.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv comlr.1 comlr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv comlr2.1 comlr2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv compb.1 compb.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv comqr.1 comqr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv comqr2.1 comqr2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cortb.1 cortb.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv corth.1 corth.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cosdg.1 cosdg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cosgen.1 cosgen.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cosqb.1 cosqb.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cosqb1.1 cosqb1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cosqf.1 cosqf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cosqf1.1 cosqf1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cosqi.1 cosqi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cost.1 cost.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv costi.1 costi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cot.1 cot.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cpadd.1 cpadd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cpbco.1 cpbco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cpbdi.1 cpbdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cpbfa.1 cpbfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cpbsl.1 cpbsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cpevl.1 cpevl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cpevlr.1 cpevlr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cpoco.1 cpoco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cpodi.1 cpodi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cpofa.1 cpofa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cpofs.1 cpofs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cpoir.1 cpoir.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cposl.1 cposl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cppco.1 cppco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cppdi.1 cppdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cppfa.1 cppfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cppsl.1 cppsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cpqr79.1 cpqr79.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cproc.1 cproc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cprocp.1 cprocp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cprod.1 cprod.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cprodp.1 cprodp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cpsi.1 cpsi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cptsl.1 cptsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cpzero.1 cpzero.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cqrdc.1 cqrdc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cqrsl.1 cqrsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv crati.1 crati.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv crotg.1 crotg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cs1s2.1 cs1s2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cscal.1 cscal.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cscale.1 cscale.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cseri.1 cseri.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv csevl.1 csevl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cshch.1 cshch.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv csico.1 csico.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv csidi.1 csidi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv csifa.1 csifa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv csinh.1 csinh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv csisl.1 csisl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cspco.1 cspco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cspdi.1 cspdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cspfa.1 cspfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cspsl.1 cspsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv csroot.1 csroot.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv csrot.1 csrot.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv csscal.1 csscal.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv csvdc.1 csvdc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cswap.1 cswap.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv csymm.1 csymm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv csyr2k.1 csyr2k.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv csyrk.1 csyrk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ctan.1 ctan.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ctanh.1 ctanh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ctbmv.1 ctbmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ctbsv.1 ctbsv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ctpmv.1 ctpmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ctpsv.1 ctpsv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ctrco.1 ctrco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ctrdi.1 ctrdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ctrmm.1 ctrmm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ctrmv.1 ctrmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ctrsl.1 ctrsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ctrsm.1 ctrsm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ctrsv.1 ctrsv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cuchk.1 cuchk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cunhj.1 cunhj.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cuni1.1 cuni1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cuni2.1 cuni2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cunik.1 cunik.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cunk1.1 cunk1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cunk2.1 cunk2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cuoik.1 cuoik.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cv.1 cv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv cwrsk.1 cwrsk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d1mach.1 d1mach.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d1merg.1 d1merg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d1mpyq.1 d1mpyq.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d1updt.1 d1updt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d9aimp.1 d9aimp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d9atn1.1 d9atn1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d9b0mp.1 d9b0mp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d9b1mp.1 d9b1mp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d9chu.1 d9chu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d9gmic.1 d9gmic.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d9gmit.1 d9gmit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d9knus.1 d9knus.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d9lgic.1 d9lgic.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d9lgit.1 d9lgit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d9lgmc.1 d9lgmc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d9ln2r.1 d9ln2r.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d9pak.1 d9pak.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv d9upak.1 d9upak.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dacosh.1 dacosh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dai.1 dai.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv daie.1 daie.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dasinh.1 dasinh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dasum.1 dasum.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dasyik.1 dasyik.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dasyjy.1 dasyjy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv datanh.1 datanh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv davint.1 davint.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv daws.1 daws.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv daxpy.1 daxpy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbcg.1 dbcg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbdiff.1 dbdiff.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbesi.1 dbesi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbesi0.1 dbesi0.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbesi1.1 dbesi1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbesj.1 dbesj.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbesj0.1 dbesj0.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbesj1.1 dbesj1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbesk.1 dbesk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbesk0.1 dbesk0.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbesk1.1 dbesk1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbesks.1 dbesks.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbesy.1 dbesy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbesy0.1 dbesy0.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbesy1.1 dbesy1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbeta.1 dbeta.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbetai.1 dbetai.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbfqad.1 dbfqad.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbhin.1 dbhin.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbi.1 dbi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbie.1 dbie.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbinom.1 dbinom.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbint4.1 dbint4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbintk.1 dbintk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbkias.1 dbkias.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbkisr.1 dbkisr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbksol.1 dbksol.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbndac.1 dbndac.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbndsl.1 dbndsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbnfac.1 dbnfac.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbnslv.1 dbnslv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbocls.1 dbocls.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbols.1 dbols.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbolsm.1 dbolsm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbsgq8.1 dbsgq8.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbsi0e.1 dbsi0e.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbsi1e.1 dbsi1e.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbsk0e.1 dbsk0e.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbsk1e.1 dbsk1e.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbskes.1 dbskes.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbskin.1 dbskin.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbsknu.1 dbsknu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbspdr.1 dbspdr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbspev.1 dbspev.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbsppp.1 dbsppp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbspvd.1 dbspvd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbspvn.1 dbspvn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbsqad.1 dbsqad.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbsynu.1 dbsynu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dbvalu.1 dbvalu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcbrt.1 dcbrt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcdot.1 dcdot.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcfod.1 dcfod.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcg.1 dcg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcgn.1 dcgn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcgs.1 dcgs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dchdc.1 dchdc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dchdd.1 dchdd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dchex.1 dchex.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dchfcm.1 dchfcm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dchfdv.1 dchfdv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dchfev.1 dchfev.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dchfie.1 dchfie.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dchkw.1 dchkw.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dchu.1 dchu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dchud.1 dchud.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dckder.1 dckder.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcoef.1 dcoef.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcopy.1 dcopy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcopym.1 dcopym.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcosdg.1 dcosdg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcot.1 dcot.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcov.1 dcov.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcpplt.1 dcpplt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcscal.1 dcscal.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcsevl.1 dcsevl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dcv.1 dcv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddaini.1 ddaini.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddajac.1 ddajac.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddanrm.1 ddanrm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddaslv.1 ddaslv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddassl.1 ddassl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddastp.1 ddastp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddatrp.1 ddatrp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddaws.1 ddaws.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddawts.1 ddawts.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddcor.1 ddcor.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddcst.1 ddcst.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddeabm.1 ddeabm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddebdf.1 ddebdf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dderkf.1 dderkf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddes.1 ddes.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddntl.1 ddntl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddntp.1 ddntp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddoglg.1 ddoglg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddot.1 ddot.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddpsc.1 ddpsc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddpst.1 ddpst.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddriv1.1 ddriv1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddriv2.1 ddriv2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddriv3.1 ddriv3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddscl.1 ddscl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddstp.1 ddstp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ddzro.1 ddzro.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv de1.1 de1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv deabm.1 deabm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv debdf.1 debdf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv defc.1 defc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv defcmn.1 defcmn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv defe4.1 defe4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv defehl.1 defehl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv defer.1 defer.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dei.1 dei.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv denorm.1 denorm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv derf.1 derf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv derfc.1 derfc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv derkf.1 derkf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv derkfs.1 derkfs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv des.1 des.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dexint.1 dexint.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dexprl.1 dexprl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dfac.1 dfac.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dfc.1 dfc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dfcmn.1 dfcmn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dfdjc1.1 dfdjc1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dfdjc3.1 dfdjc3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dfehl.1 dfehl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dfspvd.1 dfspvd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dfspvn.1 dfspvn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dfulmt.1 dfulmt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dfzero.1 dfzero.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgami.1 dgami.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgamic.1 dgamic.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgamit.1 dgamit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgamlm.1 dgamlm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgamln.1 dgamln.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgamma.1 dgamma.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgamr.1 dgamr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgamrn.1 dgamrn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgaus8.1 dgaus8.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgbco.1 dgbco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgbdi.1 dgbdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgbfa.1 dgbfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgbmv.1 dgbmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgbsl.1 dgbsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgeco.1 dgeco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgedi.1 dgedi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgefa.1 dgefa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgefs.1 dgefs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgemm.1 dgemm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgemv.1 dgemv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dger.1 dger.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgesl.1 dgesl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dglss.1 dglss.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgmres.1 dgmres.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dgtsl.1 dgtsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dh12.1 dh12.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dhels.1 dhels.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dheqr.1 dheqr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dhfti.1 dhfti.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dhkseq.1 dhkseq.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dhstrt.1 dhstrt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dhvnrm.1 dhvnrm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dintp.1 dintp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dintrv.1 dintrv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dintyd.1 dintyd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dir.1 dir.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv djairy.1 djairy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dlbeta.1 dlbeta.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dlgams.1 dlgams.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dli.1 dli.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dllsia.1 dllsia.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dllti2.1 dllti2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dlngam.1 dlngam.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dlnrel.1 dlnrel.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dlpdoc.1 dlpdoc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dlpdp.1 dlpdp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dlsei.1 dlsei.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dlsi.1 dlsi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dlsod.1 dlsod.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dlssud.1 dlssud.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dmacon.1 dmacon.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dmgsbv.1 dmgsbv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dmout.1 dmout.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dmpar.1 dmpar.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dnbco.1 dnbco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dnbdi.1 dnbdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dnbfa.1 dnbfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dnbfs.1 dnbfs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dnbsl.1 dnbsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dnls1.1 dnls1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dnls1e.1 dnls1e.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dnrm2.1 dnrm2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dnsq.1 dnsq.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dnsqe.1 dnsqe.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dogleg.1 dogleg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dohtrl.1 dohtrl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv domn.1 domn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dorth.1 dorth.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dorthr.1 dorthr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dp1vlu.1 dp1vlu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpbco.1 dpbco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpbdi.1 dpbdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpbfa.1 dpbfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpbsl.1 dpbsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchbs.1 dpchbs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchce.1 dpchce.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchci.1 dpchci.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchcm.1 dpchcm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchcs.1 dpchcs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchdf.1 dpchdf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchfd.1 dpchfd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchfe.1 dpchfe.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchia.1 dpchia.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchic.1 dpchic.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchid.1 dpchid.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchim.1 dpchim.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchkt.1 dpchkt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchng.1 dpchng.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchsp.1 dpchsp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchst.1 dpchst.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpchsw.1 dpchsw.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpcoef.1 dpcoef.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpfqad.1 dpfqad.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpigmr.1 dpigmr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpincw.1 dpincw.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpinit.1 dpinit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpintm.1 dpintm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpjac.1 dpjac.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dplint.1 dplint.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dplpce.1 dplpce.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dplpdm.1 dplpdm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dplpfe.1 dplpfe.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dplpfl.1 dplpfl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dplpmn.1 dplpmn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dplpmu.1 dplpmu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dplpup.1 dplpup.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpnnzr.1 dpnnzr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpoch.1 dpoch.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpoch1.1 dpoch1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpoco.1 dpoco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpodi.1 dpodi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpofa.1 dpofa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpofs.1 dpofs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpolcf.1 dpolcf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpolft.1 dpolft.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpolvl.1 dpolvl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpopt.1 dpopt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dposl.1 dposl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dppco.1 dppco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dppdi.1 dppdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpperm.1 dpperm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dppfa.1 dppfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dppgq8.1 dppgq8.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dppqad.1 dppqad.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dppsl.1 dppsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dppval.1 dppval.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dprvec.1 dprvec.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dprwpg.1 dprwpg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dprwvr.1 dprwvr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpsi.1 dpsi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpsifn.1 dpsifn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpsixn.1 dpsixn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dpsort.1 dpsort.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dptsl.1 dptsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqag.1 dqag.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqage.1 dqage.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqagi.1 dqagi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqagie.1 dqagie.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqagp.1 dqagp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqagpe.1 dqagpe.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqags.1 dqags.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqagse.1 dqagse.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqawc.1 dqawc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqawce.1 dqawce.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqawf.1 dqawf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqawfe.1 dqawfe.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqawo.1 dqawo.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqawoe.1 dqawoe.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqaws.1 dqaws.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqawse.1 dqawse.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqc25c.1 dqc25c.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqc25f.1 dqc25f.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqc25s.1 dqc25s.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqcheb.1 dqcheb.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqdota.1 dqdota.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqdoti.1 dqdoti.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqelg.1 dqelg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqform.1 dqform.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqk15.1 dqk15.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqk15i.1 dqk15i.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqk15w.1 dqk15w.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqk21.1 dqk21.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqk31.1 dqk31.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqk41.1 dqk41.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqk51.1 dqk51.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqk61.1 dqk61.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqmomo.1 dqmomo.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqnc79.1 dqnc79.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqng.1 dqng.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqpsrt.1 dqpsrt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqrdc.1 dqrdc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqrfac.1 dqrfac.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqrsl.1 dqrsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqrslv.1 dqrslv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqwgtc.1 dqwgtc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqwgtf.1 dqwgtf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dqwgts.1 dqwgts.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv drc.1 drc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv drc3jj.1 drc3jj.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv drc3jm.1 drc3jm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv drc6j.1 drc6j.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv drd.1 drd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dreadp.1 dreadp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dreort.1 dreort.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv drf.1 drf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv drj.1 drj.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv drkfs.1 drkfs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv drlcal.1 drlcal.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv drot.1 drot.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv drotg.1 drotg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv drotm.1 drotm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv drotmg.1 drotmg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv drsco.1 drsco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ds2lt.1 ds2lt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ds2y.1 ds2y.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsbmv.1 dsbmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dscal.1 dscal.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsd2s.1 dsd2s.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsdbcg.1 dsdbcg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsdcg.1 dsdcg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsdcgn.1 dsdcgn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsdcgs.1 dsdcgs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsdgmr.1 dsdgmr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsdi.1 dsdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsdomn.1 dsdomn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsdot.1 dsdot.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsds.1 dsds.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsdscl.1 dsdscl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsgs.1 dsgs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsiccg.1 dsiccg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsico.1 dsico.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsics.1 dsics.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsidi.1 dsidi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsifa.1 dsifa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsilur.1 dsilur.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsilus.1 dsilus.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsindg.1 dsindg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsisl.1 dsisl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsjac.1 dsjac.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsli.1 dsli.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsli2.1 dsli2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsllti.1 dsllti.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dslubc.1 dslubc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dslucn.1 dslucn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dslucs.1 dslucs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dslugm.1 dslugm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dslui.1 dslui.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dslui2.1 dslui2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dslui4.1 dslui4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsluom.1 dsluom.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsluti.1 dsluti.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dslvs.1 dslvs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsmmi2.1 dsmmi2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsmmti.1 dsmmti.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsmtv.1 dsmtv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsmv.1 dsmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsort.1 dsort.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsos.1 dsos.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsoseq.1 dsoseq.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsossl.1 dsossl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dspco.1 dspco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dspdi.1 dspdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dspenc.1 dspenc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dspfa.1 dspfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsplp.1 dsplp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dspmv.1 dspmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dspr.1 dspr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dspr2.1 dspr2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dspsl.1 dspsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsteps.1 dsteps.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dstod.1 dstod.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dstor1.1 dstor1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dstway.1 dstway.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsuds.1 dsuds.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsvco.1 dsvco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsvdc.1 dsvdc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dswap.1 dswap.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsymm.1 dsymm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsymv.1 dsymv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsyr.1 dsyr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsyr2.1 dsyr2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsyr2k.1 dsyr2k.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dsyrk.1 dsyrk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dtbmv.1 dtbmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dtbsv.1 dtbsv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dtin.1 dtin.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dtout.1 dtout.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dtpmv.1 dtpmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dtpsv.1 dtpsv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dtrco.1 dtrco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dtrdi.1 dtrdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dtrmm.1 dtrmm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dtrmv.1 dtrmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dtrsl.1 dtrsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dtrsm.1 dtrsm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dtrsv.1 dtrsv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv du11ls.1 du11ls.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv du11us.1 du11us.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv du12ls.1 du12ls.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv du12us.1 du12us.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dulsia.1 dulsia.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dusrmt.1 dusrmt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dvecs.1 dvecs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dvnrms.1 dvnrms.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dvout.1 dvout.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dwnlit.1 dwnlit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dwnlsm.1 dwnlsm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dwnlt1.1 dwnlt1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dwnlt2.1 dwnlt2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dwnlt3.1 dwnlt3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dwnnls.1 dwnnls.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dwritp.1 dwritp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dwupdt.1 dwupdt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dx.1 dx.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dx4.1 dx4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxadd.1 dxadd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxadj.1 dxadj.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxc210.1 dxc210.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxcon.1 dxcon.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxlcal.1 dxlcal.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxlegf.1 dxlegf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxnrmp.1 dxnrmp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxpmu.1 dxpmu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxpmup.1 dxpmup.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxpnrm.1 dxpnrm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxpqnu.1 dxpqnu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxpsi.1 dxpsi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxqmu.1 dxqmu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxqnu.1 dxqnu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxred.1 dxred.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dxset.1 dxset.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dy.1 dy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dy4.1 dy4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv dyairy.1 dyairy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv e1.1 e1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv efc.1 efc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv efcmn.1 efcmn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ei.1 ei.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv eisdoc.1 eisdoc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv elmbak.1 elmbak.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv elmhes.1 elmhes.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv eltran.1 eltran.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv enorm.1 enorm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv erf.1 erf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv erfc.1 erfc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv exint.1 exint.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv exprel.1 exprel.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ezfft1.1 ezfft1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ezfftb.1 ezfftb.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ezfftf.1 ezfftf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ezffti.1 ezffti.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv fac.1 fac.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv fc.1 fc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv fcmn.1 fcmn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv fdjac1.1 fdjac1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv fdjac3.1 fdjac3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv fdump.1 fdump.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv fftdoc.1 fftdoc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv figi.1 figi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv figi2.1 figi2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv fulmat.1 fulmat.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv fundoc.1 fundoc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv fzero.1 fzero.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv gami.1 gami.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv gamic.1 gamic.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv gamit.1 gamit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv gamlim.1 gamlim.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv gamln.1 gamln.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv gamma.1 gamma.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv gamr.1 gamr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv gamrn.1 gamrn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv gaus8.1 gaus8.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv genbun.1 genbun.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv h12.1 h12.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hfti.1 hfti.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hkseq.1 hkseq.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hpperm.1 hpperm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hpsort.1 hpsort.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hqr.1 hqr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hqr2.1 hqr2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hstart.1 hstart.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hstcrt.1 hstcrt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hstcs1.1 hstcs1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hstcsp.1 hstcsp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hstcyl.1 hstcyl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hstplr.1 hstplr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hstssp.1 hstssp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv htrib3.1 htrib3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv htribk.1 htribk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv htrid3.1 htrid3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv htridi.1 htridi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hvnrm.1 hvnrm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hw3crt.1 hw3crt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hwscrt.1 hwscrt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hwscs1.1 hwscs1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hwscsp.1 hwscsp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hwscyl.1 hwscyl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hwsplr.1 hwsplr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hwsss1.1 hwsss1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv hwsssp.1 hwsssp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv i1mach.1 i1mach.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv i1merg.1 i1merg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv icamax.1 icamax.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv icopy.1 icopy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv idamax.1 idamax.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv idloc.1 idloc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv imtql1.1 imtql1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv imtql2.1 imtql2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv imtqlv.1 imtqlv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv indxa.1 indxa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv indxb.1 indxb.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv indxc.1 indxc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv initds.1 initds.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv inits.1 inits.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv intrv.1 intrv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv intyd.1 intyd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv invit.1 invit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv inxca.1 inxca.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv inxcb.1 inxcb.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv inxcc.1 inxcc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv iploc.1 iploc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ipperm.1 ipperm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ipsort.1 ipsort.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv isamax.1 isamax.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv isdbcg.1 isdbcg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv isdcg.1 isdcg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv isdcgn.1 isdcgn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv isdcgs.1 isdcgs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv isdgmr.1 isdgmr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv isdir.1 isdir.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv isdomn.1 isdomn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv isort.1 isort.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv issbcg.1 issbcg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv isscg.1 isscg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv isscgn.1 isscgn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv isscgs.1 isscgs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv issgmr.1 issgmr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv issir.1 issir.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv issomn.1 issomn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv iswap.1 iswap.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ivout.1 ivout.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv j4save.1 j4save.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv jairy.1 jairy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv la05ad.1 la05ad.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv la05as.1 la05as.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv la05bd.1 la05bd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv la05bs.1 la05bs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv la05cd.1 la05cd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv la05cs.1 la05cs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv la05ed.1 la05ed.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv la05es.1 la05es.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv llsia.1 llsia.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv lmpar.1 lmpar.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv lpdp.1 lpdp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv lsame.1 lsame.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv lsei.1 lsei.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv lsi.1 lsi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv lsod.1 lsod.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv lssods.1 lssods.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv lssuds.1 lssuds.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv macon.1 macon.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mc20ad.1 mc20ad.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mc20as.1 mc20as.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mgsbv.1 mgsbv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv minfit.1 minfit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv minso4.1 minso4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv minsol.1 minsol.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpadd.1 mpadd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpadd2.1 mpadd2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpadd3.1 mpadd3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpblas.1 mpblas.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpcdm.1 mpcdm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpchk.1 mpchk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpcmd.1 mpcmd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpdivi.1 mpdivi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mperr.1 mperr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpmaxr.1 mpmaxr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpmlp.1 mpmlp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpmul.1 mpmul.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpmul2.1 mpmul2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpmuli.1 mpmuli.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpnzr.1 mpnzr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpovfl.1 mpovfl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpstr.1 mpstr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv mpunfl.1 mpunfl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv numxer.1 numxer.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ohtrol.1 ohtrol.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ohtror.1 ohtror.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ortbak.1 ortbak.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv orthes.1 orthes.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ortho4.1 ortho4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv orthog.1 orthog.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv orthol.1 orthol.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv orthor.1 orthor.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ortran.1 ortran.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv passb.1 passb.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv passb2.1 passb2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv passb3.1 passb3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv passb4.1 passb4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv passb5.1 passb5.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv passf.1 passf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv passf2.1 passf2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv passf3.1 passf3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv passf4.1 passf4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv passf5.1 passf5.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchbs.1 pchbs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchce.1 pchce.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchci.1 pchci.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchcm.1 pchcm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchcs.1 pchcs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchdf.1 pchdf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchdoc.1 pchdoc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchfd.1 pchfd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchfe.1 pchfe.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchia.1 pchia.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchic.1 pchic.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchid.1 pchid.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchim.1 pchim.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchkt.1 pchkt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchngs.1 pchngs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchsp.1 pchsp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchst.1 pchst.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pchsw.1 pchsw.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pcoef.1 pcoef.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pfqad.1 pfqad.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pgsf.1 pgsf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pimach.1 pimach.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pinitm.1 pinitm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pjac.1 pjac.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pnnzrs.1 pnnzrs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv poch.1 poch.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv poch1.1 poch1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pois3d.1 pois3d.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv poisd2.1 poisd2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv poisn2.1 poisn2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv poisp2.1 poisp2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv poistg.1 poistg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv polcof.1 polcof.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv polfit.1 polfit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv polint.1 polint.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv polyvl.1 polyvl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pos3d1.1 pos3d1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv postg2.1 postg2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ppadd.1 ppadd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ppgq8.1 ppgq8.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ppgsf.1 ppgsf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pppsf.1 pppsf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ppqad.1 ppqad.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ppsgf.1 ppsgf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ppspf.1 ppspf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ppval.1 ppval.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv proc.1 proc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv procp.1 procp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv prod.1 prod.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv prodp.1 prodp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv prvec.1 prvec.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv prwpge.1 prwpge.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv prwvir.1 prwvir.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv psgf.1 psgf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv psi.1 psi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv psifn.1 psifn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv psixn.1 psixn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pvalue.1 pvalue.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv pythag.1 pythag.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qag.1 qag.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qage.1 qage.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qagi.1 qagi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qagie.1 qagie.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qagp.1 qagp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qagpe.1 qagpe.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qags.1 qags.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qagse.1 qagse.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qawc.1 qawc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qawce.1 qawce.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qawf.1 qawf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qawfe.1 qawfe.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qawo.1 qawo.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qawoe.1 qawoe.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qaws.1 qaws.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qawse.1 qawse.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qc25c.1 qc25c.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qc25f.1 qc25f.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qc25s.1 qc25s.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qcheb.1 qcheb.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qelg.1 qelg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qform.1 qform.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qk15.1 qk15.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qk15i.1 qk15i.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qk15w.1 qk15w.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qk21.1 qk21.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qk31.1 qk31.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qk41.1 qk41.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qk51.1 qk51.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qk61.1 qk61.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qmomo.1 qmomo.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qnc79.1 qnc79.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qng.1 qng.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qpdoc.1 qpdoc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qpsrt.1 qpsrt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qrfac.1 qrfac.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qrsolv.1 qrsolv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qs2i1d.1 qs2i1d.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qs2i1r.1 qs2i1r.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qwgtc.1 qwgtc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qwgtf.1 qwgtf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qwgts.1 qwgts.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qzhes.1 qzhes.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qzit.1 qzit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qzval.1 qzval.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv qzvec.1 qzvec.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv r1mach.1 r1mach.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv r1mpyq.1 r1mpyq.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv r1updt.1 r1updt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv r9aimp.1 r9aimp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv r9atn1.1 r9atn1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv r9chu.1 r9chu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv r9gmic.1 r9gmic.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv r9gmit.1 r9gmit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv r9knus.1 r9knus.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv r9lgic.1 r9lgic.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv r9lgit.1 r9lgit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv r9lgmc.1 r9lgmc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv r9ln2r.1 r9ln2r.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv r9pak.1 r9pak.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv r9upak.1 r9upak.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv radb2.1 radb2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv radb3.1 radb3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv radb4.1 radb4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv radb5.1 radb5.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv radbg.1 radbg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv radf2.1 radf2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv radf3.1 radf3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv radf4.1 radf4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv radf5.1 radf5.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv radfg.1 radfg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rand.1 rand.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ratqr.1 ratqr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rc.1 rc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rc3jj.1 rc3jj.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rc3jm.1 rc3jm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rc6j.1 rc6j.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rd.1 rd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rebak.1 rebak.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rebakb.1 rebakb.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv reduc.1 reduc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv reduc2.1 reduc2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv reort.1 reort.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rf.1 rf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rfftb.1 rfftb.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rfftb1.1 rfftb1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rfftf.1 rfftf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rfftf1.1 rfftf1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rffti.1 rffti.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rffti1.1 rffti1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rg.1 rg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rgauss.1 rgauss.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rgg.1 rgg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rj.1 rj.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rpqr79.1 rpqr79.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rpzero.1 rpzero.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rs.1 rs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rsb.1 rsb.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rsco.1 rsco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rsg.1 rsg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rsgab.1 rsgab.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rsgba.1 rsgba.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rsp.1 rsp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rst.1 rst.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rt.1 rt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv runif.1 runif.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv rwupdt.1 rwupdt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv s1merg.1 s1merg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sasum.1 sasum.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv saxpy.1 saxpy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sbcg.1 sbcg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sbhin.1 sbhin.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sbocls.1 sbocls.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sbols.1 sbols.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sbolsm.1 sbolsm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv scasum.1 scasum.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv scg.1 scg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv scgn.1 scgn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv scgs.1 scgs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv schdc.1 schdc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv schdd.1 schdd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv schex.1 schex.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv schkw.1 schkw.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv schud.1 schud.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sclosm.1 sclosm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv scnrm2.1 scnrm2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv scoef.1 scoef.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv scopy.1 scopy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv scopym.1 scopym.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv scov.1 scov.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv scpplt.1 scpplt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdaini.1 sdaini.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdajac.1 sdajac.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdanrm.1 sdanrm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdaslv.1 sdaslv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdassl.1 sdassl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdastp.1 sdastp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdatrp.1 sdatrp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdawts.1 sdawts.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdcor.1 sdcor.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdcst.1 sdcst.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdntl.1 sdntl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdntp.1 sdntp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdot.1 sdot.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdpsc.1 sdpsc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdpst.1 sdpst.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdriv1.1 sdriv1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdriv2.1 sdriv2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdriv3.1 sdriv3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdscl.1 sdscl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdsdot.1 sdsdot.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdstp.1 sdstp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sdzro.1 sdzro.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sepeli.1 sepeli.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sepx4.1 sepx4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgbco.1 sgbco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgbdi.1 sgbdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgbfa.1 sgbfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgbmv.1 sgbmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgbsl.1 sgbsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgeco.1 sgeco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgedi.1 sgedi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgeev.1 sgeev.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgefa.1 sgefa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgefs.1 sgefs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgeir.1 sgeir.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgemm.1 sgemm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgemv.1 sgemv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sger.1 sger.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgesl.1 sgesl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sglss.1 sglss.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgmres.1 sgmres.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sgtsl.1 sgtsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv shels.1 shels.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sheqr.1 sheqr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sindg.1 sindg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sinqb.1 sinqb.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sinqf.1 sinqf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sinqi.1 sinqi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sint.1 sint.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sinti.1 sinti.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sintrp.1 sintrp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sir.1 sir.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sllti2.1 sllti2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv slpdoc.1 slpdoc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv slvs.1 slvs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv smout.1 smout.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv snbco.1 snbco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv snbdi.1 snbdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv snbfa.1 snbfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv snbfs.1 snbfs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv snbir.1 snbir.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv snbsl.1 snbsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv snls1.1 snls1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv snls1e.1 snls1e.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv snrm2.1 snrm2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv snsq.1 snsq.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv snsqe.1 snsqe.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sods.1 sods.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv somn.1 somn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sopenm.1 sopenm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sorth.1 sorth.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sos.1 sos.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv soseqs.1 soseqs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sossol.1 sossol.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spbco.1 spbco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spbdi.1 spbdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spbfa.1 spbfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spbsl.1 spbsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv speli4.1 speli4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spelip.1 spelip.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spenc.1 spenc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spigmr.1 spigmr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spincw.1 spincw.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spinit.1 spinit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv splp.1 splp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv splpce.1 splpce.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv splpdm.1 splpdm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv splpfe.1 splpfe.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv splpfl.1 splpfl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv splpmn.1 splpmn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv splpmu.1 splpmu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv splpup.1 splpup.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spoco.1 spoco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spodi.1 spodi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spofa.1 spofa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spofs.1 spofs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spoir.1 spoir.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spopt.1 spopt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sposl.1 sposl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sppco.1 sppco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sppdi.1 sppdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spperm.1 spperm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sppfa.1 sppfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sppsl.1 sppsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv spsort.1 spsort.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sptsl.1 sptsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sqrdc.1 sqrdc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sqrsl.1 sqrsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sreadp.1 sreadp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv srlcal.1 srlcal.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv srot.1 srot.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv srotg.1 srotg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv srotm.1 srotm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv srotmg.1 srotmg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ss2lt.1 ss2lt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ss2y.1 ss2y.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssbmv.1 ssbmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sscal.1 sscal.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssd2s.1 ssd2s.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssdbcg.1 ssdbcg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssdcg.1 ssdcg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssdcgn.1 ssdcgn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssdcgs.1 ssdcgs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssdgmr.1 ssdgmr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssdi.1 ssdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssdomn.1 ssdomn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssds.1 ssds.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssdscl.1 ssdscl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssgs.1 ssgs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssiccg.1 ssiccg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssico.1 ssico.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssics.1 ssics.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssidi.1 ssidi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssiev.1 ssiev.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssifa.1 ssifa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssilur.1 ssilur.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssilus.1 ssilus.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssisl.1 ssisl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssjac.1 ssjac.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssli.1 ssli.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssli2.1 ssli2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssllti.1 ssllti.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sslubc.1 sslubc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sslucn.1 sslucn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sslucs.1 sslucs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sslugm.1 sslugm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sslui.1 sslui.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sslui2.1 sslui2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sslui4.1 sslui4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssluom.1 ssluom.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssluti.1 ssluti.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssmmi2.1 ssmmi2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssmmti.1 ssmmti.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssmtv.1 ssmtv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssmv.1 ssmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssort.1 ssort.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sspco.1 sspco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sspdi.1 sspdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sspev.1 sspev.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sspfa.1 sspfa.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sspmv.1 sspmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sspr.1 sspr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sspr2.1 sspr2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sspsl.1 sspsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssvdc.1 ssvdc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sswap.1 sswap.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssymm.1 ssymm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssymv.1 ssymv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssyr.1 ssyr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssyr2.1 ssyr2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssyr2k.1 ssyr2k.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ssyrk.1 ssyrk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv stbmv.1 stbmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv stbsv.1 stbsv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv steps.1 steps.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv stin.1 stin.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv stod.1 stod.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv stor1.1 stor1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv stout.1 stout.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv stpmv.1 stpmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv stpsv.1 stpsv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv strco.1 strco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv strdi.1 strdi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv strmm.1 strmm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv strmv.1 strmv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv strsl.1 strsl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv strsm.1 strsm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv strsv.1 strsv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv stway.1 stway.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv suds.1 suds.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv svco.1 svco.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv svd.1 svd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv svecs.1 svecs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv svout.1 svout.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv swritp.1 swritp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv sxlcal.1 sxlcal.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv tevlc.1 tevlc.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv tevls.1 tevls.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv tinvit.1 tinvit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv tql1.1 tql1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv tql2.1 tql2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv tqlrat.1 tqlrat.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv trbak1.1 trbak1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv trbak3.1 trbak3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv tred1.1 tred1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv tred2.1 tred2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv tred3.1 tred3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv tri3.1 tri3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv tridib.1 tridib.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv tridq.1 tridq.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv tris4.1 tris4.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv trisp.1 trisp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv trix.1 trix.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv tsturm.1 tsturm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv u11ls.1 u11ls.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv u11us.1 u11us.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv u12ls.1 u12ls.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv u12us.1 u12us.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv ulsia.1 ulsia.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv usrmat.1 usrmat.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv vnwrms.1 vnwrms.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv wnlit.1 wnlit.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv wnlsm.1 wnlsm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv wnlt1.1 wnlt1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv wnlt2.1 wnlt2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv wnlt3.1 wnlt3.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv wnnls.1 wnnls.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xadd.1 xadd.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xadj.1 xadj.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xc210.1 xc210.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xcon.1 xcon.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xerbla.1 xerbla.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xerclr.1 xerclr.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xercnt.1 xercnt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xerdmp.1 xerdmp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xerhlt.1 xerhlt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xermax.1 xermax.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xermsg.1 xermsg.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xerprn.1 xerprn.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xersve.1 xersve.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xgetf.1 xgetf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xgetua.1 xgetua.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xgetun.1 xgetun.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xlegf.1 xlegf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xnrmp.1 xnrmp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xpmu.1 xpmu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xpmup.1 xpmup.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xpnrm.1 xpnrm.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xpqnu.1 xpqnu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xpsi.1 xpsi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xqmu.1 xqmu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xqnu.1 xqnu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xred.1 xred.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xset.1 xset.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xsetf.1 xsetf.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xsetua.1 xsetua.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv xsetun.1 xsetun.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv yairy.1 yairy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zabs.1 zabs.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zacai.1 zacai.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zacon.1 zacon.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zairy.1 zairy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zasyi.1 zasyi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zbesh.1 zbesh.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zbesi.1 zbesi.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zbesj.1 zbesj.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zbesk.1 zbesk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zbesy.1 zbesy.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zbinu.1 zbinu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zbiry.1 zbiry.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zbknu.1 zbknu.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zbuni.1 zbuni.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zbunk.1 zbunk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zdiv.1 zdiv.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zexp.1 zexp.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zkscl.1 zkscl.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zlog.1 zlog.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zmlri.1 zmlri.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zmlt.1 zmlt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zrati.1 zrati.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zs1s2.1 zs1s2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zseri.1 zseri.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zshch.1 zshch.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zsqrt.1 zsqrt.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zuchk.1 zuchk.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zunhj.1 zunhj.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zuni1.1 zuni1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zuni2.1 zuni2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zunik.1 zunik.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zunk1.1 zunk1.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zunk2.1 zunk2.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zuoik.1 zuoik.f + for i in $(ls *.1|sed -e 's/\(.*\)\.1/\1/') + mv zwrsk.1 zwrsk.f + bzip2 aaaaaa.f acosh.f ai.f aie.f albeta.f algams.f ali.f alngam.f alnrel.f asinh.f asyik.f asyjy.f atanh.f avint.f bakvec.f balanc.f balbak.f bandr.f bandv.f bcrh.f bdiff.f besi.f besi0.f besi0e.f besi1.f besi1e.f besj.f besj0.f besj1.f besk.f besk0.f besk0e.f besk1.f besk1e.f beskes.f besknu.f besks.f besy.f besy0.f besy1.f besynu.f beta.f betai.f bfqad.f bi.f bie.f binom.f bint4.f bintk.f bisect.f bkias.f bkisr.f bksol.f blktr1.f blktri.f bndacc.f bndsol.f bnfac.f bnslv.f bqr.f bsgq8.f bskin.f bspdoc.f bspdr.f bspev.f bsplvd.f bsplvn.f bsppp.f bspvd.f bspvn.f bsqad.f bsrh.f bvalu.f c0lgmc.f c1merg.f c9lgmc.f c9ln2r.f cacai.f cacon.f cacos.f cacosh.f cairy.f carg.f casin.f casinh.f casyi.f catan.f catan2.f catanh.f caxpy.f cbabk2.f cbal.f cbesh.f cbesi.f cbesj.f cbesk.f cbesy.f cbeta.f cbinu.f cbiry.f cbknu.f cblkt1.f cblktr.f cbrt.f cbuni.f cbunk.f ccbrt.f cchdc.f cchdd.f cchex.f cchud.f ccmpb.f ccopy.f ccosh.f ccot.f cdcdot.f cdcor.f cdcst.f cdiv.f cdntl.f cdntp.f cdotc.f cdotu.f cdpsc.f cdpst.f cdriv1.f cdriv2.f cdriv3.f cdscl.f cdstp.f cdzro.f cexprl.f cfftb.f cfftb1.f cfftf.f cfftf1.f cffti.f cffti1.f cfod.f cg.f cgamma.f cgamr.f cgbco.f cgbdi.f cgbfa.f cgbmv.f cgbsl.f cgeco.f cgedi.f cgeev.f cgefa.f cgefs.f cgeir.f cgemm.f cgemv.f cgerc.f cgeru.f cgesl.f cgtsl.f ch.f chbmv.f chemm.f chemv.f cher.f cher2.f cher2k.f cherk.f chfcm.f chfdv.f chfev.f chfie.f chico.f chidi.f chiev.f chifa.f chisl.f chkder.f chkpr4.f chkprm.f chksn4.f chksng.f chpco.f chpdi.f chpfa.f chpmv.f chpr.f chpr2.f chpsl.f chu.f cinvit.f ckscl.f clbeta.f clngam.f clnrel.f clog10.f cmgnbn.f cmlri.f cmpcsg.f cmposd.f cmposn.f cmposp.f cmptr3.f cmptrx.f cnbco.f cnbdi.f cnbfa.f cnbfs.f cnbir.f cnbsl.f combak.f comhes.f comlr.f comlr2.f compb.f comqr.f comqr2.f cortb.f corth.f cosdg.f cosgen.f cosqb.f cosqb1.f cosqf.f cosqf1.f cosqi.f cost.f costi.f cot.f cpadd.f cpbco.f cpbdi.f cpbfa.f cpbsl.f cpevl.f cpevlr.f cpoco.f cpodi.f cpofa.f cpofs.f cpoir.f cposl.f cppco.f cppdi.f cppfa.f cppsl.f cpqr79.f cproc.f cprocp.f cprod.f cprodp.f cpsi.f cptsl.f cpzero.f cqrdc.f cqrsl.f crati.f crotg.f cs1s2.f cscal.f cscale.f cseri.f csevl.f cshch.f csico.f csidi.f csifa.f csinh.f csisl.f cspco.f cspdi.f cspfa.f cspsl.f csroot.f csrot.f csscal.f csvdc.f cswap.f csymm.f csyr2k.f csyrk.f ctan.f ctanh.f ctbmv.f ctbsv.f ctpmv.f ctpsv.f ctrco.f ctrdi.f ctrmm.f ctrmv.f ctrsl.f ctrsm.f ctrsv.f cuchk.f cunhj.f cuni1.f cuni2.f cunik.f cunk1.f cunk2.f cuoik.f cv.f cwrsk.f d1mach.f d1merg.f d1mpyq.f d1updt.f d9aimp.f d9atn1.f d9b0mp.f d9b1mp.f d9chu.f d9gmic.f d9gmit.f d9knus.f d9lgic.f d9lgit.f d9lgmc.f d9ln2r.f d9pak.f d9upak.f dacosh.f dai.f daie.f dasinh.f dasum.f dasyik.f dasyjy.f datanh.f davint.f daws.f daxpy.f dbcg.f dbdiff.f dbesi.f dbesi0.f dbesi1.f dbesj.f dbesj0.f dbesj1.f dbesk.f dbesk0.f dbesk1.f dbesks.f dbesy.f dbesy0.f dbesy1.f dbeta.f dbetai.f dbfqad.f dbhin.f dbi.f dbie.f dbinom.f dbint4.f dbintk.f dbkias.f dbkisr.f dbksol.f dbndac.f dbndsl.f dbnfac.f dbnslv.f dbocls.f dbols.f dbolsm.f dbsgq8.f dbsi0e.f dbsi1e.f dbsk0e.f dbsk1e.f dbskes.f dbskin.f dbsknu.f dbspdr.f dbspev.f dbsppp.f dbspvd.f dbspvn.f dbsqad.f dbsynu.f dbvalu.f dcbrt.f dcdot.f dcfod.f dcg.f dcgn.f dcgs.f dchdc.f dchdd.f dchex.f dchfcm.f dchfdv.f dchfev.f dchfie.f dchkw.f dchu.f dchud.f dckder.f dcoef.f dcopy.f dcopym.f dcosdg.f dcot.f dcov.f dcpplt.f dcscal.f dcsevl.f dcv.f ddaini.f ddajac.f ddanrm.f ddaslv.f ddassl.f ddastp.f ddatrp.f ddaws.f ddawts.f ddcor.f ddcst.f ddeabm.f ddebdf.f dderkf.f ddes.f ddntl.f ddntp.f ddoglg.f ddot.f ddpsc.f ddpst.f ddriv1.f ddriv2.f ddriv3.f ddscl.f ddstp.f ddzro.f de1.f deabm.f debdf.f defc.f defcmn.f defe4.f defehl.f defer.f dei.f denorm.f derf.f derfc.f derkf.f derkfs.f des.f dexint.f dexprl.f dfac.f dfc.f dfcmn.f dfdjc1.f dfdjc3.f dfehl.f dfspvd.f dfspvn.f dfulmt.f dfzero.f dgami.f dgamic.f dgamit.f dgamlm.f dgamln.f dgamma.f dgamr.f dgamrn.f dgaus8.f dgbco.f dgbdi.f dgbfa.f dgbmv.f dgbsl.f dgeco.f dgedi.f dgefa.f dgefs.f dgemm.f dgemv.f dger.f dgesl.f dglss.f dgmres.f dgtsl.f dh12.f dhels.f dheqr.f dhfti.f dhkseq.f dhstrt.f dhvnrm.f dintp.f dintrv.f dintyd.f dir.f djairy.f dlbeta.f dlgams.f dli.f dllsia.f dllti2.f dlngam.f dlnrel.f dlpdoc.f dlpdp.f dlsei.f dlsi.f dlsod.f dlssud.f dmacon.f dmgsbv.f dmout.f dmpar.f dnbco.f dnbdi.f dnbfa.f dnbfs.f dnbsl.f dnls1.f dnls1e.f dnrm2.f dnsq.f dnsqe.f dogleg.f dohtrl.f domn.f dorth.f dorthr.f dp1vlu.f dpbco.f dpbdi.f dpbfa.f dpbsl.f dpchbs.f dpchce.f dpchci.f dpchcm.f dpchcs.f dpchdf.f dpchfd.f dpchfe.f dpchia.f dpchic.f dpchid.f dpchim.f dpchkt.f dpchng.f dpchsp.f dpchst.f dpchsw.f dpcoef.f dpfqad.f dpigmr.f dpincw.f dpinit.f dpintm.f dpjac.f dplint.f dplpce.f dplpdm.f dplpfe.f dplpfl.f dplpmn.f dplpmu.f dplpup.f dpnnzr.f dpoch.f dpoch1.f dpoco.f dpodi.f dpofa.f dpofs.f dpolcf.f dpolft.f dpolvl.f dpopt.f dposl.f dppco.f dppdi.f dpperm.f dppfa.f dppgq8.f dppqad.f dppsl.f dppval.f dprvec.f dprwpg.f dprwvr.f dpsi.f dpsifn.f dpsixn.f dpsort.f dptsl.f dqag.f dqage.f dqagi.f dqagie.f dqagp.f dqagpe.f dqags.f dqagse.f dqawc.f dqawce.f dqawf.f dqawfe.f dqawo.f dqawoe.f dqaws.f dqawse.f dqc25c.f dqc25f.f dqc25s.f dqcheb.f dqdota.f dqdoti.f dqelg.f dqform.f dqk15.f dqk15i.f dqk15w.f dqk21.f dqk31.f dqk41.f dqk51.f dqk61.f dqmomo.f dqnc79.f dqng.f dqpsrt.f dqrdc.f dqrfac.f dqrsl.f dqrslv.f dqwgtc.f dqwgtf.f dqwgts.f drc.f drc3jj.f drc3jm.f drc6j.f drd.f dreadp.f dreort.f drf.f drj.f drkfs.f drlcal.f drot.f drotg.f drotm.f drotmg.f drsco.f ds2lt.f ds2y.f dsbmv.f dscal.f dsd2s.f dsdbcg.f dsdcg.f dsdcgn.f dsdcgs.f dsdgmr.f dsdi.f dsdomn.f dsdot.f dsds.f dsdscl.f dsgs.f dsiccg.f dsico.f dsics.f dsidi.f dsifa.f dsilur.f dsilus.f dsindg.f dsisl.f dsjac.f dsli.f dsli2.f dsllti.f dslubc.f dslucn.f dslucs.f dslugm.f dslui.f dslui2.f dslui4.f dsluom.f dsluti.f dslvs.f dsmmi2.f dsmmti.f dsmtv.f dsmv.f dsort.f dsos.f dsoseq.f dsossl.f dspco.f dspdi.f dspenc.f dspfa.f dsplp.f dspmv.f dspr.f dspr2.f dspsl.f dsteps.f dstod.f dstor1.f dstway.f dsuds.f dsvco.f dsvdc.f dswap.f dsymm.f dsymv.f dsyr.f dsyr2.f dsyr2k.f dsyrk.f dtbmv.f dtbsv.f dtin.f dtout.f dtpmv.f dtpsv.f dtrco.f dtrdi.f dtrmm.f dtrmv.f dtrsl.f dtrsm.f dtrsv.f du11ls.f du11us.f du12ls.f du12us.f dulsia.f dusrmt.f dvecs.f dvnrms.f dvout.f dwnlit.f dwnlsm.f dwnlt1.f dwnlt2.f dwnlt3.f dwnnls.f dwritp.f dwupdt.f dx.f dx4.f dxadd.f dxadj.f dxc210.f dxcon.f dxlcal.f dxlegf.f dxnrmp.f dxpmu.f dxpmup.f dxpnrm.f dxpqnu.f dxpsi.f dxqmu.f dxqnu.f dxred.f dxset.f dy.f dy4.f dyairy.f e1.f efc.f efcmn.f ei.f eisdoc.f elmbak.f elmhes.f eltran.f enorm.f erf.f erfc.f exint.f exprel.f ezfft1.f ezfftb.f ezfftf.f ezffti.f fac.f fc.f fcmn.f fdjac1.f fdjac3.f fdump.f fftdoc.f figi.f figi2.f fulmat.f fundoc.f fzero.f gami.f gamic.f gamit.f gamlim.f gamln.f gamma.f gamr.f gamrn.f gaus8.f genbun.f h12.f hfti.f hkseq.f hpperm.f hpsort.f hqr.f hqr2.f hstart.f hstcrt.f hstcs1.f hstcsp.f hstcyl.f hstplr.f hstssp.f htrib3.f htribk.f htrid3.f htridi.f hvnrm.f hw3crt.f hwscrt.f hwscs1.f hwscsp.f hwscyl.f hwsplr.f hwsss1.f hwsssp.f i1mach.f i1merg.f icamax.f icopy.f idamax.f idloc.f imtql1.f imtql2.f imtqlv.f indxa.f indxb.f indxc.f initds.f inits.f intrv.f intyd.f invit.f inxca.f inxcb.f inxcc.f iploc.f ipperm.f ipsort.f isamax.f isdbcg.f isdcg.f isdcgn.f isdcgs.f isdgmr.f isdir.f isdomn.f isort.f issbcg.f isscg.f isscgn.f isscgs.f issgmr.f issir.f issomn.f iswap.f ivout.f j4save.f jairy.f la05ad.f la05as.f la05bd.f la05bs.f la05cd.f la05cs.f la05ed.f la05es.f llsia.f lmpar.f lpdp.f lsame.f lsei.f lsi.f lsod.f lssods.f lssuds.f macon.f mc20ad.f mc20as.f mgsbv.f minfit.f minso4.f minsol.f mpadd.f mpadd2.f mpadd3.f mpblas.f mpcdm.f mpchk.f mpcmd.f mpdivi.f mperr.f mpmaxr.f mpmlp.f mpmul.f mpmul2.f mpmuli.f mpnzr.f mpovfl.f mpstr.f mpunfl.f numxer.f ohtrol.f ohtror.f ortbak.f orthes.f ortho4.f orthog.f orthol.f orthor.f ortran.f passb.f passb2.f passb3.f passb4.f passb5.f passf.f passf2.f passf3.f passf4.f passf5.f pchbs.f pchce.f pchci.f pchcm.f pchcs.f pchdf.f pchdoc.f pchfd.f pchfe.f pchia.f pchic.f pchid.f pchim.f pchkt.f pchngs.f pchsp.f pchst.f pchsw.f pcoef.f pfqad.f pgsf.f pimach.f pinitm.f pjac.f pnnzrs.f poch.f poch1.f pois3d.f poisd2.f poisn2.f poisp2.f poistg.f polcof.f polfit.f polint.f polyvl.f pos3d1.f postg2.f ppadd.f ppgq8.f ppgsf.f pppsf.f ppqad.f ppsgf.f ppspf.f ppval.f proc.f procp.f prod.f prodp.f prvec.f prwpge.f prwvir.f psgf.f psi.f psifn.f psixn.f pvalue.f pythag.f qag.f qage.f qagi.f qagie.f qagp.f qagpe.f qags.f qagse.f qawc.f qawce.f qawf.f qawfe.f qawo.f qawoe.f qaws.f qawse.f qc25c.f qc25f.f qc25s.f qcheb.f qelg.f qform.f qk15.f qk15i.f qk15w.f qk21.f qk31.f qk41.f qk51.f qk61.f qmomo.f qnc79.f qng.f qpdoc.f qpsrt.f qrfac.f qrsolv.f qs2i1d.f qs2i1r.f qwgtc.f qwgtf.f qwgts.f qzhes.f qzit.f qzval.f qzvec.f r1mach.f r1mpyq.f r1updt.f r9aimp.f r9atn1.f r9chu.f r9gmic.f r9gmit.f r9knus.f r9lgic.f r9lgit.f r9lgmc.f r9ln2r.f r9pak.f r9upak.f radb2.f radb3.f radb4.f radb5.f radbg.f radf2.f radf3.f radf4.f radf5.f radfg.f rand.f ratqr.f rc.f rc3jj.f rc3jm.f rc6j.f rd.f rebak.f rebakb.f reduc.f reduc2.f reort.f rf.f rfftb.f rfftb1.f rfftf.f rfftf1.f rffti.f rffti1.f rg.f rgauss.f rgg.f rj.f rpqr79.f rpzero.f rs.f rsb.f rsco.f rsg.f rsgab.f rsgba.f rsp.f rst.f rt.f runif.f rwupdt.f s1merg.f sasum.f saxpy.f sbcg.f sbhin.f sbocls.f sbols.f sbolsm.f scasum.f scg.f scgn.f scgs.f schdc.f schdd.f schex.f schkw.f schud.f sclosm.f scnrm2.f scoef.f scopy.f scopym.f scov.f scpplt.f sdaini.f sdajac.f sdanrm.f sdaslv.f sdassl.f sdastp.f sdatrp.f sdawts.f sdcor.f sdcst.f sdntl.f sdntp.f sdot.f sdpsc.f sdpst.f sdriv1.f sdriv2.f sdriv3.f sdscl.f sdsdot.f sdstp.f sdzro.f sepeli.f sepx4.f sgbco.f sgbdi.f sgbfa.f sgbmv.f sgbsl.f sgeco.f sgedi.f sgeev.f sgefa.f sgefs.f sgeir.f sgemm.f sgemv.f sger.f sgesl.f sglss.f sgmres.f sgtsl.f shels.f sheqr.f sindg.f sinqb.f sinqf.f sinqi.f sint.f sinti.f sintrp.f sir.f sllti2.f slpdoc.f slvs.f smout.f snbco.f snbdi.f snbfa.f snbfs.f snbir.f snbsl.f snls1.f snls1e.f snrm2.f snsq.f snsqe.f sods.f somn.f sopenm.f sorth.f sos.f soseqs.f sossol.f spbco.f spbdi.f spbfa.f spbsl.f speli4.f spelip.f spenc.f spigmr.f spincw.f spinit.f splp.f splpce.f splpdm.f splpfe.f splpfl.f splpmn.f splpmu.f splpup.f spoco.f spodi.f spofa.f spofs.f spoir.f spopt.f sposl.f sppco.f sppdi.f spperm.f sppfa.f sppsl.f spsort.f sptsl.f sqrdc.f sqrsl.f sreadp.f srlcal.f srot.f srotg.f srotm.f srotmg.f ss2lt.f ss2y.f ssbmv.f sscal.f ssd2s.f ssdbcg.f ssdcg.f ssdcgn.f ssdcgs.f ssdgmr.f ssdi.f ssdomn.f ssds.f ssdscl.f ssgs.f ssiccg.f ssico.f ssics.f ssidi.f ssiev.f ssifa.f ssilur.f ssilus.f ssisl.f ssjac.f ssli.f ssli2.f ssllti.f sslubc.f sslucn.f sslucs.f sslugm.f sslui.f sslui2.f sslui4.f ssluom.f ssluti.f ssmmi2.f ssmmti.f ssmtv.f ssmv.f ssort.f sspco.f sspdi.f sspev.f sspfa.f sspmv.f sspr.f sspr2.f sspsl.f ssvdc.f sswap.f ssymm.f ssymv.f ssyr.f ssyr2.f ssyr2k.f ssyrk.f stbmv.f stbsv.f steps.f stin.f stod.f stor1.f stout.f stpmv.f stpsv.f strco.f strdi.f strmm.f strmv.f strsl.f strsm.f strsv.f stway.f suds.f svco.f svd.f svecs.f svout.f swritp.f sxlcal.f tevlc.f tevls.f tinvit.f tql1.f tql2.f tqlrat.f trbak1.f trbak3.f tred1.f tred2.f tred3.f tri3.f tridib.f tridq.f tris4.f trisp.f trix.f tsturm.f u11ls.f u11us.f u12ls.f u12us.f ulsia.f usrmat.f vnwrms.f wnlit.f wnlsm.f wnlt1.f wnlt2.f wnlt3.f wnnls.f xadd.f xadj.f xc210.f xcon.f xerbla.f xerclr.f xercnt.f xerdmp.f xerhlt.f xermax.f xermsg.f xerprn.f xersve.f xgetf.f xgetua.f xgetun.f xlegf.f xnrmp.f xpmu.f xpmup.f xpnrm.f xpqnu.f xpsi.f xqmu.f xqnu.f xred.f xset.f xsetf.f xsetua.f xsetun.f yairy.f zabs.f zacai.f zacon.f zairy.f zasyi.f zbesh.f zbesi.f zbesj.f zbesk.f zbesy.f zbinu.f zbiry.f zbknu.f zbuni.f zbunk.f zdiv.f zexp.f zkscl.f zlog.f zmlri.f zmlt.f zrati.f zs1s2.f zseri.f zshch.f zsqrt.f zuchk.f zunhj.f zuni1.f zuni2.f zunik.f zunk1.f zunk2.f zuoik.f zwrsk.f + exit 0 Executing(%install): /bin/sh -e /usr/src/tmp/rpm-tmp.86193 + umask 022 + /bin/mkdir -p /usr/src/RPM/BUILD + cd /usr/src/RPM/BUILD + /bin/chmod -Rf u+rwX -- /usr/src/tmp/libslatec-buildroot + : + /bin/rm -rf -- /usr/src/tmp/libslatec-buildroot + cd libslatec-4.1 + install -d /usr/src/tmp/libslatec-buildroot/usr/lib + install -d /usr/src/tmp/libslatec-buildroot/usr/share/libslatec + install -d /usr/src/tmp/libslatec-buildroot/usr/share/man/manf + install -m644 dynamic/libslatec.so.4.1.0 /usr/src/tmp/libslatec-buildroot/usr/lib + install -m644 /usr/src/RPM/SOURCES/gams /usr/src/tmp/libslatec-buildroot/usr/share/libslatec + install -m644 aaaaaa.f.bz2 acosh.f.bz2 ai.f.bz2 aie.f.bz2 albeta.f.bz2 algams.f.bz2 ali.f.bz2 alngam.f.bz2 alnrel.f.bz2 asinh.f.bz2 asyik.f.bz2 asyjy.f.bz2 atanh.f.bz2 avint.f.bz2 bakvec.f.bz2 balanc.f.bz2 balbak.f.bz2 bandr.f.bz2 bandv.f.bz2 bcrh.f.bz2 bdiff.f.bz2 besi.f.bz2 besi0.f.bz2 besi0e.f.bz2 besi1.f.bz2 besi1e.f.bz2 besj.f.bz2 besj0.f.bz2 besj1.f.bz2 besk.f.bz2 besk0.f.bz2 besk0e.f.bz2 besk1.f.bz2 besk1e.f.bz2 beskes.f.bz2 besknu.f.bz2 besks.f.bz2 besy.f.bz2 besy0.f.bz2 besy1.f.bz2 besynu.f.bz2 beta.f.bz2 betai.f.bz2 bfqad.f.bz2 bi.f.bz2 bie.f.bz2 binom.f.bz2 bint4.f.bz2 bintk.f.bz2 bisect.f.bz2 bkias.f.bz2 bkisr.f.bz2 bksol.f.bz2 blktr1.f.bz2 blktri.f.bz2 bndacc.f.bz2 bndsol.f.bz2 bnfac.f.bz2 bnslv.f.bz2 bqr.f.bz2 bsgq8.f.bz2 bskin.f.bz2 bspdoc.f.bz2 bspdr.f.bz2 bspev.f.bz2 bsplvd.f.bz2 bsplvn.f.bz2 bsppp.f.bz2 bspvd.f.bz2 bspvn.f.bz2 bsqad.f.bz2 bsrh.f.bz2 bvalu.f.bz2 c0lgmc.f.bz2 c1merg.f.bz2 c9lgmc.f.bz2 c9ln2r.f.bz2 cacai.f.bz2 cacon.f.bz2 cacos.f.bz2 cacosh.f.bz2 cairy.f.bz2 carg.f.bz2 casin.f.bz2 casinh.f.bz2 casyi.f.bz2 catan.f.bz2 catan2.f.bz2 catanh.f.bz2 caxpy.f.bz2 cbabk2.f.bz2 cbal.f.bz2 cbesh.f.bz2 cbesi.f.bz2 cbesj.f.bz2 cbesk.f.bz2 cbesy.f.bz2 cbeta.f.bz2 cbinu.f.bz2 cbiry.f.bz2 cbknu.f.bz2 cblkt1.f.bz2 cblktr.f.bz2 cbrt.f.bz2 cbuni.f.bz2 cbunk.f.bz2 ccbrt.f.bz2 cchdc.f.bz2 cchdd.f.bz2 cchex.f.bz2 cchud.f.bz2 ccmpb.f.bz2 ccopy.f.bz2 ccosh.f.bz2 ccot.f.bz2 cdcdot.f.bz2 cdcor.f.bz2 cdcst.f.bz2 cdiv.f.bz2 cdntl.f.bz2 cdntp.f.bz2 cdotc.f.bz2 cdotu.f.bz2 cdpsc.f.bz2 cdpst.f.bz2 cdriv1.f.bz2 cdriv2.f.bz2 cdriv3.f.bz2 cdscl.f.bz2 cdstp.f.bz2 cdzro.f.bz2 cexprl.f.bz2 cfftb.f.bz2 cfftb1.f.bz2 cfftf.f.bz2 cfftf1.f.bz2 cffti.f.bz2 cffti1.f.bz2 cfod.f.bz2 cg.f.bz2 cgamma.f.bz2 cgamr.f.bz2 cgbco.f.bz2 cgbdi.f.bz2 cgbfa.f.bz2 cgbmv.f.bz2 cgbsl.f.bz2 cgeco.f.bz2 cgedi.f.bz2 cgeev.f.bz2 cgefa.f.bz2 cgefs.f.bz2 cgeir.f.bz2 cgemm.f.bz2 cgemv.f.bz2 cgerc.f.bz2 cgeru.f.bz2 cgesl.f.bz2 cgtsl.f.bz2 ch.f.bz2 chbmv.f.bz2 chemm.f.bz2 chemv.f.bz2 cher.f.bz2 cher2.f.bz2 cher2k.f.bz2 cherk.f.bz2 chfcm.f.bz2 chfdv.f.bz2 chfev.f.bz2 chfie.f.bz2 chico.f.bz2 chidi.f.bz2 chiev.f.bz2 chifa.f.bz2 chisl.f.bz2 chkder.f.bz2 chkpr4.f.bz2 chkprm.f.bz2 chksn4.f.bz2 chksng.f.bz2 chpco.f.bz2 chpdi.f.bz2 chpfa.f.bz2 chpmv.f.bz2 chpr.f.bz2 chpr2.f.bz2 chpsl.f.bz2 chu.f.bz2 cinvit.f.bz2 ckscl.f.bz2 clbeta.f.bz2 clngam.f.bz2 clnrel.f.bz2 clog10.f.bz2 cmgnbn.f.bz2 cmlri.f.bz2 cmpcsg.f.bz2 cmposd.f.bz2 cmposn.f.bz2 cmposp.f.bz2 cmptr3.f.bz2 cmptrx.f.bz2 cnbco.f.bz2 cnbdi.f.bz2 cnbfa.f.bz2 cnbfs.f.bz2 cnbir.f.bz2 cnbsl.f.bz2 combak.f.bz2 comhes.f.bz2 comlr.f.bz2 comlr2.f.bz2 compb.f.bz2 comqr.f.bz2 comqr2.f.bz2 cortb.f.bz2 corth.f.bz2 cosdg.f.bz2 cosgen.f.bz2 cosqb.f.bz2 cosqb1.f.bz2 cosqf.f.bz2 cosqf1.f.bz2 cosqi.f.bz2 cost.f.bz2 costi.f.bz2 cot.f.bz2 cpadd.f.bz2 cpbco.f.bz2 cpbdi.f.bz2 cpbfa.f.bz2 cpbsl.f.bz2 cpevl.f.bz2 cpevlr.f.bz2 cpoco.f.bz2 cpodi.f.bz2 cpofa.f.bz2 cpofs.f.bz2 cpoir.f.bz2 cposl.f.bz2 cppco.f.bz2 cppdi.f.bz2 cppfa.f.bz2 cppsl.f.bz2 cpqr79.f.bz2 cproc.f.bz2 cprocp.f.bz2 cprod.f.bz2 cprodp.f.bz2 cpsi.f.bz2 cptsl.f.bz2 cpzero.f.bz2 cqrdc.f.bz2 cqrsl.f.bz2 crati.f.bz2 crotg.f.bz2 cs1s2.f.bz2 cscal.f.bz2 cscale.f.bz2 cseri.f.bz2 csevl.f.bz2 cshch.f.bz2 csico.f.bz2 csidi.f.bz2 csifa.f.bz2 csinh.f.bz2 csisl.f.bz2 cspco.f.bz2 cspdi.f.bz2 cspfa.f.bz2 cspsl.f.bz2 csroot.f.bz2 csrot.f.bz2 csscal.f.bz2 csvdc.f.bz2 cswap.f.bz2 csymm.f.bz2 csyr2k.f.bz2 csyrk.f.bz2 ctan.f.bz2 ctanh.f.bz2 ctbmv.f.bz2 ctbsv.f.bz2 ctpmv.f.bz2 ctpsv.f.bz2 ctrco.f.bz2 ctrdi.f.bz2 ctrmm.f.bz2 ctrmv.f.bz2 ctrsl.f.bz2 ctrsm.f.bz2 ctrsv.f.bz2 cuchk.f.bz2 cunhj.f.bz2 cuni1.f.bz2 cuni2.f.bz2 cunik.f.bz2 cunk1.f.bz2 cunk2.f.bz2 cuoik.f.bz2 cv.f.bz2 cwrsk.f.bz2 d1mach.f.bz2 d1merg.f.bz2 d1mpyq.f.bz2 d1updt.f.bz2 d9aimp.f.bz2 d9atn1.f.bz2 d9b0mp.f.bz2 d9b1mp.f.bz2 d9chu.f.bz2 d9gmic.f.bz2 d9gmit.f.bz2 d9knus.f.bz2 d9lgic.f.bz2 d9lgit.f.bz2 d9lgmc.f.bz2 d9ln2r.f.bz2 d9pak.f.bz2 d9upak.f.bz2 dacosh.f.bz2 dai.f.bz2 daie.f.bz2 dasinh.f.bz2 dasum.f.bz2 dasyik.f.bz2 dasyjy.f.bz2 datanh.f.bz2 davint.f.bz2 daws.f.bz2 daxpy.f.bz2 dbcg.f.bz2 dbdiff.f.bz2 dbesi.f.bz2 dbesi0.f.bz2 dbesi1.f.bz2 dbesj.f.bz2 dbesj0.f.bz2 dbesj1.f.bz2 dbesk.f.bz2 dbesk0.f.bz2 dbesk1.f.bz2 dbesks.f.bz2 dbesy.f.bz2 dbesy0.f.bz2 dbesy1.f.bz2 dbeta.f.bz2 dbetai.f.bz2 dbfqad.f.bz2 dbhin.f.bz2 dbi.f.bz2 dbie.f.bz2 dbinom.f.bz2 dbint4.f.bz2 dbintk.f.bz2 dbkias.f.bz2 dbkisr.f.bz2 dbksol.f.bz2 dbndac.f.bz2 dbndsl.f.bz2 dbnfac.f.bz2 dbnslv.f.bz2 dbocls.f.bz2 dbols.f.bz2 dbolsm.f.bz2 dbsgq8.f.bz2 dbsi0e.f.bz2 dbsi1e.f.bz2 dbsk0e.f.bz2 dbsk1e.f.bz2 dbskes.f.bz2 dbskin.f.bz2 dbsknu.f.bz2 dbspdr.f.bz2 dbspev.f.bz2 dbsppp.f.bz2 dbspvd.f.bz2 dbspvn.f.bz2 dbsqad.f.bz2 dbsynu.f.bz2 dbvalu.f.bz2 dcbrt.f.bz2 dcdot.f.bz2 dcfod.f.bz2 dcg.f.bz2 dcgn.f.bz2 dcgs.f.bz2 dchdc.f.bz2 dchdd.f.bz2 dchex.f.bz2 dchfcm.f.bz2 dchfdv.f.bz2 dchfev.f.bz2 dchfie.f.bz2 dchkw.f.bz2 dchu.f.bz2 dchud.f.bz2 dckder.f.bz2 dcoef.f.bz2 dcopy.f.bz2 dcopym.f.bz2 dcosdg.f.bz2 dcot.f.bz2 dcov.f.bz2 dcpplt.f.bz2 dcscal.f.bz2 dcsevl.f.bz2 dcv.f.bz2 ddaini.f.bz2 ddajac.f.bz2 ddanrm.f.bz2 ddaslv.f.bz2 ddassl.f.bz2 ddastp.f.bz2 ddatrp.f.bz2 ddaws.f.bz2 ddawts.f.bz2 ddcor.f.bz2 ddcst.f.bz2 ddeabm.f.bz2 ddebdf.f.bz2 dderkf.f.bz2 ddes.f.bz2 ddntl.f.bz2 ddntp.f.bz2 ddoglg.f.bz2 ddot.f.bz2 ddpsc.f.bz2 ddpst.f.bz2 ddriv1.f.bz2 ddriv2.f.bz2 ddriv3.f.bz2 ddscl.f.bz2 ddstp.f.bz2 ddzro.f.bz2 de1.f.bz2 deabm.f.bz2 debdf.f.bz2 defc.f.bz2 defcmn.f.bz2 defe4.f.bz2 defehl.f.bz2 defer.f.bz2 dei.f.bz2 denorm.f.bz2 derf.f.bz2 derfc.f.bz2 derkf.f.bz2 derkfs.f.bz2 des.f.bz2 dexint.f.bz2 dexprl.f.bz2 dfac.f.bz2 dfc.f.bz2 dfcmn.f.bz2 dfdjc1.f.bz2 dfdjc3.f.bz2 dfehl.f.bz2 dfspvd.f.bz2 dfspvn.f.bz2 dfulmt.f.bz2 dfzero.f.bz2 dgami.f.bz2 dgamic.f.bz2 dgamit.f.bz2 dgamlm.f.bz2 dgamln.f.bz2 dgamma.f.bz2 dgamr.f.bz2 dgamrn.f.bz2 dgaus8.f.bz2 dgbco.f.bz2 dgbdi.f.bz2 dgbfa.f.bz2 dgbmv.f.bz2 dgbsl.f.bz2 dgeco.f.bz2 dgedi.f.bz2 dgefa.f.bz2 dgefs.f.bz2 dgemm.f.bz2 dgemv.f.bz2 dger.f.bz2 dgesl.f.bz2 dglss.f.bz2 dgmres.f.bz2 dgtsl.f.bz2 dh12.f.bz2 dhels.f.bz2 dheqr.f.bz2 dhfti.f.bz2 dhkseq.f.bz2 dhstrt.f.bz2 dhvnrm.f.bz2 dintp.f.bz2 dintrv.f.bz2 dintyd.f.bz2 dir.f.bz2 djairy.f.bz2 dlbeta.f.bz2 dlgams.f.bz2 dli.f.bz2 dllsia.f.bz2 dllti2.f.bz2 dlngam.f.bz2 dlnrel.f.bz2 dlpdoc.f.bz2 dlpdp.f.bz2 dlsei.f.bz2 dlsi.f.bz2 dlsod.f.bz2 dlssud.f.bz2 dmacon.f.bz2 dmgsbv.f.bz2 dmout.f.bz2 dmpar.f.bz2 dnbco.f.bz2 dnbdi.f.bz2 dnbfa.f.bz2 dnbfs.f.bz2 dnbsl.f.bz2 dnls1.f.bz2 dnls1e.f.bz2 dnrm2.f.bz2 dnsq.f.bz2 dnsqe.f.bz2 dogleg.f.bz2 dohtrl.f.bz2 domn.f.bz2 dorth.f.bz2 dorthr.f.bz2 dp1vlu.f.bz2 dpbco.f.bz2 dpbdi.f.bz2 dpbfa.f.bz2 dpbsl.f.bz2 dpchbs.f.bz2 dpchce.f.bz2 dpchci.f.bz2 dpchcm.f.bz2 dpchcs.f.bz2 dpchdf.f.bz2 dpchfd.f.bz2 dpchfe.f.bz2 dpchia.f.bz2 dpchic.f.bz2 dpchid.f.bz2 dpchim.f.bz2 dpchkt.f.bz2 dpchng.f.bz2 dpchsp.f.bz2 dpchst.f.bz2 dpchsw.f.bz2 dpcoef.f.bz2 dpfqad.f.bz2 dpigmr.f.bz2 dpincw.f.bz2 dpinit.f.bz2 dpintm.f.bz2 dpjac.f.bz2 dplint.f.bz2 dplpce.f.bz2 dplpdm.f.bz2 dplpfe.f.bz2 dplpfl.f.bz2 dplpmn.f.bz2 dplpmu.f.bz2 dplpup.f.bz2 dpnnzr.f.bz2 dpoch.f.bz2 dpoch1.f.bz2 dpoco.f.bz2 dpodi.f.bz2 dpofa.f.bz2 dpofs.f.bz2 dpolcf.f.bz2 dpolft.f.bz2 dpolvl.f.bz2 dpopt.f.bz2 dposl.f.bz2 dppco.f.bz2 dppdi.f.bz2 dpperm.f.bz2 dppfa.f.bz2 dppgq8.f.bz2 dppqad.f.bz2 dppsl.f.bz2 dppval.f.bz2 dprvec.f.bz2 dprwpg.f.bz2 dprwvr.f.bz2 dpsi.f.bz2 dpsifn.f.bz2 dpsixn.f.bz2 dpsort.f.bz2 dptsl.f.bz2 dqag.f.bz2 dqage.f.bz2 dqagi.f.bz2 dqagie.f.bz2 dqagp.f.bz2 dqagpe.f.bz2 dqags.f.bz2 dqagse.f.bz2 dqawc.f.bz2 dqawce.f.bz2 dqawf.f.bz2 dqawfe.f.bz2 dqawo.f.bz2 dqawoe.f.bz2 dqaws.f.bz2 dqawse.f.bz2 dqc25c.f.bz2 dqc25f.f.bz2 dqc25s.f.bz2 dqcheb.f.bz2 dqdota.f.bz2 dqdoti.f.bz2 dqelg.f.bz2 dqform.f.bz2 dqk15.f.bz2 dqk15i.f.bz2 dqk15w.f.bz2 dqk21.f.bz2 dqk31.f.bz2 dqk41.f.bz2 dqk51.f.bz2 dqk61.f.bz2 dqmomo.f.bz2 dqnc79.f.bz2 dqng.f.bz2 dqpsrt.f.bz2 dqrdc.f.bz2 dqrfac.f.bz2 dqrsl.f.bz2 dqrslv.f.bz2 dqwgtc.f.bz2 dqwgtf.f.bz2 dqwgts.f.bz2 drc.f.bz2 drc3jj.f.bz2 drc3jm.f.bz2 drc6j.f.bz2 drd.f.bz2 dreadp.f.bz2 dreort.f.bz2 drf.f.bz2 drj.f.bz2 drkfs.f.bz2 drlcal.f.bz2 drot.f.bz2 drotg.f.bz2 drotm.f.bz2 drotmg.f.bz2 drsco.f.bz2 ds2lt.f.bz2 ds2y.f.bz2 dsbmv.f.bz2 dscal.f.bz2 dsd2s.f.bz2 dsdbcg.f.bz2 dsdcg.f.bz2 dsdcgn.f.bz2 dsdcgs.f.bz2 dsdgmr.f.bz2 dsdi.f.bz2 dsdomn.f.bz2 dsdot.f.bz2 dsds.f.bz2 dsdscl.f.bz2 dsgs.f.bz2 dsiccg.f.bz2 dsico.f.bz2 dsics.f.bz2 dsidi.f.bz2 dsifa.f.bz2 dsilur.f.bz2 dsilus.f.bz2 dsindg.f.bz2 dsisl.f.bz2 dsjac.f.bz2 dsli.f.bz2 dsli2.f.bz2 dsllti.f.bz2 dslubc.f.bz2 dslucn.f.bz2 dslucs.f.bz2 dslugm.f.bz2 dslui.f.bz2 dslui2.f.bz2 dslui4.f.bz2 dsluom.f.bz2 dsluti.f.bz2 dslvs.f.bz2 dsmmi2.f.bz2 dsmmti.f.bz2 dsmtv.f.bz2 dsmv.f.bz2 dsort.f.bz2 dsos.f.bz2 dsoseq.f.bz2 dsossl.f.bz2 dspco.f.bz2 dspdi.f.bz2 dspenc.f.bz2 dspfa.f.bz2 dsplp.f.bz2 dspmv.f.bz2 dspr.f.bz2 dspr2.f.bz2 dspsl.f.bz2 dsteps.f.bz2 dstod.f.bz2 dstor1.f.bz2 dstway.f.bz2 dsuds.f.bz2 dsvco.f.bz2 dsvdc.f.bz2 dswap.f.bz2 dsymm.f.bz2 dsymv.f.bz2 dsyr.f.bz2 dsyr2.f.bz2 dsyr2k.f.bz2 dsyrk.f.bz2 dtbmv.f.bz2 dtbsv.f.bz2 dtin.f.bz2 dtout.f.bz2 dtpmv.f.bz2 dtpsv.f.bz2 dtrco.f.bz2 dtrdi.f.bz2 dtrmm.f.bz2 dtrmv.f.bz2 dtrsl.f.bz2 dtrsm.f.bz2 dtrsv.f.bz2 du11ls.f.bz2 du11us.f.bz2 du12ls.f.bz2 du12us.f.bz2 dulsia.f.bz2 dusrmt.f.bz2 dvecs.f.bz2 dvnrms.f.bz2 dvout.f.bz2 dwnlit.f.bz2 dwnlsm.f.bz2 dwnlt1.f.bz2 dwnlt2.f.bz2 dwnlt3.f.bz2 dwnnls.f.bz2 dwritp.f.bz2 dwupdt.f.bz2 dx.f.bz2 dx4.f.bz2 dxadd.f.bz2 dxadj.f.bz2 dxc210.f.bz2 dxcon.f.bz2 dxlcal.f.bz2 dxlegf.f.bz2 dxnrmp.f.bz2 dxpmu.f.bz2 dxpmup.f.bz2 dxpnrm.f.bz2 dxpqnu.f.bz2 dxpsi.f.bz2 dxqmu.f.bz2 dxqnu.f.bz2 dxred.f.bz2 dxset.f.bz2 dy.f.bz2 dy4.f.bz2 dyairy.f.bz2 e1.f.bz2 efc.f.bz2 efcmn.f.bz2 ei.f.bz2 eisdoc.f.bz2 elmbak.f.bz2 elmhes.f.bz2 eltran.f.bz2 enorm.f.bz2 erf.f.bz2 erfc.f.bz2 exint.f.bz2 exprel.f.bz2 ezfft1.f.bz2 ezfftb.f.bz2 ezfftf.f.bz2 ezffti.f.bz2 fac.f.bz2 fc.f.bz2 fcmn.f.bz2 fdjac1.f.bz2 fdjac3.f.bz2 fdump.f.bz2 fftdoc.f.bz2 figi.f.bz2 figi2.f.bz2 fulmat.f.bz2 fundoc.f.bz2 fzero.f.bz2 gami.f.bz2 gamic.f.bz2 gamit.f.bz2 gamlim.f.bz2 gamln.f.bz2 gamma.f.bz2 gamr.f.bz2 gamrn.f.bz2 gaus8.f.bz2 genbun.f.bz2 h12.f.bz2 hfti.f.bz2 hkseq.f.bz2 hpperm.f.bz2 hpsort.f.bz2 hqr.f.bz2 hqr2.f.bz2 hstart.f.bz2 hstcrt.f.bz2 hstcs1.f.bz2 hstcsp.f.bz2 hstcyl.f.bz2 hstplr.f.bz2 hstssp.f.bz2 htrib3.f.bz2 htribk.f.bz2 htrid3.f.bz2 htridi.f.bz2 hvnrm.f.bz2 hw3crt.f.bz2 hwscrt.f.bz2 hwscs1.f.bz2 hwscsp.f.bz2 hwscyl.f.bz2 hwsplr.f.bz2 hwsss1.f.bz2 hwsssp.f.bz2 i1mach.f.bz2 i1merg.f.bz2 icamax.f.bz2 icopy.f.bz2 idamax.f.bz2 idloc.f.bz2 imtql1.f.bz2 imtql2.f.bz2 imtqlv.f.bz2 indxa.f.bz2 indxb.f.bz2 indxc.f.bz2 initds.f.bz2 inits.f.bz2 intrv.f.bz2 intyd.f.bz2 invit.f.bz2 inxca.f.bz2 inxcb.f.bz2 inxcc.f.bz2 iploc.f.bz2 ipperm.f.bz2 ipsort.f.bz2 isamax.f.bz2 isdbcg.f.bz2 isdcg.f.bz2 isdcgn.f.bz2 isdcgs.f.bz2 isdgmr.f.bz2 isdir.f.bz2 isdomn.f.bz2 isort.f.bz2 issbcg.f.bz2 isscg.f.bz2 isscgn.f.bz2 isscgs.f.bz2 issgmr.f.bz2 issir.f.bz2 issomn.f.bz2 iswap.f.bz2 ivout.f.bz2 j4save.f.bz2 jairy.f.bz2 la05ad.f.bz2 la05as.f.bz2 la05bd.f.bz2 la05bs.f.bz2 la05cd.f.bz2 la05cs.f.bz2 la05ed.f.bz2 la05es.f.bz2 llsia.f.bz2 lmpar.f.bz2 lpdp.f.bz2 lsame.f.bz2 lsei.f.bz2 lsi.f.bz2 lsod.f.bz2 lssods.f.bz2 lssuds.f.bz2 macon.f.bz2 mc20ad.f.bz2 mc20as.f.bz2 mgsbv.f.bz2 minfit.f.bz2 minso4.f.bz2 minsol.f.bz2 mpadd.f.bz2 mpadd2.f.bz2 mpadd3.f.bz2 mpblas.f.bz2 mpcdm.f.bz2 mpchk.f.bz2 mpcmd.f.bz2 mpdivi.f.bz2 mperr.f.bz2 mpmaxr.f.bz2 mpmlp.f.bz2 mpmul.f.bz2 mpmul2.f.bz2 mpmuli.f.bz2 mpnzr.f.bz2 mpovfl.f.bz2 mpstr.f.bz2 mpunfl.f.bz2 numxer.f.bz2 ohtrol.f.bz2 ohtror.f.bz2 ortbak.f.bz2 orthes.f.bz2 ortho4.f.bz2 orthog.f.bz2 orthol.f.bz2 orthor.f.bz2 ortran.f.bz2 passb.f.bz2 passb2.f.bz2 passb3.f.bz2 passb4.f.bz2 passb5.f.bz2 passf.f.bz2 passf2.f.bz2 passf3.f.bz2 passf4.f.bz2 passf5.f.bz2 pchbs.f.bz2 pchce.f.bz2 pchci.f.bz2 pchcm.f.bz2 pchcs.f.bz2 pchdf.f.bz2 pchdoc.f.bz2 pchfd.f.bz2 pchfe.f.bz2 pchia.f.bz2 pchic.f.bz2 pchid.f.bz2 pchim.f.bz2 pchkt.f.bz2 pchngs.f.bz2 pchsp.f.bz2 pchst.f.bz2 pchsw.f.bz2 pcoef.f.bz2 pfqad.f.bz2 pgsf.f.bz2 pimach.f.bz2 pinitm.f.bz2 pjac.f.bz2 pnnzrs.f.bz2 poch.f.bz2 poch1.f.bz2 pois3d.f.bz2 poisd2.f.bz2 poisn2.f.bz2 poisp2.f.bz2 poistg.f.bz2 polcof.f.bz2 polfit.f.bz2 polint.f.bz2 polyvl.f.bz2 pos3d1.f.bz2 postg2.f.bz2 ppadd.f.bz2 ppgq8.f.bz2 ppgsf.f.bz2 pppsf.f.bz2 ppqad.f.bz2 ppsgf.f.bz2 ppspf.f.bz2 ppval.f.bz2 proc.f.bz2 procp.f.bz2 prod.f.bz2 prodp.f.bz2 prvec.f.bz2 prwpge.f.bz2 prwvir.f.bz2 psgf.f.bz2 psi.f.bz2 psifn.f.bz2 psixn.f.bz2 pvalue.f.bz2 pythag.f.bz2 qag.f.bz2 qage.f.bz2 qagi.f.bz2 qagie.f.bz2 qagp.f.bz2 qagpe.f.bz2 qags.f.bz2 qagse.f.bz2 qawc.f.bz2 qawce.f.bz2 qawf.f.bz2 qawfe.f.bz2 qawo.f.bz2 qawoe.f.bz2 qaws.f.bz2 qawse.f.bz2 qc25c.f.bz2 qc25f.f.bz2 qc25s.f.bz2 qcheb.f.bz2 qelg.f.bz2 qform.f.bz2 qk15.f.bz2 qk15i.f.bz2 qk15w.f.bz2 qk21.f.bz2 qk31.f.bz2 qk41.f.bz2 qk51.f.bz2 qk61.f.bz2 qmomo.f.bz2 qnc79.f.bz2 qng.f.bz2 qpdoc.f.bz2 qpsrt.f.bz2 qrfac.f.bz2 qrsolv.f.bz2 qs2i1d.f.bz2 qs2i1r.f.bz2 qwgtc.f.bz2 qwgtf.f.bz2 qwgts.f.bz2 qzhes.f.bz2 qzit.f.bz2 qzval.f.bz2 qzvec.f.bz2 r1mach.f.bz2 r1mpyq.f.bz2 r1updt.f.bz2 r9aimp.f.bz2 r9atn1.f.bz2 r9chu.f.bz2 r9gmic.f.bz2 r9gmit.f.bz2 r9knus.f.bz2 r9lgic.f.bz2 r9lgit.f.bz2 r9lgmc.f.bz2 r9ln2r.f.bz2 r9pak.f.bz2 r9upak.f.bz2 radb2.f.bz2 radb3.f.bz2 radb4.f.bz2 radb5.f.bz2 radbg.f.bz2 radf2.f.bz2 radf3.f.bz2 radf4.f.bz2 radf5.f.bz2 radfg.f.bz2 rand.f.bz2 ratqr.f.bz2 rc.f.bz2 rc3jj.f.bz2 rc3jm.f.bz2 rc6j.f.bz2 rd.f.bz2 rebak.f.bz2 rebakb.f.bz2 reduc.f.bz2 reduc2.f.bz2 reort.f.bz2 rf.f.bz2 rfftb.f.bz2 rfftb1.f.bz2 rfftf.f.bz2 rfftf1.f.bz2 rffti.f.bz2 rffti1.f.bz2 rg.f.bz2 rgauss.f.bz2 rgg.f.bz2 rj.f.bz2 rpqr79.f.bz2 rpzero.f.bz2 rs.f.bz2 rsb.f.bz2 rsco.f.bz2 rsg.f.bz2 rsgab.f.bz2 rsgba.f.bz2 rsp.f.bz2 rst.f.bz2 rt.f.bz2 runif.f.bz2 rwupdt.f.bz2 s1merg.f.bz2 sasum.f.bz2 saxpy.f.bz2 sbcg.f.bz2 sbhin.f.bz2 sbocls.f.bz2 sbols.f.bz2 sbolsm.f.bz2 scasum.f.bz2 scg.f.bz2 scgn.f.bz2 scgs.f.bz2 schdc.f.bz2 schdd.f.bz2 schex.f.bz2 schkw.f.bz2 schud.f.bz2 sclosm.f.bz2 scnrm2.f.bz2 scoef.f.bz2 scopy.f.bz2 scopym.f.bz2 scov.f.bz2 scpplt.f.bz2 sdaini.f.bz2 sdajac.f.bz2 sdanrm.f.bz2 sdaslv.f.bz2 sdassl.f.bz2 sdastp.f.bz2 sdatrp.f.bz2 sdawts.f.bz2 sdcor.f.bz2 sdcst.f.bz2 sdntl.f.bz2 sdntp.f.bz2 sdot.f.bz2 sdpsc.f.bz2 sdpst.f.bz2 sdriv1.f.bz2 sdriv2.f.bz2 sdriv3.f.bz2 sdscl.f.bz2 sdsdot.f.bz2 sdstp.f.bz2 sdzro.f.bz2 sepeli.f.bz2 sepx4.f.bz2 sgbco.f.bz2 sgbdi.f.bz2 sgbfa.f.bz2 sgbmv.f.bz2 sgbsl.f.bz2 sgeco.f.bz2 sgedi.f.bz2 sgeev.f.bz2 sgefa.f.bz2 sgefs.f.bz2 sgeir.f.bz2 sgemm.f.bz2 sgemv.f.bz2 sger.f.bz2 sgesl.f.bz2 sglss.f.bz2 sgmres.f.bz2 sgtsl.f.bz2 shels.f.bz2 sheqr.f.bz2 sindg.f.bz2 sinqb.f.bz2 sinqf.f.bz2 sinqi.f.bz2 sint.f.bz2 sinti.f.bz2 sintrp.f.bz2 sir.f.bz2 sllti2.f.bz2 slpdoc.f.bz2 slvs.f.bz2 smout.f.bz2 snbco.f.bz2 snbdi.f.bz2 snbfa.f.bz2 snbfs.f.bz2 snbir.f.bz2 snbsl.f.bz2 snls1.f.bz2 snls1e.f.bz2 snrm2.f.bz2 snsq.f.bz2 snsqe.f.bz2 sods.f.bz2 somn.f.bz2 sopenm.f.bz2 sorth.f.bz2 sos.f.bz2 soseqs.f.bz2 sossol.f.bz2 spbco.f.bz2 spbdi.f.bz2 spbfa.f.bz2 spbsl.f.bz2 speli4.f.bz2 spelip.f.bz2 spenc.f.bz2 spigmr.f.bz2 spincw.f.bz2 spinit.f.bz2 splp.f.bz2 splpce.f.bz2 splpdm.f.bz2 splpfe.f.bz2 splpfl.f.bz2 splpmn.f.bz2 splpmu.f.bz2 splpup.f.bz2 spoco.f.bz2 spodi.f.bz2 spofa.f.bz2 spofs.f.bz2 spoir.f.bz2 spopt.f.bz2 sposl.f.bz2 sppco.f.bz2 sppdi.f.bz2 spperm.f.bz2 sppfa.f.bz2 sppsl.f.bz2 spsort.f.bz2 sptsl.f.bz2 sqrdc.f.bz2 sqrsl.f.bz2 sreadp.f.bz2 srlcal.f.bz2 srot.f.bz2 srotg.f.bz2 srotm.f.bz2 srotmg.f.bz2 ss2lt.f.bz2 ss2y.f.bz2 ssbmv.f.bz2 sscal.f.bz2 ssd2s.f.bz2 ssdbcg.f.bz2 ssdcg.f.bz2 ssdcgn.f.bz2 ssdcgs.f.bz2 ssdgmr.f.bz2 ssdi.f.bz2 ssdomn.f.bz2 ssds.f.bz2 ssdscl.f.bz2 ssgs.f.bz2 ssiccg.f.bz2 ssico.f.bz2 ssics.f.bz2 ssidi.f.bz2 ssiev.f.bz2 ssifa.f.bz2 ssilur.f.bz2 ssilus.f.bz2 ssisl.f.bz2 ssjac.f.bz2 ssli.f.bz2 ssli2.f.bz2 ssllti.f.bz2 sslubc.f.bz2 sslucn.f.bz2 sslucs.f.bz2 sslugm.f.bz2 sslui.f.bz2 sslui2.f.bz2 sslui4.f.bz2 ssluom.f.bz2 ssluti.f.bz2 ssmmi2.f.bz2 ssmmti.f.bz2 ssmtv.f.bz2 ssmv.f.bz2 ssort.f.bz2 sspco.f.bz2 sspdi.f.bz2 sspev.f.bz2 sspfa.f.bz2 sspmv.f.bz2 sspr.f.bz2 sspr2.f.bz2 sspsl.f.bz2 ssvdc.f.bz2 sswap.f.bz2 ssymm.f.bz2 ssymv.f.bz2 ssyr.f.bz2 ssyr2.f.bz2 ssyr2k.f.bz2 ssyrk.f.bz2 stbmv.f.bz2 stbsv.f.bz2 steps.f.bz2 stin.f.bz2 stod.f.bz2 stor1.f.bz2 stout.f.bz2 stpmv.f.bz2 stpsv.f.bz2 strco.f.bz2 strdi.f.bz2 strmm.f.bz2 strmv.f.bz2 strsl.f.bz2 strsm.f.bz2 strsv.f.bz2 stway.f.bz2 suds.f.bz2 svco.f.bz2 svd.f.bz2 svecs.f.bz2 svout.f.bz2 swritp.f.bz2 sxlcal.f.bz2 tevlc.f.bz2 tevls.f.bz2 tinvit.f.bz2 tql1.f.bz2 tql2.f.bz2 tqlrat.f.bz2 trbak1.f.bz2 trbak3.f.bz2 tred1.f.bz2 tred2.f.bz2 tred3.f.bz2 tri3.f.bz2 tridib.f.bz2 tridq.f.bz2 tris4.f.bz2 trisp.f.bz2 trix.f.bz2 tsturm.f.bz2 u11ls.f.bz2 u11us.f.bz2 u12ls.f.bz2 u12us.f.bz2 ulsia.f.bz2 usrmat.f.bz2 vnwrms.f.bz2 wnlit.f.bz2 wnlsm.f.bz2 wnlt1.f.bz2 wnlt2.f.bz2 wnlt3.f.bz2 wnnls.f.bz2 xadd.f.bz2 xadj.f.bz2 xc210.f.bz2 xcon.f.bz2 xerbla.f.bz2 xerclr.f.bz2 xercnt.f.bz2 xerdmp.f.bz2 xerhlt.f.bz2 xermax.f.bz2 xermsg.f.bz2 xerprn.f.bz2 xersve.f.bz2 xgetf.f.bz2 xgetua.f.bz2 xgetun.f.bz2 xlegf.f.bz2 xnrmp.f.bz2 xpmu.f.bz2 xpmup.f.bz2 xpnrm.f.bz2 xpqnu.f.bz2 xpsi.f.bz2 xqmu.f.bz2 xqnu.f.bz2 xred.f.bz2 xset.f.bz2 xsetf.f.bz2 xsetua.f.bz2 xsetun.f.bz2 yairy.f.bz2 zabs.f.bz2 zacai.f.bz2 zacon.f.bz2 zairy.f.bz2 zasyi.f.bz2 zbesh.f.bz2 zbesi.f.bz2 zbesj.f.bz2 zbesk.f.bz2 zbesy.f.bz2 zbinu.f.bz2 zbiry.f.bz2 zbknu.f.bz2 zbuni.f.bz2 zbunk.f.bz2 zdiv.f.bz2 zexp.f.bz2 zkscl.f.bz2 zlog.f.bz2 zmlri.f.bz2 zmlt.f.bz2 zrati.f.bz2 zs1s2.f.bz2 zseri.f.bz2 zshch.f.bz2 zsqrt.f.bz2 zuchk.f.bz2 zunhj.f.bz2 zuni1.f.bz2 zuni2.f.bz2 zunik.f.bz2 zunk1.f.bz2 zunk2.f.bz2 zuoik.f.bz2 zwrsk.f.bz2 /usr/src/tmp/libslatec-buildroot/usr/share/man/manf + pushd /usr/src/tmp/libslatec-buildroot/usr/lib ~/tmp/libslatec-buildroot/usr/lib ~/RPM/BUILD/libslatec-4.1 + ln -s libslatec.so.4.1.0 libslatec.so.4 + ln -s libslatec.so.4 libslatec.so + popd ~/RPM/BUILD/libslatec-4.1 + /usr/lib/rpm/brp-alt Cleaning files in /usr/src/tmp/libslatec-buildroot (auto) Verifying and fixing files in /usr/src/tmp/libslatec-buildroot (binconfig,pkgconfig,libtool,desktop) Checking contents of files in /usr/src/tmp/libslatec-buildroot/ (default) Compressing files in /usr/src/tmp/libslatec-buildroot (auto) Adjusting library links in /usr/src/tmp/libslatec-buildroot ./usr/lib: libslatec.so.4 -> libslatec.so.4.1.0 Verifying ELF objects in /usr/src/tmp/libslatec-buildroot (arch=normal,fhs=normal,lfs=relaxed,lint=relaxed,rpath=normal,stack=normal,textrel=normal,unresolved=normal) Hardlinking identical .pyc and .pyo files Processing files: libslatec-4.1-alt7 Finding Provides (using /usr/lib/rpm/find-provides) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.kM2deA find-provides: running scripts (debuginfo,lib,pam,perl,pkgconfig,python,shell) lib.prov: /usr/src/tmp/libslatec-buildroot/usr/lib/libslatec.so.4: 1456 symbols, 21 bpp warning: hash collision: dchdd_ tsturm_ Finding Requires (using /usr/lib/rpm/find-requires) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.FtJO9D find-requires: running scripts (cpp,debuginfo,files,lib,pam,perl,pkgconfig,pkgconfiglib,python,rpmlib,shebang,shell,static,symlinks,systemd-services) Provides: libslatec.so.4 = set:odAtIs9Nx2YkOZGZ5TZLuAk4bOo0OcX4mVt72TueTqMAEgYUnGgArKqk8kLQMmkSwezYgquoJx62O872c3ZnK3WFQdT7Q0m8gjZ2Jt1jAidWxtB7eVCAYcxZjv0uGZ1TSHks0iyWECRdB1zEZE8KeEn2pG9S2AhuVq1hcFkKwbwbnreN6DPGcL56heAUpXK4bzvXSWXzQWzDilse2BBUJK7totrm7SJrmQawiNFEIoA3pJlwN0JVhPR0htzDJPg03EZAlGtUqCgAdKbmDox6W48IGjSeoc4kKk7W8KfPf1TJg4AsGyjS6GX84Aj8BZhBs7zho590y7PGY5gMJpSbNTwlXcbEnIF0Alq5b86150Q7XFL6hfkEgTVaYDVqQLght7dcmWA7AKYVZJUWAUaopi6QULLdYYu376RyFhyazOZJmKsQRwCEQIGTzg0Dd8ZzKcZ0mDPAL8fLiDaf0oevoPTLNJqvkhTX9u6diuvV7ZvOSG3VOiKZH6S2ZwZ3sgAlpke9emv9GR6RFV9fRGXRwo2vrVxUf6xwWAUjT5JLRXKvzZ38d9JJSM74ZwyRNGF0CFtVtZzyn6ZIX8qaMgR8fEe3u7kdMrlfZcy9aE3l0K1VhdPZrd64vjPxTyR1GKae9EI5cpQlr0wyuWlqgHuIplb75OaloTKth1kLOieqF1yq4FryeShnmfDZCON2xYbCMlu1Lw3vr94Grn4sXa2Jn0uP7GpHLN4QQZLEnWuYVJXZIcshK2KwLSrSOb6gCJHXcsZJWoSZBUZrZvZoAktNF00B6E0M3WCi8Ky5gi0h199E4fjwNOZF9KGgJwWydZ2ThIKbQ3FBdwmNL5F1fgV3JnH6u61c2mtJ87dObykpUUokOgGJxtXTVLHWXfDhyorhw4FPpE9esoUQQfceNlVUJDZiwyiyx5Zi0gUWTMiqModGykfrEhcCNmHUWfg4acaqYVBHTUO0gNcEPTk7MOwhql1OcQdcjKc2muiuZzpQY0ZosXCFvLcX1Dow79NLVcBOLPIOXdBcnXlymgIFbKUyxdX2zjmtVsBvj1oR7Xnzy7GNuHJiz6enz7OjRh5SmhQkZv5xyjSF0N8Za3Mgw4CB8EkysuZjNj2xv1gERPGpKfTeB5B3BIhjHTZkJks215wC7wN6QvCOpfecABQfWQwnZ32JG2EulciQARWjOAKB1BMHes12HbbsGBeakOk1z5kunMyhNRbB1Ytlsn3m67LP3Uwy1mre5uvUG4ueNt4r1z6by9nSFsVQK9ykwyhezlApmMZjAKkvDiYimMsirBmjmvxUegZ6mLRFkBFI12qyZBKSDNjkIld23bqtxbsPIIb4MHzxNzJ2WI7YxSRaw2TKjVrwI34sSRCuJRCD2TA2crZ4Ojj3Omgtyt3wS9gY3l94FX8DGXbVtSzZCo9o5OgePJoDy4O2wTadoDqd15W6ZylQZcu8bINqqI5dY1WygVaMiZqg5tVw3KMUVfYYbcy3DInhOLH4Pb7NF1IytI2WIj89ek9Knxb38ikZk488HMBIPUZ0SoP29YM4yjYOATZkg6mpPwoPJ1HcNV6rgbUZdi6GAEed8tugrt3IGqtYli6Lp7LF3PeLFsH6E4BWQ48sUginWYiwhmyYpg0ZGAqlLUGwalsHePFVMFGOdyOKpZeMgwXEGjWCGQnxFZpDT1U00xk2jjBilOP8krpboArsdzWpBAQDwnTQZyjmseAr8TZnzZJq14DzzZ7Z5oQh5IjWOcaI5Nhq59OJmm1vtR57KkMhbhI5ZJyiuy32rv1pDyV4xl06DvDqlc3kZ42PqA1mMC80XiyeLlbsozsdOlVygT9HTy5832N6HxuQlAVT1J71ZpfZ4POqXt6gtMxb0Z6E1rfaaLNsN9uVVxB4aFi6D4Pc00IXzihzVhjPN5xGScn2x7QqIBApat3l8hBMOkHU35E3l6yg8wBDztw4clIe4oxNXaEwZxdgxL3DId4FqIxM7j8taXZlVEutJkHV9TaA9HVFq5TqCDsEjr2Zo4hbgKwfPJZBayemEHcZAupVBl4dBlIjwmJ8mgEu7ByxmAdvRIBhzsizi334ZwtRKFQANDwCCjboYuS7ILxSNpxcZkF1mtR5dVWKZoROwZ2Py2myv3ieZamGOiaxUshjmS7vi6a1GssSo2YW56lgEEyUx3Nufd8WqvwZs2HNacfHXfIyZBPNjQLfc5HNyhChB7nBJKg1qLbTe4qZtm65sLt8VyyaLzPZpHo73cjKmLZ0fMApPpHwo3jZLUrMDIz6prZkrKBLtuq551Q76SlOehSabLgSkXoV3z4PyLD5RH1KYNKCXXrP989Z8i5g4ajox4lAceyWZkRN3kqpZb5r4WZrXou4FvszU79UHGF9C8uvqbcCM7cn0Q60jvbdjAkV21RgzPZ2cEhIliafApDrBOOw568Ct4b1elAeLI34IbZGAcLgafhEJNgbhaSVsTuuBFDOQmIVXE1V8HQPXHV4GRIZdAcyGhvuINrlkIuDgIKuMDEZ4SBL7m8sGq5lkIraxJYZjIlZGHI1iFVFGSwAVlDhuXjbsFfwHnRgPR9I2i7YPJs6wzfDMIRW5Y0Mk9vjIEgV7AAYhsa6b0ecVuc9AfyYTJMkNoOcwovAayb16jkRAg1Z8iBoLpiv0RjKmYiT3V4Y8jbOFxFLGdWHZui7PI3IYnWGdujxJZ4IMiZhfAyxBQGFBmWGEmIh2RGOncGPdANzlRl038MjHQ0OAUN6s8vQBWedOe4BmkbFtYY3USLm7SLZpRz2quayVATkAZtO80pvFyosCubnfuZzXiP2RGbtPivfVWNefyJvWw5CsRZs765nTbR9Rg6BOZ0sdlCPUYBgqQXe1Bkhj32elIQ2LrZpC3OYMGL9zGlKZBeQgUq5k58XuEKLGZhFqc7ut6sXegWNbFl4mgb9PZHe5mYdL35 Requires: libc.so.6(GLIBC_2.0), libc.so.6(GLIBC_2.1.3), libc.so.6(GLIBC_2.4), libgfortran.so.5 >= set:ojy9csyUkAykOWwZbcIOAwPxEaPHSjO6HYhJvvcypqB1z8CWQyKqmSkejvD2jDCNApuorGxaZv, libgfortran.so.5(GFORTRAN_8), liblapack.so.4 >= set:omZx0Zxjc1, libm.so.6(GLIBC_2.0), libm.so.6(GLIBC_2.1), libm.so.6(GLIBC_2.27), libm.so.6(GLIBC_2.29), rtld(GNU_HASH) Requires(rpmlib): rpmlib(SetVersions) Finding debuginfo files (using /usr/lib/rpm/find-debuginfo-files) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.IRbU7D Creating libslatec-debuginfo package Processing files: libslatec-devel-4.1-alt7 Finding Provides (using /usr/lib/rpm/find-provides) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.yAYU3D find-provides: running scripts (debuginfo,lib,pam,perl,pkgconfig,python,shell) Finding Requires (using /usr/lib/rpm/find-requires) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.6xMK3z find-requires: running scripts (cpp,debuginfo,files,lib,pam,perl,pkgconfig,pkgconfiglib,python,rpmlib,shebang,shell,static,symlinks,systemd-services) Requires: libslatec = 4.1-alt7, /usr/lib/libslatec.so.4 Finding debuginfo files (using /usr/lib/rpm/find-debuginfo-files) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.xGlgiE Processing files: libslatec-devel-docs-4.1-alt7 Executing(%doc): /bin/sh -e /usr/src/tmp/rpm-tmp.85745 + umask 022 + /bin/mkdir -p /usr/src/RPM/BUILD + cd /usr/src/RPM/BUILD + cd libslatec-4.1 + DOCDIR=/usr/src/tmp/libslatec-buildroot/usr/share/doc/libslatec-devel-docs-4.1 + export DOCDIR + rm -rf /usr/src/tmp/libslatec-buildroot/usr/share/doc/libslatec-devel-docs-4.1 + /bin/mkdir -p /usr/src/tmp/libslatec-buildroot/usr/share/doc/libslatec-devel-docs-4.1 + cp -prL guide /usr/src/tmp/libslatec-buildroot/usr/share/doc/libslatec-devel-docs-4.1 + chmod -R go-w /usr/src/tmp/libslatec-buildroot/usr/share/doc/libslatec-devel-docs-4.1 + chmod -R a+rX /usr/src/tmp/libslatec-buildroot/usr/share/doc/libslatec-devel-docs-4.1 + exit 0 Finding Provides (using /usr/lib/rpm/find-provides) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.1IKNYC find-provides: running scripts (debuginfo,lib,pam,perl,pkgconfig,python,shell) Finding Requires (using /usr/lib/rpm/find-requires) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.ILOyrB find-requires: running scripts (cpp,debuginfo,files,lib,pam,perl,pkgconfig,pkgconfiglib,python,rpmlib,shebang,shell,static,symlinks,systemd-services) Processing files: libslatec-debuginfo-4.1-alt7 Finding Provides (using /usr/lib/rpm/find-provides) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.pbtJpD find-provides: running scripts (debuginfo) Finding Requires (using /usr/lib/rpm/find-requires) Executing: /bin/sh -e /usr/src/tmp/rpm-tmp.2slrrB find-requires: running scripts (debuginfo) Provides: debug(libslatec.so.4) Requires: libslatec = 4.1-alt7, debug(libc.so.6), debug(libgfortran.so.5), debug(liblapack.so.4), debug(libm.so.6) Adding to libslatec-devel a strict dependency on libslatec Adding to libslatec-debuginfo a strict dependency on libslatec Removing 1 extra deps from libslatec-devel due to dependency on libslatec Wrote: /usr/src/RPM/RPMS/i586/libslatec-4.1-alt7.i586.rpm Wrote: /usr/src/RPM/RPMS/i586/libslatec-devel-4.1-alt7.i586.rpm Wrote: /usr/src/RPM/RPMS/noarch/libslatec-devel-docs-4.1-alt7.noarch.rpm Wrote: /usr/src/RPM/RPMS/i586/libslatec-debuginfo-4.1-alt7.i586.rpm 231.65user 29.22system 2:35.25elapsed 168%CPU (0avgtext+0avgdata 39696maxresident)k 0inputs+0outputs (0major+13539694minor)pagefaults 0swaps /.out/libslatec-devel-docs-4.1-alt7.noarch.rpm: The use of such a license name is ambiguous: GPL /.out/libslatec-4.1-alt7.i586.rpm: The use of such a license name is ambiguous: GPL /.out/libslatec-devel-4.1-alt7.i586.rpm: The use of such a license name is ambiguous: GPL /.out/libslatec-debuginfo-4.1-alt7.i586.rpm: The use of such a license name is ambiguous: GPL 236.66user 31.73system 2:42.87elapsed 164%CPU (0avgtext+0avgdata 108832maxresident)k 0inputs+0outputs (0major+13873334minor)pagefaults 0swaps --- libslatec-4.1-alt7.i586.rpm.repo 2019-03-03 21:56:37.000000000 +0000 +++ libslatec-4.1-alt7.i586.rpm.hasher 2020-04-25 13:29:56.311231580 +0000 @@ -12,2 +12,3 @@ Requires: libm.so.6(GLIBC_2.27) +Requires: libm.so.6(GLIBC_2.29) Requires: rtld(GNU_HASH)