MAGMA  magma-1.4.0
Matrix Algebra on GPU and Multicore Architectures
 All Data Structures Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros Groups
magma_slapack.h
Go to the documentation of this file.
1 /*
2  -- MAGMA (version 1.4.0) --
3  Univ. of Tennessee, Knoxville
4  Univ. of California, Berkeley
5  Univ. of Colorado, Denver
6  August 2013
7 
8  @generated s Tue Aug 13 16:43:28 2013
9 */
10 
11 #ifndef MAGMA_SLAPACK_H
12 #define MAGMA_SLAPACK_H
13 
14 #define PRECISION_s
15 
16 #ifdef __cplusplus
17 extern "C" {
18 #endif
19 
20 /* ////////////////////////////////////////////////////////////////////////////
21  -- BLAS and LAPACK functions (alphabetical order)
22 */
23 #define blasf77_isamax FORTRAN_NAME( isamax, ISAMAX )
24 #define blasf77_saxpy FORTRAN_NAME( saxpy, SAXPY )
25 #define blasf77_scopy FORTRAN_NAME( scopy, SCOPY )
26 #define blasf77_sgemm FORTRAN_NAME( sgemm, SGEMM )
27 #define blasf77_sgemv FORTRAN_NAME( sgemv, SGEMV )
28 #define blasf77_sger FORTRAN_NAME( sger, SGER )
29 #define blasf77_sger FORTRAN_NAME( sger, SGER )
30 #define blasf77_ssymm FORTRAN_NAME( ssymm, SSYMM )
31 #define blasf77_ssymv FORTRAN_NAME( ssymv, SSYMV )
32 #define blasf77_ssyr2 FORTRAN_NAME( ssyr2, SSYR2 )
33 #define blasf77_ssyr2k FORTRAN_NAME( ssyr2k, SSYR2K )
34 #define blasf77_ssyrk FORTRAN_NAME( ssyrk, SSYRK )
35 #define blasf77_sscal FORTRAN_NAME( sscal, SSCAL )
36 #define blasf77_sscal FORTRAN_NAME( sscal, SSCAL )
37 #define blasf77_sswap FORTRAN_NAME( sswap, SSWAP )
38 #define blasf77_ssymm FORTRAN_NAME( ssymm, SSYMM )
39 #define blasf77_ssyr2k FORTRAN_NAME( ssyr2k, SSYR2K )
40 #define blasf77_ssyrk FORTRAN_NAME( ssyrk, SSYRK )
41 #define blasf77_strmm FORTRAN_NAME( strmm, STRMM )
42 #define blasf77_strmv FORTRAN_NAME( strmv, STRMV )
43 #define blasf77_strsm FORTRAN_NAME( strsm, STRSM )
44 #define blasf77_strsv FORTRAN_NAME( strsv, STRSV )
45 
46 #define lapackf77_slaed2 FORTRAN_NAME( slaed2, SLAED2 )
47 #define lapackf77_slaed4 FORTRAN_NAME( slaed4, SLAED4 )
48 #define lapackf77_slamc3 FORTRAN_NAME( slamc3, SLAMC3 )
49 #define lapackf77_slamrg FORTRAN_NAME( slamrg, SLAMRG )
50 #define lapackf77_slasrt FORTRAN_NAME( slasrt, SLASRT )
51 #define lapackf77_sstebz FORTRAN_NAME( sstebz, SSTEBZ )
52 
53 #define lapackf77_sbdsqr FORTRAN_NAME( sbdsqr, SBDSQR )
54 #define lapackf77_sgebak FORTRAN_NAME( sgebak, SGEBAK )
55 #define lapackf77_sgebal FORTRAN_NAME( sgebal, SGEBAL )
56 #define lapackf77_sgebd2 FORTRAN_NAME( sgebd2, SGEBD2 )
57 #define lapackf77_sgebrd FORTRAN_NAME( sgebrd, SGEBRD )
58 #define lapackf77_sgeev FORTRAN_NAME( sgeev, SGEEV )
59 #define lapackf77_sgehd2 FORTRAN_NAME( sgehd2, SGEHD2 )
60 #define lapackf77_sgehrd FORTRAN_NAME( sgehrd, SGEHRD )
61 #define lapackf77_sgelqf FORTRAN_NAME( sgelqf, SGELQF )
62 #define lapackf77_sgels FORTRAN_NAME( sgels, SGELS )
63 #define lapackf77_sgeqlf FORTRAN_NAME( sgeqlf, SGEQLF )
64 #define lapackf77_sgeqp3 FORTRAN_NAME( sgeqp3, SGEQP3 )
65 #define lapackf77_sgeqrf FORTRAN_NAME( sgeqrf, SGEQRF )
66 #define lapackf77_sgesv FORTRAN_NAME( sgesv, SGESV )
67 #define lapackf77_sgesvd FORTRAN_NAME( sgesvd, SGESVD )
68 #define lapackf77_sgetrf FORTRAN_NAME( sgetrf, SGETRF )
69 #define lapackf77_sgetri FORTRAN_NAME( sgetri, SGETRI )
70 #define lapackf77_sgetrs FORTRAN_NAME( sgetrs, SGETRS )
71 #define lapackf77_ssbtrd FORTRAN_NAME( ssbtrd, SSBTRD )
72 #define lapackf77_ssyev FORTRAN_NAME( ssyev, SSYEV )
73 #define lapackf77_ssyevd FORTRAN_NAME( ssyevd, SSYEVD )
74 #define lapackf77_ssyevr FORTRAN_NAME( ssyevr, SSYEVR )
75 #define lapackf77_ssyevx FORTRAN_NAME( ssyevx, SSYEVX )
76 #define lapackf77_ssygs2 FORTRAN_NAME( ssygs2, SSYGS2 )
77 #define lapackf77_ssygst FORTRAN_NAME( ssygst, SSYGST )
78 #define lapackf77_ssygvd FORTRAN_NAME( ssygvd, SSYGVD )
79 #define lapackf77_ssytd2 FORTRAN_NAME( ssytd2, SSYTD2 )
80 #define lapackf77_ssytrd FORTRAN_NAME( ssytrd, SSYTRD )
81 #define lapackf77_ssytrf FORTRAN_NAME( ssytrf, SSYTRF )
82 #define lapackf77_shseqr FORTRAN_NAME( shseqr, SHSEQR )
83 #define lapackf77_slabrd FORTRAN_NAME( slabrd, SLABRD )
84 #define lapackf77_sladiv FORTRAN_NAME( sladiv, SLADIV )
85 #define lapackf77_slacgv FORTRAN_NAME( slacgv, SLACGV )
86 #define lapackf77_slacpy FORTRAN_NAME( slacpy, SLACPY )
87 #define lapackf77_slasyf FORTRAN_NAME( slasyf, SLASYF )
88 #define lapackf77_slange FORTRAN_NAME( slange, SLANGE )
89 #define lapackf77_slansy FORTRAN_NAME( slansy, SLANSY )
90 #define lapackf77_slanst FORTRAN_NAME( slanst, SLANST )
91 #define lapackf77_slansy FORTRAN_NAME( slansy, SLANSY )
92 #define lapackf77_slapy3 FORTRAN_NAME( slapy3, SLAPY3 )
93 #define lapackf77_slaqp2 FORTRAN_NAME( slaqp2, SLAQP2 )
94 #define lapackf77_slarf FORTRAN_NAME( slarf, SLARF )
95 #define lapackf77_slarfb FORTRAN_NAME( slarfb, SLARFB )
96 #define lapackf77_slarfg FORTRAN_NAME( slarfg, SLARFG )
97 #define lapackf77_slarft FORTRAN_NAME( slarft, SLARFT )
98 #define lapackf77_slarnv FORTRAN_NAME( slarnv, SLARNV )
99 #define lapackf77_slartg FORTRAN_NAME( slartg, SLARTG )
100 #define lapackf77_slascl FORTRAN_NAME( slascl, SLASCL )
101 #define lapackf77_slaset FORTRAN_NAME( slaset, SLASET )
102 #define lapackf77_slaswp FORTRAN_NAME( slaswp, SLASWP )
103 #define lapackf77_slatrd FORTRAN_NAME( slatrd, SLATRD )
104 #define lapackf77_slauum FORTRAN_NAME( slauum, SLAUUM )
105 #define lapackf77_slavsy FORTRAN_NAME( slavsy, SLAVSY )
106 #define lapackf77_sposv FORTRAN_NAME( sposv, SPOSV )
107 #define lapackf77_spotrf FORTRAN_NAME( spotrf, SPOTRF )
108 #define lapackf77_spotri FORTRAN_NAME( spotri, SPOTRI )
109 #define lapackf77_spotrs FORTRAN_NAME( spotrs, SPOTRS )
110 #define lapackf77_sstedc FORTRAN_NAME( sstedc, SSTEDC )
111 #define lapackf77_sstein FORTRAN_NAME( sstein, SSTEIN )
112 #define lapackf77_sstemr FORTRAN_NAME( sstemr, SSTEMR )
113 #define lapackf77_ssteqr FORTRAN_NAME( ssteqr, SSTEQR )
114 #define lapackf77_ssymv FORTRAN_NAME( ssymv, SSYMV )
115 #define lapackf77_strevc FORTRAN_NAME( strevc, STREVC )
116 #define lapackf77_strtri FORTRAN_NAME( strtri, STRTRI )
117 #define lapackf77_sorg2r FORTRAN_NAME( sorg2r, SORG2R )
118 #define lapackf77_sorgbr FORTRAN_NAME( sorgbr, SORGBR )
119 #define lapackf77_sorghr FORTRAN_NAME( sorghr, SORGHR )
120 #define lapackf77_sorglq FORTRAN_NAME( sorglq, SORGLQ )
121 #define lapackf77_sorgql FORTRAN_NAME( sorgql, SORGQL )
122 #define lapackf77_sorgqr FORTRAN_NAME( sorgqr, SORGQR )
123 #define lapackf77_sorgtr FORTRAN_NAME( sorgtr, SORGTR )
124 #define lapackf77_sorm2r FORTRAN_NAME( sorm2r, SORM2R )
125 #define lapackf77_sormbr FORTRAN_NAME( sormbr, SORMBR )
126 #define lapackf77_sormlq FORTRAN_NAME( sormlq, SORMLQ )
127 #define lapackf77_sormql FORTRAN_NAME( sormql, SORMQL )
128 #define lapackf77_sormqr FORTRAN_NAME( sormqr, SORMQR )
129 #define lapackf77_sormtr FORTRAN_NAME( sormtr, SORMTR )
130 
131 /* testing functions (alphabetical order) */
132 #define lapackf77_sbdt01 FORTRAN_NAME( sbdt01, SBDT01 )
133 #define lapackf77_sget22 FORTRAN_NAME( sget22, SGET22 )
134 #define lapackf77_ssyt21 FORTRAN_NAME( ssyt21, SSYT21 )
135 #define lapackf77_shst01 FORTRAN_NAME( shst01, SHST01 )
136 #define lapackf77_slarfx FORTRAN_NAME( slarfx, SLARFX )
137 #define lapackf77_slarfy FORTRAN_NAME( slarfy, SLARFY )
138 #define lapackf77_slatms FORTRAN_NAME( slatms, SLATMS )
139 #define lapackf77_sqpt01 FORTRAN_NAME( sqpt01, SQPT01 )
140 #define lapackf77_sqrt02 FORTRAN_NAME( sqrt02, SQRT02 )
141 #define lapackf77_sstt21 FORTRAN_NAME( sstt21, SSTT21 )
142 #define lapackf77_sort01 FORTRAN_NAME( sort01, SORT01 )
143 
144 // macros to handle differences in arguments between real and real versions of routines.
145 #if defined(PRECISION_z) || defined(PRECISION_c)
146 #define DWORKFORZ float *rwork,
147 #define DWORKFORZ_AND_LD float *rwork, const magma_int_t *ldrwork,
148 #define WSPLIT float *w
149 #else
150 #define DWORKFORZ
151 #define DWORKFORZ_AND_LD
152 #define WSPLIT float *wr, float *wi
153 #endif
154 
155 /*
156  * BLAS functions (alphabetical order)
157  */
159  const magma_int_t *n,
160  const float *x, const magma_int_t *incx );
161 
162 void blasf77_saxpy( const magma_int_t *n,
163  const float *alpha,
164  const float *x, const magma_int_t *incx,
165  float *y, const magma_int_t *incy );
166 
167 void blasf77_scopy( const magma_int_t *n,
168  const float *x, const magma_int_t *incx,
169  float *y, const magma_int_t *incy );
170 
171 void blasf77_sgemm( const char *transa, const char *transb,
172  const magma_int_t *m, const magma_int_t *n, const magma_int_t *k,
173  const float *alpha,
174  const float *A, const magma_int_t *lda,
175  const float *B, const magma_int_t *ldb,
176  const float *beta,
177  float *C, const magma_int_t *ldc );
178 
179 void blasf77_sgemv( const char *transa,
180  const magma_int_t *m, const magma_int_t *n,
181  const float *alpha,
182  const float *A, const magma_int_t *lda,
183  const float *x, const magma_int_t *incx,
184  const float *beta,
185  float *y, const magma_int_t *incy );
186 
187 void blasf77_sger( const magma_int_t *m, const magma_int_t *n,
188  const float *alpha,
189  const float *x, const magma_int_t *incx,
190  const float *y, const magma_int_t *incy,
191  float *A, const magma_int_t *lda );
192 
193 #if defined(PRECISION_z) || defined(PRECISION_c)
194 void blasf77_sger( const magma_int_t *m, const magma_int_t *n,
195  const float *alpha,
196  const float *x, const magma_int_t *incx,
197  const float *y, const magma_int_t *incy,
198  float *A, const magma_int_t *lda );
199 #endif
200 
201 void blasf77_ssymm( const char *side, const char *uplo,
202  const magma_int_t *m, const magma_int_t *n,
203  const float *alpha,
204  const float *A, const magma_int_t *lda,
205  const float *B, const magma_int_t *ldb,
206  const float *beta,
207  float *C, const magma_int_t *ldc );
208 
209 void blasf77_ssymv( const char *uplo,
210  const magma_int_t *n,
211  const float *alpha,
212  const float *A, const magma_int_t *lda,
213  const float *x, const magma_int_t *incx,
214  const float *beta,
215  float *y, const magma_int_t *incy );
216 
217 void blasf77_ssyr2( const char *uplo,
218  const magma_int_t *n,
219  const float *alpha,
220  const float *x, const magma_int_t *incx,
221  const float *y, const magma_int_t *incy,
222  float *A, const magma_int_t *lda );
223 
224 void blasf77_ssyr2k( const char *uplo, const char *trans,
225  const magma_int_t *n, const magma_int_t *k,
226  const float *alpha,
227  const float *A, const magma_int_t *lda,
228  const float *B, const magma_int_t *ldb,
229  const float *beta,
230  float *C, const magma_int_t *ldc );
231 
232 void blasf77_ssyrk( const char *uplo, const char *trans,
233  const magma_int_t *n, const magma_int_t *k,
234  const float *alpha,
235  const float *A, const magma_int_t *lda,
236  const float *beta,
237  float *C, const magma_int_t *ldc );
238 
239 void blasf77_sscal( const magma_int_t *n,
240  const float *alpha,
241  float *x, const magma_int_t *incx );
242 
243 #if defined(PRECISION_z) || defined(PRECISION_c)
244 void blasf77_sscal( const magma_int_t *n,
245  const float *alpha,
246  float *x, const magma_int_t *incx );
247 #endif
248 
249 void blasf77_sswap( const magma_int_t *n,
250  float *x, const magma_int_t *incx,
251  float *y, const magma_int_t *incy );
252 
253 #if defined(PRECISION_z) || defined(PRECISION_c)
254 /* real-symmetric (non-symmetric) routines */
255 void blasf77_ssymm( const char *side, const char *uplo,
256  const magma_int_t *m, const magma_int_t *n,
257  const float *alpha,
258  const float *A, const magma_int_t *lda,
259  const float *B, const magma_int_t *ldb,
260  const float *beta,
261  float *C, const magma_int_t *ldc );
262 
263 void blasf77_ssyr2k( const char *uplo, const char *trans,
264  const magma_int_t *n, const magma_int_t *k,
265  const float *alpha,
266  const float *A, const magma_int_t *lda,
267  const float *B, const magma_int_t *ldb,
268  const float *beta,
269  float *C, const magma_int_t *ldc );
270 
271 void blasf77_ssyrk( const char *uplo, const char *trans,
272  const magma_int_t *n, const magma_int_t *k,
273  const float *alpha,
274  const float *A, const magma_int_t *lda,
275  const float *beta,
276  float *C, const magma_int_t *ldc );
277 #endif
278 
279 void blasf77_strmm( const char *side, const char *uplo, const char *transa, const char *diag,
280  const magma_int_t *m, const magma_int_t *n,
281  const float *alpha,
282  const float *A, const magma_int_t *lda,
283  float *B, const magma_int_t *ldb );
284 
285 void blasf77_strmv( const char *uplo, const char *transa, const char *diag,
286  const magma_int_t *n,
287  const float *A, const magma_int_t *lda,
288  float *x, const magma_int_t *incx );
289 
290 void blasf77_strsm( const char *side, const char *uplo, const char *transa, const char *diag,
291  const magma_int_t *m, const magma_int_t *n,
292  const float *alpha,
293  const float *A, const magma_int_t *lda,
294  float *B, const magma_int_t *ldb );
295 
296 void blasf77_strsv( const char *uplo, const char *transa, const char *diag,
297  const magma_int_t *n,
298  const float *A, const magma_int_t *lda,
299  float *x, const magma_int_t *incx );
300 
301 /*
302  * LAPACK functions (alphabetical order)
303  */
304 void lapackf77_sbdsqr( const char *uplo,
305  const magma_int_t *n, const magma_int_t *ncvt, const magma_int_t *nru, const magma_int_t *ncc,
306  float *d, float *e,
307  float *Vt, const magma_int_t *ldvt,
308  float *U, const magma_int_t *ldu,
309  float *C, const magma_int_t *ldc,
310  float *work,
311  magma_int_t *info );
312 
313 void lapackf77_sgebak( const char *job, const char *side,
314  const magma_int_t *n,
315  const magma_int_t *ilo, const magma_int_t *ihi,
316  const float *scale, const magma_int_t *m,
317  float *V, const magma_int_t *ldv,
318  magma_int_t *info );
319 
320 void lapackf77_sgebal( const char *job,
321  const magma_int_t *n,
322  float *A, const magma_int_t *lda,
323  magma_int_t *ilo, magma_int_t *ihi,
324  float *scale,
325  magma_int_t *info );
326 
327 void lapackf77_sgebd2( const magma_int_t *m, const magma_int_t *n,
328  float *A, const magma_int_t *lda,
329  float *d, float *e,
330  float *tauq,
331  float *taup,
332  float *work,
333  magma_int_t *info );
334 
335 void lapackf77_sgebrd( const magma_int_t *m, const magma_int_t *n,
336  float *A, const magma_int_t *lda,
337  float *d, float *e,
338  float *tauq,
339  float *taup,
340  float *work, const magma_int_t *lwork,
341  magma_int_t *info );
342 
343 void lapackf77_sgeev( const char *jobvl, const char *jobvr,
344  const magma_int_t *n,
345  float *A, const magma_int_t *lda,
346  WSPLIT,
347  float *Vl, const magma_int_t *ldvl,
348  float *Vr, const magma_int_t *ldvr,
349  float *work, const magma_int_t *lwork,
350  DWORKFORZ
351  magma_int_t *info );
352 
353 void lapackf77_sgehd2( const magma_int_t *n,
354  const magma_int_t *ilo, const magma_int_t *ihi,
355  float *A, const magma_int_t *lda,
356  float *tau,
357  float *work,
358  magma_int_t *info );
359 
360 void lapackf77_sgehrd( const magma_int_t *n,
361  const magma_int_t *ilo, const magma_int_t *ihi,
362  float *A, const magma_int_t *lda,
363  float *tau,
364  float *work, const magma_int_t *lwork,
365  magma_int_t *info );
366 
367 void lapackf77_sgelqf( const magma_int_t *m, const magma_int_t *n,
368  float *A, const magma_int_t *lda,
369  float *tau,
370  float *work, const magma_int_t *lwork,
371  magma_int_t *info );
372 
373 void lapackf77_sgels( const char *trans,
374  const magma_int_t *m, const magma_int_t *n, const magma_int_t *nrhs,
375  float *A, const magma_int_t *lda,
376  float *B, const magma_int_t *ldb,
377  float *work, const magma_int_t *lwork,
378  magma_int_t *info );
379 
380 void lapackf77_sgeqlf( const magma_int_t *m, const magma_int_t *n,
381  float *A, const magma_int_t *lda,
382  float *tau,
383  float *work, const magma_int_t *lwork,
384  magma_int_t *info );
385 
386 void lapackf77_sgeqp3( const magma_int_t *m, const magma_int_t *n,
387  float *A, const magma_int_t *lda,
388  magma_int_t *jpvt,
389  float *tau,
390  float *work, const magma_int_t *lwork,
391  DWORKFORZ
392  magma_int_t *info );
393 
394 void lapackf77_sgeqrf( const magma_int_t *m, const magma_int_t *n,
395  float *A, const magma_int_t *lda,
396  float *tau,
397  float *work, const magma_int_t *lwork,
398  magma_int_t *info );
399 
400 void lapackf77_sgesv( const magma_int_t *n, const magma_int_t *nrhs,
401  float *A, const magma_int_t *lda,
402  magma_int_t *ipiv,
403  float *B, const magma_int_t *ldb,
404  magma_int_t *info );
405 
406 void lapackf77_sgesvd( const char *jobu, const char *jobvt,
407  const magma_int_t *m, const magma_int_t *n,
408  float *A, const magma_int_t *lda,
409  float *s,
410  float *U, const magma_int_t *ldu,
411  float *Vt, const magma_int_t *ldvt,
412  float *work, const magma_int_t *lwork,
413  DWORKFORZ
414  magma_int_t *info );
415 
416 void lapackf77_sgetrf( const magma_int_t *m, const magma_int_t *n,
417  float *A, const magma_int_t *lda,
418  magma_int_t *ipiv,
419  magma_int_t *info );
420 
421 void lapackf77_sgetri( const magma_int_t *n,
422  float *A, const magma_int_t *lda,
423  const magma_int_t *ipiv,
424  float *work, const magma_int_t *lwork,
425  magma_int_t *info );
426 
427 void lapackf77_sgetrs( const char* trans,
428  const magma_int_t *n, const magma_int_t *nrhs,
429  const float *A, const magma_int_t *lda,
430  const magma_int_t *ipiv,
431  float *B, const magma_int_t *ldb,
432  magma_int_t *info );
433 
434 void lapackf77_ssbtrd( const char *vect, const char *uplo,
435  const magma_int_t *n, const magma_int_t *kd,
436  float *Ab, const magma_int_t *ldab,
437  float *d, float *e,
438  float *Q, const magma_int_t *ldq,
439  float *work,
440  magma_int_t *info );
441 
442 void lapackf77_ssyev( const char *jobz, const char *uplo,
443  const magma_int_t *n,
444  float *A, const magma_int_t *lda,
445  float *w,
446  float *work, const magma_int_t *lwork,
447  DWORKFORZ
448  magma_int_t *info );
449 
450 void lapackf77_ssyevd( const char *jobz, const char *uplo,
451  const magma_int_t *n,
452  float *A, const magma_int_t *lda,
453  float *w,
454  float *work, const magma_int_t *lwork,
456  magma_int_t *iwork, const magma_int_t *liwork,
457  magma_int_t *info );
458 
459 void lapackf77_ssyevr( const char *jobz, const char *range, const char *uplo,
460  const magma_int_t *n,
461  float *A, const magma_int_t *lda,
462  float *vl, float *vu,
463  magma_int_t *il, magma_int_t *iu, float *abstol,
464  magma_int_t *m, float *w, float *z__,
465  magma_int_t *ldz, magma_int_t *isuppz,
466  float *work, magma_int_t *lwork,
467  float *rwork, magma_int_t *lrwork,
468  magma_int_t *iwork, magma_int_t *liwork, magma_int_t *info);
469 
470 void lapackf77_ssyevx( const char *jobz, const char *range, const char *uplo,
471  const magma_int_t *n,
472  float *A, const magma_int_t *lda,
473  float *vl, float *vu,
474  magma_int_t *il, magma_int_t *iu, float *abstol,
475  magma_int_t *m, float *w, float *z__,
476  magma_int_t *ldz, float *work, magma_int_t *lwork,
477  float *rwork, magma_int_t *iwork, magma_int_t *ifail, magma_int_t *info);
478 
479 void lapackf77_ssygs2( const magma_int_t *itype, const char *uplo,
480  const magma_int_t *n,
481  float *A, const magma_int_t *lda,
482  float *B, const magma_int_t *ldb,
483  magma_int_t *info );
484 
485 void lapackf77_ssygst( const magma_int_t *itype, const char *uplo,
486  const magma_int_t *n,
487  float *A, const magma_int_t *lda,
488  float *B, const magma_int_t *ldb,
489  magma_int_t *info );
490 
491 void lapackf77_ssygvd( const magma_int_t *itype, const char *jobz, const char *uplo,
492  const magma_int_t *n,
493  float *A, const magma_int_t *lda,
494  float *B, const magma_int_t *ldb,
495  float *w,
496  float *work, const magma_int_t *lwork,
498  magma_int_t *iwork, const magma_int_t *liwork,
499  magma_int_t *info );
500 
501 void lapackf77_ssytd2( const char *uplo,
502  const magma_int_t *n,
503  float *A, const magma_int_t *lda,
504  float *d, float *e,
505  float *tau,
506  magma_int_t *info );
507 
508 void lapackf77_ssytrd( const char *uplo,
509  const magma_int_t *n,
510  float *A, const magma_int_t *lda,
511  float *d, float *e,
512  float *tau,
513  float *work, const magma_int_t *lwork,
514  magma_int_t *info );
515 
516 void lapackf77_ssytrf( const char *uplo,
517  const magma_int_t *n,
518  float *A, const magma_int_t *lda,
519  magma_int_t *ipiv,
520  float *work, const magma_int_t *lwork,
521  magma_int_t *info );
522 
523 void lapackf77_shseqr( const char *job, const char *compz,
524  const magma_int_t *n,
525  const magma_int_t *ilo, const magma_int_t *ihi,
526  float *H, const magma_int_t *ldh,
527  WSPLIT,
528  float *Z, const magma_int_t *ldz,
529  float *work, const magma_int_t *lwork,
530  magma_int_t *info );
531 
532 void lapackf77_slabrd( const magma_int_t *m, const magma_int_t *n, const magma_int_t *nb,
533  float *A, const magma_int_t *lda,
534  float *d, float *e,
535  float *tauq,
536  float *taup,
537  float *X, const magma_int_t *ldx,
538  float *Y, const magma_int_t *ldy );
539 
540 void lapackf77_sladiv( float *ret_val,
541  float *x,
542  float *y );
543 
544 void lapackf77_slacgv( const magma_int_t *n,
545  float *x, const magma_int_t *incx );
546 
547 void lapackf77_slacpy( const char *uplo,
548  const magma_int_t *m, const magma_int_t *n,
549  const float *A, const magma_int_t *lda,
550  float *B, const magma_int_t *ldb );
551 
552 void lapackf77_slasyf( const char *uplo,
553  const magma_int_t *n, const magma_int_t *kn,
554  magma_int_t *kb,
555  float *A, const magma_int_t lda,
556  magma_int_t *ipiv,
557  float *work, const magma_int_t *ldwork,
558  magma_int_t *info );
559 
560 float lapackf77_slange( const char *norm,
561  const magma_int_t *m, const magma_int_t *n,
562  const float *A, const magma_int_t *lda,
563  float *work );
564 
565 float lapackf77_slansy( const char *norm, const char *uplo,
566  const magma_int_t *n,
567  const float *A, const magma_int_t *lda,
568  float * work );
569 
570 float lapackf77_slanst( const char* norm, const magma_int_t* n,
571  const float* d, const float* e );
572 
573 float lapackf77_slansy( const char *norm, const char *uplo,
574  const magma_int_t *n,
575  const float *A, const magma_int_t *lda,
576  float * work );
577 
578 void lapackf77_slaqp2 ( magma_int_t *m, magma_int_t *n, magma_int_t *offset,
579  float *a, magma_int_t *lda, magma_int_t *jpvt,
580  float *tau,
581  float *vn1, float *vn2,
582  float *work );
583 
584 void lapackf77_slarf ( char *side, magma_int_t *m, magma_int_t *n,
585  float *v, magma_int_t *incv,
586  float *tau,
587  float *C, magma_int_t *ldc,
588  float *work );
589 
590 void lapackf77_slarfb( const char *side, const char *trans, const char *direct, const char *storev,
591  const magma_int_t *m, const magma_int_t *n, const magma_int_t *k,
592  const float *V, const magma_int_t *ldv,
593  const float *T, const magma_int_t *ldt,
594  float *C, const magma_int_t *ldc,
595  float *work, const magma_int_t *ldwork );
596 
597 void lapackf77_slarfg( const magma_int_t *n,
598  float *alpha,
599  float *x, const magma_int_t *incx,
600  float *tau );
601 
602 void lapackf77_slarft( const char *direct, const char *storev,
603  const magma_int_t *n, const magma_int_t *k,
604  float *V, const magma_int_t *ldv,
605  const float *tau,
606  float *T, const magma_int_t *ldt );
607 
608 void lapackf77_slarnv( const magma_int_t *idist, magma_int_t *iseed, const magma_int_t *n,
609  float *x );
610 
611 void lapackf77_slartg( float *F,
612  float *G,
613  float *cs,
614  float *SN,
615  float *R );
616 
617 void lapackf77_slascl( const char *type,
618  const magma_int_t *kl, const magma_int_t *ku,
619  float *cfrom,
620  float *cto,
621  const magma_int_t *m, const magma_int_t *n,
622  float *A, const magma_int_t *lda,
623  magma_int_t *info );
624 
625 void lapackf77_slaset( const char *uplo,
626  const magma_int_t *m, const magma_int_t *n,
627  const float *alpha,
628  const float *beta,
629  float *A, const magma_int_t *lda );
630 
631 void lapackf77_slaswp( const magma_int_t *n,
632  float *A, const magma_int_t *lda,
633  const magma_int_t *k1, const magma_int_t *k2,
634  magma_int_t *ipiv,
635  const magma_int_t *incx );
636 
637 void lapackf77_slatrd( const char *uplo,
638  const magma_int_t *n, const magma_int_t *nb,
639  float *A, const magma_int_t *lda,
640  float *e,
641  float *tau,
642  float *work, const magma_int_t *ldwork );
643 
644 void lapackf77_slauum( const char *uplo,
645  const magma_int_t *n,
646  float *A, const magma_int_t *lda,
647  magma_int_t *info );
648 
649 void lapackf77_slavsy( const char *uplo, const char *trans, const char *diag,
650  magma_int_t *n, magma_int_t *nrhs,
651  float *A, magma_int_t *lda,
652  magma_int_t *ipiv,
653  float *B, magma_int_t *ldb,
654  magma_int_t *info );
655 
656 void lapackf77_sposv( const char *uplo,
657  const magma_int_t *n, const magma_int_t *nrhs,
658  float *A, const magma_int_t *lda,
659  float *B, const magma_int_t *ldb,
660  magma_int_t *info );
661 
662 void lapackf77_spotrf( const char *uplo,
663  const magma_int_t *n,
664  float *A, const magma_int_t *lda,
665  magma_int_t *info );
666 
667 void lapackf77_spotri( const char *uplo,
668  const magma_int_t *n,
669  float *A, const magma_int_t *lda,
670  magma_int_t *info );
671 
672 void lapackf77_spotrs( const char *uplo,
673  const magma_int_t *n, const magma_int_t *nrhs,
674  const float *A, const magma_int_t *lda,
675  float *B, const magma_int_t *ldb,
676  magma_int_t *info );
677 
678 void lapackf77_sstedc( const char *compz,
679  const magma_int_t *n,
680  float *d, float *e,
681  float *Z, const magma_int_t *ldz,
682  float *work, const magma_int_t *lwork,
684  magma_int_t *iwork, const magma_int_t *liwork,
685  magma_int_t *info );
686 
687 void lapackf77_sstein( const magma_int_t *n,
688  const float *d, const float *e,
689  const magma_int_t *m,
690  const float *w,
691  const magma_int_t *iblock,
692  const magma_int_t *isplit,
693  float *Z, const magma_int_t *ldz,
694  float *work, magma_int_t *iwork, magma_int_t *ifailv,
695  magma_int_t *info );
696 
697 void lapackf77_sstemr( const char *jobz, const char *range,
698  const magma_int_t *n,
699  float *d, float *e,
700  const float *vl, const float *vu,
701  const magma_int_t *il, const magma_int_t *iu,
702  magma_int_t *m,
703  float *w,
704  float *Z, const magma_int_t *ldz,
705  const magma_int_t *nzc, magma_int_t *isuppz, magma_int_t *tryrac,
706  float *work, const magma_int_t *lwork,
707  magma_int_t *iwork, const magma_int_t *liwork,
708  magma_int_t *info );
709 
710 void lapackf77_ssteqr( const char *compz,
711  const magma_int_t *n,
712  float *d, float *e,
713  float *Z, const magma_int_t *ldz,
714  float *work,
715  magma_int_t *info );
716 
717 #if defined(PRECISION_z) || defined(PRECISION_c)
718 void lapackf77_ssymv( const char *uplo,
719  const magma_int_t *n,
720  const float *alpha,
721  const float *A, const magma_int_t *lda,
722  const float *x, const magma_int_t *incx,
723  const float *beta,
724  float *y, const magma_int_t *incy );
725 #endif
726 
727 void lapackf77_strevc( const char *side, const char *howmny,
728  magma_int_t *select, const magma_int_t *n,
729  float *T, const magma_int_t *ldt,
730  float *Vl, const magma_int_t *ldvl,
731  float *Vr, const magma_int_t *ldvr,
732  const magma_int_t *mm, magma_int_t *m,
733  float *work,
734  DWORKFORZ
735  magma_int_t *info );
736 
737 void lapackf77_strtri( const char *uplo, const char *diag,
738  const magma_int_t *n,
739  float *A, const magma_int_t *lda,
740  magma_int_t *info );
741 
742 void lapackf77_sorg2r( const magma_int_t *m, const magma_int_t *n, const magma_int_t *k,
743  float *A, const magma_int_t *lda,
744  const float *tau,
745  float *work,
746  magma_int_t *info );
747 
748 void lapackf77_sorgbr( const char *vect,
749  const magma_int_t *m, const magma_int_t *n, const magma_int_t *k,
750  float *A, const magma_int_t *lda,
751  const float *tau,
752  float *work, const magma_int_t *lwork,
753  magma_int_t *info );
754 
755 void lapackf77_sorghr( const magma_int_t *n,
756  const magma_int_t *ilo, const magma_int_t *ihi,
757  float *A, const magma_int_t *lda,
758  const float *tau,
759  float *work, const magma_int_t *lwork,
760  magma_int_t *info );
761 
762 void lapackf77_sorglq( const magma_int_t *m, const magma_int_t *n, const magma_int_t *k,
763  float *A, const magma_int_t *lda,
764  const float *tau,
765  float *work, const magma_int_t *lwork,
766  magma_int_t *info );
767 
768 void lapackf77_sorgql( const magma_int_t *m, const magma_int_t *n, const magma_int_t *k,
769  float *A, const magma_int_t *lda,
770  const float *tau,
771  float *work, const magma_int_t *lwork,
772  magma_int_t *info );
773 
774 void lapackf77_sorgqr( const magma_int_t *m, const magma_int_t *n, const magma_int_t *k,
775  float *A, const magma_int_t *lda,
776  const float *tau,
777  float *work, const magma_int_t *lwork,
778  magma_int_t *info );
779 
780 void lapackf77_sorgtr( const char *uplo,
781  const magma_int_t *n,
782  float *A, const magma_int_t *lda,
783  const float *tau,
784  float *work, const magma_int_t *lwork,
785  magma_int_t *info );
786 
787 void lapackf77_sorm2r( const char *side, const char *trans,
788  const magma_int_t *m, const magma_int_t *n, const magma_int_t *k,
789  const float *A, const magma_int_t *lda,
790  const float *tau,
791  float *C, const magma_int_t *ldc,
792  float *work,
793  magma_int_t *info );
794 
795 void lapackf77_sormbr( const char *vect, const char *side, const char *trans,
796  const magma_int_t *m, const magma_int_t *n, const magma_int_t *k,
797  const float *A, const magma_int_t *lda,
798  const float *tau,
799  float *C, const magma_int_t *ldc,
800  float *work, const magma_int_t *lwork,
801  magma_int_t *info );
802 
803 void lapackf77_sormlq( const char *side, const char *trans,
804  const magma_int_t *m, const magma_int_t *n, const magma_int_t *k,
805  const float *A, const magma_int_t *lda,
806  const float *tau,
807  float *C, const magma_int_t *ldc,
808  float *work, const magma_int_t *lwork,
809  magma_int_t *info );
810 
811 void lapackf77_sormql( const char *side, const char *trans,
812  const magma_int_t *m, const magma_int_t *n, const magma_int_t *k,
813  const float *A, const magma_int_t *lda,
814  const float *tau,
815  float *C, const magma_int_t *ldc,
816  float *work, const magma_int_t *lwork,
817  magma_int_t *info );
818 
819 void lapackf77_sormqr( const char *side, const char *trans,
820  const magma_int_t *m, const magma_int_t *n, const magma_int_t *k,
821  const float *A, const magma_int_t *lda,
822  const float *tau,
823  float *C, const magma_int_t *ldc,
824  float *work, const magma_int_t *lwork,
825  magma_int_t *info );
826 
827 void lapackf77_sormtr( const char *side, const char *uplo, const char *trans,
828  const magma_int_t *m, const magma_int_t *n,
829  const float *A, const magma_int_t *lda,
830  const float *tau,
831  float *C, const magma_int_t *ldc,
832  float *work, const magma_int_t *lwork,
833  magma_int_t *info );
834 
835 /*
836  * Real precision extras
837  */
838 void lapackf77_sstebz( const char *range, const char *order,
839  const magma_int_t *n,
840  float *vl, float *vu,
841  magma_int_t *il, magma_int_t *iu,
842  float *abstol,
843  float *d, float *e,
844  const magma_int_t *m, const magma_int_t *nsplit,
845  float *w,
846  magma_int_t *iblock, magma_int_t *isplit,
847  float *work,
848  magma_int_t *iwork,
849  magma_int_t *info );
850 
851 float lapackf77_slamc3( float* a, float* b );
852 
854  float* a,
855  magma_int_t* dtrd1, magma_int_t* dtrd2, magma_int_t* index );
856 
857 float lapackf77_slapy3( float *x, float *y, float *z );
858 
860  float* d, float* q, magma_int_t* ldq, magma_int_t* indxq,
861  float* rho, float* z,
862  float* dlmda, float* w, float* q2,
863  magma_int_t* indx, magma_int_t* indxc, magma_int_t* indxp,
864  magma_int_t* coltyp, magma_int_t* info);
865 
867  float* d,
868  float* z,
869  float* delta,
870  float* rho,
871  float* dlam, magma_int_t* info );
872 
873 void lapackf77_slasrt(const char *id, const magma_int_t *n, float *d, magma_int_t *info);
874 
875 /*
876  * Testing functions
877  */
878 #if defined(PRECISION_z) || defined(PRECISION_c)
879 void lapackf77_sbdt01( const magma_int_t *m, const magma_int_t *n, const magma_int_t *kd,
880  float *A, const magma_int_t *lda,
881  float *Q, const magma_int_t *ldq,
882  float *d, float *e,
883  float *Pt, const magma_int_t *ldpt,
884  float *work,
885  float *rwork,
886  float *resid );
887 
888 void lapackf77_sget22( const char *transa, const char *transe, const char *transw, const magma_int_t *n,
889  float *A, const magma_int_t *lda,
890  float *E, const magma_int_t *lde,
891  float *w,
892  float *work,
893  float *rwork,
894  float *result );
895 
896 void lapackf77_ssyt21( const magma_int_t *itype, const char *uplo,
897  const magma_int_t *n, const magma_int_t *kband,
898  float *A, const magma_int_t *lda,
899  float *d, float *e,
900  float *U, const magma_int_t *ldu,
901  float *V, const magma_int_t *ldv,
902  float *tau,
903  float *work,
904  float *rwork,
905  float *result );
906 
907 void lapackf77_shst01( const magma_int_t *n, const magma_int_t *ilo, const magma_int_t *ihi,
908  float *A, const magma_int_t *lda,
909  float *H, const magma_int_t *ldh,
910  float *Q, const magma_int_t *ldq,
911  float *work, const magma_int_t *lwork,
912  float *rwork,
913  float *result );
914 
915 void lapackf77_sstt21( const magma_int_t *n, const magma_int_t *kband,
916  float *AD,
917  float *AE,
918  float *SD,
919  float *SE,
920  float *U, const magma_int_t *ldu,
921  float *work,
922  float *rwork,
923  float *result );
924 
925 void lapackf77_sort01( const char *rowcol, const magma_int_t *m, const magma_int_t *n,
926  float *U, const magma_int_t *ldu,
927  float *work, const magma_int_t *lwork,
928  float *rwork,
929  float *resid );
930 #else
931 void lapackf77_sbdt01( const magma_int_t *m, const magma_int_t *n, const magma_int_t *kd,
932  float *A, const magma_int_t *lda,
933  float *Q, const magma_int_t *ldq,
934  float *d, float *e,
935  float *Pt, const magma_int_t *ldpt,
936  float *work,
937  float *resid );
938 
939 void lapackf77_sget22( const char *transa, const char *transe, const char *transw, const magma_int_t *n,
940  float *A, const magma_int_t *lda,
941  float *E, const magma_int_t *lde,
942  float *wr,
943  float *wi,
944  float *work,
945  float *result );
946 
947 void lapackf77_ssyt21( magma_int_t *itype, const char *uplo, const magma_int_t *n, const magma_int_t *kband,
948  float *A, const magma_int_t *lda,
949  float *d, float *e,
950  float *U, const magma_int_t *ldu,
951  float *V, const magma_int_t *ldv,
952  float *tau,
953  float *work,
954  float *result );
955 
956 void lapackf77_shst01( const magma_int_t *n, const magma_int_t *ilo, const magma_int_t *ihi,
957  float *A, const magma_int_t *lda,
958  float *H, const magma_int_t *ldh,
959  float *Q, const magma_int_t *ldq,
960  float *work, const magma_int_t *lwork,
961  float *result );
962 
963 void lapackf77_sstt21( const magma_int_t *n, const magma_int_t *kband,
964  float *AD,
965  float *AE,
966  float *SD,
967  float *SE,
968  float *U, const magma_int_t *ldu,
969  float *work,
970  float *result );
971 
972 void lapackf77_sort01( const char *rowcol, const magma_int_t *m, const magma_int_t *n,
973  float *U, const magma_int_t *ldu,
974  float *work, const magma_int_t *lwork,
975  float *resid );
976 #endif
977 
978 void lapackf77_slarfy( const char *uplo, const magma_int_t *n,
979  float *V, const magma_int_t *incv,
980  float *tau,
981  float *C, const magma_int_t *ldc,
982  float *work );
983 
984 void lapackf77_slarfx( const char *side, const magma_int_t *m, const magma_int_t *n,
985  float *V,
986  float *tau,
987  float *C, const magma_int_t *ldc,
988  float *work );
989 
990 float lapackf77_sqpt01( const magma_int_t *m, const magma_int_t *n, const magma_int_t *k,
991  float *A,
992  float *Af, const magma_int_t *lda,
993  float *tau, magma_int_t *jpvt,
994  float *work, const magma_int_t *lwork );
995 
996 void lapackf77_sqrt02( const magma_int_t *m, const magma_int_t *n, const magma_int_t *k,
997  float *A,
998  float *AF,
999  float *Q,
1000  float *R, const magma_int_t *lda,
1001  float *tau,
1002  float *work, const magma_int_t *lwork,
1003  float *rwork,
1004  float *result );
1005 
1007  const char *dist, magma_int_t *iseed, const char *sym, float *d,
1008  magma_int_t *mode, const float *cond, const float *dmax,
1009  magma_int_t *kl, magma_int_t *ku, const char *pack,
1010  float *a, magma_int_t *lda, float *work, magma_int_t *info );
1011 
1012 #ifdef __cplusplus
1013 }
1014 #endif
1015 
1016 #undef DWORKFORZ
1017 #undef DWORKFORZ_AND_LD
1018 #undef WSPLIT
1019 #undef PRECISION_s
1020 
1021 #endif /* MAGMA_SLAPACK_H */
#define lapackf77_sqrt02
#define lapackf77_sorgqr
#define blasf77_strsm
Definition: magma_slapack.h:43
#define blasf77_ssymv
Definition: magma_slapack.h:31
#define lapackf77_shst01
#define lapackf77_sgeqrf
Definition: magma_slapack.h:65
#define blasf77_strsv
Definition: magma_slapack.h:44
#define lapackf77_strevc
#define blasf77_strmv
Definition: magma_slapack.h:42
#define lapackf77_sstein
#define lapackf77_sgesvd
Definition: magma_slapack.h:67
#define lapackf77_sorg2r
#define lapackf77_sbdsqr
Definition: magma_slapack.h:53
#define lapackf77_sqpt01
#define lapackf77_sorghr
#define lapackf77_slaqp2
Definition: magma_slapack.h:93
#define lapackf77_ssteqr
#define lapackf77_sstedc
#define lapackf77_slarfb
Definition: magma_slapack.h:95
#define lapackf77_slauum
#define B(i, j)
Definition: chegst.cpp:17
#define lapackf77_sgehd2
Definition: magma_slapack.h:59
#define blasf77_sscal
Definition: magma_slapack.h:36
#define lapackf77_sormqr
#define lapackf77_sbdt01
#define lapackf77_slaset
#define lapackf77_ssytd2
Definition: magma_slapack.h:79
#define T(m)
Definition: zgeqrf_mc.cpp:14
#define blasf77_ssyr2k
Definition: magma_slapack.h:39
#define lapackf77_sgels
Definition: magma_slapack.h:62
#define lapackf77_slabrd
Definition: magma_slapack.h:83
#define lapackf77_slange
Definition: magma_slapack.h:88
#define lapackf77_sorm2r
int magma_int_t
Definition: magmablas.h:12
#define C(i, j)
#define lapackf77_sgehrd
Definition: magma_slapack.h:60
#define lapackf77_sgetri
Definition: magma_slapack.h:69
#define lapackf77_slaswp
#define lapackf77_sgeev
Definition: magma_slapack.h:58
#define vl(i, j)
#define lapackf77_sormlq
#define lapackf77_ssyevx
Definition: magma_slapack.h:75
#define lapackf77_slanst
Definition: magma_slapack.h:90
#define Z(ix, iy)
Definition: dstedx.cpp:14
#define lapackf77_slamc3
Definition: magma_clapack.h:48
#define lapackf77_spotrf
#define lapackf77_ssyev
Definition: magma_slapack.h:72
#define lapackf77_sstemr
#define lapackf77_sgebal
Definition: magma_slapack.h:55
#define lapackf77_sgeqlf
Definition: magma_slapack.h:63
#define lapackf77_sgelqf
Definition: magma_slapack.h:61
#define lapackf77_sgesv
Definition: magma_slapack.h:66
#define blasf77_scopy
Definition: magma_slapack.h:25
#define F(i, j)
#define lapackf77_sstt21
#define lapackf77_sorgql
#define lapackf77_slacgv
Definition: magma_slapack.h:85
#define blasf77_saxpy
Definition: magma_slapack.h:24
#define lapackf77_slarfy
#define lapackf77_strtri
#define lapackf77_sormbr
#define WSPLIT
#define lapackf77_sorgbr
#define lapackf77_slamrg
Definition: magma_clapack.h:49
#define lapackf77_sormql
#define lapackf77_slascl
#define lapackf77_sort01
#define blasf77_sswap
Definition: magma_slapack.h:37
#define lapackf77_shseqr
Definition: magma_slapack.h:82
#define lapackf77_spotri
#define lapackf77_ssymv
#define lapackf77_ssyt21
#define DWORKFORZ
#define lapackf77_sget22
#define Y(i, j)
#define blasf77_ssyrk
Definition: magma_slapack.h:40
#define lapackf77_ssygvd
Definition: magma_slapack.h:78
#define lapackf77_ssbtrd
Definition: magma_slapack.h:71
#define A(i, j)
Definition: cprint.cpp:16
#define E(m, n)
#define lapackf77_ssygst
Definition: magma_slapack.h:77
#define lapackf77_slartg
Definition: magma_slapack.h:99
#define lapackf77_slarfx
#define lapackf77_sposv
#define lapackf77_spotrs
#define lapackf77_slaed4
Definition: magma_clapack.h:47
#define lapackf77_slarf
Definition: magma_slapack.h:94
#define lapackf77_ssygs2
Definition: magma_slapack.h:76
#define lapackf77_slasrt
Definition: magma_clapack.h:50
#define lapackf77_slatms
#define lapackf77_slapy3
Definition: magma_clapack.h:92
#define lapackf77_slansy
Definition: magma_slapack.h:91
#define lapackf77_sorgtr
#define lapackf77_slaed2
Definition: magma_clapack.h:46
#define lapackf77_ssytrf
Definition: magma_slapack.h:81
#define lapackf77_slarft
Definition: magma_slapack.h:97
#define blasf77_ssyr2
Definition: magma_slapack.h:32
#define lapackf77_sgeqp3
Definition: magma_slapack.h:64
#define lapackf77_slatrd
#define blasf77_sgemm
Definition: magma_slapack.h:26
#define DWORKFORZ_AND_LD
#define lapackf77_ssyevd
Definition: magma_slapack.h:73
#define lapackf77_slacpy
Definition: magma_slapack.h:86
#define lapackf77_sgebak
Definition: magma_slapack.h:54
#define blasf77_strmm
Definition: magma_slapack.h:41
#define lapackf77_sorglq
#define blasf77_sgemv
Definition: magma_slapack.h:27
#define lapackf77_sgebrd
Definition: magma_slapack.h:57
#define lapackf77_sladiv
Definition: magma_slapack.h:84
#define lapackf77_ssyevr
Definition: magma_slapack.h:74
#define lapackf77_sgetrf
Definition: magma_slapack.h:68
#define lapackf77_ssytrd
Definition: magma_slapack.h:80
#define lapackf77_sgebd2
Definition: magma_slapack.h:56
#define lapackf77_slarfg
Definition: magma_slapack.h:96
#define blasf77_ssymm
Definition: magma_slapack.h:38
#define lapackf77_sgetrs
Definition: magma_slapack.h:70
#define blasf77_isamax
Definition: magma_slapack.h:23
#define lapackf77_slarnv
Definition: magma_slapack.h:98
#define lapackf77_slavsy
#define lapackf77_sstebz
Definition: magma_clapack.h:51
#define Q(ix, iy)
Definition: dlaex0.cpp:14
#define lapackf77_sormtr
#define blasf77_sger
Definition: magma_slapack.h:29
#define V(m)
#define lapackf77_slasyf
Definition: magma_slapack.h:87