<86>Dec  4 15:28:06 userdel[1395229]: delete user 'rooter'
<86>Dec  4 15:28:06 userdel[1395229]: removed group 'rooter' owned by 'rooter'
<86>Dec  4 15:28:06 groupadd[1395242]: group added to /etc/group: name=rooter, GID=669
<86>Dec  4 15:28:06 groupadd[1395242]: group added to /etc/gshadow: name=rooter
<86>Dec  4 15:28:06 groupadd[1395242]: new group: name=rooter, GID=669
<86>Dec  4 15:28:06 useradd[1395259]: new user: name=rooter, UID=669, GID=669, home=/root, shell=/bin/bash
<86>Dec  4 15:28:06 userdel[1395290]: delete user 'builder'
<86>Dec  4 15:28:06 userdel[1395290]: removed group 'builder' owned by 'builder'
<86>Dec  4 15:28:06 userdel[1395290]: removed shadow group 'builder' owned by 'builder'
<86>Dec  4 15:28:06 groupadd[1395307]: group added to /etc/group: name=builder, GID=670
<86>Dec  4 15:28:06 groupadd[1395307]: group added to /etc/gshadow: name=builder
<86>Dec  4 15:28:06 groupadd[1395307]: new group: name=builder, GID=670
<86>Dec  4 15:28:06 useradd[1395322]: new user: name=builder, UID=670, GID=670, home=/usr/src, shell=/bin/bash
<13>Dec  4 15:28:08 rpmi: libquadmath0-10.2.1-alt2 icarus+262842.100.1.1 1606948274 installed
<13>Dec  4 15:28:08 rpmi: libquadmath10-devel-10.2.1-alt2 icarus+262842.100.1.1 1606948274 installed
<13>Dec  4 15:28:08 rpmi: libgfortran5-10.2.1-alt2 icarus+262842.100.1.1 1606948274 installed
<13>Dec  4 15:28:08 rpmi: gcc-fortran-common-1.4.26-alt1 icarus+262780.400.2.1 1606887104 installed
<13>Dec  4 15:28:08 rpmi: libgfortran10-devel-10.2.1-alt2 icarus+262842.100.1.1 1606948274 installed
<13>Dec  4 15:28:09 rpmi: gcc10-fortran-10.2.1-alt2 icarus+262842.100.1.1 1606948274 installed
<13>Dec  4 15:28:09 rpmi: gcc-fortran-10-alt1 icarus+262780.300.2.1 1606888886 installed
Building target platforms: i586
Building for target i586
Wrote: /usr/src/in/nosrpm/daskr-2011.06.08-alt1.nosrc.rpm
Installing daskr-2011.06.08-alt1.src.rpm
Building target platforms: i586
Building for target i586
Executing(%prep): /bin/sh -e /usr/src/tmp/rpm-tmp.18856
+ umask 022
+ /bin/mkdir -p /usr/src/RPM/BUILD
+ cd /usr/src/RPM/BUILD
+ cd /usr/src/RPM/BUILD
+ rm -rf daskr-2011.06.08
+ echo 'Source #0 (daskr-2011.06.08.tar):'
Source #0 (daskr-2011.06.08.tar):
+ /bin/tar -xf /usr/src/RPM/SOURCES/daskr-2011.06.08.tar
+ cd daskr-2011.06.08
+ /bin/chmod -c -Rf u+rwX,go-w .
+ exit 0
Executing(%build): /bin/sh -e /usr/src/tmp/rpm-tmp.18856
+ umask 022
+ /bin/mkdir -p /usr/src/RPM/BUILD
+ cd /usr/src/RPM/BUILD
+ cd daskr-2011.06.08
+ g77 -c -pipe -frecord-gcc-switches -Wall -g -O2 -march=i586 -mtune=generic -fPIC -DPIC preconds/dbanpre.f preconds/dilupre.f preconds/drbdpre.f preconds/drbgpre.f preconds/dsparsk.f preconds/sbanpre.f preconds/silupre.f preconds/srbdpre.f preconds/srbgpre.f preconds/ssparsk.f solver/daux.f solver/ddaskr.f solver/dlinpk.f solver/saux.f solver/sdaskr.f solver/slinpk.f
preconds/dbanpre.f:178:72:

  178 |  20         WP(II+I) = (WK(I) - SAVR(I))*DELINV
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
preconds/dbanpre.f:190:56:

  190 |       SUBROUTINE DBANPS (NEQ, T, Y, YPRIME, SAVR, WK, CJ, WGHT,
      |                                                        1
Warning: Unused dummy argument 'cj' at (1) [-Wunused-dummy-argument]
preconds/dbanpre.f:191:42:

  191 |      *                   WP, IWP, B, EPLIN, IER, RPAR, IPAR)
      |                                          1
Warning: Unused dummy argument 'eplin' at (1) [-Wunused-dummy-argument]
preconds/dbanpre.f:191:47:

  191 |      *                   WP, IWP, B, EPLIN, IER, RPAR, IPAR)
      |                                               1
Warning: Unused dummy argument 'ier' at (1) [-Wunused-dummy-argument]
preconds/dbanpre.f:191:53:

  191 |      *                   WP, IWP, B, EPLIN, IER, RPAR, IPAR)
      |                                                     1
