Browse Source

Fix workspace query corner cases to always return at least 1

pull/4146/head
Martin Kroeker GitHub 2 years ago
parent
commit
ec9b162602
No known key found for this signature in database GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 1 deletions
  1. +1
    -1
      lapack-netlib/SRC/zsytrf.f

+ 1
- 1
lapack-netlib/SRC/zsytrf.f View File

@@ -232,7 +232,7 @@
* Determine the block size
*
NB = ILAENV( 1, 'ZSYTRF', UPLO, N, -1, -1, -1 )
LWKOPT = N*NB
LWKOPT = MAX( 1, N*NB )
WORK( 1 ) = LWKOPT
END IF
*


Loading…
Cancel
Save