qrupdate: dropped
This commit is contained in:
parent
cb4c957e06
commit
0b51865c94
@ -1,6 +0,0 @@
|
||||
drwxr-xr-x root/root usr/
|
||||
drwxr-xr-x root/root usr/lib/
|
||||
-rw-r--r-- root/root usr/lib/libqrupdate.a
|
||||
lrwxrwxrwx root/root usr/lib/libqrupdate.so -> libqrupdate.so.1.1
|
||||
lrwxrwxrwx root/root usr/lib/libqrupdate.so.1 -> libqrupdate.so.1.1
|
||||
-rw-r--r-- root/root usr/lib/libqrupdate.so.1.1
|
@ -1,7 +0,0 @@
|
||||
untrusted comment: verify with /etc/ports/jmq.pub
|
||||
RWTTPlFarK9CxAuboluHqwmyTnnn37UQBGeMEMXFN5jj65ZTocqeuWrwBsk3/tf4wEWZP5QrmVDU3BT6mNeWIw6DVTrmpJLi+wQ=
|
||||
SHA256 (Pkgfile) = b4a32393874a8ed5caa14f73ca968cbc1a73e520741d59bca3b6f8876883271e
|
||||
SHA256 (.footprint) = 15f45b7103f954a015b563e240b1ae61b5c34e5f07b41c173b1b279f5cb2c0c9
|
||||
SHA256 (qrupdate-1.1.2.tar.gz) = e2a1c711dc8ebc418e21195833814cb2f84b878b90a2774365f0166402308e08
|
||||
SHA256 (r32-drop-awk.patch) = 94e19e60ed49561cf7f54dbd42adcffb8312a159535c58aae9db29a923a70d11
|
||||
SHA256 (r33-complex-real.patch) = 84566f96cbe7a65f793c96e9258d1151de647bddded89e45a2a342989425c3db
|
@ -1,21 +0,0 @@
|
||||
# Description: Fortran library for fast updates of QR and Cholesky decompositions
|
||||
# URL: https://sourceforge.net/projects/qrupdate
|
||||
# Maintainer: John McQuah, jmcquah at disroot dot org
|
||||
# Depends on: lapack
|
||||
|
||||
name=qrupdate
|
||||
version=1.1.2
|
||||
release=1
|
||||
source=(https://downloads.sourceforge.net/project/qrupdate/qrupdate/1.2/$name-$version.tar.gz
|
||||
r32-drop-awk.patch
|
||||
r33-complex-real.patch)
|
||||
|
||||
build() {
|
||||
cd $name-$version
|
||||
patch -p1 < $SRC/r32-drop-awk.patch
|
||||
patch -p1 < $SRC/r33-complex-real.patch
|
||||
sed -e 's|^FFLAGS.*|FFLAGS=${CFLAGS} ${LDFLAGS}|' -i Makeconf
|
||||
|
||||
make PREFIX=/usr solib
|
||||
make PREFIX=/usr DESTDIR=$PKG install
|
||||
}
|
@ -1,35 +0,0 @@
|
||||
--- a/test/report_results
|
||||
+++ b/test/report_results
|
||||
@@ -4,19 +4,27 @@
|
||||
failed_total=0
|
||||
cat $OUTS
|
||||
|
||||
-# if awk exists, use it to print total statistics
|
||||
-if which awk > /dev/null ; then
|
||||
- awk '/total:/ { passed += $3; failed += $5; }
|
||||
- END { printf " TOTAL: PASSED %3d FAILED %3d\n", passed, failed; }' $OUTS
|
||||
-fi
|
||||
+ret=0
|
||||
for out in $OUTS ; do
|
||||
if [ ! -s $out ] ; then
|
||||
echo " $out file empty (test crashed)!"
|
||||
+ ret=1
|
||||
else
|
||||
if grep -q WARNING $out ; then
|
||||
echo " $out produced warnings:"
|
||||
grep WARNING $out
|
||||
+ ret=1
|
||||
+ fi
|
||||
+ passed=$(grep total: $out | (read a b num d; echo $num))
|
||||
+ passed_total=$((passed_total+passed))
|
||||
+ failed=$(grep total: $out | (read a b c d num f; echo $num))
|
||||
+ failed_total=$((failed_total+failed))
|
||||
+ if test "$failed" -gt 0; then
|
||||
+ echo " $out has failures"
|
||||
+ ret=1
|
||||
fi
|
||||
fi
|
||||
done
|
||||
+printf "\n TOTAL: PASSED %3d FAILED %3d\n" "$passed_total" "$failed_total"
|
||||
|
||||
+exit $ret
|
@ -1,80 +0,0 @@
|
||||
--- a/test/utils.f
|
||||
+++ b/test/utils.f
|
||||
@@ -58,18 +58,48 @@
|
||||
end do
|
||||
end subroutine
|
||||
|
||||
+c In the old days, you would have treated the complex array as twice as
|
||||
+c much of a real array, but modern compilers do not like that. So
|
||||
+c resort to a buffer and explicit conversion. This is not
|
||||
+c performance-relevant code, anyway.
|
||||
+c Incidentally, this change in random numbers (strides of real and
|
||||
+c imaginary parts) subtly reduces error in tch1dn to make it pass again.
|
||||
+c Further hint that the error margin had to be just be a bit widenend.
|
||||
+
|
||||
subroutine crandg(m,n,x,ldx)
|
||||
integer m,n,ldx
|
||||
complex x(ldx,*)
|
||||
+ real buf(128,2)
|
||||
+ integer j,k,b,i
|
||||
external srandg
|
||||
- call srandg(2*m,n,x,2*ldx)
|
||||
+ do j=1,n
|
||||
+ do k=1,m,128
|
||||
+ b=min(m-k+1,128)
|
||||
+ call srandg(b,1,buf(1,1),b)
|
||||
+ call srandg(b,1,buf(1,2),b)
|
||||
+ do i=1,b
|
||||
+ x(k+i-1,j) = cmplx(buf(i,1), buf(i,2))
|
||||
+ end do
|
||||
+ end do
|
||||
+ end do
|
||||
end subroutine
|
||||
|
||||
subroutine zrandg(m,n,x,ldx)
|
||||
integer m,n,ldx
|
||||
double complex x(ldx,*)
|
||||
+ double precision buf(128,2)
|
||||
+ integer j,k,b,i
|
||||
external srandg
|
||||
- call drandg(2*m,n,x,2*ldx)
|
||||
+ do j=1,n
|
||||
+ do k=1,m,128
|
||||
+ b=min(m-k+1,128)
|
||||
+ call drandg(b,1,buf(1,1),b)
|
||||
+ call drandg(b,1,buf(1,2),b)
|
||||
+ do i=1,b
|
||||
+ x(k+i-1,j) = cmplx(buf(i,1), buf(i,2))
|
||||
+ end do
|
||||
+ end do
|
||||
+ end do
|
||||
end subroutine
|
||||
|
||||
block data xrandi
|
||||
@@ -218,12 +248,16 @@
|
||||
1002 format (1x,F6.3,SP,F6.3,'i',$)
|
||||
end subroutine
|
||||
|
||||
+c 200*?lamch('p') is a bit tight, some tests are at the fringe, being pushed
|
||||
+c over by details of the random number generation. Trying 250 as error
|
||||
+c limit factor.
|
||||
+
|
||||
character*4 function spftol(rnrm)
|
||||
real rnrm,slamch
|
||||
external slamch
|
||||
common /stats/ passed,failed
|
||||
integer passed,failed
|
||||
- if (rnrm < 2e2*slamch('p')) then
|
||||
+ if (rnrm < 2.5e2*slamch('p')) then
|
||||
spftol = 'PASS'
|
||||
passed = passed + 1
|
||||
else
|
||||
@@ -237,7 +271,7 @@
|
||||
external dlamch
|
||||
common /stats/ passed,failed
|
||||
integer passed,failed
|
||||
- if (rnrm < 2d2*dlamch('p')) then
|
||||
+ if (rnrm < 2.5d2*dlamch('p')) then
|
||||
dpftol = 'PASS'
|
||||
passed = passed + 1
|
||||
else
|
Loading…
Reference in New Issue
Block a user