Warning: Unused dummy argument 'rpar' at (1) [-Wunused-dummy-argument]
preconds/dbanpre.f:190:48:

  190 |       SUBROUTINE DBANPS (NEQ, T, Y, YPRIME, SAVR, WK, CJ, WGHT,
      |                                                1
Warning: Unused dummy argument 'savr' at (1) [-Wunused-dummy-argument]
preconds/dbanpre.f:190:31:

  190 |       SUBROUTINE DBANPS (NEQ, T, Y, YPRIME, SAVR, WK, CJ, WGHT,
      |                               1
Warning: Unused dummy argument 't' at (1) [-Wunused-dummy-argument]
preconds/dbanpre.f:190:62:

  190 |       SUBROUTINE DBANPS (NEQ, T, Y, YPRIME, SAVR, WK, CJ, WGHT,
      |                                                              1
Warning: Unused dummy argument 'wght' at (1) [-Wunused-dummy-argument]
preconds/dbanpre.f:190:52:

  190 |       SUBROUTINE DBANPS (NEQ, T, Y, YPRIME, SAVR, WK, CJ, WGHT,
      |                                                    1
Warning: Unused dummy argument 'wk' at (1) [-Wunused-dummy-argument]
preconds/dbanpre.f:190:34:

  190 |       SUBROUTINE DBANPS (NEQ, T, Y, YPRIME, SAVR, WK, CJ, WGHT,
      |                                  1
Warning: Unused dummy argument 'y' at (1) [-Wunused-dummy-argument]
preconds/dbanpre.f:190:42:

  190 |       SUBROUTINE DBANPS (NEQ, T, Y, YPRIME, SAVR, WK, CJ, WGHT,
      |                                          1
Warning: Unused dummy argument 'yprime' at (1) [-Wunused-dummy-argument]
f951: Warning: Nonconforming tab character in column 1 of line 656 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 739 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 741 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 887 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 889 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 891 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 892 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 894 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 896 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 897 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 898 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 899 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 900 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 905 [-Wtabs]
preconds/dilupre.f:747:72:

  747 |  40         BL(I) = WK(I) / WGHT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
preconds/dilupre.f:750:72:

  750 |  50         BL(I) = WK(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
preconds/dilupre.f:893:25:

  893 |       INTEGER MASK(NEQ)   ! Work array used by the BFS reordering
      |                         1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dilupre.f:904:20:

  904 |       INTEGER NLEV   ! Number of levels in levels array.
      |                    1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dilupre.f:906:23:

  906 |       INTEGER MASKVAL   ! Scalar used with MASK.
      |                       1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dilupre.f:862:52:

  862 |       SUBROUTINE DJREORD (NEQ, NEQP1, NNZMX, PREMETH,
      |                                                    1
Warning: Unused dummy argument 'premeth' at (1) [-Wunused-dummy-argument]
preconds/dilupre.f:675:56:

  675 |       SUBROUTINE DPSOLILU (NEQ, T, Y, YPRIME, R0, WK, CJ, WGHT,
      |                                                        1
Warning: Unused dummy argument 'cj' at (1) [-Wunused-dummy-argument]
preconds/dilupre.f:676:45:

  676 |      .                     WP, IWP, BL, EPLIN, IERR, RPAR, IPAR)
      |                                             1
Warning: Unused dummy argument 'eplin' at (1) [-Wunused-dummy-argument]
preconds/dilupre.f:675:48:

  675 |       SUBROUTINE DPSOLILU (NEQ, T, Y, YPRIME, R0, WK, CJ, WGHT,
      |                                                1
Warning: Unused dummy argument 'r0' at (1) [-Wunused-dummy-argument]
preconds/dilupre.f:676:57:

  676 |      .                     WP, IWP, BL, EPLIN, IERR, RPAR, IPAR)
      |                                                         1
Warning: Unused dummy argument 'rpar' at (1) [-Wunused-dummy-argument]
preconds/dilupre.f:675:33:

  675 |       SUBROUTINE DPSOLILU (NEQ, T, Y, YPRIME, R0, WK, CJ, WGHT,
      |                                 1
Warning: Unused dummy argument 't' at (1) [-Wunused-dummy-argument]
preconds/dilupre.f:675:36:

  675 |       SUBROUTINE DPSOLILU (NEQ, T, Y, YPRIME, R0, WK, CJ, WGHT,
      |                                    1
Warning: Unused dummy argument 'y' at (1) [-Wunused-dummy-argument]
preconds/dilupre.f:675:44:

  675 |       SUBROUTINE DPSOLILU (NEQ, T, Y, YPRIME, R0, WK, CJ, WGHT,
      |                                            1
Warning: Unused dummy argument 'yprime' at (1) [-Wunused-dummy-argument]
preconds/drbdpre.f:217:72:

  217 |  10         IWORK(I0+I) = 1
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
preconds/drbdpre.f:219:72:

  219 |  20         IWORK(I0+I) = -1
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
preconds/drbdpre.f:300:72:

  300 |  10           BD(IBD+I) = (R1(I) - R0(J0+I))*FAC
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
preconds/drbdpre.f:315:72:

  315 |  70       IDIAG = IDIAG + (MP + 1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1)
preconds/drbgpre.f:261:72:

  261 |  10         IWORK(I0+I) = 1
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
preconds/drbgpre.f:263:72:

  263 |  20         IWORK(I0+I) = -1
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
preconds/drbgpre.f:296:72:

  296 |  10     JG(IG) = 1 + (IG - 1)*MPER
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
preconds/drbgpre.f:302:72:

  302 |  20     JIG(J) = 1 + (J-1)/MPER
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
preconds/drbgpre.f:305:72:

  305 |  25     JIG(J) = NG
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 25 at (1)
preconds/drbgpre.f:308:72:

  308 |  30     JR(IG) = 0.5D0 + (REAL(IG) - 0.5D0)*REAL(MPER)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
preconds/drbgpre.f:395:72:

  395 |  10           BD(IBD+I) = (R1(I) - R0(J0+I))*FAC
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
preconds/drbgpre.f:409:72:

  409 |  70       IDIAG = IDIAG + (MP + 1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1)
preconds/drbgpre.f:308:17:

  308 |  30     JR(IG) = 0.5D0 + (REAL(IG) - 0.5D0)*REAL(MPER)
      |                 1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion]
preconds/drbgpre.f:309:15:

  309 |       JR(NG) = 0.5D0*REAL(1 + NGM1*MPER + M)
      |               1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion]
f951: Warning: Nonconforming tab character in column 1 of line 93 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 721 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 722 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 723 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 724 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 725 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 726 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 727 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 728 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 729 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 730 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 731 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 732 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 733 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 851 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 858 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 861 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 862 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1491 [-Wtabs]
f951: Warning: Nonconforming tab character in column 5 of line 2719 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2727 [-Wtabs]
f951: Warning: Nonconforming tab character in column 5 of line 2734 [-Wtabs]
f951: Warning: Nonconforming tab character in column 5 of line 2814 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2823 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2932 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2969 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2970 [-Wtabs]
f951: Warning: Nonconforming tab character in column 4 of line 2972 [-Wtabs]
f951: Warning: Nonconforming tab character in column 3 of line 2976 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2979 [-Wtabs]
preconds/dsparsk.f:662:8:

  662 |      *         guesol*2, rhstyp*3
      |        1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:665:29:

  665 |       integer ja(*), ia(*)
      |                             1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:675:72:

  675 |          assign 101 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/dsparsk.f:677:72:

  677 |          assign 100 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/dsparsk.f:692:14:

  692 |       valcrd = 0
      |              1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:704:72:

  704 |             assign 102 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/dsparsk.f:706:72:

  706 |             assign 103 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/dsparsk.f:708:72:

  708 |             assign 104 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/dsparsk.f:722:72:

  722 |         assign 105 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/dsparsk.f:724:72:

  724 |         assign 106 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/dsparsk.f:726:72:

  726 |         assign 107 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/dsparsk.f:730:72:

  730 |         assign 108 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/dsparsk.f:732:72:

  732 |         assign 109 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/dsparsk.f:734:72:

  734 |                assign 110 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/dsparsk.f:746:14:

  746 |       endif
      |              1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:863:19:

  863 |  3       continue
      |                   1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:1001:16:

 1001 |  6    k = k+1
      |                1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:1764:11:

 1764 |       tmp = x(init)
      |           1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:1775:12:

 1775 |       tmp1   = x(ii)
      |            1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:1777:12:

 1777 |       next   = perm(ii)
      |            1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:1796:11:

 1796 |       tmp = x(init)
      |           1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:1797:10:

 1797 |       ii = perm(init)
      |          1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:1837:11:

 1837 |       tmp = ix(init)
      |           1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:1848:12:

 1848 |       tmp1   = ix(ii)
      |            1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:1850:12:

 1850 |       next   = perm(ii)
      |            1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:1869:11:

 1869 |       tmp = ix(init)
      |           1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:1870:10:

 1870 |       ii = perm(init)
      |          1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:3211:24:

 3211 |          i = riord(ir)
      |                        1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/dsparsk.f:744:4:

  744 |  110     format(1h(,i2,1hD,i2,1h.,i2,1h) )
      |    1
Warning: Label 110 at (1) defined but not used [-Wunused-label]
preconds/dsparsk.f:743:4:

  743 |  109     format(1h(,i2,1hD,i2,1h.,i1,1h) )
      |    1
Warning: Label 109 at (1) defined but not used [-Wunused-label]
preconds/dsparsk.f:742:4:

  742 |  108     format(1h(,i2,1hD,i1,1h.,i1,1h) )
      |    1
Warning: Label 108 at (1) defined but not used [-Wunused-label]
preconds/dsparsk.f:741:4:

  741 |  107     format(1h(,i1,1hD,i2,1h.,i2,1h) )
      |    1
Warning: Label 107 at (1) defined but not used [-Wunused-label]
preconds/dsparsk.f:740:4:

  740 |  106     format(1h(,i1,1hD,i2,1h.,i1,1h) )
      |    1
Warning: Label 106 at (1) defined but not used [-Wunused-label]
preconds/dsparsk.f:739:4:

  739 |  105     format(1h(,i1,1hD,i1,1h.,i1,1h) )
      |    1
Warning: Label 105 at (1) defined but not used [-Wunused-label]
preconds/dsparsk.f:714:4:

  714 |  104     format(1h(,i2,1hF,i2,1h.,i2,1h) )
      |    1
Warning: Label 104 at (1) defined but not used [-Wunused-label]
preconds/dsparsk.f:713:4:

  713 |  103     format(1h(,i2,1hF,i2,1h.,i1,1h) )
      |    1
Warning: Label 103 at (1) defined but not used [-Wunused-label]
preconds/dsparsk.f:712:4:

  712 |  102     format(1h(,i2,1hF,i1,1h.,i1,1h) )
      |    1
Warning: Label 102 at (1) defined but not used [-Wunused-label]
preconds/dsparsk.f:681:4:

  681 |  101  format(1h(,i2,1HI,i2,1h) )
      |    1
Warning: Label 101 at (1) defined but not used [-Wunused-label]
preconds/dsparsk.f:679:20:

  679 |       write (ptrfmt,ix) nperli,len
      |                    1
Warning: Deleted feature: ASSIGNED variable in FORMAT tag at (1)
preconds/dsparsk.f:711:22:

  711 |          write(valfmt,ix) nperli,len,ifmt
      |                      1
Warning: Deleted feature: ASSIGNED variable in FORMAT tag at (1)
preconds/dsparsk.f:738:22:

  738 |          write(valfmt,ix) nperli,len,ifmt
      |                      1
Warning: Deleted feature: ASSIGNED variable in FORMAT tag at (1)
preconds/dsparsk.f:3172:3:

 3172 |  13   continue
      |   1
Warning: Label 13 at (1) defined but not used [-Wunused-label]
preconds/dsparsk.f:3196:2:

 3196 |  3    levels(nlev+1) = iend+1
      |  1
Warning: Label 3 at (1) defined but not used [-Wunused-label]
preconds/dsparsk.f:3203:42:

 3203 |       subroutine add_lvst(istart,iend,nlev,riord,ja,ia,mask,maskval)
      |                                          1
Warning: Unused dummy argument 'nlev' at (1) [-Wunused-dummy-argument]
preconds/dsparsk.f:2011:42:

 2011 |       subroutine rnrms   (nrow, nrm, a, ja, ia, diag)
      |                                          1
Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument]
preconds/dsparsk.f:1920:27:

 1920 |       subroutine getbwd(n,a,ja,ia,ml,mu)
      |                           1
Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument]
preconds/dsparsk.f:766:10:

  766 |       if (nrhs .ge. 1) write (iounit,11) rhstyp, nrhs, nrwindx
      |          ^
Warning: 'nrhs' may be used uninitialized in this function [-Wmaybe-uninitialized]
preconds/dsparsk.f:1009:72:

 1009 |       if (values) a(ipos)  = t
      |                                                                        ^
Warning: 'tnext' may be used uninitialized in this function [-Wmaybe-uninitialized]
preconds/sbanpre.f:179:72:

  179 |  20         WP(II+I) = (WK(I) - SAVR(I))*DELINV
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
preconds/sbanpre.f:191:56:

  191 |       SUBROUTINE SBANPS (NEQ, T, Y, YPRIME, SAVR, WK, CJ, WGHT,
      |                                                        1
Warning: Unused dummy argument 'cj' at (1) [-Wunused-dummy-argument]
preconds/sbanpre.f:192:42:

  192 |      *                   WP, IWP, B, EPLIN, IER, RPAR, IPAR)
      |                                          1
Warning: Unused dummy argument 'eplin' at (1) [-Wunused-dummy-argument]
preconds/sbanpre.f:192:47:

  192 |      *                   WP, IWP, B, EPLIN, IER, RPAR, IPAR)
      |                                               1
Warning: Unused dummy argument 'ier' at (1) [-Wunused-dummy-argument]
preconds/sbanpre.f:192:53:

  192 |      *                   WP, IWP, B, EPLIN, IER, RPAR, IPAR)
      |                                                     1
Warning: Unused dummy argument 'rpar' at (1) [-Wunused-dummy-argument]
preconds/sbanpre.f:191:48:

  191 |       SUBROUTINE SBANPS (NEQ, T, Y, YPRIME, SAVR, WK, CJ, WGHT,
      |                                                1
Warning: Unused dummy argument 'savr' at (1) [-Wunused-dummy-argument]
preconds/sbanpre.f:191:31:

  191 |       SUBROUTINE SBANPS (NEQ, T, Y, YPRIME, SAVR, WK, CJ, WGHT,
      |                               1
Warning: Unused dummy argument 't' at (1) [-Wunused-dummy-argument]
preconds/sbanpre.f:191:62:

  191 |       SUBROUTINE SBANPS (NEQ, T, Y, YPRIME, SAVR, WK, CJ, WGHT,
      |                                                              1
Warning: Unused dummy argument 'wght' at (1) [-Wunused-dummy-argument]
preconds/sbanpre.f:191:52:

  191 |       SUBROUTINE SBANPS (NEQ, T, Y, YPRIME, SAVR, WK, CJ, WGHT,
      |                                                    1
Warning: Unused dummy argument 'wk' at (1) [-Wunused-dummy-argument]
preconds/sbanpre.f:191:34:

  191 |       SUBROUTINE SBANPS (NEQ, T, Y, YPRIME, SAVR, WK, CJ, WGHT,
      |                                  1
Warning: Unused dummy argument 'y' at (1) [-Wunused-dummy-argument]
preconds/sbanpre.f:191:42:

  191 |       SUBROUTINE SBANPS (NEQ, T, Y, YPRIME, SAVR, WK, CJ, WGHT,
      |                                          1
Warning: Unused dummy argument 'yprime' at (1) [-Wunused-dummy-argument]
f951: Warning: Nonconforming tab character in column 1 of line 656 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 739 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 741 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 887 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 889 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 891 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 892 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 894 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 896 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 897 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 898 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 899 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 900 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 905 [-Wtabs]
preconds/silupre.f:747:72:

  747 |  40         BL(I) = WK(I) / WGHT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
preconds/silupre.f:750:72:

  750 |  50         BL(I) = WK(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
preconds/silupre.f:893:25:

  893 |       INTEGER MASK(NEQ)   ! Work array used by the BFS reordering
      |                         1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/silupre.f:904:20:

  904 |       INTEGER NLEV   ! Number of levels in levels array.
      |                    1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/silupre.f:906:23:

  906 |       INTEGER MASKVAL   ! Scalar used with MASK.
      |                       1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/silupre.f:862:52:

  862 |       SUBROUTINE SJREORD (NEQ, NEQP1, NNZMX, PREMETH,
      |                                                    1
Warning: Unused dummy argument 'premeth' at (1) [-Wunused-dummy-argument]
preconds/silupre.f:675:56:

  675 |       SUBROUTINE SPSOLILU (NEQ, T, Y, YPRIME, R0, WK, CJ, WGHT,
      |                                                        1
Warning: Unused dummy argument 'cj' at (1) [-Wunused-dummy-argument]
preconds/silupre.f:676:45:

  676 |      .                     WP, IWP, BL, EPLIN, IERR, RPAR, IPAR)
      |                                             1
Warning: Unused dummy argument 'eplin' at (1) [-Wunused-dummy-argument]
preconds/silupre.f:675:48:

  675 |       SUBROUTINE SPSOLILU (NEQ, T, Y, YPRIME, R0, WK, CJ, WGHT,
      |                                                1
Warning: Unused dummy argument 'r0' at (1) [-Wunused-dummy-argument]
preconds/silupre.f:676:57:

  676 |      .                     WP, IWP, BL, EPLIN, IERR, RPAR, IPAR)
      |                                                         1
Warning: Unused dummy argument 'rpar' at (1) [-Wunused-dummy-argument]
preconds/silupre.f:675:33:

  675 |       SUBROUTINE SPSOLILU (NEQ, T, Y, YPRIME, R0, WK, CJ, WGHT,
      |                                 1
Warning: Unused dummy argument 't' at (1) [-Wunused-dummy-argument]
preconds/silupre.f:675:36:

  675 |       SUBROUTINE SPSOLILU (NEQ, T, Y, YPRIME, R0, WK, CJ, WGHT,
      |                                    1
Warning: Unused dummy argument 'y' at (1) [-Wunused-dummy-argument]
preconds/silupre.f:675:44:

  675 |       SUBROUTINE SPSOLILU (NEQ, T, Y, YPRIME, R0, WK, CJ, WGHT,
      |                                            1
Warning: Unused dummy argument 'yprime' at (1) [-Wunused-dummy-argument]
preconds/srbdpre.f:218:72:

  218 |  10         IWORK(I0+I) = 1
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
preconds/srbdpre.f:220:72:

  220 |  20         IWORK(I0+I) = -1
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
preconds/srbdpre.f:302:72:

  302 |  10           BD(IBD+I) = (R1(I) - R0(J0+I))*FAC
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
preconds/srbdpre.f:317:72:

  317 |  70       IDIAG = IDIAG + (MP + 1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1)
preconds/srbgpre.f:262:72:

  262 |  10         IWORK(I0+I) = 1
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
preconds/srbgpre.f:264:72:

  264 |  20         IWORK(I0+I) = -1
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
preconds/srbgpre.f:298:72:

  298 |  10     JG(IG) = 1 + (IG - 1)*MPER
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
preconds/srbgpre.f:304:72:

  304 |  20     JIG(J) = 1 + (J-1)/MPER
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
preconds/srbgpre.f:307:72:

  307 |  25     JIG(J) = NG
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 25 at (1)
preconds/srbgpre.f:310:72:

  310 |  30     JR(IG) = 0.5E0 + (REAL(IG) - 0.5E0)*REAL(MPER)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
preconds/srbgpre.f:398:72:

  398 |  10           BD(IBD+I) = (R1(I) - R0(J0+I))*FAC
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
preconds/srbgpre.f:412:72:

  412 |  70       IDIAG = IDIAG + (MP + 1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1)
preconds/srbgpre.f:310:17:

  310 |  30     JR(IG) = 0.5E0 + (REAL(IG) - 0.5E0)*REAL(MPER)
      |                 1
Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion]
preconds/srbgpre.f:311:15:

  311 |       JR(NG) = 0.5E0*REAL(1 + NGM1*MPER + M)
      |               1
Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion]
f951: Warning: Nonconforming tab character in column 1 of line 93 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 721 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 722 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 723 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 724 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 725 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 726 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 727 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 728 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 729 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 730 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 731 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 732 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 733 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 851 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 858 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 861 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 862 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1491 [-Wtabs]
f951: Warning: Nonconforming tab character in column 5 of line 2719 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2727 [-Wtabs]
f951: Warning: Nonconforming tab character in column 5 of line 2734 [-Wtabs]
f951: Warning: Nonconforming tab character in column 5 of line 2814 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2823 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2932 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2969 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2970 [-Wtabs]
f951: Warning: Nonconforming tab character in column 4 of line 2972 [-Wtabs]
f951: Warning: Nonconforming tab character in column 3 of line 2976 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2979 [-Wtabs]
preconds/ssparsk.f:662:8:

  662 |      *         guesol*2, rhstyp*3
      |        1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:665:29:

  665 |       integer ja(*), ia(*)
      |                             1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:675:72:

  675 |          assign 101 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/ssparsk.f:677:72:

  677 |          assign 100 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/ssparsk.f:692:14:

  692 |       valcrd = 0
      |              1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:704:72:

  704 |             assign 102 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/ssparsk.f:706:72:

  706 |             assign 103 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/ssparsk.f:708:72:

  708 |             assign 104 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/ssparsk.f:722:72:

  722 |         assign 105 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/ssparsk.f:724:72:

  724 |         assign 106 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/ssparsk.f:726:72:

  726 |         assign 107 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/ssparsk.f:730:72:

  730 |         assign 108 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/ssparsk.f:732:72:

  732 |         assign 109 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/ssparsk.f:734:72:

  734 |                assign 110 to ix
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
preconds/ssparsk.f:746:14:

  746 |       endif
      |              1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:863:19:

  863 |  3       continue
      |                   1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:1001:16:

 1001 |  6    k = k+1
      |                1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:1764:11:

 1764 |       tmp = x(init)
      |           1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:1775:12:

 1775 |       tmp1   = x(ii)
      |            1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:1777:12:

 1777 |       next   = perm(ii)
      |            1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:1796:11:

 1796 |       tmp = x(init)
      |           1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:1797:10:

 1797 |       ii = perm(init)
      |          1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:1837:11:

 1837 |       tmp = ix(init)
      |           1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:1848:12:

 1848 |       tmp1   = ix(ii)
      |            1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:1850:12:

 1850 |       next   = perm(ii)
      |            1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:1869:11:

 1869 |       tmp = ix(init)
      |           1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:1870:10:

 1870 |       ii = perm(init)
      |          1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:3211:24:

 3211 |          i = riord(ir)
      |                        1
Warning: Nonconforming tab character at (1) [-Wtabs]
preconds/ssparsk.f:744:4:

  744 |  110     format(1h(,i2,1hD,i2,1h.,i2,1h) )
      |    1
Warning: Label 110 at (1) defined but not used [-Wunused-label]
preconds/ssparsk.f:743:4:

  743 |  109     format(1h(,i2,1hD,i2,1h.,i1,1h) )
      |    1
Warning: Label 109 at (1) defined but not used [-Wunused-label]
preconds/ssparsk.f:742:4:

  742 |  108     format(1h(,i2,1hD,i1,1h.,i1,1h) )
      |    1
Warning: Label 108 at (1) defined but not used [-Wunused-label]
preconds/ssparsk.f:741:4:

  741 |  107     format(1h(,i1,1hD,i2,1h.,i2,1h) )
      |    1
Warning: Label 107 at (1) defined but not used [-Wunused-label]
preconds/ssparsk.f:740:4:

  740 |  106     format(1h(,i1,1hD,i2,1h.,i1,1h) )
      |    1
Warning: Label 106 at (1) defined but not used [-Wunused-label]
preconds/ssparsk.f:739:4:

  739 |  105     format(1h(,i1,1hD,i1,1h.,i1,1h) )
      |    1
Warning: Label 105 at (1) defined but not used [-Wunused-label]
preconds/ssparsk.f:714:4:

  714 |  104     format(1h(,i2,1hF,i2,1h.,i2,1h) )
      |    1
Warning: Label 104 at (1) defined but not used [-Wunused-label]
preconds/ssparsk.f:713:4:

  713 |  103     format(1h(,i2,1hF,i2,1h.,i1,1h) )
      |    1
Warning: Label 103 at (1) defined but not used [-Wunused-label]
preconds/ssparsk.f:712:4:

  712 |  102     format(1h(,i2,1hF,i1,1h.,i1,1h) )
      |    1
Warning: Label 102 at (1) defined but not used [-Wunused-label]
preconds/ssparsk.f:681:4:

  681 |  101  format(1h(,i2,1HI,i2,1h) )
      |    1
Warning: Label 101 at (1) defined but not used [-Wunused-label]
preconds/ssparsk.f:679:20:

  679 |       write (ptrfmt,ix) nperli,len
      |                    1
Warning: Deleted feature: ASSIGNED variable in FORMAT tag at (1)
preconds/ssparsk.f:711:22:

  711 |          write(valfmt,ix) nperli,len,ifmt
      |                      1
Warning: Deleted feature: ASSIGNED variable in FORMAT tag at (1)
preconds/ssparsk.f:738:22:

  738 |          write(valfmt,ix) nperli,len,ifmt
      |                      1
Warning: Deleted feature: ASSIGNED variable in FORMAT tag at (1)
preconds/ssparsk.f:3172:3:

 3172 |  13   continue
      |   1
Warning: Label 13 at (1) defined but not used [-Wunused-label]
preconds/ssparsk.f:3196:2:

 3196 |  3    levels(nlev+1) = iend+1
      |  1
Warning: Label 3 at (1) defined but not used [-Wunused-label]
preconds/ssparsk.f:3203:42:

 3203 |       subroutine add_lvst(istart,iend,nlev,riord,ja,ia,mask,maskval)
      |                                          1
Warning: Unused dummy argument 'nlev' at (1) [-Wunused-dummy-argument]
preconds/ssparsk.f:2011:42:

 2011 |       subroutine rnrms   (nrow, nrm, a, ja, ia, diag)
      |                                          1
Warning: Unused dummy argument 'ja' at (1) [-Wunused-dummy-argument]
preconds/ssparsk.f:1920:27:

 1920 |       subroutine getbwd(n,a,ja,ia,ml,mu)
      |                           1
Warning: Unused dummy argument 'a' at (1) [-Wunused-dummy-argument]
preconds/ssparsk.f:766:10:

  766 |       if (nrhs .ge. 1) write (iounit,11) rhstyp, nrhs, nrwindx
      |          ^
Warning: 'nrhs' may be used uninitialized in this function [-Wmaybe-uninitialized]
preconds/ssparsk.f:1009:72:

 1009 |       if (values) a(ipos)  = t
      |                                                                        ^
Warning: 'tnext' may be used uninitialized in this function [-Wmaybe-uninitialized]
solver/daux.f:2:46:

    2 |       DOUBLE PRECISION FUNCTION D1MACH (IDUMMY)
      |                                              1
Warning: Unused dummy argument 'idummy' at (1) [-Wunused-dummy-argument]
solver/daux.f:48:40:

   48 |       SUBROUTINE XERRWD (MSG, NMES, NERR, LEVEL, NI, I1, I2, NR, R1, R2)
      |                                        1
Warning: Unused dummy argument 'nerr' at (1) [-Wunused-dummy-argument]
solver/daux.f:48:34:

   48 |       SUBROUTINE XERRWD (MSG, NMES, NERR, LEVEL, NI, I1, I2, NR, R1, R2)
      |                                  1
Warning: Unused dummy argument 'nmes' at (1) [-Wunused-dummy-argument]
solver/daux.f:214:28:

  214 |       INTEGER FUNCTION IXSAV (IPAR, IVALUE, ISET)
      |                            ^
Warning: '__result_ixsav' may be used uninitialized in this function [-Wmaybe-uninitialized]
solver/ddaskr.f:1755:72:

 1755 |  305      RWORK(LVT+I-1) = MAX(IWORK(LID+I-1),0)*RWORK(LWT+I-1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 305 at (1)
solver/ddaskr.f:1881:72:

 1881 |  357      RWORK(LVT+I-1) = MAX(IWORK(LID+I-1),0)*RWORK(LWT+I-1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 357 at (1)
solver/ddaskr.f:1920:72:

 1920 | 380      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 380 at (1)
solver/ddaskr.f:2108:72:

 2108 |  515      RWORK(LVT+I-1) = MAX(IWORK(LID+I-1),0)*RWORK(LWT+I-1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 515 at (1)
solver/ddaskr.f:2125:72:

 2125 | 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)
solver/ddaskr.f:2570:72:

 2570 |  10     JROOT(I) = 0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
solver/ddaskr.f:2582:72:

 2582 |  110    IF (ABS(R0(I)) .EQ. ZERO) ZROOT = .TRUE.
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
solver/ddaskr.f:2589:72:

 2589 |  120    Y(I) = Y(I) + TEMP2*PHI(I,2)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
solver/ddaskr.f:2594:72:

 2594 |  130    IF (ABS(R0(I)) .EQ. ZERO) ZROOT = .TRUE.
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
solver/ddaskr.f:2623:72:

 2623 |  220    Y(I) = Y(I) + TEMP2*PHI(I,2)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1)
solver/ddaskr.f:3301:72:

 3301 | 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)
solver/ddaskr.f:3352:72:

 3352 | 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)
solver/ddaskr.f:3360:72:

 3360 | 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)
solver/ddaskr.f:3409:72:

 3409 | 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)
solver/ddaskr.f:3459:72:

 3459 | 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)
solver/ddaskr.f:3462:72:

 3462 | 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)
solver/ddaskr.f:3465:72:

 3465 |          DO 595 I=1,NEQ
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 595 at (1)
solver/ddaskr.f:3466:72:

 3466 | 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)
solver/ddaskr.f:3491:72:

 3491 | 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)
solver/ddaskr.f:3495:72:

 3495 | 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)
solver/ddaskr.f:3587:72:

 3587 | 695       PHI(I,2) = R*PHI(I,2)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 695 at (1)
solver/ddaskr.f:3838:72:

 3838 |  20     WT(I) = 1.0D0/WT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
solver/ddaskr.f:3885:72:

 3885 | 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)
solver/ddaskr.f:3895:72:

 3895 | 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)
solver/ddaskr.f:3927:72:

 3927 | 20      SUM = SUM + ((V(I)*RWT(I))/VMAX)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
solver/ddaskr.f:4362:72:

 4362 |  20           P(I) = P(I)*RATIO1
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
solver/ddaskr.f:4672:72:

 4672 | 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)
solver/ddaskr.f:4676:72:

 4676 | 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)
solver/ddaskr.f:4727:72:

 4727 | 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)
solver/ddaskr.f:4731:72:

 4731 | 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)
