Update the LAPACK testsuite to match 3.10.1
This commit is contained in:
@@ -110,18 +110,15 @@
|
||||
*> \author Univ. of Colorado Denver
|
||||
*> \author NAG Ltd.
|
||||
*
|
||||
*> \date June 2017
|
||||
*
|
||||
*> \ingroup single_lin
|
||||
*
|
||||
* =====================================================================
|
||||
SUBROUTINE SDRVRF3( NOUT, NN, NVAL, THRESH, A, LDA, ARF, B1, B2,
|
||||
+ S_WORK_SLANGE, S_WORK_SGEQRF, TAU )
|
||||
*
|
||||
* -- LAPACK test routine (version 3.7.1) --
|
||||
* -- LAPACK test routine --
|
||||
* -- LAPACK is a software package provided by Univ. of Tennessee, --
|
||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||
* June 2017
|
||||
*
|
||||
* .. Scalar Arguments ..
|
||||
INTEGER LDA, NN, NOUT
|
||||
@@ -255,8 +252,8 @@
|
||||
* Generate A our NA--by--NA triangular
|
||||
* matrix.
|
||||
* Our test is based on forward error so we
|
||||
* do want A to be well conditionned! To get
|
||||
* a well-conditionned triangular matrix, we
|
||||
* do want A to be well conditioned! To get
|
||||
* a well-conditioned triangular matrix, we
|
||||
* take the R factor of the QR/LQ factorization
|
||||
* of a random matrix.
|
||||
*
|
||||
|
||||
Reference in New Issue
Block a user