http://netlib.org/lapack/Errata/index2.html#_strong_span_class_green_bug0085_span_strong_xgesvd_problem_in_workspace_computation
.

PR:		165960
Submitted by:	fork <forkandwait@gmail.com>
Feature safe:	yes
This commit is contained in:
Maho Nakata 2012-03-12 07:47:17 +00:00
parent 3d6a97a9a8
commit b87d6590d3
Notes: svn2git 2021-03-31 03:12:20 +00:00
svn path=/head/; revision=293156
2 changed files with 12 additions and 1 deletions

View file

@ -7,7 +7,7 @@
PORTNAME?= lapack PORTNAME?= lapack
PORTVERSION= 3.4.0 PORTVERSION= 3.4.0
PORTREVISION?= 1 PORTREVISION?= 2
CATEGORIES= math CATEGORIES= math
MASTER_SITES= NL/lapack/ \ MASTER_SITES= NL/lapack/ \
http://service-spi.web.cern.ch/service-spi/external/tarFiles/ http://service-spi.web.cern.ch/service-spi/external/tarFiles/

View file

@ -0,0 +1,11 @@
--- SRC/dgesvd.f 2011-11-12 04:34:11.000000000 +0900
+++ SRC/dgesvd.f 2012-03-12 16:38:41.000000000 +0900
@@ -477,7 +477,7 @@
CALL DGELQF( M, N, A, LDA, DUM(1), DUM(1), -1, IERR )
LWORK_DGELQF=DUM(1)
* Compute space needed for DORGLQ
- CALL DORGLQ( N, N, M, VT, LDVT, DUM(1), DUM(1), -1, IERR )
+ CALL DORGLQ( N, N, M, DUM(1), N, DUM(1), DUM(1), -1, IERR )
LWORK_DORGLQ_N=DUM(1)
CALL DORGLQ( M, N, M, A, LDA, DUM(1), DUM(1), -1, IERR )
LWORK_DORGLQ_M=DUM(1)