solver/ddaskr.f:4849:72:

 4849 | 100     E(I)=0.0D0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
solver/ddaskr.f:4860:72:

 4860 | 320        DELTA(I) = DELTA(I) * CONFAC
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1)
solver/ddaskr.f:4873:72:

 4873 | 340      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 340 at (1)
solver/ddaskr.f:4998:72:

 4998 | 110      WM(I)=0.0D0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
solver/ddaskr.f:5021:72:

 5021 | 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)
solver/ddaskr.f:5043:72:

 5043 | 410      WM(I)=0.0D0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1)
solver/ddaskr.f:5069:72:

 5069 | 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)
solver/ddaskr.f:5085:72:

 5085 | 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)
solver/ddaskr.f:5625:72:

 5625 |  20           P(I) = P(I)*RATIO1
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
solver/ddaskr.f:5955:72:

 5955 | 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)
solver/ddaskr.f:5959:72:

 5959 | 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)
solver/ddaskr.f:6009:72:

 6009 |  360    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 360 at (1)
solver/ddaskr.f:6013:72:

 6013 |  370    E(I) = E(I) - DELTA(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 370 at (1)
solver/ddaskr.f:6140:72:

 6140 | 100     E(I) = 0.0D0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
solver/ddaskr.f:6151:72:

 6151 | 320       DELTA(I) = DELTA(I) * CONFAC
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1)
solver/ddaskr.f:6157:72:

 6157 | 340     SAVR(I) = DELTA(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1)
