Update lapacke_dgesdd_work.c

Author: martin-frbg

lapack-netlib/LAPACKE/src/lapacke_dgesdd_work.c

@@ -57,7 +57,7 @@ lapack_int LAPACKE_dgesdd_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);