Merge pull request #3238 from martin-frbg/lapack555
Correct function name in error message from SLASQ2 (LAPACK PR555)
This commit is contained in:
commit
03b4d79a7e
|
@ -185,7 +185,7 @@
|
||||||
*
|
*
|
||||||
IF( Z( 1 ).LT.ZERO ) THEN
|
IF( Z( 1 ).LT.ZERO ) THEN
|
||||||
INFO = -201
|
INFO = -201
|
||||||
CALL XERBLA( 'DLASQ2', 2 )
|
CALL XERBLA( 'SLASQ2', 2 )
|
||||||
RETURN
|
RETURN
|
||||||
ELSE IF( Z( 2 ).LT.ZERO ) THEN
|
ELSE IF( Z( 2 ).LT.ZERO ) THEN
|
||||||
INFO = -202
|
INFO = -202
|
||||||
|
|
Loading…
Reference in New Issue