solver/ddaskr.f:6171:72:

 6171 | 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)
solver/ddaskr.f:6303:72:

 6303 |  110     X(I) = 0.D0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
solver/ddaskr.f:6327:72:

 6327 |  120     X(I) = X(I) + WM(LZ+I-1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
solver/ddaskr.f:6498:72:

 6498 |  10     Z(I) = 0.0D0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
solver/ddaskr.f:6509:72:

 6509 |  30         V(I,1) = R(I)*WGHT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
solver/ddaskr.f:6512:72:

 6512 |  35         V(I,1) = R(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 35 at (1)
solver/ddaskr.f:6531:72:

 6531 |  60       HES(I,J) = 0.0D0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
solver/ddaskr.f:6572:72:

 6572 |  70             DL(K) = S*DL(K) + C*V(K,IP1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1)
solver/ddaskr.f:6579:72:

 6579 |  80         DL(K) = S*DL(K) + C*V(K,LLP1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
solver/ddaskr.f:6600:72:

 6600 |  130     Z(I) = 0.D0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
solver/ddaskr.f:6622:72:

 6622 |  170              DL(K) = S*DL(K) + C*V(K,IP1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1)
solver/ddaskr.f:6627:72:

 6627 |  180           DL(K) = S*DL(K) + C*V(K,MAXLP1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
solver/ddaskr.f:6644:72:

 6644 |  210    R(K) = 0.0D0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1)
solver/ddaskr.f:6648:72:

 6648 |  220    Z(K) = 0.0D0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1)
solver/ddaskr.f:6653:72:

 6653 |  240    Z(I) = Z(I)/WGHT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1)
solver/ddaskr.f:6755:72:

 6755 |  10     VTEM(I) = V(I)/WGHT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
solver/ddaskr.f:6763:72:

 6763 |  20     Z(I) = Y(I) + VTEM(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
solver/ddaskr.f:6777:72:

 6777 |  70     Z(I) = VTEM(I) - SAVR(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1)
solver/ddaskr.f:6789:72:

 6789 |  90     Z(I) = Z(I)*WGHT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
solver/ddaskr.f:2488:3:

 2488 | 770   MSG = 'DASKR--  RUN TERMINATED. APPARENT INFINITE LOOP'
      |   1
Warning: Label 770 at (1) defined but not used [-Wunused-label]
solver/ddaskr.f:2206:3:

 2206 | 540   IF (INFO(3) .NE. 0) GO TO 550
      |   1
Warning: Label 540 at (1) defined but not used [-Wunused-label]
solver/ddaskr.f:1744:3:

 1744 | 300   CONTINUE
      |   1
Warning: Label 300 at (1) defined but not used [-Wunused-label]
solver/ddaskr.f:2636:21:

 2636 |           JROOT(I) = -SIGN(1.0D0,R0(I))
      |                     1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion]
solver/ddaskr.f:2883:21:

 2883 |           JROOT(I) = -SIGN(1.0D0,R0(I))
      |                     1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion]
