From 8496f1a1dd277c1923b5a0d96cfdacacfd47338f Mon Sep 17 00:00:00 2001 From: Martin Kroeker Date: Sun, 15 Jun 2025 20:24:06 +0200 Subject: [PATCH] Update lapacke_zgesdd_work.c --- lapack-netlib/LAPACKE/src/lapacke_zgesdd_work.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lapack-netlib/LAPACKE/src/lapacke_zgesdd_work.c b/lapack-netlib/LAPACKE/src/lapacke_zgesdd_work.c index b37f1216a..5d513fb20 100644 --- a/lapack-netlib/LAPACKE/src/lapacke_zgesdd_work.c +++ b/lapack-netlib/LAPACKE/src/lapacke_zgesdd_work.c @@ -59,7 +59,7 @@ lapack_int LAPACKE_zgesdd_work( int matrix_layout, char jobz, lapack_int m, ( LAPACKE_lsame( jobz, 'o' ) && m>=n) ) ? n : ( LAPACKE_lsame( jobz, 's' ) ? MIN(m,n) : 1); lapack_int ncols_vt = ( LAPACKE_lsame( jobz, 'a' ) || - ( LAPACKE_lsame( jobz, 's' ) || + LAPACKE_lsame( jobz, 's' ) || ( LAPACKE_lsame( jobz, 'o' && m >=n) ) ? n : 1); lapack_int lda_t = MAX(1,m); lapack_int ldu_t = MAX(1,nrows_u);