Correct function name in error message from SLASQ2 (Reference-LAPACK PR 555)
This commit is contained in:
parent
4ecf631f95
commit
5c729c6dce
|
@ -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