solver/ddaskr.f:2887:22:

 2887 |      1     JROOT(I) = SIGN(1.0D0,R1(I) - R0(I))
      |                      1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion]
solver/ddaskr.f:2899:45:

 2899 |         IF (ABS(R1(I)) .EQ. ZERO) JROOT(I) = -SIGN(1.0D0,R0(I))
      |                                             1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion]
solver/ddaskr.f:4725:3:

 4725 | 375   IF(NONNEG .EQ. 0) GO TO 390
      |   1
Warning: Label 375 at (1) defined but not used [-Wunused-label]
solver/ddaskr.f:1932:20:

 1932 |      *   RWORK(LRX),JROOT,IRT,RWORK(LROUND),INFO(3),
      |                    1
Error: Rank mismatch in argument 'jroot' at (1) (rank-1 and scalar)
solver/ddaskr.f:1955:20:

 1955 |      *   RWORK(LRX),JROOT,IRT,RWORK(LROUND),INFO(3),
      |                    1
Error: Rank mismatch in argument 'jroot' at (1) (rank-1 and scalar)
solver/ddaskr.f:2183:20:

 2183 |      *   RWORK(LRX),JROOT,IRT,RWORK(LROUND),INFO(3),
      |                    1
Error: Rank mismatch in argument 'jroot' at (1) (rank-1 and scalar)
solver/dlinpk.f:763:72:

  763 |    10 assign 30 to next
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
solver/dlinpk.f:768:20:

  768 |    20    go to next,(30, 50, 70, 110)
      |                    1
