* installing to library ‘/home/hornik/tmp/R.check/r-patched-gcc/Work/build/Packages’
* installing *source* package ‘nsRFA’ ...
** package ‘nsRFA’ successfully unpacked and MD5 sums checked
** using staged installation
** libs
using C compiler: ‘gcc-13 (Debian 13.2.0-23) 13.2.0’
using Fortran compiler: ‘GNU Fortran (Debian 13.2.0-23) 13.2.0’
make[1]: Entering directory '/tmp/Rtmpe39KdH/R.INSTALL3faf2a61cb4f20/nsRFA/src'
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c alg136.f -o alg136.o
f951: Warning: Nonconforming tab character in column 1 of line 24 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 25 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 26 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 27 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 28 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 29 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 30 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 32 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 33 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 34 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 35 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 36 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 37 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 38 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 39 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 40 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 41 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 42 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 43 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 44 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 46 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 47 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 48 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 49 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 51 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 52 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 53 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 60 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 61 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 65 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 66 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 67 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 74 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 75 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 76 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 77 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 78 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 79 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 92 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 93 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 94 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 95 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 96 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 105 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 111 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 118 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 124 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 128 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 140 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 141 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 142 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 145 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 146 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 147 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 150 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 152 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 153 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 154 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 155 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 186 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 189 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 190 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 191 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 192 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 196 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 201 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 202 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 203 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 204 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 205 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 207 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 212 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 213 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 214 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 216 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 217 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 224 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 226 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 227 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 228 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 229 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 230 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 231 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 233 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 234 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 236 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 240 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 241 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 247 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 248 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 249 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 250 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 251 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 252 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 253 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 254 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 255 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 256 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 257 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 259 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 260 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 261 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 262 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 263 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 264 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 265 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 266 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 267 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 269 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 276 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 277 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 311 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 312 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 313 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 314 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 318 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 325 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 326 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 327 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 328 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 329 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 331 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 337 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 338 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 339 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 340 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 341 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 342 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 349 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 350 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 351 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 352 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 353 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 354 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 355 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 356 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 357 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 358 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 359 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 360 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 361 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 363 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 364 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 365 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 366 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 367 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 368 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 369 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 370 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 371 [-Wtabs]
alg136.f:28:72:
28 | DO 10 J = 1, N
| 1
Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1)
alg136.f:39:72:
39 | DO 50 L = 3, K
| 1
Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1)
alg136.f:62:72:
62 | 60 C(L,J) = ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
alg136.f:68:72:
68 | 80 C(L,J) = C(L,J) + A(I,J)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
alg136.f:80:72:
80 | 110 C(L,J) = C(L,J) / AA
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
alg136.f:129:72:
129 | 130 NCP(L) = 0
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
alg136.f:141:72:
141 | DO 160 J = 1, N
| 1
Warning: Fortran 2018 deleted feature: Shared DO termination label 160 at (1)
alg136.f:146:72:
146 | DO 170 J = 1, N
| 1
Warning: Fortran 2018 deleted feature: Shared DO termination label 170 at (1)
alg136.f:151:72:
151 | 180 C(L,J) = C(L,J) / FLOAT(NC(L))
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
alg136.f:152:72:
152 | DO 190 I = 1, M
| 1
Warning: Fortran 2018 deleted feature: Shared DO termination label 190 at (1)
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c cdfexp.f -o cdfexp.o
cdfexp.f:35:5:
35 | 7000 FORMAT(' *** ERROR *** ROUTINE CDFEXP : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c cdfgam.f -o cdfgam.o
cdfgam.f:35:5:
35 | 7000 FORMAT(' *** ERROR *** ROUTINE CDFGAM : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c cdfgev.f -o cdfgev.o
cdfgev.f:47:5:
47 | 7000 FORMAT(' *** ERROR *** ROUTINE CDFGEV : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c cdfglo.f -o cdfglo.o
cdfglo.f:47:5:
47 | 7000 FORMAT(' *** ERROR *** ROUTINE CDFGLO : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c cdfgno.f -o cdfgno.o
cdfgno.f:50:5:
50 | 7000 FORMAT(' *** ERROR *** ROUTINE CDFGNO : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c cdfgpa.f -o cdfgpa.o
cdfgpa.f:48:5:
48 | 7000 FORMAT(' *** ERROR *** ROUTINE CDFGPA : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c cdfgum.f -o cdfgum.o
cdfgum.f:33:5:
33 | 7000 FORMAT(' *** ERROR *** ROUTINE CDFGUM : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c cdfkap.f -o cdfkap.o
cdfkap.f:55:5:
55 | 7000 FORMAT(' *** ERROR *** ROUTINE CDFKAP : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c cdfnor.f -o cdfnor.o
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c cdfpe3.f -o cdfpe3.o
cdfpe3.f:49:5:
49 | 7000 FORMAT(' *** ERROR *** ROUTINE CDFPE3 : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c cdfwak.f -o cdfwak.o
cdfwak.f:151:5:
151 | 7010 FORMAT(' ** WARNING ** ROUTINE CDFWAK :',
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
cdfwak.f:150:5:
150 | 7000 FORMAT(' *** ERROR *** ROUTINE CDFWAK : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c cluagg.f -o cluagg.o
cluagg.f:90:72:
90 | DO 20 I=1,J-1
| 1
Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1)
cluagg.f:93:72:
93 | 10 SUM=SUM+(X(I,IATT)-X(J,IATT))**2
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
cluagg.f:98:72:
98 | 30 IWORK(I)=1
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
cluagg.f:162:5:
162 | 7000 FORMAT(' *** ERROR *** ROUTINE CLUAGG : INSUFFICIENT WORKSPACE.',
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
cluagg.f:116:8:
116 | II=I
| ^
Warning: ‘ii’ may be used uninitialized [-Wmaybe-uninitialized]
cluagg.f:117:8:
117 | JJ=J
| ^
Warning: ‘jj’ may be used uninitialized [-Wmaybe-uninitialized]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c cluinf.f -o cluinf.o
cluinf.f:96:5:
96 | 7000 FORMAT(' *** ERROR *** ROUTINE CLUINF :',
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c clukm.f -o clukm.o
clukm.f:78:72:
78 | DO 5 I=1,N
| 1
Warning: Fortran 2018 deleted feature: Shared DO termination label 5 at (1)
clukm.f:80:72:
80 | 5 RW(IW)=X(I,IATT)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 5 at (1)
clukm.f:85:72:
85 | 10 NUM(ICL)=0
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
clukm.f:88:72:
88 | 20 RW(IW)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
clukm.f:129:72:
129 | 90 SS=SS+RW(LWSS+ICL)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
clukm.f:146:5:
146 | 7030 FORMAT(' ** WARNING ** ROUTINE CLUKM :',
| 1
Warning: Label 7030 at (1) defined but not used [-Wunused-label]
clukm.f:144:5:
144 | 7020 FORMAT(' *** ERROR *** ROUTINE CLUKM :',
| 1
Warning: Label 7020 at (1) defined but not used [-Wunused-label]
clukm.f:142:5:
142 | 7010 FORMAT(' *** ERROR *** ROUTINE CLUKM :',
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
clukm.f:140:5:
140 | 7000 FORMAT(' *** ERROR *** ROUTINE CLUKM : INSUFFICIENT WORKSPACE.',
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
clukm.f:80:13:
80 | 5 RW(IW)=X(I,IATT)
| 1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion]
clukm.f:88:13:
88 | 20 RW(IW)=ZERO
| 1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion]
clukm.f:95:13:
95 | RW(IW)=RW(IW)+X(I,IATT)
| 1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c derf.f -o derf.o
derf.f:1:6:
1 | 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]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c digamd.f -o digamd.o
digamd.f:62:5:
62 | 7000 FORMAT(' *** ERROR *** ROUTINE DIGAMD :',
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c dlgama.f -o dlgama.o
dlgama.f:1:6:
1 | DOUBLE PRECISION FUNCTION DLGAMA(X)
| 1
Warning: ‘dlgama’ 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]
dlgama.f:81:5:
81 | 7000 FORMAT(' *** ERROR *** ROUTINE DLGAMA :',
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c durand.f -o durand.o
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c gamind.f -o gamind.o
gamind.f:141:5:
141 | 7020 FORMAT(' ** WARNING ** ROUTINE GAMIND :',
| 1
Warning: Label 7020 at (1) defined but not used [-Wunused-label]
gamind.f:139:5:
139 | 7010 FORMAT(' *** ERROR *** ROUTINE GAMIND :',
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
gamind.f:137:5:
137 | 7000 FORMAT(' *** ERROR *** ROUTINE GAMIND :',
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c leaps.f -o leaps.o
f951: Warning: Nonconforming tab character in column 1 of line 214 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 215 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 326 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 327 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 332 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 333 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 334 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 335 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 336 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 337 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 338 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 339 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 341 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 348 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 349 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 350 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 351 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 352 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 353 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 354 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 355 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 356 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 357 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 393 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 394 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 395 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 404 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 406 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 407 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 409 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 410 [-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 456 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 457 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 458 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 459 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 460 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 461 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 462 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 463 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 464 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 468 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 469 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 470 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 471 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 473 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 477 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 478 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 479 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 480 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 481 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 482 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 483 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 484 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 485 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 486 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 487 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 489 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 490 [-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 536 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 537 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 538 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 539 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 540 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 542 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 543 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 544 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 545 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 546 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 547 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 548 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 549 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 551 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 591 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 592 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 593 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 603 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 605 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 610 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 644 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 645 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 646 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 647 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 648 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 649 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 650 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 651 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 652 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 653 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 654 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 655 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 656 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 657 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 658 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 690 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 703 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 704 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 705 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 706 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 707 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 709 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 720 [-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 730 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 731 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 766 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 767 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 768 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 779 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 780 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 782 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 783 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 789 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 790 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 792 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 793 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 795 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 796 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 797 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 798 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 799 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 800 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 801 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 802 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 803 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 804 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 805 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 813 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 814 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 816 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 818 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 819 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 820 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 821 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 822 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 826 [-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 863 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 876 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 877 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 878 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 879 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 880 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 904 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 905 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 906 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 930 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 972 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 973 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 974 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 985 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 986 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1006 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1008 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1012 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1013 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1015 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1040 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1042 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1043 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1046 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1047 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1048 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1152 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1153 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1154 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1158 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1356 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1357 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1358 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1359 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1360 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1361 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1362 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1363 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1365 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1366 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1367 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1368 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1369 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1370 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1426 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1427 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1428 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1447 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1448 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1449 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1450 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1451 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1461 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1462 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1478 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1479 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1480 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1481 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1482 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1624 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1625 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1626 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1627 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2118 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2119 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2120 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2121 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2122 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2123 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2124 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2125 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2126 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2127 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2150 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2160 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2161 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2167 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2168 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2169 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2170 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2171 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2172 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2176 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2177 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2178 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2179 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2180 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2185 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2186 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2187 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2188 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2189 [-Wtabs]
leaps.f:218:72:
218 | 20 RBAR(I) = ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
leaps.f:412:72:
412 | * IL, VORDER)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
leaps.f:533:72:
533 | 10 WK(J) = SS(J)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
leaps.f:723:72:
723 | DO 100 K = 1, POS
| 1
Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1)
leaps.f:889:72:
889 | 20 IWK(I) = LAST
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
leaps.f:917:72:
917 | * VORDER)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
leaps.f:922:72:
922 | 60 IWK(I) = NEWPOS - 1
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
leaps.f:1045:72:
1045 | * IL, VORDER)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
leaps.f:1128:72:
1128 | 10 WORK(COL) = SQRT(D(COL))
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
leaps.f:1231:72:
1231 | 10 WORK(ROW) = SQRT(D(ROW))
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
leaps.f:1318:72:
1318 | 10 SUMY = SUMY + D(ROW) * THETAB(ROW)**2
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
leaps.f:684:5:
684 | 20 IF (POS .GT. NVMAX) RETURN
| 1
Warning: Label 20 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c leapshdr.f -o leapshdr.o
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c lmrexp.f -o lmrexp.o
lmrexp.f:39:72:
39 | 10 XMOM(J)=TWO/DBLE(J*(J-1))
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
lmrexp.f:48:5:
48 | 7010 FORMAT(' *** ERROR *** ROUTINE LMREXP : PARAMETER NMOM TOO LARGE')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
lmrexp.f:47:5:
47 | 7000 FORMAT(' *** ERROR *** ROUTINE LMREXP : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c lmrgam.f -o lmrgam.o
lmrgam.f:88:5:
88 | 7010 FORMAT(' *** ERROR *** ROUTINE LMRGAM : PARAMETER NMOM TOO LARGE')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
lmrgam.f:87:5:
87 | 7000 FORMAT(' *** ERROR *** ROUTINE LMRGAM : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c lmrgev.f -o lmrgev.o
lmrgev.f:67:72:
67 | 2 XMOM(I)=ZMOM(I)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 2 at (1)
lmrgev.f:106:5:
106 | 7010 FORMAT(' *** ERROR *** ROUTINE LMRGEV : PARAMETER NMOM TOO LARGE')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
lmrgev.f:105:5:
105 | 7000 FORMAT(' *** ERROR *** ROUTINE LMRGEV : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
lmrgev.f:73:5:
73 | 10 CONTINUE
| 1
Warning: Label 10 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c lmrglo.f -o lmrglo.o
lmrglo.f:140:72:
140 | 10 SUM=SUM*GG+Z(K,M)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
lmrglo.f:152:5:
152 | 7010 FORMAT(' *** ERROR *** ROUTINE LMRGLO : PARAMETER NMOM TOO LARGE')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
lmrglo.f:151:5:
151 | 7000 FORMAT(' *** ERROR *** ROUTINE LMRGLO : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c lmrgno.f -o lmrgno.o
lmrgno.f:72:72:
72 | 2 XMOM(I)=ZMOM(I)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 2 at (1)
lmrgno.f:99:72:
99 | 10 SUM(M)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
lmrgno.f:115:72:
115 | 20 SUM(M)=SUM(M)+E*P
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
lmrgno.f:118:72:
118 | 40 EST(M)=SUM(M)*XINC
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
lmrgno.f:124:72:
124 | 50 ESTX(M)=EST(M)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
lmrgno.f:140:72:
140 | 60 SUM(M)=SUM(M)+E*P
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
lmrgno.f:157:72:
157 | 110 XMOM(M)=CONST*EST(M)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
lmrgno.f:167:5:
167 | 7020 FORMAT(' ** WARNING ** ROUTINE LMRGNO :',
| 1
Warning: Label 7020 at (1) defined but not used [-Wunused-label]
lmrgno.f:166:5:
166 | 7010 FORMAT(' *** ERROR *** ROUTINE LMRGNO : PARAMETER NMOM TOO LARGE')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
lmrgno.f:165:5:
165 | 7000 FORMAT(' *** ERROR *** ROUTINE LMRGNO : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c lmrgpa.f -o lmrgpa.o
lmrgpa.f:65:5:
65 | 7010 FORMAT(' *** ERROR *** ROUTINE LMRGPA : PARAMETER NMOM TOO LARGE')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
lmrgpa.f:64:5:
64 | 7000 FORMAT(' *** ERROR *** ROUTINE LMRGPA : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c lmrgum.f -o lmrgum.o
lmrgum.f:55:72:
55 | 10 XMOM(J)=ZMOM(J)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
lmrgum.f:64:5:
64 | 7010 FORMAT(' *** ERROR *** ROUTINE LMRGUM : PARAMETER NMOM TOO LARGE')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
lmrgum.f:63:5:
63 | 7000 FORMAT(' *** ERROR *** ROUTINE LMRGUM : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c lmrkap.f -o lmrkap.o
lmrkap.f:69:72:
69 | 20 BETA(IR)=DEXP(ARG)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
lmrkap.f:76:72:
76 | 40 BETA(IR)=DEXP(DLGAM-G*DLOG(R))*(ONE-HALF*H*G*(ONE+G)/R)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
lmrkap.f:85:72:
85 | 60 BETA(IR)=DEXP(ARG)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
lmrkap.f:92:72:
92 | 80 BETA(IR)=EU+DLOG(-H)+DIGAMD(-R/H)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
lmrkap.f:99:72:
99 | 100 BETA(IR)=EU+DLOG(R)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
lmrkap.f:106:72:
106 | 120 BETA(IR)=EU+DLOG(H)+DIGAMD(ONE+R/H)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
lmrkap.f:150:5:
150 | 7020 FORMAT(' *** ERROR *** ROUTINE LMRKAP :',
| 1
Warning: Label 7020 at (1) defined but not used [-Wunused-label]
lmrkap.f:149:5:
149 | 7010 FORMAT(' *** ERROR *** ROUTINE LMRKAP : PARAMETER NMOM TOO LARGE')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
lmrkap.f:148:5:
148 | 7000 FORMAT(' *** ERROR *** ROUTINE LMRKAP : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
lmrkap.f:112:72:
112 | IF(G.EQ.ZERO)XMOM(1)=U+A*BETA(1)
| ^
Warning: ‘beta’ may be used uninitialized [-Wmaybe-uninitialized]
lmrkap.f:29:50:
29 | DOUBLE PRECISION PARA(4),XMOM(NMOM),BETA(20)
| ^
note: ‘beta’ declared here
lmrkap.f:118:72:
118 | ALAM2=BETA(2)-BETA(1)
| ^
Warning: ‘beta’ may be used uninitialized [-Wmaybe-uninitialized]
lmrkap.f:29:50:
29 | DOUBLE PRECISION PARA(4),XMOM(NMOM),BETA(20)
| ^
note: ‘beta’ declared here
lmrkap.f:112:72:
112 | IF(G.EQ.ZERO)XMOM(1)=U+A*BETA(1)
| ^
Warning: ‘beta’ may be used uninitialized [-Wmaybe-uninitialized]
lmrkap.f:29:50:
29 | DOUBLE PRECISION PARA(4),XMOM(NMOM),BETA(20)
| ^
note: ‘beta’ declared here
lmrkap.f:118:72:
118 | ALAM2=BETA(2)-BETA(1)
| ^
Warning: ‘beta’ may be used uninitialized [-Wmaybe-uninitialized]
lmrkap.f:29:50:
29 | DOUBLE PRECISION PARA(4),XMOM(NMOM),BETA(20)
| ^
note: ‘beta’ declared here
lmrkap.f:112:72:
112 | IF(G.EQ.ZERO)XMOM(1)=U+A*BETA(1)
| ^
Warning: ‘beta’ may be used uninitialized [-Wmaybe-uninitialized]
lmrkap.f:29:50:
29 | DOUBLE PRECISION PARA(4),XMOM(NMOM),BETA(20)
| ^
note: ‘beta’ declared here
lmrkap.f:118:72:
118 | ALAM2=BETA(2)-BETA(1)
| ^
Warning: ‘beta’ may be used uninitialized [-Wmaybe-uninitialized]
lmrkap.f:29:50:
29 | DOUBLE PRECISION PARA(4),XMOM(NMOM),BETA(20)
| ^
note: ‘beta’ declared here
lmrkap.f:112:72:
112 | IF(G.EQ.ZERO)XMOM(1)=U+A*BETA(1)
| ^
Warning: ‘beta’ may be used uninitialized [-Wmaybe-uninitialized]
lmrkap.f:29:50:
29 | DOUBLE PRECISION PARA(4),XMOM(NMOM),BETA(20)
| ^
note: ‘beta’ declared here
lmrkap.f:118:72:
118 | ALAM2=BETA(2)-BETA(1)
| ^
Warning: ‘beta’ may be used uninitialized [-Wmaybe-uninitialized]
lmrkap.f:29:50:
29 | DOUBLE PRECISION PARA(4),XMOM(NMOM),BETA(20)
| ^
note: ‘beta’ declared here
lmrkap.f:112:72:
112 | IF(G.EQ.ZERO)XMOM(1)=U+A*BETA(1)
| ^
Warning: ‘beta’ may be used uninitialized [-Wmaybe-uninitialized]
lmrkap.f:29:50:
29 | DOUBLE PRECISION PARA(4),XMOM(NMOM),BETA(20)
| ^
note: ‘beta’ declared here
lmrkap.f:118:72:
118 | ALAM2=BETA(2)-BETA(1)
| ^
Warning: ‘beta’ may be used uninitialized [-Wmaybe-uninitialized]
lmrkap.f:29:50:
29 | DOUBLE PRECISION PARA(4),XMOM(NMOM),BETA(20)
| ^
note: ‘beta’ declared here
lmrkap.f:113:72:
113 | IF(G.NE.ZERO)XMOM(1)=U+A*(ONE-BETA(1))/G
| ^
Warning: ‘beta’ may be used uninitialized [-Wmaybe-uninitialized]
lmrkap.f:29:50:
29 | DOUBLE PRECISION PARA(4),XMOM(NMOM),BETA(20)
| ^
note: ‘beta’ declared here
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c lmrnor.f -o lmrnor.o
lmrnor.f:51:72:
51 | 10 XMOM(M)=ZMOM(M)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
lmrnor.f:60:5:
60 | 7010 FORMAT(' *** ERROR *** ROUTINE LMRNOR : PARAMETER NMOM TOO LARGE')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
lmrnor.f:59:5:
59 | 7000 FORMAT(' *** ERROR *** ROUTINE LMRNOR : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c lmrpe3.f -o lmrpe3.o
lmrpe3.f:111:5:
111 | 7010 FORMAT(' *** ERROR *** ROUTINE LMRPE3 : PARAMETER NMOM TOO LARGE')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
lmrpe3.f:110:5:
110 | 7000 FORMAT(' *** ERROR *** ROUTINE LMRPE3 : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c lmrwak.f -o lmrwak.o
lmrwak.f:79:5:
79 | 7010 FORMAT(' *** ERROR *** ROUTINE LMRWAK : PARAMETER NMOM TOO LARGE')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
lmrwak.f:78:5:
78 | 7000 FORMAT(' *** ERROR *** ROUTINE LMRWAK : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c pelexp.f -o pelexp.o
pelexp.f:37:5:
37 | 7000 FORMAT(' *** ERROR *** ROUTINE PELEXP : L-MOMENTS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c pelgam.f -o pelgam.o
pelgam.f:59:5:
59 | 7000 FORMAT(' *** ERROR *** ROUTINE PELGAM : L-MOMENTS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c pelgev.f -o pelgev.o
pelgev.f:109:5:
109 | 7010 FORMAT(' ** WARNING ** ROUTINE PELGEV :',
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
pelgev.f:108:5:
108 | 7000 FORMAT(' *** ERROR *** ROUTINE PELGEV : L-MOMENTS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c pelglo.f -o pelglo.o
pelglo.f:60:5:
60 | 7000 FORMAT(' *** ERROR *** ROUTINE PELGLO : L-MOMENTS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c pelgno.f -o pelgno.o
pelgno.f:76:5:
76 | 7010 FORMAT(' *** ERROR *** ROUTINE PELGNO :',
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
pelgno.f:75:5:
75 | 7000 FORMAT(' *** ERROR *** ROUTINE PELGNO : L-MOMENTS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c pelgpa.f -o pelgpa.o
pelgpa.f:42:5:
42 | 7000 FORMAT(' *** ERROR *** ROUTINE PELGPA : L-MOMENTS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c pelgum.f -o pelgum.o
pelgum.f:41:5:
41 | 7000 FORMAT(' *** ERROR *** ROUTINE PELGUM : L-MOMENTS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c pelkap.f -o pelkap.o
pelkap.f:70:72:
70 | 10 PARA(I)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
pelkap.f:135:10:
135 | DEL1=HALF*DEL1
| ^
Warning: ‘del1’ may be used uninitialized [-Wmaybe-uninitialized]
pelkap.f:136:10:
136 | DEL2=HALF*DEL2
| ^
Warning: ‘del2’ may be used uninitialized [-Wmaybe-uninitialized]
pelkap.f:137:10:
137 | G=XG-DEL1
| ^
Warning: ‘xg’ may be used uninitialized [-Wmaybe-uninitialized]
pelkap.f:138:10:
138 | H=XH-DEL2
| ^
Warning: ‘xh’ may be used uninitialized [-Wmaybe-uninitialized]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c pelnor.f -o pelnor.o
pelnor.f:38:5:
38 | 7000 FORMAT(' *** ERROR *** ROUTINE PELNOR : L-MOMENTS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c pelpe3.f -o pelpe3.o
pelpe3.f:75:72:
75 | 1010 PARA(I)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1010 at (1)
pelpe3.f:78:5:
78 | 7000 FORMAT(' *** ERROR *** ROUTINE PELPE3 : L-MOMENTS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c pelwak.f -o pelwak.o
pelwak.f:152:72:
152 | 1010 PARA(I)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1010 at (1)
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c quaexp.f -o quaexp.o
quaexp.f:37:5:
37 | 7010 FORMAT(' *** ERROR *** ROUTINE QUAEXP :',
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
quaexp.f:36:5:
36 | 7000 FORMAT(' *** ERROR *** ROUTINE QUAEXP : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c quagam.f -o quagam.o
quagam.f:80:5:
80 | 7020 FORMAT(' ** WARNING ** ROUTINE QUAGAM :',
| 1
Warning: Label 7020 at (1) defined but not used [-Wunused-label]
quagam.f:78:5:
78 | 7010 FORMAT(' *** ERROR *** ROUTINE QUAGAM :',
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
quagam.f:77:5:
77 | 7000 FORMAT(' *** ERROR *** ROUTINE QUAGAM : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c quagev.f -o quagev.o
quagev.f:46:5:
46 | 7010 FORMAT(' *** ERROR *** ROUTINE QUAGEV : PARAMETERS INVALID')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
quagev.f:44:5:
44 | 7000 FORMAT(' *** ERROR *** ROUTINE QUAGEV :',
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c quaglo.f -o quaglo.o
quaglo.f:46:5:
46 | 7010 FORMAT(' *** ERROR *** ROUTINE QUAGLO : PARAMETERS INVALID')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
quaglo.f:44:5:
44 | 7000 FORMAT(' *** ERROR *** ROUTINE QUAGLO :',
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c quagno.f -o quagno.o
quagno.f:48:5:
48 | 7010 FORMAT(' *** ERROR *** ROUTINE QUAGNO : PARAMETERS INVALID')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
quagno.f:46:5:
46 | 7000 FORMAT(' *** ERROR *** ROUTINE QUAGNO :',
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c quagpa.f -o quagpa.o
quagpa.f:46:5:
46 | 7010 FORMAT(' *** ERROR *** ROUTINE QUAGPA : PARAMETERS INVALID')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
quagpa.f:44:5:
44 | 7000 FORMAT(' *** ERROR *** ROUTINE QUAGPA :',
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c quagum.f -o quagum.o
quagum.f:37:5:
37 | 7010 FORMAT(' *** ERROR *** ROUTINE QUAGUM :',
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
quagum.f:36:5:
36 | 7000 FORMAT(' *** ERROR *** ROUTINE QUAGUM : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c quakap.f -o quakap.o
quakap.f:55:5:
55 | 7010 FORMAT(' *** ERROR *** ROUTINE QUAKAP :',
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
quakap.f:54:5:
54 | 7000 FORMAT(' *** ERROR *** ROUTINE QUAKAP : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
quakap.f:1:38:
1 | DOUBLE PRECISION FUNCTION QUAKAP(F,PARA)
| ^
Warning: ‘__result_quakap’ may be used uninitialized [-Wmaybe-uninitialized]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c quanor.f -o quanor.o
quanor.f:37:5:
37 | 7010 FORMAT(' *** ERROR *** ROUTINE QUANOR :',
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
quanor.f:36:5:
36 | 7000 FORMAT(' *** ERROR *** ROUTINE QUANOR : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c quape3.f -o quape3.o
quape3.f:59:5:
59 | 7010 FORMAT(' *** ERROR *** ROUTINE QUAPE3 : PARAMETERS INVALID')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
quape3.f:57:5:
57 | 7000 FORMAT(' *** ERROR *** ROUTINE QUAPE3 :',
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
quape3.f:55:72:
55 | 1000 RETURN
| ^
Warning: ‘__result_quape3’ may be used uninitialized [-Wmaybe-uninitialized]
quape3.f:1:38:
1 | DOUBLE PRECISION FUNCTION QUAPE3(F,PARA)
| ^
note: ‘__result_quape3’ was declared here
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c quastn.f -o quastn.o
quastn.f:83:5:
83 | 7000 FORMAT(' *** ERROR *** ROUTINE QUASTN :',
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c quawak.f -o quawak.o
quawak.f:75:5:
75 | 7010 FORMAT(' *** ERROR *** ROUTINE QUAWAK :',
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
quawak.f:74:5:
74 | 7000 FORMAT(' *** ERROR *** ROUTINE QUAWAK : PARAMETERS INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
quawak.f:1:38:
1 | DOUBLE PRECISION FUNCTION QUAWAK(F,PARA)
| ^
Warning: ‘__result_quawak’ may be used uninitialized [-Wmaybe-uninitialized]
gcc-13 -I"/home/hornik/tmp/R.check/r-patched-gcc/Work/build/include" -DNDEBUG -I/usr/local/include -D_FORTIFY_SOURCE=3 -fpic -g -O2 -Wall -Wstrict-prototypes -pedantic -mtune=native -c registerDynamicSymbol.c -o registerDynamicSymbol.o
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c reglmr.f -o reglmr.o
reglmr.f:36:72:
36 | 10 RMOM(J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
reglmr.f:46:72:
46 | 20 RMOM(J)=RMOM(J)+W*XMOM(J,ISITE)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
reglmr.f:53:72:
53 | 40 RMOM(J)=RMOM(J)/WSUM
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
reglmr.f:65:5:
65 | 7020 FORMAT(' *** ERROR *** ROUTINE REGLMR :',
| 1
Warning: Label 7020 at (1) defined but not used [-Wunused-label]
reglmr.f:64:5:
64 | 7010 FORMAT(' *** ERROR *** ROUTINE REGLMR : ZERO MEAN AT SITE',I4)
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
reglmr.f:63:5:
63 | 7000 FORMAT(' *** ERROR *** ROUTINE REGLMR : PARAMETER NMOM INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c regtst.f -o regtst.o
regtst.f:166:72:
166 | 10 D(I)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
regtst.f:174:72:
174 | 30 Z(IDIST)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
regtst.f:176:72:
176 | DO 40 IDIST=1,6
| 1
Warning: Fortran 2018 deleted feature: Shared DO termination label 40 at (1)
regtst.f:177:72:
177 | 40 PARA(IPARA,IDIST)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
regtst.f:185:72:
185 | 50 RMOM(K)=RMOM(K)+LEN(I)*XMOM(K,I)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
regtst.f:186:72:
186 | 60 RMOM(K)=RMOM(K)/SUMLEN
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
regtst.f:209:72:
209 | DO 100 K=J,3
| 1
Warning: Fortran 2018 deleted feature: Shared DO termination label 100 at (1)
regtst.f:212:72:
212 | 90 SMAT(J,K)=SMAT(J,K)+WORK(I,J)*WORK(I,K)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
regtst.f:240:72:
240 | DO 120 K=1,3
| 1
Warning: Fortran 2018 deleted feature: Shared DO termination label 120 at (1)
regtst.f:241:72:
241 | 120 D(I)=D(I)+WORK(I,J)*WORK(I,K)*SMAT(J,K)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
regtst.f:248:72:
248 | 138 D(I)=ONE
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 138 at (1)
regtst.f:467:72:
467 | 310 Q(IQ)=QUAWAK(PROB(IQ),PARA(1,6))
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1)
regtst.f:513:5:
513 | 7010 FORMAT(' *** ERROR *** ROUTINE REGTST : UNABLE TO INVERT',
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
regtst.f:511:5:
511 | 7000 FORMAT(' *** ERROR *** ROUTINE REGTST :',
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
regtst.f:509:5:
509 | 6150 FORMAT(1X,A18,(1X,14F7.3))
| 1
Warning: Label 6150 at (1) defined but not used [-Wunused-label]
regtst.f:508:5:
508 | 6140 FORMAT(/' QUANTILE ESTIMATES'/19X,(1X,14F7.3))
| 1
Warning: Label 6140 at (1) defined but not used [-Wunused-label]
regtst.f:507:5:
507 | 6130 FORMAT(1X,A18,1X,5F7.3)
| 1
Warning: Label 6130 at (1) defined but not used [-Wunused-label]
regtst.f:505:5:
505 | 6120 FORMAT(//' PARAMETER ESTIMATES FOR DISTRIBUTIONS ACCEPTED AT THE',
| 1
Warning: Label 6120 at (1) defined but not used [-Wunused-label]
regtst.f:504:5:
504 | 6110 FORMAT(//' PARAMETER ESTIMATES'/)
| 1
Warning: Label 6110 at (1) defined but not used [-Wunused-label]
regtst.f:503:5:
503 | 6100 FORMAT(1X,A18,2X,' L-KURTOSIS=',F6.3,2X,' Z VALUE=',F6.2,1X,A1)
| 1
Warning: Label 6100 at (1) defined but not used [-Wunused-label]
regtst.f:501:5:
501 | 6090 FORMAT(//' ***** GOODNESS-OF-FIT MEASURES *****'/
| 1
Warning: Label 6090 at (1) defined but not used [-Wunused-label]
regtst.f:497:5:
497 | 6080 FORMAT(/' OBSERVED AVE. OF L-SKEW/L-KURT DISTANCE =',F8.4/
| 1
Warning: Label 6080 at (1) defined but not used [-Wunused-label]
regtst.f:493:5:
493 | 6070 FORMAT(/' OBSERVED AVE. OF L-CV / L-SKEW DISTANCE =',F8.4/
| 1
Warning: Label 6070 at (1) defined but not used [-Wunused-label]
regtst.f:489:5:
489 | 6060 FORMAT(/' OBSERVED S.D. OF GROUP L-CV =',F8.4/
| 1
Warning: Label 6060 at (1) defined but not used [-Wunused-label]
regtst.f:487:5:
487 | 6050 FORMAT(//' ***** HETEROGENEITY MEASURES *****'/
| 1
Warning: Label 6050 at (1) defined but not used [-Wunused-label]
regtst.f:486:5:
486 | 6040 FORMAT(/' PARAMETERS OF REGIONAL KAPPA DISTRIBUTION ',4F8.4)
| 1
Warning: Label 6040 at (1) defined but not used [-Wunused-label]
regtst.f:485:5:
485 | 6030 FORMAT(/' FLAGGED TEST VALUES'/(15F5.1))
| 1
Warning: Label 6030 at (1) defined but not used [-Wunused-label]
regtst.f:484:5:
484 | 6020 FORMAT(/5X,'WEIGHTED MEANS',5X,6F8.4)
| 1
Warning: Label 6020 at (1) defined but not used [-Wunused-label]
regtst.f:483:5:
483 | 6010 FORMAT(2I5,2X,A12,3F8.4,F7.2,2X,2A1)
| 1
Warning: Label 6010 at (1) defined but not used [-Wunused-label]
regtst.f:482:5:
482 | 6000 FORMAT(/' SITE N NAME L-CV L-SKEW L-KURT D(I)')
| 1
Warning: Label 6000 at (1) defined but not used [-Wunused-label]
regtst.f:2:19:
2 | * KPRINT,KOUT,RMOM,D,VOBS,VBAR,VSD,H,Z,PARA)
| 1
Warning: Unused dummy argument ‘kout’ at (1) [-Wunused-dummy-argument]
regtst.f:1:36:
1 | SUBROUTINE REGTST(NSITES,NAMES,LEN,XMOM,A,B,SEED,NSIM,NPROB,PROB,
| 1
Warning: Unused dummy argument ‘names’ at (1) [-Wunused-dummy-argument]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c samlmr.f -o samlmr.o
samlmr.f:40:72:
40 | 10 SUM(J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
samlmr.f:52:72:
52 | 20 SUM(J)=SUM(J)+TERM
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
samlmr.f:55:72:
55 | 40 SUM(J)=SUM(J)/N
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
samlmr.f:67:72:
67 | 60 SUM(J)=SUM(J)+TERM
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
samlmr.f:75:72:
75 | 80 SUM(J)=SUM(J)/Z
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
samlmr.f:90:72:
90 | 110 TEMP=TEMP+P*SUM(I+1)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
samlmr.f:92:72:
92 | 120 K=K-1
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
samlmr.f:99:72:
99 | 130 XMOM(K)=SUM(K)/SUM(2)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
samlmr.f:112:5:
112 | 7020 FORMAT(' *** ERROR *** ROUTINE SAMLMR : ALL DATA VALUES EQUAL')
| 1
Warning: Label 7020 at (1) defined but not used [-Wunused-label]
samlmr.f:110:5:
110 | 7010 FORMAT(' *** ERROR *** ROUTINE SAMLMR :',
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
samlmr.f:109:5:
109 | 7000 FORMAT(' *** ERROR *** ROUTINE SAMLMR : PARAMETER NMOM INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c samlmu.f -o samlmu.o
samlmu.f:35:72:
35 | 10 XMOM(J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
samlmu.f:88:72:
88 | 70 XMOM(J)=XMOM(J)/XMOM(2)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1)
samlmu.f:112:72:
112 | 1020 XMOM(J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1020 at (1)
samlmu.f:117:5:
117 | 7010 FORMAT(' *** ERROR *** ROUTINE SAMLMU :',
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
samlmu.f:115:5:
115 | 7000 FORMAT(' ** WARNING ** ROUTINE SAMLMU :',
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c sampwm.f -o sampwm.o
sampwm.f:46:72:
46 | 10 XMOM(J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
sampwm.f:60:72:
60 | 20 XMOM(J)=XMOM(J)+TERM
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
sampwm.f:63:72:
63 | 40 XMOM(J)=XMOM(J)/DN
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
sampwm.f:76:72:
76 | 60 XMOM(J)=XMOM(J)+WEIGHT*X(I)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
sampwm.f:89:5:
89 | 7020 FORMAT(' *** ERROR *** ROUTINE SAMPWM :',
| 1
Warning: Label 7020 at (1) defined but not used [-Wunused-label]
sampwm.f:88:5:
88 | 7010 FORMAT(' *** ERROR *** ROUTINE SAMPWM : PARAMETER KIND INVALID')
| 1
Warning: Label 7010 at (1) defined but not used [-Wunused-label]
sampwm.f:87:5:
87 | 7000 FORMAT(' *** ERROR *** ROUTINE SAMPWM : PARAMETER NMOM INVALID')
| 1
Warning: Label 7000 at (1) defined but not used [-Wunused-label]
gfortran-13 -fpic -g -O2 -Wall -mtune=native -c sort.f -o sort.o
sort.f:47:72:
47 | 30 X(J+M)=X(J)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
sort.f:49:72:
49 | 50 X(J+M)=TEST
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
gcc-13 -shared -L/home/hornik/tmp/R.check/r-patched-gcc/Work/build/lib -Wl,-O1 -o nsRFA.so alg136.o cdfexp.o cdfgam.o cdfgev.o cdfglo.o cdfgno.o cdfgpa.o cdfgum.o cdfkap.o cdfnor.o cdfpe3.o cdfwak.o cluagg.o cluinf.o clukm.o derf.o digamd.o dlgama.o durand.o gamind.o leaps.o leapshdr.o lmrexp.o lmrgam.o lmrgev.o lmrglo.o lmrgno.o lmrgpa.o lmrgum.o lmrkap.o lmrnor.o lmrpe3.o lmrwak.o pelexp.o pelgam.o pelgev.o pelglo.o pelgno.o pelgpa.o pelgum.o pelkap.o pelnor.o pelpe3.o pelwak.o quaexp.o quagam.o quagev.o quaglo.o quagno.o quagpa.o quagum.o quakap.o quanor.o quape3.o quastn.o quawak.o registerDynamicSymbol.o reglmr.o regtst.o samlmr.o samlmu.o sampwm.o sort.o -lgfortran -lm -lquadmath -L/home/hornik/tmp/R.check/r-patched-gcc/Work/build/lib -lR
make[1]: Leaving directory '/tmp/Rtmpe39KdH/R.INSTALL3faf2a61cb4f20/nsRFA/src'
make[1]: Entering directory '/tmp/Rtmpe39KdH/R.INSTALL3faf2a61cb4f20/nsRFA/src'
make[1]: Leaving directory '/tmp/Rtmpe39KdH/R.INSTALL3faf2a61cb4f20/nsRFA/src'
installing to /home/hornik/tmp/R.check/r-patched-gcc/Work/build/Packages/00LOCK-nsRFA/00new/nsRFA/libs
** R
** data
** demo
** inst
** byte-compile and prepare package for lazy loading
** help
*** installing help indices
converting help for package ‘nsRFA’
finding HTML links ... done
AD.dist html
Ardechedata html
BayesianMCMC html
DIAGNOSTICS html
DISTPLOTS html
EXP html
FEH1000 html
GENLOGIS html
GENPAR html
GEV html
GOFlaio2004 html
GOFmontecarlo html
GUMBEL html
HOMTESTS html
HW.original html
KAPPA html
LOGNORM html
Lmoments html
MLlaio2004 html
MSClaio2008 html
P3 html
REGRDIAGNOSTICS html
SERIESPLOTS html
STATICPLOTS html
bestlm html
functionsLaio html
hydroSIMN html
moments html
nsRFA-internal html
nsRFA-package html
roi html
traceWminim html
varLmoments html
** building package indices
** installing vignettes
** testing if installed package can be loaded from temporary location
** checking absolute paths in shared objects and dynamic libraries
** testing if installed package can be loaded from final location
** testing if installed package keeps a record of temporary installation path
* DONE (nsRFA)