From c0a4afe5bedbbd81ac5ea6f8e344fe76f841e886 Mon Sep 17 00:00:00 2001 From: Martin Kroeker Date: Sun, 15 Jun 2025 20:22:30 +0200 Subject: [PATCH] Update lapacke_cgesdd_work.c --- lapack-netlib/LAPACKE/src/lapacke_cgesdd_work.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lapack-netlib/LAPACKE/src/lapacke_cgesdd_work.c b/lapack-netlib/LAPACKE/src/lapacke_cgesdd_work.c index d559df6b4..472788af6 100644 --- a/lapack-netlib/LAPACKE/src/lapacke_cgesdd_work.c +++ b/lapack-netlib/LAPACKE/src/lapacke_cgesdd_work.c @@ -59,7 +59,7 @@ lapack_int LAPACKE_cgesdd_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);