* installing *source* package ‘nsRFA’ ... ** package ‘nsRFA’ successfully unpacked and MD5 sums checked ** using staged installation ** libs using C compiler: ‘gcc-13 (GCC) 13.2.0’ using Fortran compiler: ‘GNU Fortran (GCC) 13.2.0’ make[1]: Entering directory '/data/gannet/ripley/R/packages/tests-devel/nsRFA/src' gfortran-13 -fpic -g -O2 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -c cdfnor.f -o cdfnor.o gfortran-13 -fpic -g -O2 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -c durand.f -o durand.o gfortran-13 -fpic -g -O2 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -c leapshdr.f -o leapshdr.o gfortran-13 -fpic -g -O2 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -c lmrkap.f -o lmrkap.o lmrkap.f:61:72: 61 | GOTO(10,30,50,70,90,110),ICASE | 1 Warning: Obsolescent feature: Computed GOTO at (1) 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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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"/data/gannet/ripley/R/R-devel/include" -DNDEBUG -I/usr/local/include -fpic -g -O2 -Wall -pedantic -mtune=native -Wp,-D_FORTIFY_SOURCE=3 -fexceptions -fstack-protector-strong -fstack-clash-protection -fcf-protection -Werror=implicit-function-declaration -Wstrict-prototypes -c registerDynamicSymbol.c -o registerDynamicSymbol.o gfortran-13 -fpic -g -O2 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -c regtst.f -o regtst.o regtst.f:120:18: 120 | CHARACTER*1 BLANK,STAR,LOOK1,LOOK2 | 1 Warning: Obsolescent feature: Old-style character length at (1) regtst.f:121:19: 121 | CHARACTER*12 NAMES(NSITES) | 1 Warning: Obsolescent feature: Old-style character length at (1) regtst.f:122:19: 122 | CHARACTER*18 DISTRI(6) | 1 Warning: Obsolescent feature: Old-style character length at (1) 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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -mtune=native -Wall -pedantic -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 -g -O2 -Wall -pedantic -mtune=native -Wp,-D_FORTIFY_SOURCE=3 -fexceptions -fstack-protector-strong -fstack-clash-protection -fcf-protection -Werror=implicit-function-declaration -Wstrict-prototypes -fpic -L/usr/local/gcc13/lib64 -L/usr/local/lib64 -L/usr/local/clang18/lib/x86_64-unknown-linux-gnu -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 make[1]: Leaving directory '/data/gannet/ripley/R/packages/tests-devel/nsRFA/src' make[1]: Entering directory '/data/gannet/ripley/R/packages/tests-devel/nsRFA/src' make[1]: Leaving directory '/data/gannet/ripley/R/packages/tests-devel/nsRFA/src' installing to /data/gannet/ripley/R/packages/tests-devel/nsRFA.Rcheck/00LOCK-nsRFA/00new/nsRFA/libs ** R ** data ** demo ** inst ** byte-compile and prepare package for lazy loading ** help *** installing help indices ** 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)