Warning: Deleted feature: Assigned GOTO statement at (1)
solver/dlinpk.f:770:72:

  770 |       assign 50 to next
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
solver/dlinpk.f:779:72:

  779 |       assign 70 to next
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
solver/dlinpk.f:785:72:

  785 |       assign 110 to next
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
solver/dlinpk.f:821:72:

  821 |    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)
solver/dlinpk.f:798:5:

  798 |   110 if( dabs(dx(i)) .le. xmax ) go to 115
      |     1
Warning: Label 110 at (1) defined but not used [-Wunused-label]
solver/dlinpk.f:793:5:

  793 |    70 if( dabs(dx(i)) .gt. cutlo ) go to 75
      |     1
Warning: Label 70 at (1) defined but not used [-Wunused-label]
solver/dlinpk.f:775:5:

  775 |    50 if( dx(i) .eq. zero) go to 200
      |     1
Warning: Label 50 at (1) defined but not used [-Wunused-label]
solver/dlinpk.f:799:72:

  799 |          sum = one + sum * (xmax / dx(i))**2
      |                                                                        ^
Warning: 'xmax' may be used uninitialized in this function [-Wmaybe-uninitialized]
solver/saux.f:2:34:

    2 |       REAL FUNCTION R1MACH (IDUMMY)
      |                                  1
