| /dports/science/siconos/siconos-4.4.0/externals/numeric_bindings/boost/numeric/bindings/lapack/driver/ |
| H A D | gesvd.hpp | 57 inline std::ptrdiff_t gesvd( const char jobu, const char jobvt, in gesvd() argument
73 inline std::ptrdiff_t gesvd( const char jobu, const char jobvt, in gesvd() argument
89 inline std::ptrdiff_t gesvd( const char jobu, const char jobvt, in gesvd() argument
184 BOOST_ASSERT( jobvt == 'A' || jobvt == 'S' || jobvt == 'O' || in invoke()
185 jobvt == 'N' ); in invoke()
227 detail::gesvd( jobu, jobvt, bindings::size_row(a), in invoke()
257 if ( jobvt == 'N' ) { in min_size_work()
323 BOOST_ASSERT( jobvt == 'A' || jobvt == 'S' || jobvt == 'O' || in invoke()
324 jobvt == 'N' ); in invoke()
377 detail::gesvd( jobu, jobvt, bindings::size_row(a), in invoke()
[all …]
|
| /dports/math/xlapack/lapack-3.10.0/LAPACKE/src/ |
| H A D | lapacke_dgesvd_work.c | 35 lapack_int LAPACKE_dgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_dgesvd_work() argument
44 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_dgesvd_work()
54 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_dgesvd_work()
55 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_dgesvd_work()
56 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_dgesvd_work()
57 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_dgesvd_work()
82 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_dgesvd_work()
100 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_dgesvd_work()
111 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_dgesvd_work()
122 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_dgesvd_work()
[all …]
|
| H A D | lapacke_sgesvd_work.c | 35 lapack_int LAPACKE_sgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_sgesvd_work() argument
44 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_sgesvd_work()
54 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_sgesvd_work()
55 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_sgesvd_work()
56 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_sgesvd_work()
57 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_sgesvd_work()
82 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_sgesvd_work()
100 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_sgesvd_work()
110 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_sgesvd_work()
121 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_sgesvd_work()
[all …]
|
| H A D | lapacke_cgesvd_work.c | 35 lapack_int LAPACKE_cgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_cgesvd_work() argument
46 LAPACK_cgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_cgesvd_work()
56 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_cgesvd_work()
57 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_cgesvd_work()
58 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_cgesvd_work()
59 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_cgesvd_work()
84 LAPACK_cgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_cgesvd_work()
104 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_cgesvd_work()
116 LAPACK_cgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_cgesvd_work()
127 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_cgesvd_work()
[all …]
|
| H A D | lapacke_zgesvd_work.c | 35 lapack_int LAPACKE_zgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_zgesvd_work() argument
46 LAPACK_zgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_zgesvd_work()
56 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_zgesvd_work()
57 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_zgesvd_work()
58 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_zgesvd_work()
59 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_zgesvd_work()
84 LAPACK_zgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_zgesvd_work()
104 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_zgesvd_work()
116 LAPACK_zgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_zgesvd_work()
127 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_zgesvd_work()
[all …]
|
| /dports/math/blas/lapack-3.10.0/LAPACKE/src/ |
| H A D | lapacke_sgesvd_work.c | 35 lapack_int LAPACKE_sgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_sgesvd_work() argument
44 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_sgesvd_work()
54 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_sgesvd_work()
55 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_sgesvd_work()
56 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_sgesvd_work()
57 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_sgesvd_work()
82 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_sgesvd_work()
100 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_sgesvd_work()
110 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_sgesvd_work()
121 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_sgesvd_work()
[all …]
|
| H A D | lapacke_dgesvd_work.c | 35 lapack_int LAPACKE_dgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_dgesvd_work() argument
44 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_dgesvd_work()
54 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_dgesvd_work()
55 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_dgesvd_work()
56 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_dgesvd_work()
57 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_dgesvd_work()
82 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_dgesvd_work()
100 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_dgesvd_work()
111 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_dgesvd_work()
122 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_dgesvd_work()
[all …]
|
| H A D | lapacke_zgesvd_work.c | 35 lapack_int LAPACKE_zgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_zgesvd_work() argument
46 LAPACK_zgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_zgesvd_work()
56 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_zgesvd_work()
57 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_zgesvd_work()
58 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_zgesvd_work()
59 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_zgesvd_work()
84 LAPACK_zgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_zgesvd_work()
104 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_zgesvd_work()
116 LAPACK_zgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_zgesvd_work()
127 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_zgesvd_work()
[all …]
|
| H A D | lapacke_cgesvd_work.c | 35 lapack_int LAPACKE_cgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_cgesvd_work() argument
46 LAPACK_cgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_cgesvd_work()
56 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_cgesvd_work()
57 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_cgesvd_work()
58 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_cgesvd_work()
59 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_cgesvd_work()
84 LAPACK_cgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_cgesvd_work()
104 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_cgesvd_work()
116 LAPACK_cgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_cgesvd_work()
127 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_cgesvd_work()
[all …]
|
| /dports/math/lapack/lapack-3.10.0/LAPACKE/src/ |
| H A D | lapacke_sgesvd_work.c | 35 lapack_int LAPACKE_sgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_sgesvd_work() argument
44 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_sgesvd_work()
54 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_sgesvd_work()
55 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_sgesvd_work()
56 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_sgesvd_work()
57 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_sgesvd_work()
82 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_sgesvd_work()
100 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_sgesvd_work()
110 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_sgesvd_work()
121 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_sgesvd_work()
[all …]
|
| H A D | lapacke_dgesvd_work.c | 35 lapack_int LAPACKE_dgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_dgesvd_work() argument
44 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_dgesvd_work()
54 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_dgesvd_work()
55 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_dgesvd_work()
56 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_dgesvd_work()
57 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_dgesvd_work()
82 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_dgesvd_work()
100 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_dgesvd_work()
111 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_dgesvd_work()
122 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_dgesvd_work()
[all …]
|
| H A D | lapacke_cgesvd_work.c | 35 lapack_int LAPACKE_cgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_cgesvd_work() argument
46 LAPACK_cgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_cgesvd_work()
56 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_cgesvd_work()
57 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_cgesvd_work()
58 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_cgesvd_work()
59 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_cgesvd_work()
84 LAPACK_cgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_cgesvd_work()
104 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_cgesvd_work()
116 LAPACK_cgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_cgesvd_work()
127 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_cgesvd_work()
[all …]
|
| H A D | lapacke_zgesvd_work.c | 35 lapack_int LAPACKE_zgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_zgesvd_work() argument
46 LAPACK_zgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_zgesvd_work()
56 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_zgesvd_work()
57 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_zgesvd_work()
58 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_zgesvd_work()
59 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_zgesvd_work()
84 LAPACK_zgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_zgesvd_work()
104 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_zgesvd_work()
116 LAPACK_zgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_zgesvd_work()
127 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_zgesvd_work()
[all …]
|
| /dports/math/lapacke/lapack-3.10.0/LAPACKE/src/ |
| H A D | lapacke_dgesvd_work.c | 35 lapack_int LAPACKE_dgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_dgesvd_work() argument
44 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_dgesvd_work()
54 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_dgesvd_work()
55 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_dgesvd_work()
56 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_dgesvd_work()
57 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_dgesvd_work()
82 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_dgesvd_work()
100 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_dgesvd_work()
111 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_dgesvd_work()
122 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_dgesvd_work()
[all …]
|
| H A D | lapacke_sgesvd_work.c | 35 lapack_int LAPACKE_sgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_sgesvd_work() argument
44 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_sgesvd_work()
54 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_sgesvd_work()
55 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_sgesvd_work()
56 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_sgesvd_work()
57 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_sgesvd_work()
82 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_sgesvd_work()
100 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_sgesvd_work()
110 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_sgesvd_work()
121 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_sgesvd_work()
[all …]
|
| H A D | lapacke_zgesvd_work.c | 35 lapack_int LAPACKE_zgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_zgesvd_work() argument
46 LAPACK_zgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_zgesvd_work()
56 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_zgesvd_work()
57 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_zgesvd_work()
58 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_zgesvd_work()
59 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_zgesvd_work()
84 LAPACK_zgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_zgesvd_work()
104 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_zgesvd_work()
116 LAPACK_zgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_zgesvd_work()
127 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_zgesvd_work()
[all …]
|
| H A D | lapacke_cgesvd_work.c | 35 lapack_int LAPACKE_cgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_cgesvd_work() argument
46 LAPACK_cgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_cgesvd_work()
56 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_cgesvd_work()
57 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_cgesvd_work()
58 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_cgesvd_work()
59 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_cgesvd_work()
84 LAPACK_cgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_cgesvd_work()
104 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_cgesvd_work()
116 LAPACK_cgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_cgesvd_work()
127 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_cgesvd_work()
[all …]
|
| /dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/LAPACKE/src/ |
| H A D | lapacke_dgesvd_work.c | 36 lapack_int LAPACKE_dgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_dgesvd_work() argument
45 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_dgesvd_work()
55 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_dgesvd_work()
56 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_dgesvd_work()
57 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_dgesvd_work()
58 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_dgesvd_work()
83 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_dgesvd_work()
101 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_dgesvd_work()
112 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_dgesvd_work()
123 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_dgesvd_work()
[all …]
|
| H A D | lapacke_sgesvd_work.c | 36 lapack_int LAPACKE_sgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_sgesvd_work() argument
45 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_sgesvd_work()
55 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_sgesvd_work()
56 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_sgesvd_work()
57 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_sgesvd_work()
58 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_sgesvd_work()
83 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_sgesvd_work()
101 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_sgesvd_work()
111 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_sgesvd_work()
122 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_sgesvd_work()
[all …]
|
| H A D | lapacke_zgesvd_work.c | 36 lapack_int LAPACKE_zgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_zgesvd_work() argument
47 LAPACK_zgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_zgesvd_work()
57 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_zgesvd_work()
58 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_zgesvd_work()
59 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_zgesvd_work()
60 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_zgesvd_work()
85 LAPACK_zgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_zgesvd_work()
105 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_zgesvd_work()
117 LAPACK_zgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_zgesvd_work()
128 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_zgesvd_work()
[all …]
|
| H A D | lapacke_cgesvd_work.c | 36 lapack_int LAPACKE_cgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_cgesvd_work() argument
47 LAPACK_cgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_cgesvd_work()
57 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_cgesvd_work()
58 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_cgesvd_work()
59 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_cgesvd_work()
60 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_cgesvd_work()
85 LAPACK_cgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_cgesvd_work()
105 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_cgesvd_work()
117 LAPACK_cgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_cgesvd_work()
128 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_cgesvd_work()
[all …]
|
| /dports/math/cblas/lapack-3.10.0/LAPACKE/src/ |
| H A D | lapacke_sgesvd_work.c | 35 lapack_int LAPACKE_sgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_sgesvd_work() argument
44 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_sgesvd_work()
54 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_sgesvd_work()
55 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_sgesvd_work()
56 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_sgesvd_work()
57 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_sgesvd_work()
82 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_sgesvd_work()
100 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_sgesvd_work()
110 LAPACK_sgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_sgesvd_work()
121 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_sgesvd_work()
[all …]
|
| H A D | lapacke_dgesvd_work.c | 35 lapack_int LAPACKE_dgesvd_work( int matrix_layout, char jobu, char jobvt, in LAPACKE_dgesvd_work() argument
44 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a, &lda, s, u, &ldu, vt, &ldvt, in LAPACKE_dgesvd_work()
54 lapack_int nrows_vt = LAPACKE_lsame( jobvt, 'a' ) ? n : in LAPACKE_dgesvd_work()
55 ( LAPACKE_lsame( jobvt, 's' ) ? MIN(m,n) : 1); in LAPACKE_dgesvd_work()
56 lapack_int ncols_vt = ( LAPACKE_lsame( jobvt, 'a' ) || in LAPACKE_dgesvd_work()
57 LAPACKE_lsame( jobvt, 's' ) ) ? n : 1; in LAPACKE_dgesvd_work()
82 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a, &lda_t, s, u, &ldu_t, vt, in LAPACKE_dgesvd_work()
100 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_dgesvd_work()
111 LAPACK_dgesvd( &jobu, &jobvt, &m, &n, a_t, &lda_t, s, u_t, &ldu_t, vt_t, in LAPACKE_dgesvd_work()
122 if( LAPACKE_lsame( jobvt, 'a' ) || LAPACKE_lsame( jobvt, 's' ) ) { in LAPACKE_dgesvd_work()
[all …]
|
| /dports/science/py-dlib/dlib-19.22/dlib/matrix/lapack/ |
| H A D | gesvd.h | 31 inline integer gesvd (const char jobu, const char jobvt, in gesvd() argument
42 inline integer gesvd (const char jobu, const char jobvt, in gesvd() argument
192 const char jobvt, in gesvd() argument
212 if (jobvt == 'A') in gesvd()
214 else if (jobvt == 'S') in gesvd()
220 if (jobu == 'O' || jobvt == 'O') in gesvd()
256 char jobvt, in gesvd() argument
268 std::swap(jobu, jobvt); in gesvd()
281 if (jobvt == 'A') in gesvd()
283 else if (jobvt == 'S') in gesvd()
[all …]
|
| /dports/science/dlib-cpp/dlib-19.22/dlib/matrix/lapack/ |
| H A D | gesvd.h | 31 inline integer gesvd (const char jobu, const char jobvt, in gesvd() argument
42 inline integer gesvd (const char jobu, const char jobvt, in gesvd() argument
192 const char jobvt, in gesvd() argument
212 if (jobvt == 'A') in gesvd()
214 else if (jobvt == 'S') in gesvd()
220 if (jobu == 'O' || jobvt == 'O') in gesvd()
256 char jobvt, in gesvd() argument
268 std::swap(jobu, jobvt); in gesvd()
281 if (jobvt == 'A') in gesvd()
283 else if (jobvt == 'S') in gesvd()
[all …]
|