* installing to library ‘/home/hornik/tmp/R.check/r-devel-gcc/Work/build/Packages’ * installing *source* package ‘wnominate’ ... ** package ‘wnominate’ 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 '/home/hornik/tmp/scratch/Rtmpw5h0pu/R.INSTALL1328c837c4e39/wnominate/src' gcc-13 -I"/home/hornik/tmp/R.check/r-devel-gcc/Work/build/include" -DNDEBUG -I/usr/local/include -D_FORTIFY_SOURCE=3 -fpic -g -O2 -Wall -Wstrict-prototypes -pedantic -mtune=native -c init_wnominate.c -o init_wnominate.o gcc-13 -I"/home/hornik/tmp/R.check/r-devel-gcc/Work/build/include" -DNDEBUG -I/usr/local/include -D_FORTIFY_SOURCE=3 -fpic -g -O2 -Wall -Wstrict-prototypes -pedantic -mtune=native -c nomprob.c -o nomprob.o gcc-13 -I"/home/hornik/tmp/R.check/r-devel-gcc/Work/build/include" -DNDEBUG -I/usr/local/include -D_FORTIFY_SOURCE=3 -fpic -g -O2 -Wall -Wstrict-prototypes -pedantic -mtune=native -c random_wrap.c -o random_wrap.o gfortran-13 -g -O2 -mtune=native -msse2 -mfpmath=sse -fpic -g -O2 -Wall -mtune=native -c wnominate.f90 -o wnominate.o wnominate.f90:241:18: 241 | DO 77 I=1,NP | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 77 at (1) wnominate.f90:247:18: 247 | DO 77 L=1,NS | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 77 at (1) wnominate.f90:272:18: 272 | DO 69 I=1,NP | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 69 at (1) wnominate.f90:274:22: 274 | DO 69 J=1,NRCALL | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 69 at (1) wnominate.f90:281:22: 281 | 69 PSI(I,J,K) = 1.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 69 at (1) wnominate.f90:312:24: 312 | 70 SUM=SUM+XDATA(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1) wnominate.f90:315:29: 315 | 72 BB=AMAX1(BB,XDATA(I,K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 72 at (1) wnominate.f90:317:31: 317 | 73 XDATA(I,K)=XDATA(I,K)/BB | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 73 at (1) wnominate.f90:326:24: 326 | 50 SUM=SUM+XDATA(I,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) wnominate.f90:419:43: 419 | 22 XDATA(I,NDIM)=XDATA(I,NDIM)*ALPHA | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 22 at (1) wnominate.f90:602:16: 602 | DO 4 J=1,2 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 4 at (1) wnominate.f90:607:13: 607 | 4 JJ=JJ+1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 4 at (1) wnominate.f90:652:16: 652 | DO 6 J=1,2 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 6 at (1) wnominate.f90:657:13: 657 | 6 JJ=JJ+1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 6 at (1) wnominate.f90:678:24: 678 | DO 1492 J=1,NRCALL | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 1492 at (1) wnominate.f90:738:24: 738 | DO 109 I=1,NP | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 109 at (1) wnominate.f90:775:28: 775 | DO 659 J=1,NRCALL | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 659 at (1) wnominate.f90:817:24: 817 | DO 108 I=1,NP | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 108 at (1) wnominate.f90:834:24: 834 | DO 107 K=1,NS | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 107 at (1) wnominate.f90:839:24: 839 | DO 654 K=1,NS | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 654 at (1) wnominate.f90:847:25: 847 | DO 1070 K=1,NS | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 1070 at (1) wnominate.f90:852:25: 852 | DO 6540 K=1,NS | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 6540 at (1) wnominate.f90:1007:19: 1007 | DO 656 I=1,NP | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 656 at (1) wnominate.f90:1103:59: 1103 | 2 IF(KD(J).EQ.4.OR.KD(J).EQ.5.OR.KD(J).EQ.6)JSUM=JSUM+1 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 2 at (1) wnominate.f90:1105:19: 1105 | 1 NNSUM(I)=JSUM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) wnominate.f90:1383:25: 1383 | 919 XXXX(KK,K)=XX(JJ,K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 919 at (1) wnominate.f90:1400:20: 1400 | 1 SUM=SUM+ZZZ(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) wnominate.f90:1402:35: 1402 | 2 ZZZ(I)=ZZZ(I)-(SUM/FLOAT(NP)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 2 at (1) wnominate.f90:1427:15: 1427 | 303 Q(I)=X(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 303 at (1) wnominate.f90:1491:38: 1491 | 11 SSUMS=SSUMS+(XX(I,K)-XX(J,K))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 11 at (1) wnominate.f90:1529:37: 1529 | 7 SUM=SUM+(XXXX(J,K)-XX(II,K))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 7 at (1) wnominate.f90:1537:53: 1537 | 8 ZZZ(K)=ZZZ(K)+XXXX(J,K)+XC*(XX(II,K)-XXXX(J,K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 8 at (1) wnominate.f90:1543:31: 1543 | 1 XX(II,K)=ZZZ(K)/FLOAT(KK) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) wnominate.f90:1578:28: 1578 | 41 XDATA(I,1)=-XDATA(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 41 at (1) wnominate.f90:1582:28: 1582 | 43 XDATA(I,2)=-XDATA(I,2) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 43 at (1) wnominate.f90:1603:21: 1603 | 10 X(I)=XDATA(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) wnominate.f90:1624:46: 1624 | 4 IF(LDATA2(I,J).EQ.6)SUMN=SUMN+XDATA(I,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 4 at (1) wnominate.f90:1638:37: 1638 | 7 IF(LDATA(I,J).EQ.6)LDATA(I,J)=2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 7 at (1) wnominate.f90:2077:34: 2077 | 120 SCALE = SCALE + ABS(D(K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) wnominate.f90:2105:21: 2105 | 170 E(J) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) wnominate.f90:2131:31: 2131 | 250 E(J) = E(J) - H * D(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) wnominate.f90:2138:49: 2138 | 260 A(K,J) = A(K,J) - F * E(K) - G * D(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) wnominate.f90:2200:24: 2200 | 80 Z(J,I) = A(J,I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1) wnominate.f90:2215:34: 2215 | 120 SCALE = SCALE + ABS(D(K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1) wnominate.f90:2240:21: 2240 | 170 E(J) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1) wnominate.f90:2267:32: 2267 | 250 E(J) = E(J) - HH * D(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1) wnominate.f90:2274:49: 2274 | 260 Z(K,J) = Z(K,J) - F * E(K) - G * D(K) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1) wnominate.f90:2291:26: 2291 | 330 D(K) = Z(K,I) / H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 330 at (1) wnominate.f90:2297:35: 2297 | 340 G = G + Z(K,I) * Z(K,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1) wnominate.f90:2299:27: 2299 | DO 360 K = 1, L | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 360 at (1) wnominate.f90:2304:23: 2304 | 400 Z(K,I) = 0.0E0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 400 at (1) wnominate.f90:2383:19: 2383 | 100 E(I-1) = E(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) wnominate.f90:2417:24: 2417 | 140 D(I) = D(I) - H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) wnominate.f90:2535:21: 2535 | 100 E2(I-1) = E2(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1) wnominate.f90:2568:24: 2568 | 140 D(I) = D(I) - H | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1) wnominate.f90:2709:22: 2709 | DO 22 J=1,2 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 22 at (1) wnominate.f90:2710:20: 2710 | 22 MM(I,J)=0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 22 at (1) wnominate.f90:2740:22: 2740 | DO 21 J=1,2 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 21 at (1) wnominate.f90:2743:34: 2743 | 21 MM(I,J)=MM(I,J)+LL(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 21 at (1) wnominate.f90:2771:22: 2771 | DO 26 J=1,2 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 26 at (1) wnominate.f90:2772:20: 2772 | 26 MM(I,J)=0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 26 at (1) wnominate.f90:2793:22: 2793 | DO 27 J=1,2 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 27 at (1) wnominate.f90:2796:34: 2796 | 27 MM(I,J)=MM(I,J)+LL(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 27 at (1) wnominate.f90:2852:19: 2852 | 50 TESTB(I)=B(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1) wnominate.f90:2889:18: 2889 | DO 60 KX=1,3 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 60 at (1) wnominate.f90:2892:48: 2892 | 61 SUM=SUM+ZMAT(KX,J)*(1.0/WVEC(J))*ZMAT(I,J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 61 at (1) wnominate.f90:2893:18: 2893 | 60 AV(I,KX)=SUM | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1) wnominate.f90:2903:17: 2903 | DO 77 J=1,3 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 77 at (1) wnominate.f90:2994:19: 2994 | 710 B(I)=TESTB(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 710 at (1) wnominate.f90:3010:19: 3010 | 705 B(I)=TESTB(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 705 at (1) wnominate.f90:3026:19: 3026 | 650 TESTB(I)=B(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 650 at (1) wnominate.f90:3133:34: 3133 | 10 TESTB(I)=B(I)+XLBA*DELTAB(I) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1) wnominate.f90:3168:18: 3168 | 2 YBIGL(J)=0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 2 at (1) wnominate.f90:3175:22: 3175 | DO 101 I=1,NOPAR | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 101 at (1) wnominate.f90:3176:16: 3176 | 101 V(I,J)=0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 101 at (1) wnominate.f90:3195:26: 3195 | 205 GRAD(J)=GRAD(J)+G(J) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 205 at (1) wnominate.f90:3201:22: 3201 | DO 206 J=1,NOPAR | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 206 at (1) wnominate.f90:3202:29: 3202 | 206 V(J,L)=V(J,L)+G(J)*G(L) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 206 at (1) wnominate.f90:3273:15: 3273 | 27 G(JJ)=0.0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 27 at (1) wnominate.f90:3330:37: 3330 | 6 PHI(NEQ)=PHI(NEQ)+EXB(I,NEQ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 6 at (1) wnominate.f90:3378:34: 3378 | 66 PHI(II)=PHI(II)+EXB(I,II) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 66 at (1) wnominate.f90:3426:34: 3426 | 68 PHI(II)=PHI(II)+EXB(I,II) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 68 at (1) wnominate.f90:3615:33: 3615 | 9 SUM=SUM+ZMID(NEQ,K)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 9 at (1) wnominate.f90:3654:52: 3654 | 13 XSP(K)=XDATA(NEQ,K)*(1.0/SQRT(SUM)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 13 at (1) wnominate.f90:3667:37: 3667 | 15 ASUM=ASUM+XNEW(K)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1) wnominate.f90:3669:49: 3669 | 18 XNEW(K)=XNEW(K)*(1.0/SQRT(ASUM)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 18 at (1) wnominate.f90:3702:42: 3702 | 17 ASUM=ASUM+XDATA(NEQ,K)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 17 at (1) wnominate.f90:3704:59: 3704 | 19 XDATA(NEQ,K)=XDATA(NEQ,K)*(1.0/SQRT(ASUM)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 19 at (1) wnominate.f90:3738:16: 3738 | DO 5 J=1,2 | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 5 at (1) wnominate.f90:3739:15: 3739 | 5 LL(I,J)=0 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 5 at (1) wnominate.f90:3891:33: 3891 | 1 ZY(J)=ZF+XINC*(XJ-1.0) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 1 at (1) wnominate.f90:3952:33: 3952 | 11 ZY(J)=ZF+XINC*(XJ-1.0) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 11 at (1) wnominate.f90:4015:36: 4015 | 34 ZN(J)=B2MAX-XINC*(XJ-1.0) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 34 at (1) wnominate.f90:4022:27: 4022 | DO 35 L=1,KKKCUT | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 35 at (1) wnominate.f90:4109:32: 4109 | 54 SUM=SUM+DYN(NEQ,K)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 54 at (1) wnominate.f90:4120:44: 4120 | 53 XGAM=XGAM+(ZMID(NEQ,K)-PTB(K))**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 53 at (1) wnominate.f90:4148:52: 4148 | 52 PTC(K)=PTA(K)+(DBETA/2.0)*(PTB(K)-PTA(K)) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 52 at (1) wnominate.f90:4158:30: 4158 | 51 AA=AA+CMINUSZ(K)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 51 at (1) wnominate.f90:4161:31: 4161 | 58 CC=CC+ZMID(NEQ,K)**2 | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 58 at (1) wnominate.f90:4186:25: 4186 | DO 55 K=1,NDIM | 1 Warning: Fortran 2018 deleted feature: Shared DO termination label 55 at (1) wnominate.f90:4323:46: 4323 | 11 ESUM=ESUM+XSAVE(I,1,1)*XSAVE(I,2,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 11 at (1) wnominate.f90:4353:46: 4353 | 21 ESUM=ESUM+XSAVE(I,1,1)*XSAVE(I,2,1) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 21 at (1) wnominate.f90:4446:31: 4446 | 12 KSUM=KSUM+KPJP(I,JJ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 12 at (1) wnominate.f90:4488:31: 4488 | 14 KSUM=KSUM+KPJP(I,JJ) | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 14 at (1) wnominate.f90:4565:14: 4565 | 3 LMO(I)=I | 1 Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 3 at (1) wnominate.f90:1128:21: 1128 | LDATA(NOB,NAS)=KD(J) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] wnominate.f90:1129:22: 1129 | LDATA2(NOB,NAS)=KD(J) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] wnominate.f90:1853:11: 1853 | IJ = I+(J-I)*R | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] wnominate.f90:1535:4: 1535 | 52 CONTINUE | 1 Warning: Label 52 at (1) defined but not used [-Wunused-label] wnominate.f90:1647:4: 1647 | 33 CONTINUE | 1 Warning: Label 33 at (1) defined but not used [-Wunused-label] wnominate.f90:1794:10: 1794 | KPP=AMIN0(KYES,KNO) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] wnominate.f90:3271:4: 3271 | 11 CONTINUE | 1 Warning: Label 11 at (1) defined but not used [-Wunused-label] wnominate.f90:3071:4: 3071 | 99 R0=R0/2. | 1 Warning: Label 99 at (1) defined but not used [-Wunused-label] wnominate.f90:2748:15: 2748 | JKP=JKP+AMIN0(LYES,LNO) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] wnominate.f90:4663:67: 4663 | SUBROUTINE SVDSVD(NROW,NCOL,Y16MIDP,YHAT,UUU,VVV,IRANK,IPRINT) | 1 Warning: Unused dummy argument ‘iprint’ at (1) [-Wunused-dummy-argument] wnominate.f90:4396:54: 4396 | & NDIM,NS,NP,NRCALL,NDUAL,IPRINT,XDATA,STDDVX, & | 1 Warning: Unused dummy argument ‘iprint’ at (1) [-Wunused-dummy-argument] wnominate.f90:4397:27: 4397 | & KAV,DYN,ZMID,STDDVZ,XSAVE,ZSAVE,CSAVE, & | 1 Warning: Unused dummy argument ‘kav’ at (1) [-Wunused-dummy-argument] wnominate.f90:4395:60: 4395 | SUBROUTINE OUTWRT(NRX,NSTEP,JAN,JANLST,KPJP,YBIGL,NITR, & | 1 Warning: Unused dummy argument ‘nitr’ at (1) [-Wunused-dummy-argument] wnominate.f90:4396:67: 4396 | & NDIM,NS,NP,NRCALL,NDUAL,IPRINT,XDATA,STDDVX, & | 1 Warning: Unused dummy argument ‘stddvx’ at (1) [-Wunused-dummy-argument] wnominate.f90:4397:43: 4397 | & KAV,DYN,ZMID,STDDVZ,XSAVE,ZSAVE,CSAVE, & | 1 Warning: Unused dummy argument ‘stddvz’ at (1) [-Wunused-dummy-argument] wnominate.f90:4396:60: 4396 | & NDIM,NS,NP,NRCALL,NDUAL,IPRINT,XDATA,STDDVX, & | 1 Warning: Unused dummy argument ‘xdata’ at (1) [-Wunused-dummy-argument] wnominate.f90:3727:47: 3727 | & NP,NRCALL,NDIM,NSTEP,JAN,JANLST, & | 1 Warning: Unused dummy argument ‘jan’ at (1) [-Wunused-dummy-argument] wnominate.f90:3727:54: 3727 | & NP,NRCALL,NDIM,NSTEP,JAN,JANLST, & | 1 Warning: Unused dummy argument ‘janlst’ at (1) [-Wunused-dummy-argument] wnominate.f90:3728:47: 3728 | & ZMID,XDATA,DYN,LDATA,PSI,BBB,BBBB) | 1 Warning: Unused dummy argument ‘psi’ at (1) [-Wunused-dummy-argument] wnominate.f90:3462:50: 3462 | & XLNL,B,V,SVLNL,FNLNL,ICNVG,ITT,NVAL,BBB,BBBB, & | 1 Warning: Unused dummy argument ‘icnvg’ at (1) [-Wunused-dummy-argument] wnominate.f90:3464:57: 3464 | & STDDVX,STDDVZ,YBIGL,YYBIGL,IPRINT) | 1 Warning: Unused dummy argument ‘iprint’ at (1) [-Wunused-dummy-argument] wnominate.f90:3462:54: 3462 | & XLNL,B,V,SVLNL,FNLNL,ICNVG,ITT,NVAL,BBB,BBBB, & | 1 Warning: Unused dummy argument ‘itt’ at (1) [-Wunused-dummy-argument] wnominate.f90:3461:27: 3461 | & JAN,JANLST,NITR,KSMIN,KSMAX, & | 1 Warning: Unused dummy argument ‘jan’ at (1) [-Wunused-dummy-argument] wnominate.f90:3461:34: 3461 | & JAN,JANLST,NITR,KSMIN,KSMAX, & | 1 Warning: Unused dummy argument ‘janlst’ at (1) [-Wunused-dummy-argument] wnominate.f90:3461:39: 3461 | & JAN,JANLST,NITR,KSMIN,KSMAX, & | 1 Warning: Unused dummy argument ‘nitr’ at (1) [-Wunused-dummy-argument] wnominate.f90:3460:53: 3460 | SUBROUTINE RPRINT(KPTSUM,NEQ,NP,NRCALL,NDUAL,NS,NDIM,NSTEP,NOPAR, & | 1 Warning: Unused dummy argument ‘ns’ at (1) [-Wunused-dummy-argument] wnominate.f90:3462:59: 3462 | & XLNL,B,V,SVLNL,FNLNL,ICNVG,ITT,NVAL,BBB,BBBB, & | 1 Warning: Unused dummy argument ‘nval’ at (1) [-Wunused-dummy-argument] wnominate.f90:2833:51: 2833 | & YBIGL,YYBIGL,ISENS,BBB,BBBB,IPRINT) | 1 Warning: Unused dummy argument ‘bbbb’ at (1) [-Wunused-dummy-argument] wnominate.f90:2833:58: 2833 | & YBIGL,YYBIGL,ISENS,BBB,BBBB,IPRINT) | 1 Warning: Unused dummy argument ‘iprint’ at (1) [-Wunused-dummy-argument] wnominate.f90:2829:65: 2829 | SUBROUTINE BHHH(NEQ,NP,NRCALL,NDUAL,NS,NDIM,NSTEP,NOPAR,JAN, & | 1 Warning: Unused dummy argument ‘jan’ at (1) [-Wunused-dummy-argument] wnominate.f90:2830:28: 2830 | & JANLST,SVLNL,FNLNL,ICNVG,ITT,NVAL, & | 1 Warning: Unused dummy argument ‘janlst’ at (1) [-Wunused-dummy-argument] wnominate.f90:3836:35: 3836 | & BBB,BBBB,SSS,YBIGL,YYBIGL,SVLNL,FNLNL) | 1 Warning: Unused dummy argument ‘sss’ at (1) [-Wunused-dummy-argument] wnominate.f90:3836:48: 3836 | & BBB,BBBB,SSS,YBIGL,YYBIGL,SVLNL,FNLNL) | 1 Warning: Unused dummy argument ‘yybigl’ at (1) [-Wunused-dummy-argument] wnominate.f90:3213:36: 3213 | SUBROUTINE ITHOBS(NP,NRCALL,NS,NDIM,NSTEP,NEQ,BBB,ISENS, & | 1 Warning: Unused dummy argument ‘ns’ at (1) [-Wunused-dummy-argument] wnominate.f90:4543:51: 4543 | & BBB,BBBB,SSS,ZMID,XDATA,DYN, & | 1 Warning: Unused dummy argument ‘dyn’ at (1) [-Wunused-dummy-argument] wnominate.f90:4544:36: 4544 | & ISENS,IPRINT) | 1 Warning: Unused dummy argument ‘iprint’ at (1) [-Wunused-dummy-argument] wnominate.f90:4541:35: 4541 | SUBROUTINE NORMZ(NP,NRCALL,NS,NDIM, & | 1 Warning: Unused dummy argument ‘ns’ at (1) [-Wunused-dummy-argument] wnominate.f90:1552:26: 1552 | SUBROUTINE RECODE(NS,NP,NRCALL,KLSEN,KLSEN2,KIO,KSMIN,KSMAX, & | 1 Warning: Unused dummy argument ‘ns’ at (1) [-Wunused-dummy-argument] wnominate.f90:1664:38: 1664 | SUBROUTINE JANICE(NP,NRCALL,IIII,JJJJ,KAV,NS,KV,X,KYES,KNO,JP, & | 1 Warning: Unused dummy argument ‘iiii’ at (1) [-Wunused-dummy-argument] wnominate.f90:1665:61: 1665 | & KFLIP,ZSAB,YPRE,SUMY,SUMN,SUMM,IPRINT) | 1 Warning: Unused dummy argument ‘iprint’ at (1) [-Wunused-dummy-argument] wnominate.f90:1664:43: 1664 | SUBROUTINE JANICE(NP,NRCALL,IIII,JJJJ,KAV,NS,KV,X,KYES,KNO,JP, & | 1 Warning: Unused dummy argument ‘jjjj’ at (1) [-Wunused-dummy-argument] wnominate.f90:1664:67: 1664 | SUBROUTINE JANICE(NP,NRCALL,IIII,JJJJ,KAV,NS,KV,X,KYES,KNO,JP, & | 1 Warning: Unused dummy argument ‘jp’ at (1) [-Wunused-dummy-argument] wnominate.f90:1664:47: 1664 | SUBROUTINE JANICE(NP,NRCALL,IIII,JJJJ,KAV,NS,KV,X,KYES,KNO,JP, & | 1 Warning: Unused dummy argument ‘kav’ at (1) [-Wunused-dummy-argument] wnominate.f90:1665:54: 1665 | & KFLIP,ZSAB,YPRE,SUMY,SUMN,SUMM,IPRINT) | 1 Warning: Unused dummy argument ‘summ’ at (1) [-Wunused-dummy-argument] wnominate.f90:1665:49: 1665 | & KFLIP,ZSAB,YPRE,SUMY,SUMN,SUMM,IPRINT) | 1 Warning: Unused dummy argument ‘sumn’ at (1) [-Wunused-dummy-argument] wnominate.f90:1665:44: 1665 | & KFLIP,ZSAB,YPRE,SUMY,SUMN,SUMM,IPRINT) | 1 Warning: Unused dummy argument ‘sumy’ at (1) [-Wunused-dummy-argument] wnominate.f90:1350:63: 1350 | SUBROUTINE WHOOPE(NP,NS,DSTAR,ZZZ,XX,SSE1,SSE2,KTP,IPRINT) | 1 Warning: Unused dummy argument ‘iprint’ at (1) [-Wunused-dummy-argument] wnominate.f90:1196:55: 1196 | SUBROUTINE KPASCORE(NP,NRCALL,NS,NDUAL,KIO,IPRINT, & | 1 Warning: Unused dummy argument ‘iprint’ at (1) [-Wunused-dummy-argument] wnominate.f90:1196:48: 1196 | SUBROUTINE KPASCORE(NP,NRCALL,NS,NDUAL,KIO,IPRINT, & | 1 Warning: Unused dummy argument ‘kio’ at (1) [-Wunused-dummy-argument] wnominate.f90:1196:44: 1196 | SUBROUTINE KPASCORE(NP,NRCALL,NS,NDUAL,KIO,IPRINT, & | 1 Warning: Unused dummy argument ‘ndual’ at (1) [-Wunused-dummy-argument] wnominate.f90:1196:38: 1196 | SUBROUTINE KPASCORE(NP,NRCALL,NS,NDUAL,KIO,IPRINT, & | 1 Warning: Unused dummy argument ‘ns’ at (1) [-Wunused-dummy-argument] wnominate.f90:1056:51: 1056 | SUBROUTINE CLEAN(NP,NRCALL,XVMIN,KVMIN,IPRINT,KPTSUM,LDATA, & | 1 Warning: Unused dummy argument ‘iprint’ at (1) [-Wunused-dummy-argument] wnominate.f90:4514:25: 4514 | AA=SUM/FLOAT(KKSUM) | ^ Warning: ‘kksum’ may be used uninitialized [-Wmaybe-uninitialized] wnominate.f90:4421:16: 4421 | KKSUM=0 | ^ note: ‘kksum’ was declared here wnominate.f90:4514:25: 4514 | AA=SUM/FLOAT(KKSUM) | ^ Warning: ‘sum’ may be used uninitialized [-Wmaybe-uninitialized] wnominate.f90:4420:14: 4420 | SUM=0.0 | ^ note: ‘sum’ was declared here wnominate.f90:3881:28: 3881 | IF(B(2).GT.0.0)ZF=XDATA(KSMIN,NDIM) | ^ Warning: ‘zf’ may be used uninitialized [-Wmaybe-uninitialized] wnominate.f90:4070:41: 4070 | B(1)=ABS(ZY(KJ)-ZN(KL))/2.0 | ^ Warning: ‘kl’ may be used uninitialized [-Wmaybe-uninitialized] wnominate.f90:4059:16: 4059 | KL=L | ^ note: ‘kl’ was declared here wnominate.f90:4075:41: 4075 | B(1)=ABS(ZY(LJ)-ZN(LL))/2.0 | ^ Warning: ‘lj’ may be used uninitialized [-Wmaybe-uninitialized] wnominate.f90:4064:16: 4064 | LJ=J | ^ note: ‘lj’ was declared here wnominate.f90:4075:41: 4075 | B(1)=ABS(ZY(LJ)-ZN(LL))/2.0 | ^ Warning: ‘ll’ may be used uninitialized [-Wmaybe-uninitialized] wnominate.f90:4065:16: 4065 | LL=L | ^ note: ‘ll’ was declared here wnominate.f90:4079:14: 4079 | IF(XLDEF.GE.AMX)THEN | ^ Warning: ‘amx’ may be used uninitialized [-Wmaybe-uninitialized] wnominate.f90:3921:14: 3921 | AMX=AMAX1(XLX,BMAX) | ^ note: ‘amx’ was declared here wnominate.f90:3697:31: 3697 | XJJ=FLOAT(KJJ) | ^ Warning: ‘kjj’ may be used uninitialized [-Wmaybe-uninitialized] wnominate.f90:3694:46: 3694 | IF(ABS(AMX-XLL).LE..00001)KJJ=JJ | ^ note: ‘kjj’ was declared here wnominate.f90:3185:9: 3185 | IF(I.GT.NNBS)GO TO 211 | ^ Warning: ‘nnbs’ may be used uninitialized [-Wmaybe-uninitialized] wnominate.f90:3159:25: 3159 | IF(NSTEP.EQ.-1)NNBS=NP | ^ note: ‘nnbs’ was declared here wnominate.f90:2450:44: 2450 | P = -S * S2 * C3 * EL1 * E(L) / DL1 | ^ Warning: ‘c3’ may be used uninitialized [-Wmaybe-uninitialized] wnominate.f90:2321:18: 2321 | REAL C,C2,C3,DL1,EL1,F,G,H,P,R,S,S2,TST1,TST2,KPPYTHAG | ^ note: ‘c3’ was declared here wnominate.f90:2450:44: 2450 | P = -S * S2 * C3 * EL1 * E(L) / DL1 | ^ Warning: ‘s2’ may be used uninitialized [-Wmaybe-uninitialized] wnominate.f90:2321:41: 2321 | REAL C,C2,C3,DL1,EL1,F,G,H,P,R,S,S2,TST1,TST2,KPPYTHAG | ^ note: ‘s2’ was declared here wnominate.f90:2550:16: 2550 | IF (E2(M) .LE. C) GO TO 120 | ^ Warning: ‘c’ may be used uninitialized [-Wmaybe-uninitialized] wnominate.f90:2491:14: 2491 | REAL B,C,F,G,H,P,R,S,T,KPEPSLON,KPPYTHAG | ^ note: ‘c’ was declared here wnominate.f90:2580:21: 2580 | P = G * H | ^ Warning: ‘g’ may be used uninitialized [-Wmaybe-uninitialized] wnominate.f90:2491:18: 2491 | REAL B,C,F,G,H,P,R,S,T,KPEPSLON,KPPYTHAG | ^ note: ‘g’ was declared here wnominate.f90:2587:25: 2587 | H = G * P / R | ^ Warning: ‘b’ may be used uninitialized [-Wmaybe-uninitialized] wnominate.f90:2491:12: 2491 | REAL B,C,F,G,H,P,R,S,T,KPEPSLON,KPPYTHAG | ^ note: ‘b’ was declared here gcc-13 -I"/home/hornik/tmp/R.check/r-devel-gcc/Work/build/include" -DNDEBUG -I/usr/local/include -D_FORTIFY_SOURCE=3 -fpic -g -O2 -Wall -Wstrict-prototypes -pedantic -mtune=native -c wrap_output.c -o wrap_output.o gcc-13 -shared -L/home/hornik/tmp/R.check/r-devel-gcc/Work/build/lib -Wl,-O1 -o wnominate.so init_wnominate.o nomprob.o random_wrap.o wnominate.o wrap_output.o -lgfortran -lm -lquadmath -L/home/hornik/tmp/R.check/r-devel-gcc/Work/build/lib -lR make[1]: Leaving directory '/home/hornik/tmp/scratch/Rtmpw5h0pu/R.INSTALL1328c837c4e39/wnominate/src' make[1]: Entering directory '/home/hornik/tmp/scratch/Rtmpw5h0pu/R.INSTALL1328c837c4e39/wnominate/src' make[1]: Leaving directory '/home/hornik/tmp/scratch/Rtmpw5h0pu/R.INSTALL1328c837c4e39/wnominate/src' installing to /home/hornik/tmp/R.check/r-devel-gcc/Work/build/Packages/00LOCK-wnominate/00new/wnominate/libs ** R ** data ** 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 * creating tarball packaged installation of ‘wnominate’ as ‘wnominate_1.4_R_x86_64-pc-linux-gnu.tar.gz’ * DONE (wnominate)