Warning: Unused dummy argument 'idummy' at (1) [-Wunused-dummy-argument]
solver/saux.f:48:40:

   48 |       SUBROUTINE XERRWV (MSG, NMES, NERR, LEVEL, NI, I1, I2, NR, R1, R2)
      |                                        1
Warning: Unused dummy argument 'nerr' at (1) [-Wunused-dummy-argument]
solver/saux.f:48:34:

   48 |       SUBROUTINE XERRWV (MSG, NMES, NERR, LEVEL, NI, I1, I2, NR, R1, R2)
      |                                  1
Warning: Unused dummy argument 'nmes' at (1) [-Wunused-dummy-argument]
solver/saux.f:215:28:

  215 |       INTEGER FUNCTION IXSAV (IPAR, IVALUE, ISET)
      |                            ^
Warning: '__result_ixsav' may be used uninitialized in this function [-Wmaybe-uninitialized]
solver/sdaskr.f:1755:72:

 1755 |  305      RWORK(LVT+I-1) = MAX(IWORK(LID+I-1),0)*RWORK(LWT+I-1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 305 at (1)
solver/sdaskr.f:1881:72:

 1881 |  357      RWORK(LVT+I-1) = MAX(IWORK(LID+I-1),0)*RWORK(LWT+I-1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 357 at (1)
solver/sdaskr.f:1920:72:

 1920 | 380      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 380 at (1)
solver/sdaskr.f:2108:72:

 2108 |  515      RWORK(LVT+I-1) = MAX(IWORK(LID+I-1),0)*RWORK(LWT+I-1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 515 at (1)
solver/sdaskr.f:2125:72:

 2125 | 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)
solver/sdaskr.f:2570:72:

 2570 |  10     JROOT(I) = 0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
solver/sdaskr.f:2582:72:

 2582 |  110    IF (ABS(R0(I)) .EQ. ZERO) ZROOT = .TRUE.
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
solver/sdaskr.f:2589:72:

 2589 |  120    Y(I) = Y(I) + TEMP2*PHI(I,2)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
solver/sdaskr.f:2594:72:

 2594 |  130    IF (ABS(R0(I)) .EQ. ZERO) ZROOT = .TRUE.
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
solver/sdaskr.f:2623:72:

 2623 |  220    Y(I) = Y(I) + TEMP2*PHI(I,2)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1)
solver/sdaskr.f:3301:72:

 3301 | 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)
solver/sdaskr.f:3352:72:

 3352 | 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)
solver/sdaskr.f:3360:72:

 3360 | 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)
solver/sdaskr.f:3409:72:

 3409 | 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)
solver/sdaskr.f:3459:72:

 3459 | 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)
solver/sdaskr.f:3462:72:

 3462 | 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)
solver/sdaskr.f:3465:72:

 3465 |          DO 595 I=1,NEQ
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 595 at (1)
solver/sdaskr.f:3466:72:

 3466 | 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)
solver/sdaskr.f:3491:72:

 3491 | 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)
solver/sdaskr.f:3495:72:

 3495 | 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)
solver/sdaskr.f:3587:72:

 3587 | 695       PHI(I,2) = R*PHI(I,2)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 695 at (1)
solver/sdaskr.f:3838:72:

 3838 |  20     WT(I) = 1.0E0/WT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
solver/sdaskr.f:3885:72:

 3885 | 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)
solver/sdaskr.f:3895:72:

 3895 | 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)
solver/sdaskr.f:3927:72:

 3927 | 20      SUM = SUM + ((V(I)*RWT(I))/VMAX)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
solver/sdaskr.f:4362:72:

 4362 |  20           P(I) = P(I)*RATIO1
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
solver/sdaskr.f:4672:72:

 4672 | 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)
solver/sdaskr.f:4676:72:

 4676 | 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)
solver/sdaskr.f:4727:72:

 4727 | 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)
solver/sdaskr.f:4731:72:

 4731 | 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)
solver/sdaskr.f:4849:72:

 4849 | 100     E(I)=0.0E0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
solver/sdaskr.f:4860:72:

 4860 | 320        DELTA(I) = DELTA(I) * CONFAC
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1)
solver/sdaskr.f:4873:72:

 4873 | 340      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 340 at (1)
solver/sdaskr.f:4998:72:

 4998 | 110      WM(I)=0.0E0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
solver/sdaskr.f:5021:72:

 5021 | 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)
solver/sdaskr.f:5043:72:

 5043 | 410      WM(I)=0.0E0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1)
solver/sdaskr.f:5069:72:

 5069 | 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)
solver/sdaskr.f:5085:72:

 5085 | 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)
solver/sdaskr.f:5625:72:

 5625 |  20           P(I) = P(I)*RATIO1
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
solver/sdaskr.f:5955:72:

 5955 | 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)
solver/sdaskr.f:5959:72:

 5959 | 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)
