* installing *source* package 'spant' ...
** package 'spant' successfully unpacked and MD5 sums checked
** using staged installation
** libs
using C compiler: 'gcc.exe (GCC) 13.2.0'
using Fortran compiler: 'GNU Fortran (GCC) 13.2.0'
make[1]: Entering directory '/d/temp/RtmpEnRywR/R.INSTALL242f07e8f7b22/spant/src'
gcc -I"D:/RCompile/recent/R/include" -DNDEBUG -I"d:/rtools44/x86_64-w64-mingw32.static.posix/include" -pedantic -Wstrict-prototypes -O2 -Wall -mfpmath=sse -msse2 -mstackrealign -c init.c -o init.o
gfortran -pedantic -O2 -mfpmath=sse -msse2 -mstackrealign -c lsei.f -o lsei.o
lsei.f:85:72:
85 | DO 10 J=1,NBP1
| 1
Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1)
lsei.f:86:72:
86 | 10 G(IG1,J)=G(IG2,J)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
lsei.f:91:72:
91 | DO 20 J=1,NBP1
| 1
Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1)
lsei.f:92:72:
92 | 20 G(IG,J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
lsei.f:107:72:
107 | 40 G(IG,JG)=G(IG,I)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
lsei.f:109:72:
109 | DO 50 I=1,K
| 1
Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1)
lsei.f:111:72:
111 | 50 G(IG,JG)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
lsei.f:128:72:
128 | 90 G(IR-1,I)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
lsei.f:162:72:
162 | GO TO (10,90,50), MODE
| 1
Warning: Obsolescent feature: Computed GOTO at (1)
lsei.f:166:72:
166 | 20 X(J)=G(J,NB+1)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
lsei.f:172:72:
172 | 30 RSQ=RSQ+G(J,NB+1)**2
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
lsei.f:189:72:
189 | 60 S=S+G(I,JG)*X(IX)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
lsei.f:193:72:
193 | 80 X(I)=(X(I)-S)/G(I,L+1)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
lsei.f:204:72:
204 | 100 S=S+X(I)*G(I,L)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
lsei.f:207:72:
207 | 120 X(J)=(X(J)-S)/G(J,L+1)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
lsei.f:308:72:
308 | IF (ANOISE) 10,30,20
| 1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
lsei.f:385:72:
385 | 10 CL=MAX(abs(U(1,J)),CL)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
lsei.f:386:72:
386 | IF (CL) 130,130,20
| 1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
lsei.f:390:72:
390 | 30 SM=SM+(U(1,J)*CLINV)**2
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
lsei.f:392:72:
392 | IF (U(1,LPIVOT)) 50,50,40
| 1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
lsei.f:399:72:
399 | 60 IF (CL) 130,130,70
| 1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
lsei.f:404:72:
404 | IF (B) 80,130,130
| 1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
lsei.f:415:72:
415 | 90 I3=I3+ICE
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
lsei.f:416:72:
416 | IF (SM) 100,120,100
| 1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
lsei.f:421:72:
421 | 110 I4=I4+ICE
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
lsei.f:460:72:
460 | IF(DIFF(HMAX+FACTOR*H(LMAX),HMAX)) 20,20,50
| 1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
lsei.f:468:72:
468 | 30 H(L)=H(L)+A(I,L)**2
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
lsei.f:483:72:
483 | 60 A(I,LMAX)=TMP
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
lsei.f:489:72:
489 | 80 CALL H12 (2,J,J+1,M,A(1,J),1,H(J),B,1,MDB,NB)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
lsei.f:508:72:
508 | 120 TMP=TMP+B(I,JB)**2
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
lsei.f:509:72:
509 | 130 RNORM(JB)=SQRT(TMP)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
lsei.f:515:72:
515 | DO 150 I=1,N
| 1
Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1)
lsei.f:516:72:
516 | 150 B(I,JB)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1)
lsei.f:525:72:
525 | 170 CALL H12 (1,I,KP1,N,A(I,1),MDA,G(I),A,MDA,1,I-1)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1)
lsei.f:540:72:
540 | 190 SM=SM+A(I,J)*B(J,JB)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1)
lsei.f:542:72:
542 | 210 B(I,JB)=(B(I,JB)-SM)/A(I,I)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1)
lsei.f:548:72:
548 | 220 B(J,JB)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1)
lsei.f:550:72:
550 | 230 CALL H12 (2,I,KP1,N,A(I,1),MDA,G(I),B(1,JB),1,MDB,1)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1)
lsei.f:592:72:
592 | 10 X(J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
lsei.f:610:72:
610 | 20 W(IW)=G(J,I)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
lsei.f:612:72:
612 | 30 W(IW)=H(J)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
lsei.f:617:72:
617 | 40 W(IW)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
lsei.f:629:72:
629 | IF (RNORM) 130,130,50
| 1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
lsei.f:635:72:
635 | 60 FAC=FAC-H(I)*W(IW)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
lsei.f:637:72:
637 | IF (DIFF(ONE+FAC,ONE)) 130,130,70
| 1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
lsei.f:644:72:
644 | 80 X(J)=X(J)+G(I,J)*W(IW)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
lsei.f:645:72:
645 | 90 X(J)=X(J)*FAC
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
lsei.f:647:72:
647 | 100 XNORM=XNORM+X(J)**2
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
lsei.f:700:18:
700 | character*4 HEAD (2)
| 1
Warning: Obsolescent feature: Old-style character length at (1)
lsei.f:701:19:
701 | character*26 FMT1(2)
| 1
Warning: Obsolescent feature: Old-style character length at (1)
lsei.f:702:19:
702 | character*26 FMT2(2)
| 1
Warning: Obsolescent feature: Old-style character length at (1)
lsei.f:876:72:
876 | 20 INDEX(I)=I
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
lsei.f:895:72:
895 | 40 SM=SM+A(L,J)*B(L)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
lsei.f:925:72:
925 | 90 UNORM=UNORM+A(L,J)**2
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
lsei.f:934:72:
934 | 120 ZZ(L)=B(L)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
lsei.f:958:72:
958 | 150 B(L)=ZZ(L)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1)
lsei.f:975:72:
975 | 180 A(L,J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
lsei.f:1078:72:
1078 | 310 ZZ(I)=B(I)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1)
lsei.f:1088:72:
1088 | 340 X(I)=ZZ(IP)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1)
lsei.f:1101:72:
1101 | 360 SM=SM+B(I)**2
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1)
lsei.f:1104:72:
1104 | 380 W(J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1)
lsei.f:1123:72:
1123 | go to (200, 320), RTNKEY
| 1
Warning: Obsolescent feature: Computed GOTO at (1)
lsei.f:1192:72:
1192 | 10 DNORM=max(abs(Q(J))+abs(E(J)),DNORM)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
lsei.f:1351:72:
1351 | 180 V(J,K)=-V(J,K)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
lsei.f:1380:72:
1380 | 240 C(K,J)=T
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1)
lsei.f:1387:72:
1387 | 260 V(J,K)=T
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1)
lsei.f:1634:72:
1634 | 30 SB = SB + A(I,J)**2
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
lsei.f:1898:72:
1898 | 210 IF (K.GT.1) A(I,K) = A(I,K) + A(I,K-1)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1)
lsei.f:2046:72:
2046 | 30 A(I,J)=A(I,N)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
lsei.f:2062:72:
2062 | IF (A(I,I)) 90,70,90
| 1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
lsei.f:2064:72:
2064 | IF (A(I,J)) 90,80,90
| 1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
lsei.f:2075:72:
2075 | 110 B(M,J)=T
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
lsei.f:2077:72:
2077 | 120 A(I,J)=A(M,J)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
lsei.f:2080:72:
2080 | 130 A(M,J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
lsei.f:2129:72:
2129 | 180 WORK(J,1)=A(J-1,J)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
lsei.f:2147:72:
2147 | 220 A(I,J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1)
lsei.f:2148:72:
2148 | 230 A(I,I)=ONE
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1)
lsei.f:2164:72:
2164 | 250 S(J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1)
lsei.f:2173:72:
2173 | 270 A(I,J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1)
lsei.f:2181:72:
2181 | 290 A(I,J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1)
gfortran -pedantic -O2 -mfpmath=sse -msse2 -mstackrealign -c pnnls.f -o pnnls.o
pnnls.f:90:72:
90 | 20 INDEX(I)=I
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
pnnls.f:114:72:
114 | 510 UNORM=UNORM+A(L,J)**2
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1)
pnnls.f:126:72:
126 | 530 A(L,J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 530 at (1)
pnnls.f:132:72:
132 | 540 INDEX(IK) = INDEX(IK+1)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 540 at (1)
pnnls.f:136:72:
136 | 550 INDEX(IK-1) = INDEX(IK)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 550 at (1)
pnnls.f:148:72:
148 | 570 ZZ(IP)=B(IP)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 570 at (1)
pnnls.f:153:72:
153 | 590 X(L)=ZZ(IP)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 590 at (1)
pnnls.f:176:72:
176 | 40 SM=SM+A(L,J)*B(L)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
pnnls.f:207:72:
207 | 90 UNORM=UNORM+A(L,J)**2
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
pnnls.f:216:72:
216 | 120 ZZ(L)=B(L)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
pnnls.f:241:72:
241 | 150 B(L)=ZZ(L)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1)
pnnls.f:258:72:
258 | 180 A(L,J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
pnnls.f:361:72:
361 | 310 ZZ(I)=B(I)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1)
pnnls.f:371:72:
371 | 340 X(I)=ZZ(IP)
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1)
pnnls.f:384:72:
384 | 360 SM=SM+B(I)**2
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1)
pnnls.f:387:72:
387 | 380 W(J)=ZERO
| 1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1)
pnnls.f:406:72:
406 | go to (200, 320, 580), RTNKEY
| 1
Warning: Obsolescent feature: Computed GOTO at (1)
gcc -shared -s -static-libgcc -o spant.dll tmp.def init.o lsei.o pnnls.o -Ld:/rtools44/x86_64-w64-mingw32.static.posix/lib/x64 -Ld:/rtools44/x86_64-w64-mingw32.static.posix/lib -lgfortran -lm -lquadmath -LD:/RCompile/recent/R/bin/x64 -lR
make[1]: Leaving directory '/d/temp/RtmpEnRywR/R.INSTALL242f07e8f7b22/spant/src'
make[1]: Entering directory '/d/temp/RtmpEnRywR/R.INSTALL242f07e8f7b22/spant/src'
make[1]: Leaving directory '/d/temp/RtmpEnRywR/R.INSTALL242f07e8f7b22/spant/src'
installing to d:/Rcompile/CRANpkg/lib/4.5/00LOCK-spant/00new/spant/libs/x64
** R
** data
*** moving datasets to lazyload DB
** inst
** byte-compile and prepare package for lazy loading
** help
*** installing help indices
*** copying figures
** building package indices
** installing vignettes
** testing if installed package can be loaded from temporary location
** testing if installed package can be loaded from final location
** testing if installed package keeps a record of temporary installation path
* MD5 sums
packaged installation of 'spant' as spant_2.20.0.zip
* DONE (spant)