Browse Source

Update lapacke_zgesdd_work.c

pull/5307/head
Martin Kroeker GitHub 7 months ago
parent
commit
8496f1a1dd
No known key found for this signature in database GPG Key ID: B5690EEEBB952194
1 changed files with 1 additions and 1 deletions
  1. +1
    -1
      lapack-netlib/LAPACKE/src/lapacke_zgesdd_work.c

+ 1
- 1
lapack-netlib/LAPACKE/src/lapacke_zgesdd_work.c View File

@@ -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);


Loading…
Cancel
Save