solver/sdaskr.f:6009:72:

 6009 |  360    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 360 at (1)
solver/sdaskr.f:6013:72:

 6013 |  370    E(I) = E(I) - DELTA(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 370 at (1)
solver/sdaskr.f:6140:72:

 6140 | 100     E(I) = 0.0E0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
solver/sdaskr.f:6151:72:

 6151 | 320       DELTA(I) = DELTA(I) * CONFAC
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1)
solver/sdaskr.f:6157:72:

 6157 | 340     SAVR(I) = DELTA(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1)
solver/sdaskr.f:6171:72:

 6171 | 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)
solver/sdaskr.f:6303:72:

 6303 |  110     X(I) = 0.E0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
solver/sdaskr.f:6327:72:

 6327 |  120     X(I) = X(I) + WM(LZ+I-1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
solver/sdaskr.f:6498:72:

 6498 |  10     Z(I) = 0.0E0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
solver/sdaskr.f:6509:72:

 6509 |  30         V(I,1) = R(I)*WGHT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
solver/sdaskr.f:6512:72:

 6512 |  35         V(I,1) = R(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 35 at (1)
solver/sdaskr.f:6531:72:

 6531 |  60       HES(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)
solver/sdaskr.f:6572:72:

 6572 |  70             DL(K) = S*DL(K) + C*V(K,IP1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1)
solver/sdaskr.f:6579:72:

 6579 |  80         DL(K) = S*DL(K) + C*V(K,LLP1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
solver/sdaskr.f:6600:72:

 6600 |  130     Z(I) = 0.E0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
solver/sdaskr.f:6622:72:

 6622 |  170              DL(K) = S*DL(K) + C*V(K,IP1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1)
solver/sdaskr.f:6627:72:

 6627 |  180           DL(K) = S*DL(K) + C*V(K,MAXLP1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
solver/sdaskr.f:6644:72:

 6644 |  210    R(K) = 0.0E0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1)
solver/sdaskr.f:6648:72:

 6648 |  220    Z(K) = 0.0E0
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1)
solver/sdaskr.f:6653:72:

 6653 |  240    Z(I) = Z(I)/WGHT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1)
solver/sdaskr.f:6755:72:

 6755 |  10     VTEM(I) = V(I)/WGHT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
solver/sdaskr.f:6763:72:

 6763 |  20     Z(I) = Y(I) + VTEM(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
solver/sdaskr.f:6777:72:

 6777 |  70     Z(I) = VTEM(I) - SAVR(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1)
solver/sdaskr.f:6789:72:

 6789 |  90     Z(I) = Z(I)*WGHT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
solver/sdaskr.f:2488:3:

 2488 | 770   MSG = 'DASKR--  RUN TERMINATED. APPARENT INFINITE LOOP'
      |   1
Warning: Label 770 at (1) defined but not used [-Wunused-label]
solver/sdaskr.f:2206:3:

 2206 | 540   IF (INFO(3) .NE. 0) GO TO 550
      |   1
Warning: Label 540 at (1) defined but not used [-Wunused-label]
solver/sdaskr.f:1744:3:

 1744 | 300   CONTINUE
      |   1
Warning: Label 300 at (1) defined but not used [-Wunused-label]
solver/sdaskr.f:2636:21:

 2636 |           JROOT(I) = -SIGN(1.0E0,R0(I))
      |                     1
Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion]
solver/sdaskr.f:2883:21:

 2883 |           JROOT(I) = -SIGN(1.0E0,R0(I))
      |                     1
Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion]
solver/sdaskr.f:2887:22:

 2887 |      1     JROOT(I) = SIGN(1.0E0,R1(I) - R0(I))
      |                      1
Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion]
solver/sdaskr.f:2899:45:

 2899 |         IF (ABS(R1(I)) .EQ. ZERO) JROOT(I) = -SIGN(1.0E0,R0(I))
      |                                             1
Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion]
solver/sdaskr.f:4725:3:

 4725 | 375   IF(NONNEG .EQ. 0) GO TO 390
      |   1
Warning: Label 375 at (1) defined but not used [-Wunused-label]
solver/sdaskr.f:1932:20:

 1932 |      *   RWORK(LRX),JROOT,IRT,RWORK(LROUND),INFO(3),
      |                    1
Error: Rank mismatch in argument 'jroot' at (1) (rank-1 and scalar)
solver/sdaskr.f:1955:20:

 1955 |      *   RWORK(LRX),JROOT,IRT,RWORK(LROUND),INFO(3),
      |                    1
Error: Rank mismatch in argument 'jroot' at (1) (rank-1 and scalar)
solver/sdaskr.f:2183:20:

 2183 |      *   RWORK(LRX),JROOT,IRT,RWORK(LROUND),INFO(3),
      |                    1
Error: Rank mismatch in argument 'jroot' at (1) (rank-1 and scalar)
solver/slinpk.f:763:72:

  763 |    10 assign 30 to next
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
solver/slinpk.f:768:20:

  768 |    20    go to next,(30, 50, 70, 110)
      |                    1
Warning: Deleted feature: Assigned GOTO statement at (1)
solver/slinpk.f:770:72:

  770 |       assign 50 to next
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
solver/slinpk.f:779:72:

  779 |       assign 70 to next
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
solver/slinpk.f:785:72:

  785 |       assign 110 to next
      |                                                                        1
Warning: Deleted feature: ASSIGN statement at (1)
solver/slinpk.f:821:72:

  821 |    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)
solver/slinpk.f:798:5:

  798 |   110 if( abs(sx(i)) .le. xmax ) go to 115
      |     1
Warning: Label 110 at (1) defined but not used [-Wunused-label]
solver/slinpk.f:793:5:

  793 |    70 if( abs(sx(i)) .gt. cutlo ) go to 75
      |     1
Warning: Label 70 at (1) defined but not used [-Wunused-label]
solver/slinpk.f:775:5:

  775 |    50 if( sx(i) .eq. zero) go to 200
      |     1
Warning: Label 50 at (1) defined but not used [-Wunused-label]
solver/slinpk.f:799:72:

  799 |          sum = one + sum * (xmax / sx(i))**2
      |                                                                        ^
Warning: 'xmax' may be used uninitialized in this function [-Wmaybe-uninitialized]
error: Bad exit status from /usr/src/tmp/rpm-tmp.18856 (%build)


RPM build errors:
    Bad exit status from /usr/src/tmp/rpm-tmp.18856 (%build)
Command exited with non-zero status 1
6.68user 0.24system 0:06.79elapsed 101%CPU (0avgtext+0avgdata 37824maxresident)k
0inputs+0outputs (0major+78188minor)pagefaults 0swaps
hsh-rebuild: rebuild of `daskr-2011.06.08-alt1.src.rpm' failed.
Command exited with non-zero status 1
11.31user 2.69system 0:13.49elapsed 103%CPU (0avgtext+0avgdata 107904maxresident)k
0inputs+0outputs (0major+302023minor)pagefaults 0swaps