LAPACK  3.9.0
LAPACK: Linear Algebra PACKage
lapack.h
1 #ifndef LAPACK_H
2 #define LAPACK_H
3 
4 /*
5 * Turn on HAVE_LAPACK_CONFIG_H to redefine C-LAPACK datatypes
6 */
7 #ifdef HAVE_LAPACK_CONFIG_H
8 #include "lapacke_config.h"
9 #endif
10 
11 #include "lapacke_mangling.h"
12 
13 #include <stdlib.h>
14 
15 #ifdef __cplusplus
16 extern "C" {
17 #endif
18 
19 /*----------------------------------------------------------------------------*/
20 #ifndef lapack_int
21 #define lapack_int int
22 #endif
23 
24 #ifndef lapack_logical
25 #define lapack_logical lapack_int
26 #endif
27 
28 /* f2c, hence clapack and MacOS Accelerate, returns double instead of float
29  * for sdot, slange, clange, etc. */
30 #if defined(LAPACK_F2C)
31  typedef double lapack_float_return;
32 #else
33  typedef float lapack_float_return;
34 #endif
35 
36 /* Complex types are structures equivalent to the
37 * Fortran complex types COMPLEX(4) and COMPLEX(8).
38 *
39 * One can also redefine the types with his own types
40 * for example by including in the code definitions like
41 *
42 * #define lapack_complex_float std::complex<float>
43 * #define lapack_complex_double std::complex<double>
44 *
45 * or define these types in the command line:
46 *
47 * -Dlapack_complex_float="std::complex<float>"
48 * -Dlapack_complex_double="std::complex<double>"
49 */
50 
51 #ifndef LAPACK_COMPLEX_CUSTOM
52 
53 /* Complex type (single precision) */
54 #ifndef lapack_complex_float
55 #include <complex.h>
56 #define lapack_complex_float float _Complex
57 #endif
58 
59 #ifndef lapack_complex_float_real
60 #define lapack_complex_float_real(z) (creal(z))
61 #endif
62 
63 #ifndef lapack_complex_float_imag
64 #define lapack_complex_float_imag(z) (cimag(z))
65 #endif
66 
67 /* Complex type (double precision) */
68 #ifndef lapack_complex_double
69 #include <complex.h>
70 #define lapack_complex_double double _Complex
71 #endif
72 
73 #ifndef lapack_complex_double_real
74 #define lapack_complex_double_real(z) (creal(z))
75 #endif
76 
77 #ifndef lapack_complex_double_imag
78 #define lapack_complex_double_imag(z) (cimag(z))
79 #endif
80 
81 #endif /* LAPACK_COMPLEX_CUSTOM */
82 
83 /* Callback logical functions of one, two, or three arguments are used
84 * to select eigenvalues to sort to the top left of the Schur form.
85 * The value is selected if function returns TRUE (non-zero). */
86 
87 typedef lapack_logical (*LAPACK_S_SELECT2) ( const float*, const float* );
88 typedef lapack_logical (*LAPACK_S_SELECT3)
89  ( const float*, const float*, const float* );
90 typedef lapack_logical (*LAPACK_D_SELECT2) ( const double*, const double* );
91 typedef lapack_logical (*LAPACK_D_SELECT3)
92  ( const double*, const double*, const double* );
93 
94 typedef lapack_logical (*LAPACK_C_SELECT1) ( const lapack_complex_float* );
95 typedef lapack_logical (*LAPACK_C_SELECT2)
96  ( const lapack_complex_float*, const lapack_complex_float* );
97 typedef lapack_logical (*LAPACK_Z_SELECT1) ( const lapack_complex_double* );
98 typedef lapack_logical (*LAPACK_Z_SELECT2)
99  ( const lapack_complex_double*, const lapack_complex_double* );
100 
101 #define LAPACK_lsame LAPACK_GLOBAL(lsame,LSAME)
102 lapack_logical LAPACK_lsame( char* ca, char* cb,
103  lapack_int lca, lapack_int lcb );
104 
105 
106 /*----------------------------------------------------------------------------*/
107 /* This is in alphabetical order (ignoring leading precision). */
108 
109 #define LAPACK_cbbcsd LAPACK_GLOBAL(cbbcsd,CBBCSD)
110 void LAPACK_cbbcsd(
111  char const* jobu1, char const* jobu2, char const* jobv1t, char const* jobv2t, char const* trans,
112  lapack_int const* m, lapack_int const* p, lapack_int const* q,
113  float* theta,
114  float* phi,
115  lapack_complex_float* U1, lapack_int const* ldu1,
116  lapack_complex_float* U2, lapack_int const* ldu2,
117  lapack_complex_float* V1T, lapack_int const* ldv1t,
118  lapack_complex_float* V2T, lapack_int const* ldv2t,
119  float* B11D,
120  float* B11E,
121  float* B12D,
122  float* B12E,
123  float* B21D,
124  float* B21E,
125  float* B22D,
126  float* B22E,
127  float* rwork, lapack_int const* lrwork,
128  lapack_int* info );
129 
130 #define LAPACK_dbbcsd LAPACK_GLOBAL(dbbcsd,DBBCSD)
131 void LAPACK_dbbcsd(
132  char const* jobu1, char const* jobu2, char const* jobv1t, char const* jobv2t, char const* trans,
133  lapack_int const* m, lapack_int const* p, lapack_int const* q,
134  double* theta,
135  double* phi,
136  double* U1, lapack_int const* ldu1,
137  double* U2, lapack_int const* ldu2,
138  double* V1T, lapack_int const* ldv1t,
139  double* V2T, lapack_int const* ldv2t,
140  double* B11D,
141  double* B11E,
142  double* B12D,
143  double* B12E,
144  double* b21d,
145  double* b21e,
146  double* b22d,
147  double* b22e,
148  double* work, lapack_int const* lwork,
149  lapack_int* info );
150 
151 #define LAPACK_sbbcsd LAPACK_GLOBAL(sbbcsd,SBBCSD)
152 void LAPACK_sbbcsd(
153  char const* jobu1, char const* jobu2, char const* jobv1t, char const* jobv2t, char const* trans,
154  lapack_int const* m, lapack_int const* p, lapack_int const* q,
155  float* theta,
156  float* phi,
157  float* U1, lapack_int const* ldu1,
158  float* U2, lapack_int const* ldu2,
159  float* V1T, lapack_int const* ldv1t,
160  float* V2T, lapack_int const* ldv2t,
161  float* B11D,
162  float* B11E,
163  float* B12D,
164  float* B12E,
165  float* B21D,
166  float* B21E,
167  float* B22D,
168  float* B22E,
169  float* work, lapack_int const* lwork,
170  lapack_int* info );
171 
172 #define LAPACK_zbbcsd LAPACK_GLOBAL(zbbcsd,ZBBCSD)
173 void LAPACK_zbbcsd(
174  char const* jobu1, char const* jobu2, char const* jobv1t, char const* jobv2t, char const* trans,
175  lapack_int const* m, lapack_int const* p, lapack_int const* q,
176  double* theta,
177  double* phi,
178  lapack_complex_double* U1, lapack_int const* ldu1,
179  lapack_complex_double* U2, lapack_int const* ldu2,
180  lapack_complex_double* V1T, lapack_int const* ldv1t,
181  lapack_complex_double* V2T, lapack_int const* ldv2t,
182  double* B11D,
183  double* B11E,
184  double* B12D,
185  double* B12E,
186  double* B21D,
187  double* B21E,
188  double* B22D,
189  double* B22E,
190  double* rwork, lapack_int const* lrwork,
191  lapack_int* info );
192 
193 #define LAPACK_dbdsdc LAPACK_GLOBAL(dbdsdc,DBDSDC)
194 void LAPACK_dbdsdc(
195  char const* uplo, char const* compq,
196  lapack_int const* n,
197  double* D,
198  double* E,
199  double* U, lapack_int const* ldu,
200  double* VT, lapack_int const* ldvt,
201  double* Q, lapack_int* IQ,
202  double* work,
203  lapack_int* iwork,
204  lapack_int* info );
205 
206 #define LAPACK_sbdsdc LAPACK_GLOBAL(sbdsdc,SBDSDC)
207 void LAPACK_sbdsdc(
208  char const* uplo, char const* compq,
209  lapack_int const* n,
210  float* D,
211  float* E,
212  float* U, lapack_int const* ldu,
213  float* VT, lapack_int const* ldvt,
214  float* Q, lapack_int* IQ,
215  float* work,
216  lapack_int* iwork,
217  lapack_int* info );
218 
219 #define LAPACK_cbdsqr LAPACK_GLOBAL(cbdsqr,CBDSQR)
220 void LAPACK_cbdsqr(
221  char const* uplo,
222  lapack_int const* n, lapack_int const* ncvt, lapack_int const* nru, lapack_int const* ncc,
223  float* D,
224  float* E,
225  lapack_complex_float* VT, lapack_int const* ldvt,
226  lapack_complex_float* U, lapack_int const* ldu,
227  lapack_complex_float* C, lapack_int const* ldc,
228  float* rwork,
229  lapack_int* info );
230 
231 #define LAPACK_dbdsqr LAPACK_GLOBAL(dbdsqr,DBDSQR)
232 void LAPACK_dbdsqr(
233  char const* uplo,
234  lapack_int const* n, lapack_int const* ncvt, lapack_int const* nru, lapack_int const* ncc,
235  double* D,
236  double* E,
237  double* VT, lapack_int const* ldvt,
238  double* U, lapack_int const* ldu,
239  double* C, lapack_int const* ldc,
240  double* work,
241  lapack_int* info );
242 
243 #define LAPACK_sbdsqr LAPACK_GLOBAL(sbdsqr,SBDSQR)
244 void LAPACK_sbdsqr(
245  char const* uplo,
246  lapack_int const* n, lapack_int const* ncvt, lapack_int const* nru, lapack_int const* ncc,
247  float* D,
248  float* E,
249  float* VT, lapack_int const* ldvt,
250  float* U, lapack_int const* ldu,
251  float* C, lapack_int const* ldc,
252  float* work,
253  lapack_int* info );
254 
255 #define LAPACK_zbdsqr LAPACK_GLOBAL(zbdsqr,ZBDSQR)
256 void LAPACK_zbdsqr(
257  char const* uplo,
258  lapack_int const* n, lapack_int const* ncvt, lapack_int const* nru, lapack_int const* ncc,
259  double* D,
260  double* E,
261  lapack_complex_double* VT, lapack_int const* ldvt,
262  lapack_complex_double* U, lapack_int const* ldu,
263  lapack_complex_double* C, lapack_int const* ldc,
264  double* rwork,
265  lapack_int* info );
266 
267 #define LAPACK_dbdsvdx LAPACK_GLOBAL(dbdsvdx,DBDSVDX)
268 void LAPACK_dbdsvdx(
269  char const* uplo, char const* jobz, char const* range,
270  lapack_int const* n,
271  double const* D,
272  double const* E,
273  double const* vl,
274  double const* vu, lapack_int const* il, lapack_int const* iu, lapack_int* ns,
275  double* S,
276  double* Z, lapack_int const* ldz,
277  double* work,
278  lapack_int* iwork,
279  lapack_int* info );
280 
281 #define LAPACK_sbdsvdx LAPACK_GLOBAL(sbdsvdx,SBDSVDX)
282 void LAPACK_sbdsvdx(
283  char const* uplo, char const* jobz, char const* range,
284  lapack_int const* n,
285  float const* D,
286  float const* E,
287  float const* vl,
288  float const* vu, lapack_int const* il, lapack_int const* iu, lapack_int* ns,
289  float* S,
290  float* Z, lapack_int const* ldz,
291  float* work,
292  lapack_int* iwork,
293  lapack_int* info );
294 
295 #define LAPACK_ddisna LAPACK_GLOBAL(ddisna,DDISNA)
296 void LAPACK_ddisna(
297  char const* job,
298  lapack_int const* m, lapack_int const* n,
299  double const* D,
300  double* SEP,
301  lapack_int* info );
302 
303 #define LAPACK_sdisna LAPACK_GLOBAL(sdisna,SDISNA)
304 void LAPACK_sdisna(
305  char const* job,
306  lapack_int const* m, lapack_int const* n,
307  float const* D,
308  float* SEP,
309  lapack_int* info );
310 
311 #define LAPACK_cgbbrd LAPACK_GLOBAL(cgbbrd,CGBBRD)
312 void LAPACK_cgbbrd(
313  char const* vect,
314  lapack_int const* m, lapack_int const* n, lapack_int const* ncc, lapack_int const* kl, lapack_int const* ku,
315  lapack_complex_float* AB, lapack_int const* ldab,
316  float* D,
317  float* E,
318  lapack_complex_float* Q, lapack_int const* ldq,
319  lapack_complex_float* PT, lapack_int const* ldpt,
320  lapack_complex_float* C, lapack_int const* ldc,
321  lapack_complex_float* work,
322  float* rwork,
323  lapack_int* info );
324 
325 #define LAPACK_dgbbrd LAPACK_GLOBAL(dgbbrd,DGBBRD)
326 void LAPACK_dgbbrd(
327  char const* vect,
328  lapack_int const* m, lapack_int const* n, lapack_int const* ncc, lapack_int const* kl, lapack_int const* ku,
329  double* AB, lapack_int const* ldab,
330  double* D,
331  double* E,
332  double* Q, lapack_int const* ldq,
333  double* PT, lapack_int const* ldpt,
334  double* C, lapack_int const* ldc,
335  double* work,
336  lapack_int* info );
337 
338 #define LAPACK_sgbbrd LAPACK_GLOBAL(sgbbrd,SGBBRD)
339 void LAPACK_sgbbrd(
340  char const* vect,
341  lapack_int const* m, lapack_int const* n, lapack_int const* ncc, lapack_int const* kl, lapack_int const* ku,
342  float* AB, lapack_int const* ldab,
343  float* D,
344  float* E,
345  float* Q, lapack_int const* ldq,
346  float* PT, lapack_int const* ldpt,
347  float* C, lapack_int const* ldc,
348  float* work,
349  lapack_int* info );
350 
351 #define LAPACK_zgbbrd LAPACK_GLOBAL(zgbbrd,ZGBBRD)
352 void LAPACK_zgbbrd(
353  char const* vect,
354  lapack_int const* m, lapack_int const* n, lapack_int const* ncc, lapack_int const* kl, lapack_int const* ku,
355  lapack_complex_double* AB, lapack_int const* ldab,
356  double* D,
357  double* E,
358  lapack_complex_double* Q, lapack_int const* ldq,
359  lapack_complex_double* PT, lapack_int const* ldpt,
360  lapack_complex_double* C, lapack_int const* ldc,
361  lapack_complex_double* work,
362  double* rwork,
363  lapack_int* info );
364 
365 #define LAPACK_cgbcon LAPACK_GLOBAL(cgbcon,CGBCON)
366 void LAPACK_cgbcon(
367  char const* norm,
368  lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
369  lapack_complex_float const* AB, lapack_int const* ldab, lapack_int const* ipiv,
370  float const* anorm,
371  float* rcond,
372  lapack_complex_float* work,
373  float* rwork,
374  lapack_int* info );
375 
376 #define LAPACK_dgbcon LAPACK_GLOBAL(dgbcon,DGBCON)
377 void LAPACK_dgbcon(
378  char const* norm,
379  lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
380  double const* AB, lapack_int const* ldab, lapack_int const* ipiv,
381  double const* anorm,
382  double* rcond,
383  double* work,
384  lapack_int* iwork,
385  lapack_int* info );
386 
387 #define LAPACK_sgbcon LAPACK_GLOBAL(sgbcon,SGBCON)
388 void LAPACK_sgbcon(
389  char const* norm,
390  lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
391  float const* AB, lapack_int const* ldab, lapack_int const* ipiv,
392  float const* anorm,
393  float* rcond,
394  float* work,
395  lapack_int* iwork,
396  lapack_int* info );
397 
398 #define LAPACK_zgbcon LAPACK_GLOBAL(zgbcon,ZGBCON)
399 void LAPACK_zgbcon(
400  char const* norm,
401  lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
402  lapack_complex_double const* AB, lapack_int const* ldab, lapack_int const* ipiv,
403  double const* anorm,
404  double* rcond,
405  lapack_complex_double* work,
406  double* rwork,
407  lapack_int* info );
408 
409 #define LAPACK_cgbequ LAPACK_GLOBAL(cgbequ,CGBEQU)
410 void LAPACK_cgbequ(
411  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
412  lapack_complex_float const* AB, lapack_int const* ldab,
413  float* R,
414  float* C,
415  float* rowcnd,
416  float* colcnd,
417  float* amax,
418  lapack_int* info );
419 
420 #define LAPACK_dgbequ LAPACK_GLOBAL(dgbequ,DGBEQU)
421 void LAPACK_dgbequ(
422  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
423  double const* AB, lapack_int const* ldab,
424  double* R,
425  double* C,
426  double* rowcnd,
427  double* colcnd,
428  double* amax,
429  lapack_int* info );
430 
431 #define LAPACK_sgbequ LAPACK_GLOBAL(sgbequ,SGBEQU)
432 void LAPACK_sgbequ(
433  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
434  float const* AB, lapack_int const* ldab,
435  float* R,
436  float* C,
437  float* rowcnd,
438  float* colcnd,
439  float* amax,
440  lapack_int* info );
441 
442 #define LAPACK_zgbequ LAPACK_GLOBAL(zgbequ,ZGBEQU)
443 void LAPACK_zgbequ(
444  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
445  lapack_complex_double const* AB, lapack_int const* ldab,
446  double* R,
447  double* C,
448  double* rowcnd,
449  double* colcnd,
450  double* amax,
451  lapack_int* info );
452 
453 #define LAPACK_cgbequb LAPACK_GLOBAL(cgbequb,CGBEQUB)
454 void LAPACK_cgbequb(
455  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
456  lapack_complex_float const* AB, lapack_int const* ldab,
457  float* R,
458  float* C,
459  float* rowcnd,
460  float* colcnd,
461  float* amax,
462  lapack_int* info );
463 
464 #define LAPACK_dgbequb LAPACK_GLOBAL(dgbequb,DGBEQUB)
465 void LAPACK_dgbequb(
466  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
467  double const* AB, lapack_int const* ldab,
468  double* R,
469  double* C,
470  double* rowcnd,
471  double* colcnd,
472  double* amax,
473  lapack_int* info );
474 
475 #define LAPACK_sgbequb LAPACK_GLOBAL(sgbequb,SGBEQUB)
476 void LAPACK_sgbequb(
477  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
478  float const* AB, lapack_int const* ldab,
479  float* R,
480  float* C,
481  float* rowcnd,
482  float* colcnd,
483  float* amax,
484  lapack_int* info );
485 
486 #define LAPACK_zgbequb LAPACK_GLOBAL(zgbequb,ZGBEQUB)
487 void LAPACK_zgbequb(
488  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
489  lapack_complex_double const* AB, lapack_int const* ldab,
490  double* R,
491  double* C,
492  double* rowcnd,
493  double* colcnd,
494  double* amax,
495  lapack_int* info );
496 
497 #define LAPACK_cgbrfs LAPACK_GLOBAL(cgbrfs,CGBRFS)
498 void LAPACK_cgbrfs(
499  char const* trans,
500  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
501  lapack_complex_float const* AB, lapack_int const* ldab,
502  lapack_complex_float const* AFB, lapack_int const* ldafb, lapack_int const* ipiv,
503  lapack_complex_float const* B, lapack_int const* ldb,
504  lapack_complex_float* X, lapack_int const* ldx,
505  float* ferr,
506  float* berr,
507  lapack_complex_float* work,
508  float* rwork,
509  lapack_int* info );
510 
511 #define LAPACK_dgbrfs LAPACK_GLOBAL(dgbrfs,DGBRFS)
512 void LAPACK_dgbrfs(
513  char const* trans,
514  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
515  double const* AB, lapack_int const* ldab,
516  double const* AFB, lapack_int const* ldafb, lapack_int const* ipiv,
517  double const* B, lapack_int const* ldb,
518  double* X, lapack_int const* ldx,
519  double* ferr,
520  double* berr,
521  double* work,
522  lapack_int* iwork,
523  lapack_int* info );
524 
525 #define LAPACK_sgbrfs LAPACK_GLOBAL(sgbrfs,SGBRFS)
526 void LAPACK_sgbrfs(
527  char const* trans,
528  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
529  float const* AB, lapack_int const* ldab,
530  float const* AFB, lapack_int const* ldafb, lapack_int const* ipiv,
531  float const* B, lapack_int const* ldb,
532  float* X, lapack_int const* ldx,
533  float* ferr,
534  float* berr,
535  float* work,
536  lapack_int* iwork,
537  lapack_int* info );
538 
539 #define LAPACK_zgbrfs LAPACK_GLOBAL(zgbrfs,ZGBRFS)
540 void LAPACK_zgbrfs(
541  char const* trans,
542  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
543  lapack_complex_double const* AB, lapack_int const* ldab,
544  lapack_complex_double const* AFB, lapack_int const* ldafb, lapack_int const* ipiv,
545  lapack_complex_double const* B, lapack_int const* ldb,
546  lapack_complex_double* X, lapack_int const* ldx,
547  double* ferr,
548  double* berr,
549  lapack_complex_double* work,
550  double* rwork,
551  lapack_int* info );
552 
553 #define LAPACK_cgbrfsx LAPACK_GLOBAL(cgbrfsx,CGBRFSX)
554 void LAPACK_cgbrfsx(
555  char const* trans, char const* equed,
556  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
557  lapack_complex_float const* AB, lapack_int const* ldab,
558  lapack_complex_float const* AFB, lapack_int const* ldafb, lapack_int const* ipiv,
559  float* R,
560  float* C,
561  lapack_complex_float const* B, lapack_int const* ldb,
562  lapack_complex_float* X, lapack_int const* ldx,
563  float* rcond,
564  float* berr, lapack_int const* n_err_bnds,
565  float* err_bnds_norm,
566  float* err_bnds_comp, lapack_int const* nparams,
567  float* params,
568  lapack_complex_float* work,
569  float* rwork,
570  lapack_int* info );
571 
572 #define LAPACK_dgbrfsx LAPACK_GLOBAL(dgbrfsx,DGBRFSX)
573 void LAPACK_dgbrfsx(
574  char const* trans, char const* equed,
575  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
576  double const* AB, lapack_int const* ldab,
577  double const* AFB, lapack_int const* ldafb, lapack_int const* ipiv,
578  double* R,
579  double* C,
580  double const* B, lapack_int const* ldb,
581  double* X, lapack_int const* ldx,
582  double* rcond,
583  double* berr, lapack_int const* n_err_bnds,
584  double* err_bnds_norm,
585  double* err_bnds_comp, lapack_int const* nparams,
586  double* params,
587  double* work,
588  lapack_int* iwork,
589  lapack_int* info );
590 
591 #define LAPACK_sgbrfsx LAPACK_GLOBAL(sgbrfsx,SGBRFSX)
592 void LAPACK_sgbrfsx(
593  char const* trans, char const* equed,
594  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
595  float const* AB, lapack_int const* ldab,
596  float const* AFB, lapack_int const* ldafb, lapack_int const* ipiv,
597  float* R,
598  float* C,
599  float const* B, lapack_int const* ldb,
600  float* X, lapack_int const* ldx,
601  float* rcond,
602  float* berr, lapack_int const* n_err_bnds,
603  float* err_bnds_norm,
604  float* err_bnds_comp, lapack_int const* nparams,
605  float* params,
606  float* work,
607  lapack_int* iwork,
608  lapack_int* info );
609 
610 #define LAPACK_zgbrfsx LAPACK_GLOBAL(zgbrfsx,ZGBRFSX)
611 void LAPACK_zgbrfsx(
612  char const* trans, char const* equed,
613  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
614  lapack_complex_double const* AB, lapack_int const* ldab,
615  lapack_complex_double const* AFB, lapack_int const* ldafb, lapack_int const* ipiv,
616  double* R,
617  double* C,
618  lapack_complex_double const* B, lapack_int const* ldb,
619  lapack_complex_double* X, lapack_int const* ldx,
620  double* rcond,
621  double* berr, lapack_int const* n_err_bnds,
622  double* err_bnds_norm,
623  double* err_bnds_comp, lapack_int const* nparams,
624  double* params,
625  lapack_complex_double* work,
626  double* rwork,
627  lapack_int* info );
628 
629 #define LAPACK_cgbsv LAPACK_GLOBAL(cgbsv,CGBSV)
630 void LAPACK_cgbsv(
631  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
632  lapack_complex_float* AB, lapack_int const* ldab, lapack_int* ipiv,
633  lapack_complex_float* B, lapack_int const* ldb,
634  lapack_int* info );
635 
636 #define LAPACK_dgbsv LAPACK_GLOBAL(dgbsv,DGBSV)
637 void LAPACK_dgbsv(
638  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
639  double* AB, lapack_int const* ldab, lapack_int* ipiv,
640  double* B, lapack_int const* ldb,
641  lapack_int* info );
642 
643 #define LAPACK_sgbsv LAPACK_GLOBAL(sgbsv,SGBSV)
644 void LAPACK_sgbsv(
645  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
646  float* AB, lapack_int const* ldab, lapack_int* ipiv,
647  float* B, lapack_int const* ldb,
648  lapack_int* info );
649 
650 #define LAPACK_zgbsv LAPACK_GLOBAL(zgbsv,ZGBSV)
651 void LAPACK_zgbsv(
652  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
653  lapack_complex_double* AB, lapack_int const* ldab, lapack_int* ipiv,
654  lapack_complex_double* B, lapack_int const* ldb,
655  lapack_int* info );
656 
657 #define LAPACK_cgbsvx LAPACK_GLOBAL(cgbsvx,CGBSVX)
658 void LAPACK_cgbsvx(
659  char const* fact, char const* trans,
660  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
661  lapack_complex_float* AB, lapack_int const* ldab,
662  lapack_complex_float* AFB, lapack_int const* ldafb, lapack_int* ipiv, char* equed,
663  float* R,
664  float* C,
665  lapack_complex_float* B,
666  lapack_int const* ldb,
667  lapack_complex_float* X, lapack_int const* ldx,
668  float* rcond,
669  float* ferr,
670  float* berr,
671  lapack_complex_float* work,
672  float* rwork,
673  lapack_int* info );
674 
675 #define LAPACK_dgbsvx LAPACK_GLOBAL(dgbsvx,DGBSVX)
676 void LAPACK_dgbsvx(
677  char const* fact, char const* trans,
678  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
679  double* AB, lapack_int const* ldab,
680  double* AFB, lapack_int const* ldafb, lapack_int* ipiv, char* equed,
681  double* R,
682  double* C,
683  double* B,
684  lapack_int const* ldb,
685  double* X, lapack_int const* ldx,
686  double* rcond,
687  double* ferr,
688  double* berr,
689  double* work,
690  lapack_int* iwork,
691  lapack_int* info );
692 
693 #define LAPACK_sgbsvx LAPACK_GLOBAL(sgbsvx,SGBSVX)
694 void LAPACK_sgbsvx(
695  char const* fact, char const* trans,
696  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
697  float* AB, lapack_int const* ldab,
698  float* AFB, lapack_int const* ldafb, lapack_int* ipiv, char* equed,
699  float* R,
700  float* C,
701  float* B,
702  lapack_int const* ldb,
703  float* X, lapack_int const* ldx,
704  float* rcond,
705  float* ferr,
706  float* berr,
707  float* work,
708  lapack_int* iwork,
709  lapack_int* info );
710 
711 #define LAPACK_zgbsvx LAPACK_GLOBAL(zgbsvx,ZGBSVX)
712 void LAPACK_zgbsvx(
713  char const* fact, char const* trans,
714  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
715  lapack_complex_double* AB, lapack_int const* ldab,
716  lapack_complex_double* AFB, lapack_int const* ldafb, lapack_int* ipiv, char* equed,
717  double* R,
718  double* C,
719  lapack_complex_double* B,
720  lapack_int const* ldb,
721  lapack_complex_double* X, lapack_int const* ldx,
722  double* rcond,
723  double* ferr,
724  double* berr,
725  lapack_complex_double* work,
726  double* rwork,
727  lapack_int* info );
728 
729 #define LAPACK_cgbsvxx LAPACK_GLOBAL(cgbsvxx,CGBSVXX)
730 void LAPACK_cgbsvxx(
731  char const* fact, char const* trans,
732  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
733  lapack_complex_float* AB, lapack_int const* ldab,
734  lapack_complex_float* AFB, lapack_int const* ldafb, lapack_int* ipiv, char* equed,
735  float* R,
736  float* C,
737  lapack_complex_float* B,
738  lapack_int const* ldb,
739  lapack_complex_float* X, lapack_int const* ldx,
740  float* rcond,
741  float* rpvgrw,
742  float* berr, lapack_int const* n_err_bnds,
743  float* err_bnds_norm,
744  float* err_bnds_comp, lapack_int const* nparams,
745  float* params,
746  lapack_complex_float* work,
747  float* rwork,
748  lapack_int* info );
749 
750 #define LAPACK_dgbsvxx LAPACK_GLOBAL(dgbsvxx,DGBSVXX)
751 void LAPACK_dgbsvxx(
752  char const* fact, char const* trans,
753  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
754  double* AB, lapack_int const* ldab,
755  double* AFB, lapack_int const* ldafb, lapack_int* ipiv, char* equed,
756  double* R,
757  double* C,
758  double* B,
759  lapack_int const* ldb,
760  double* X, lapack_int const* ldx,
761  double* rcond,
762  double* rpvgrw,
763  double* berr, lapack_int const* n_err_bnds,
764  double* err_bnds_norm,
765  double* err_bnds_comp, lapack_int const* nparams,
766  double* params,
767  double* work,
768  lapack_int* iwork,
769  lapack_int* info );
770 
771 #define LAPACK_sgbsvxx LAPACK_GLOBAL(sgbsvxx,SGBSVXX)
772 void LAPACK_sgbsvxx(
773  char const* fact, char const* trans,
774  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
775  float* AB, lapack_int const* ldab,
776  float* AFB, lapack_int const* ldafb, lapack_int* ipiv, char* equed,
777  float* R,
778  float* C,
779  float* B,
780  lapack_int const* ldb,
781  float* X, lapack_int const* ldx,
782  float* rcond,
783  float* rpvgrw,
784  float* berr, lapack_int const* n_err_bnds,
785  float* err_bnds_norm,
786  float* err_bnds_comp, lapack_int const* nparams,
787  float* params,
788  float* work,
789  lapack_int* iwork,
790  lapack_int* info );
791 
792 #define LAPACK_zgbsvxx LAPACK_GLOBAL(zgbsvxx,ZGBSVXX)
793 void LAPACK_zgbsvxx(
794  char const* fact, char const* trans,
795  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
796  lapack_complex_double* AB, lapack_int const* ldab,
797  lapack_complex_double* AFB, lapack_int const* ldafb, lapack_int* ipiv, char* equed,
798  double* R,
799  double* C,
800  lapack_complex_double* B,
801  lapack_int const* ldb,
802  lapack_complex_double* X, lapack_int const* ldx,
803  double* rcond,
804  double* rpvgrw,
805  double* berr, lapack_int const* n_err_bnds,
806  double* err_bnds_norm,
807  double* err_bnds_comp, lapack_int const* nparams,
808  double* params,
809  lapack_complex_double* work,
810  double* rwork,
811  lapack_int* info );
812 
813 #define LAPACK_cgbtrf LAPACK_GLOBAL(cgbtrf,CGBTRF)
814 void LAPACK_cgbtrf(
815  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
816  lapack_complex_float* AB, lapack_int const* ldab, lapack_int* ipiv,
817  lapack_int* info );
818 
819 #define LAPACK_dgbtrf LAPACK_GLOBAL(dgbtrf,DGBTRF)
820 void LAPACK_dgbtrf(
821  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
822  double* AB, lapack_int const* ldab, lapack_int* ipiv,
823  lapack_int* info );
824 
825 #define LAPACK_sgbtrf LAPACK_GLOBAL(sgbtrf,SGBTRF)
826 void LAPACK_sgbtrf(
827  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
828  float* AB, lapack_int const* ldab, lapack_int* ipiv,
829  lapack_int* info );
830 
831 #define LAPACK_zgbtrf LAPACK_GLOBAL(zgbtrf,ZGBTRF)
832 void LAPACK_zgbtrf(
833  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
834  lapack_complex_double* AB, lapack_int const* ldab, lapack_int* ipiv,
835  lapack_int* info );
836 
837 #define LAPACK_cgbtrs LAPACK_GLOBAL(cgbtrs,CGBTRS)
838 void LAPACK_cgbtrs(
839  char const* trans,
840  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
841  lapack_complex_float const* AB, lapack_int const* ldab, lapack_int const* ipiv,
842  lapack_complex_float* B, lapack_int const* ldb,
843  lapack_int* info );
844 
845 #define LAPACK_dgbtrs LAPACK_GLOBAL(dgbtrs,DGBTRS)
846 void LAPACK_dgbtrs(
847  char const* trans,
848  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
849  double const* AB, lapack_int const* ldab, lapack_int const* ipiv,
850  double* B, lapack_int const* ldb,
851  lapack_int* info );
852 
853 #define LAPACK_sgbtrs LAPACK_GLOBAL(sgbtrs,SGBTRS)
854 void LAPACK_sgbtrs(
855  char const* trans,
856  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
857  float const* AB, lapack_int const* ldab, lapack_int const* ipiv,
858  float* B, lapack_int const* ldb,
859  lapack_int* info );
860 
861 #define LAPACK_zgbtrs LAPACK_GLOBAL(zgbtrs,ZGBTRS)
862 void LAPACK_zgbtrs(
863  char const* trans,
864  lapack_int const* n, lapack_int const* kl, lapack_int const* ku, lapack_int const* nrhs,
865  lapack_complex_double const* AB, lapack_int const* ldab, lapack_int const* ipiv,
866  lapack_complex_double* B, lapack_int const* ldb,
867  lapack_int* info );
868 
869 #define LAPACK_cgebak LAPACK_GLOBAL(cgebak,CGEBAK)
870 void LAPACK_cgebak(
871  char const* job, char const* side,
872  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
873  float const* scale, lapack_int const* m,
874  lapack_complex_float* V, lapack_int const* ldv,
875  lapack_int* info );
876 
877 #define LAPACK_dgebak LAPACK_GLOBAL(dgebak,DGEBAK)
878 void LAPACK_dgebak(
879  char const* job, char const* side,
880  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
881  double const* scale, lapack_int const* m,
882  double* V, lapack_int const* ldv,
883  lapack_int* info );
884 
885 #define LAPACK_sgebak LAPACK_GLOBAL(sgebak,SGEBAK)
886 void LAPACK_sgebak(
887  char const* job, char const* side,
888  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
889  float const* scale, lapack_int const* m,
890  float* V, lapack_int const* ldv,
891  lapack_int* info );
892 
893 #define LAPACK_zgebak LAPACK_GLOBAL(zgebak,ZGEBAK)
894 void LAPACK_zgebak(
895  char const* job, char const* side,
896  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
897  double const* scale, lapack_int const* m,
898  lapack_complex_double* V, lapack_int const* ldv,
899  lapack_int* info );
900 
901 #define LAPACK_cgebal LAPACK_GLOBAL(cgebal,CGEBAL)
902 void LAPACK_cgebal(
903  char const* job,
904  lapack_int const* n,
905  lapack_complex_float* A, lapack_int const* lda, lapack_int* ilo, lapack_int* ihi,
906  float* scale,
907  lapack_int* info );
908 
909 #define LAPACK_dgebal LAPACK_GLOBAL(dgebal,DGEBAL)
910 void LAPACK_dgebal(
911  char const* job,
912  lapack_int const* n,
913  double* A, lapack_int const* lda, lapack_int* ilo, lapack_int* ihi,
914  double* scale,
915  lapack_int* info );
916 
917 #define LAPACK_sgebal LAPACK_GLOBAL(sgebal,SGEBAL)
918 void LAPACK_sgebal(
919  char const* job,
920  lapack_int const* n,
921  float* A, lapack_int const* lda, lapack_int* ilo, lapack_int* ihi,
922  float* scale,
923  lapack_int* info );
924 
925 #define LAPACK_zgebal LAPACK_GLOBAL(zgebal,ZGEBAL)
926 void LAPACK_zgebal(
927  char const* job,
928  lapack_int const* n,
929  lapack_complex_double* A, lapack_int const* lda, lapack_int* ilo, lapack_int* ihi,
930  double* scale,
931  lapack_int* info );
932 
933 #define LAPACK_cgebrd LAPACK_GLOBAL(cgebrd,CGEBRD)
934 void LAPACK_cgebrd(
935  lapack_int const* m, lapack_int const* n,
936  lapack_complex_float* A, lapack_int const* lda,
937  float* D,
938  float* E,
939  lapack_complex_float* tauq,
940  lapack_complex_float* taup,
941  lapack_complex_float* work, lapack_int const* lwork,
942  lapack_int* info );
943 
944 #define LAPACK_dgebrd LAPACK_GLOBAL(dgebrd,DGEBRD)
945 void LAPACK_dgebrd(
946  lapack_int const* m, lapack_int const* n,
947  double* A, lapack_int const* lda,
948  double* D,
949  double* E,
950  double* tauq,
951  double* taup,
952  double* work, lapack_int const* lwork,
953  lapack_int* info );
954 
955 #define LAPACK_sgebrd LAPACK_GLOBAL(sgebrd,SGEBRD)
956 void LAPACK_sgebrd(
957  lapack_int const* m, lapack_int const* n,
958  float* A, lapack_int const* lda,
959  float* D,
960  float* E,
961  float* tauq,
962  float* taup,
963  float* work, lapack_int const* lwork,
964  lapack_int* info );
965 
966 #define LAPACK_zgebrd LAPACK_GLOBAL(zgebrd,ZGEBRD)
967 void LAPACK_zgebrd(
968  lapack_int const* m, lapack_int const* n,
969  lapack_complex_double* A, lapack_int const* lda,
970  double* D,
971  double* E,
972  lapack_complex_double* tauq,
973  lapack_complex_double* taup,
974  lapack_complex_double* work, lapack_int const* lwork,
975  lapack_int* info );
976 
977 #define LAPACK_cgecon LAPACK_GLOBAL(cgecon,CGECON)
978 void LAPACK_cgecon(
979  char const* norm,
980  lapack_int const* n,
981  lapack_complex_float const* A, lapack_int const* lda,
982  float const* anorm,
983  float* rcond,
984  lapack_complex_float* work,
985  float* rwork,
986  lapack_int* info );
987 
988 #define LAPACK_dgecon LAPACK_GLOBAL(dgecon,DGECON)
989 void LAPACK_dgecon(
990  char const* norm,
991  lapack_int const* n,
992  double const* A, lapack_int const* lda,
993  double const* anorm,
994  double* rcond,
995  double* work,
996  lapack_int* iwork,
997  lapack_int* info );
998 
999 #define LAPACK_sgecon LAPACK_GLOBAL(sgecon,SGECON)
1000 void LAPACK_sgecon(
1001  char const* norm,
1002  lapack_int const* n,
1003  float const* A, lapack_int const* lda,
1004  float const* anorm,
1005  float* rcond,
1006  float* work,
1007  lapack_int* iwork,
1008  lapack_int* info );
1009 
1010 #define LAPACK_zgecon LAPACK_GLOBAL(zgecon,ZGECON)
1011 void LAPACK_zgecon(
1012  char const* norm,
1013  lapack_int const* n,
1014  lapack_complex_double const* A, lapack_int const* lda,
1015  double const* anorm,
1016  double* rcond,
1017  lapack_complex_double* work,
1018  double* rwork,
1019  lapack_int* info );
1020 
1021 #define LAPACK_cgeequ LAPACK_GLOBAL(cgeequ,CGEEQU)
1022 void LAPACK_cgeequ(
1023  lapack_int const* m, lapack_int const* n,
1024  lapack_complex_float const* A, lapack_int const* lda,
1025  float* R,
1026  float* C,
1027  float* rowcnd,
1028  float* colcnd,
1029  float* amax,
1030  lapack_int* info );
1031 
1032 #define LAPACK_dgeequ LAPACK_GLOBAL(dgeequ,DGEEQU)
1033 void LAPACK_dgeequ(
1034  lapack_int const* m, lapack_int const* n,
1035  double const* A, lapack_int const* lda,
1036  double* R,
1037  double* C,
1038  double* rowcnd,
1039  double* colcnd,
1040  double* amax,
1041  lapack_int* info );
1042 
1043 #define LAPACK_sgeequ LAPACK_GLOBAL(sgeequ,SGEEQU)
1044 void LAPACK_sgeequ(
1045  lapack_int const* m, lapack_int const* n,
1046  float const* A, lapack_int const* lda,
1047  float* R,
1048  float* C,
1049  float* rowcnd,
1050  float* colcnd,
1051  float* amax,
1052  lapack_int* info );
1053 
1054 #define LAPACK_zgeequ LAPACK_GLOBAL(zgeequ,ZGEEQU)
1055 void LAPACK_zgeequ(
1056  lapack_int const* m, lapack_int const* n,
1057  lapack_complex_double const* A, lapack_int const* lda,
1058  double* R,
1059  double* C,
1060  double* rowcnd,
1061  double* colcnd,
1062  double* amax,
1063  lapack_int* info );
1064 
1065 #define LAPACK_cgeequb LAPACK_GLOBAL(cgeequb,CGEEQUB)
1066 void LAPACK_cgeequb(
1067  lapack_int const* m, lapack_int const* n,
1068  lapack_complex_float const* A, lapack_int const* lda,
1069  float* R,
1070  float* C,
1071  float* rowcnd,
1072  float* colcnd,
1073  float* amax,
1074  lapack_int* info );
1075 
1076 #define LAPACK_dgeequb LAPACK_GLOBAL(dgeequb,DGEEQUB)
1077 void LAPACK_dgeequb(
1078  lapack_int const* m, lapack_int const* n,
1079  double const* A, lapack_int const* lda,
1080  double* R,
1081  double* C,
1082  double* rowcnd,
1083  double* colcnd,
1084  double* amax,
1085  lapack_int* info );
1086 
1087 #define LAPACK_sgeequb LAPACK_GLOBAL(sgeequb,SGEEQUB)
1088 void LAPACK_sgeequb(
1089  lapack_int const* m, lapack_int const* n,
1090  float const* A, lapack_int const* lda,
1091  float* R,
1092  float* C,
1093  float* rowcnd,
1094  float* colcnd,
1095  float* amax,
1096  lapack_int* info );
1097 
1098 #define LAPACK_zgeequb LAPACK_GLOBAL(zgeequb,ZGEEQUB)
1099 void LAPACK_zgeequb(
1100  lapack_int const* m, lapack_int const* n,
1101  lapack_complex_double const* A, lapack_int const* lda,
1102  double* R,
1103  double* C,
1104  double* rowcnd,
1105  double* colcnd,
1106  double* amax,
1107  lapack_int* info );
1108 
1109 #define LAPACK_cgees LAPACK_GLOBAL(cgees,CGEES)
1110 void LAPACK_cgees(
1111  char const* jobvs, char const* sort, LAPACK_C_SELECT1 select,
1112  lapack_int const* n,
1113  lapack_complex_float* A, lapack_int const* lda, lapack_int* sdim,
1114  lapack_complex_float* W,
1115  lapack_complex_float* VS, lapack_int const* ldvs,
1116  lapack_complex_float* work, lapack_int const* lwork,
1117  float* rwork, lapack_logical* BWORK,
1118  lapack_int* info );
1119 
1120 #define LAPACK_dgees LAPACK_GLOBAL(dgees,DGEES)
1121 void LAPACK_dgees(
1122  char const* jobvs, char const* sort, LAPACK_D_SELECT2 select,
1123  lapack_int const* n,
1124  double* A, lapack_int const* lda, lapack_int* sdim,
1125  double* WR,
1126  double* WI,
1127  double* VS, lapack_int const* ldvs,
1128  double* work, lapack_int const* lwork, lapack_logical* BWORK,
1129  lapack_int* info );
1130 
1131 #define LAPACK_sgees LAPACK_GLOBAL(sgees,SGEES)
1132 void LAPACK_sgees(
1133  char const* jobvs, char const* sort, LAPACK_S_SELECT2 select,
1134  lapack_int const* n,
1135  float* A, lapack_int const* lda, lapack_int* sdim,
1136  float* WR,
1137  float* WI,
1138  float* VS, lapack_int const* ldvs,
1139  float* work, lapack_int const* lwork, lapack_logical* BWORK,
1140  lapack_int* info );
1141 
1142 #define LAPACK_zgees LAPACK_GLOBAL(zgees,ZGEES)
1143 void LAPACK_zgees(
1144  char const* jobvs, char const* sort, LAPACK_Z_SELECT1 select,
1145  lapack_int const* n,
1146  lapack_complex_double* A, lapack_int const* lda, lapack_int* sdim,
1147  lapack_complex_double* W,
1148  lapack_complex_double* VS, lapack_int const* ldvs,
1149  lapack_complex_double* work, lapack_int const* lwork,
1150  double* rwork, lapack_logical* BWORK,
1151  lapack_int* info );
1152 
1153 #define LAPACK_cgeesx LAPACK_GLOBAL(cgeesx,CGEESX)
1154 void LAPACK_cgeesx(
1155  char const* jobvs, char const* sort, LAPACK_C_SELECT1 select, char const* sense,
1156  lapack_int const* n,
1157  lapack_complex_float* A, lapack_int const* lda, lapack_int* sdim,
1158  lapack_complex_float* W,
1159  lapack_complex_float* VS, lapack_int const* ldvs,
1160  float* rconde,
1161  float* rcondv,
1162  lapack_complex_float* work, lapack_int const* lwork,
1163  float* rwork, lapack_logical* BWORK,
1164  lapack_int* info );
1165 
1166 #define LAPACK_dgeesx LAPACK_GLOBAL(dgeesx,DGEESX)
1167 void LAPACK_dgeesx(
1168  char const* jobvs, char const* sort, LAPACK_D_SELECT2 select, char const* sense,
1169  lapack_int const* n,
1170  double* A, lapack_int const* lda, lapack_int* sdim,
1171  double* WR,
1172  double* WI,
1173  double* VS, lapack_int const* ldvs,
1174  double* rconde,
1175  double* rcondv,
1176  double* work, lapack_int const* lwork,
1177  lapack_int* iwork, lapack_int const* liwork, lapack_logical* BWORK,
1178  lapack_int* info );
1179 
1180 #define LAPACK_sgeesx LAPACK_GLOBAL(sgeesx,SGEESX)
1181 void LAPACK_sgeesx(
1182  char const* jobvs, char const* sort, LAPACK_S_SELECT2 select, char const* sense,
1183  lapack_int const* n,
1184  float* A, lapack_int const* lda, lapack_int* sdim,
1185  float* WR,
1186  float* WI,
1187  float* VS, lapack_int const* ldvs,
1188  float* rconde,
1189  float* rcondv,
1190  float* work, lapack_int const* lwork,
1191  lapack_int* iwork, lapack_int const* liwork, lapack_logical* BWORK,
1192  lapack_int* info );
1193 
1194 #define LAPACK_zgeesx LAPACK_GLOBAL(zgeesx,ZGEESX)
1195 void LAPACK_zgeesx(
1196  char const* jobvs, char const* sort, LAPACK_Z_SELECT1 select, char const* sense,
1197  lapack_int const* n,
1198  lapack_complex_double* A, lapack_int const* lda, lapack_int* sdim,
1199  lapack_complex_double* W,
1200  lapack_complex_double* VS, lapack_int const* ldvs,
1201  double* rconde,
1202  double* rcondv,
1203  lapack_complex_double* work, lapack_int const* lwork,
1204  double* rwork, lapack_logical* BWORK,
1205  lapack_int* info );
1206 
1207 #define LAPACK_cgeev LAPACK_GLOBAL(cgeev,CGEEV)
1208 void LAPACK_cgeev(
1209  char const* jobvl, char const* jobvr,
1210  lapack_int const* n,
1211  lapack_complex_float* A, lapack_int const* lda,
1212  lapack_complex_float* W,
1213  lapack_complex_float* VL, lapack_int const* ldvl,
1214  lapack_complex_float* VR, lapack_int const* ldvr,
1215  lapack_complex_float* work, lapack_int const* lwork,
1216  float* rwork,
1217  lapack_int* info );
1218 
1219 #define LAPACK_dgeev LAPACK_GLOBAL(dgeev,DGEEV)
1220 void LAPACK_dgeev(
1221  char const* jobvl, char const* jobvr,
1222  lapack_int const* n,
1223  double* A, lapack_int const* lda,
1224  double* WR,
1225  double* WI,
1226  double* VL, lapack_int const* ldvl,
1227  double* VR, lapack_int const* ldvr,
1228  double* work, lapack_int const* lwork,
1229  lapack_int* info );
1230 
1231 #define LAPACK_sgeev LAPACK_GLOBAL(sgeev,SGEEV)
1232 void LAPACK_sgeev(
1233  char const* jobvl, char const* jobvr,
1234  lapack_int const* n,
1235  float* A, lapack_int const* lda,
1236  float* WR,
1237  float* WI,
1238  float* VL, lapack_int const* ldvl,
1239  float* VR, lapack_int const* ldvr,
1240  float* work, lapack_int const* lwork,
1241  lapack_int* info );
1242 
1243 #define LAPACK_zgeev LAPACK_GLOBAL(zgeev,ZGEEV)
1244 void LAPACK_zgeev(
1245  char const* jobvl, char const* jobvr,
1246  lapack_int const* n,
1247  lapack_complex_double* A, lapack_int const* lda,
1248  lapack_complex_double* W,
1249  lapack_complex_double* VL, lapack_int const* ldvl,
1250  lapack_complex_double* VR, lapack_int const* ldvr,
1251  lapack_complex_double* work, lapack_int const* lwork,
1252  double* rwork,
1253  lapack_int* info );
1254 
1255 #define LAPACK_cgeevx LAPACK_GLOBAL(cgeevx,CGEEVX)
1256 void LAPACK_cgeevx(
1257  char const* balanc, char const* jobvl, char const* jobvr, char const* sense,
1258  lapack_int const* n,
1259  lapack_complex_float* A, lapack_int const* lda,
1260  lapack_complex_float* W,
1261  lapack_complex_float* VL, lapack_int const* ldvl,
1262  lapack_complex_float* VR, lapack_int const* ldvr, lapack_int* ilo, lapack_int* ihi,
1263  float* scale,
1264  float* abnrm,
1265  float* rconde,
1266  float* rcondv,
1267  lapack_complex_float* work, lapack_int const* lwork,
1268  float* rwork,
1269  lapack_int* info );
1270 
1271 #define LAPACK_dgeevx LAPACK_GLOBAL(dgeevx,DGEEVX)
1272 void LAPACK_dgeevx(
1273  char const* balanc, char const* jobvl, char const* jobvr, char const* sense,
1274  lapack_int const* n,
1275  double* A, lapack_int const* lda,
1276  double* WR,
1277  double* WI,
1278  double* VL, lapack_int const* ldvl,
1279  double* VR, lapack_int const* ldvr, lapack_int* ilo, lapack_int* ihi,
1280  double* scale,
1281  double* abnrm,
1282  double* rconde,
1283  double* rcondv,
1284  double* work, lapack_int const* lwork,
1285  lapack_int* iwork,
1286  lapack_int* info );
1287 
1288 #define LAPACK_sgeevx LAPACK_GLOBAL(sgeevx,SGEEVX)
1289 void LAPACK_sgeevx(
1290  char const* balanc, char const* jobvl, char const* jobvr, char const* sense,
1291  lapack_int const* n,
1292  float* A, lapack_int const* lda,
1293  float* WR,
1294  float* WI,
1295  float* VL, lapack_int const* ldvl,
1296  float* VR, lapack_int const* ldvr, lapack_int* ilo, lapack_int* ihi,
1297  float* scale,
1298  float* abnrm,
1299  float* rconde,
1300  float* rcondv,
1301  float* work, lapack_int const* lwork,
1302  lapack_int* iwork,
1303  lapack_int* info );
1304 
1305 #define LAPACK_zgeevx LAPACK_GLOBAL(zgeevx,ZGEEVX)
1306 void LAPACK_zgeevx(
1307  char const* balanc, char const* jobvl, char const* jobvr, char const* sense,
1308  lapack_int const* n,
1309  lapack_complex_double* A, lapack_int const* lda,
1310  lapack_complex_double* W,
1311  lapack_complex_double* VL, lapack_int const* ldvl,
1312  lapack_complex_double* VR, lapack_int const* ldvr, lapack_int* ilo, lapack_int* ihi,
1313  double* scale,
1314  double* abnrm,
1315  double* rconde,
1316  double* rcondv,
1317  lapack_complex_double* work, lapack_int const* lwork,
1318  double* rwork,
1319  lapack_int* info );
1320 
1321 #define LAPACK_cgehrd LAPACK_GLOBAL(cgehrd,CGEHRD)
1322 void LAPACK_cgehrd(
1323  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
1324  lapack_complex_float* A, lapack_int const* lda,
1325  lapack_complex_float* tau,
1326  lapack_complex_float* work, lapack_int const* lwork,
1327  lapack_int* info );
1328 
1329 #define LAPACK_dgehrd LAPACK_GLOBAL(dgehrd,DGEHRD)
1330 void LAPACK_dgehrd(
1331  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
1332  double* A, lapack_int const* lda,
1333  double* tau,
1334  double* work, lapack_int const* lwork,
1335  lapack_int* info );
1336 
1337 #define LAPACK_sgehrd LAPACK_GLOBAL(sgehrd,SGEHRD)
1338 void LAPACK_sgehrd(
1339  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
1340  float* A, lapack_int const* lda,
1341  float* tau,
1342  float* work, lapack_int const* lwork,
1343  lapack_int* info );
1344 
1345 #define LAPACK_zgehrd LAPACK_GLOBAL(zgehrd,ZGEHRD)
1346 void LAPACK_zgehrd(
1347  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
1348  lapack_complex_double* A, lapack_int const* lda,
1349  lapack_complex_double* tau,
1350  lapack_complex_double* work, lapack_int const* lwork,
1351  lapack_int* info );
1352 
1353 #define LAPACK_cgejsv LAPACK_GLOBAL(cgejsv,CGEJSV)
1354 void LAPACK_cgejsv(
1355  char const* joba, char const* jobu, char const* jobv, char const* jobr, char const* jobt, char const* jobp,
1356  lapack_int const* m, lapack_int const* n,
1357  lapack_complex_float* A, lapack_int const* lda,
1358  float* SVA,
1359  lapack_complex_float* U, lapack_int const* ldu,
1360  lapack_complex_float* V, lapack_int const* ldv,
1361  lapack_complex_float* cwork, lapack_int const* lwork,
1362  float* rwork, lapack_int const* lrwork,
1363  lapack_int* iwork,
1364  lapack_int* info );
1365 
1366 #define LAPACK_dgejsv LAPACK_GLOBAL(dgejsv,DGEJSV)
1367 void LAPACK_dgejsv(
1368  char const* joba, char const* jobu, char const* jobv, char const* jobr, char const* jobt, char const* jobp,
1369  lapack_int const* m, lapack_int const* n,
1370  double* A, lapack_int const* lda,
1371  double* SVA,
1372  double* U, lapack_int const* ldu,
1373  double* V, lapack_int const* ldv,
1374  double* work, lapack_int const* lwork,
1375  lapack_int* iwork,
1376  lapack_int* info );
1377 
1378 #define LAPACK_sgejsv LAPACK_GLOBAL(sgejsv,SGEJSV)
1379 void LAPACK_sgejsv(
1380  char const* joba, char const* jobu, char const* jobv, char const* jobr, char const* jobt, char const* jobp,
1381  lapack_int const* m, lapack_int const* n,
1382  float* A, lapack_int const* lda,
1383  float* SVA,
1384  float* U, lapack_int const* ldu,
1385  float* V, lapack_int const* ldv,
1386  float* work, lapack_int const* lwork,
1387  lapack_int* iwork,
1388  lapack_int* info );
1389 
1390 #define LAPACK_zgejsv LAPACK_GLOBAL(zgejsv,ZGEJSV)
1391 void LAPACK_zgejsv(
1392  char const* joba, char const* jobu, char const* jobv, char const* jobr, char const* jobt, char const* jobp,
1393  lapack_int const* m, lapack_int const* n,
1394  lapack_complex_double* A, lapack_int const* lda,
1395  double* SVA,
1396  lapack_complex_double* U, lapack_int const* ldu,
1397  lapack_complex_double* V, lapack_int const* ldv,
1398  lapack_complex_double* cwork, lapack_int const* lwork,
1399  double* rwork, lapack_int const* lrwork,
1400  lapack_int* iwork,
1401  lapack_int* info );
1402 
1403 #define LAPACK_cgelq LAPACK_GLOBAL(cgelq,CGELQ)
1404 void LAPACK_cgelq(
1405  lapack_int const* m, lapack_int const* n,
1406  lapack_complex_float* A, lapack_int const* lda,
1407  lapack_complex_float* T, lapack_int const* tsize,
1408  lapack_complex_float* work, lapack_int const* lwork,
1409  lapack_int* info );
1410 
1411 #define LAPACK_dgelq LAPACK_GLOBAL(dgelq,DGELQ)
1412 void LAPACK_dgelq(
1413  lapack_int const* m, lapack_int const* n,
1414  double* A, lapack_int const* lda,
1415  double* T, lapack_int const* tsize,
1416  double* work, lapack_int const* lwork,
1417  lapack_int* info );
1418 
1419 #define LAPACK_sgelq LAPACK_GLOBAL(sgelq,SGELQ)
1420 void LAPACK_sgelq(
1421  lapack_int const* m, lapack_int const* n,
1422  float* A, lapack_int const* lda,
1423  float* T, lapack_int const* tsize,
1424  float* work, lapack_int const* lwork,
1425  lapack_int* info );
1426 
1427 #define LAPACK_zgelq LAPACK_GLOBAL(zgelq,ZGELQ)
1428 void LAPACK_zgelq(
1429  lapack_int const* m, lapack_int const* n,
1430  lapack_complex_double* A, lapack_int const* lda,
1431  lapack_complex_double* T, lapack_int const* tsize,
1432  lapack_complex_double* work, lapack_int const* lwork,
1433  lapack_int* info );
1434 
1435 #define LAPACK_cgelq2 LAPACK_GLOBAL(cgelq2,CGELQ2)
1436 void LAPACK_cgelq2(
1437  lapack_int const* m, lapack_int const* n,
1438  lapack_complex_float* A, lapack_int const* lda,
1439  lapack_complex_float* tau,
1440  lapack_complex_float* work,
1441  lapack_int* info );
1442 
1443 #define LAPACK_dgelq2 LAPACK_GLOBAL(dgelq2,DGELQ2)
1444 void LAPACK_dgelq2(
1445  lapack_int const* m, lapack_int const* n,
1446  double* A, lapack_int const* lda,
1447  double* tau,
1448  double* work,
1449  lapack_int* info );
1450 
1451 #define LAPACK_sgelq2 LAPACK_GLOBAL(sgelq2,SGELQ2)
1452 void LAPACK_sgelq2(
1453  lapack_int const* m, lapack_int const* n,
1454  float* A, lapack_int const* lda,
1455  float* tau,
1456  float* work,
1457  lapack_int* info );
1458 
1459 #define LAPACK_zgelq2 LAPACK_GLOBAL(zgelq2,ZGELQ2)
1460 void LAPACK_zgelq2(
1461  lapack_int const* m, lapack_int const* n,
1462  lapack_complex_double* A, lapack_int const* lda,
1463  lapack_complex_double* tau,
1464  lapack_complex_double* work,
1465  lapack_int* info );
1466 
1467 #define LAPACK_cgelqf LAPACK_GLOBAL(cgelqf,CGELQF)
1468 void LAPACK_cgelqf(
1469  lapack_int const* m, lapack_int const* n,
1470  lapack_complex_float* A, lapack_int const* lda,
1471  lapack_complex_float* tau,
1472  lapack_complex_float* work, lapack_int const* lwork,
1473  lapack_int* info );
1474 
1475 #define LAPACK_dgelqf LAPACK_GLOBAL(dgelqf,DGELQF)
1476 void LAPACK_dgelqf(
1477  lapack_int const* m, lapack_int const* n,
1478  double* A, lapack_int const* lda,
1479  double* tau,
1480  double* work, lapack_int const* lwork,
1481  lapack_int* info );
1482 
1483 #define LAPACK_sgelqf LAPACK_GLOBAL(sgelqf,SGELQF)
1484 void LAPACK_sgelqf(
1485  lapack_int const* m, lapack_int const* n,
1486  float* A, lapack_int const* lda,
1487  float* tau,
1488  float* work, lapack_int const* lwork,
1489  lapack_int* info );
1490 
1491 #define LAPACK_zgelqf LAPACK_GLOBAL(zgelqf,ZGELQF)
1492 void LAPACK_zgelqf(
1493  lapack_int const* m, lapack_int const* n,
1494  lapack_complex_double* A, lapack_int const* lda,
1495  lapack_complex_double* tau,
1496  lapack_complex_double* work, lapack_int const* lwork,
1497  lapack_int* info );
1498 
1499 #define LAPACK_cgels LAPACK_GLOBAL(cgels,CGELS)
1500 void LAPACK_cgels(
1501  char const* trans,
1502  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1503  lapack_complex_float* A, lapack_int const* lda,
1504  lapack_complex_float* B, lapack_int const* ldb,
1505  lapack_complex_float* work, lapack_int const* lwork,
1506  lapack_int* info );
1507 
1508 #define LAPACK_dgels LAPACK_GLOBAL(dgels,DGELS)
1509 void LAPACK_dgels(
1510  char const* trans,
1511  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1512  double* A, lapack_int const* lda,
1513  double* B, lapack_int const* ldb,
1514  double* work, lapack_int const* lwork,
1515  lapack_int* info );
1516 
1517 #define LAPACK_sgels LAPACK_GLOBAL(sgels,SGELS)
1518 void LAPACK_sgels(
1519  char const* trans,
1520  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1521  float* A, lapack_int const* lda,
1522  float* B, lapack_int const* ldb,
1523  float* work, lapack_int const* lwork,
1524  lapack_int* info );
1525 
1526 #define LAPACK_zgels LAPACK_GLOBAL(zgels,ZGELS)
1527 void LAPACK_zgels(
1528  char const* trans,
1529  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1530  lapack_complex_double* A, lapack_int const* lda,
1531  lapack_complex_double* B, lapack_int const* ldb,
1532  lapack_complex_double* work, lapack_int const* lwork,
1533  lapack_int* info );
1534 
1535 #define LAPACK_cgelsd LAPACK_GLOBAL(cgelsd,CGELSD)
1536 void LAPACK_cgelsd(
1537  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1538  lapack_complex_float* A, lapack_int const* lda,
1539  lapack_complex_float* B, lapack_int const* ldb,
1540  float* S,
1541  float const* rcond, lapack_int* rank,
1542  lapack_complex_float* work, lapack_int const* lwork,
1543  float* rwork,
1544  lapack_int* iwork,
1545  lapack_int* info );
1546 
1547 #define LAPACK_dgelsd LAPACK_GLOBAL(dgelsd,DGELSD)
1548 void LAPACK_dgelsd(
1549  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1550  double* A, lapack_int const* lda,
1551  double* B, lapack_int const* ldb,
1552  double* S,
1553  double const* rcond, lapack_int* rank,
1554  double* work, lapack_int const* lwork,
1555  lapack_int* iwork,
1556  lapack_int* info );
1557 
1558 #define LAPACK_sgelsd LAPACK_GLOBAL(sgelsd,SGELSD)
1559 void LAPACK_sgelsd(
1560  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1561  float* A, lapack_int const* lda,
1562  float* B, lapack_int const* ldb,
1563  float* S,
1564  float const* rcond, lapack_int* rank,
1565  float* work, lapack_int const* lwork,
1566  lapack_int* iwork,
1567  lapack_int* info );
1568 
1569 #define LAPACK_zgelsd LAPACK_GLOBAL(zgelsd,ZGELSD)
1570 void LAPACK_zgelsd(
1571  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1572  lapack_complex_double* A, lapack_int const* lda,
1573  lapack_complex_double* B, lapack_int const* ldb,
1574  double* S,
1575  double const* rcond, lapack_int* rank,
1576  lapack_complex_double* work, lapack_int const* lwork,
1577  double* rwork,
1578  lapack_int* iwork,
1579  lapack_int* info );
1580 
1581 #define LAPACK_cgelss LAPACK_GLOBAL(cgelss,CGELSS)
1582 void LAPACK_cgelss(
1583  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1584  lapack_complex_float* A, lapack_int const* lda,
1585  lapack_complex_float* B, lapack_int const* ldb,
1586  float* S,
1587  float const* rcond, lapack_int* rank,
1588  lapack_complex_float* work, lapack_int const* lwork,
1589  float* rwork,
1590  lapack_int* info );
1591 
1592 #define LAPACK_dgelss LAPACK_GLOBAL(dgelss,DGELSS)
1593 void LAPACK_dgelss(
1594  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1595  double* A, lapack_int const* lda,
1596  double* B, lapack_int const* ldb,
1597  double* S,
1598  double const* rcond, lapack_int* rank,
1599  double* work, lapack_int const* lwork,
1600  lapack_int* info );
1601 
1602 #define LAPACK_sgelss LAPACK_GLOBAL(sgelss,SGELSS)
1603 void LAPACK_sgelss(
1604  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1605  float* A, lapack_int const* lda,
1606  float* B, lapack_int const* ldb,
1607  float* S,
1608  float const* rcond, lapack_int* rank,
1609  float* work, lapack_int const* lwork,
1610  lapack_int* info );
1611 
1612 #define LAPACK_zgelss LAPACK_GLOBAL(zgelss,ZGELSS)
1613 void LAPACK_zgelss(
1614  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1615  lapack_complex_double* A, lapack_int const* lda,
1616  lapack_complex_double* B, lapack_int const* ldb,
1617  double* S,
1618  double const* rcond, lapack_int* rank,
1619  lapack_complex_double* work, lapack_int const* lwork,
1620  double* rwork,
1621  lapack_int* info );
1622 
1623 #define LAPACK_cgelsy LAPACK_GLOBAL(cgelsy,CGELSY)
1624 void LAPACK_cgelsy(
1625  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1626  lapack_complex_float* A, lapack_int const* lda,
1627  lapack_complex_float* B, lapack_int const* ldb, lapack_int* JPVT,
1628  float const* rcond, lapack_int* rank,
1629  lapack_complex_float* work, lapack_int const* lwork,
1630  float* rwork,
1631  lapack_int* info );
1632 
1633 #define LAPACK_dgelsy LAPACK_GLOBAL(dgelsy,DGELSY)
1634 void LAPACK_dgelsy(
1635  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1636  double* A, lapack_int const* lda,
1637  double* B, lapack_int const* ldb, lapack_int* JPVT,
1638  double const* rcond, lapack_int* rank,
1639  double* work, lapack_int const* lwork,
1640  lapack_int* info );
1641 
1642 #define LAPACK_sgelsy LAPACK_GLOBAL(sgelsy,SGELSY)
1643 void LAPACK_sgelsy(
1644  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1645  float* A, lapack_int const* lda,
1646  float* B, lapack_int const* ldb, lapack_int* JPVT,
1647  float const* rcond, lapack_int* rank,
1648  float* work, lapack_int const* lwork,
1649  lapack_int* info );
1650 
1651 #define LAPACK_zgelsy LAPACK_GLOBAL(zgelsy,ZGELSY)
1652 void LAPACK_zgelsy(
1653  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
1654  lapack_complex_double* A, lapack_int const* lda,
1655  lapack_complex_double* B, lapack_int const* ldb, lapack_int* JPVT,
1656  double const* rcond, lapack_int* rank,
1657  lapack_complex_double* work, lapack_int const* lwork,
1658  double* rwork,
1659  lapack_int* info );
1660 
1661 #define LAPACK_cgemlq LAPACK_GLOBAL(cgemlq,CGEMLQ)
1662 void LAPACK_cgemlq(
1663  char const* side, char const* trans,
1664  lapack_int const* m, lapack_int const* n, lapack_int const* k,
1665  lapack_complex_float const* A, lapack_int const* lda,
1666  lapack_complex_float const* T, lapack_int const* tsize,
1667  lapack_complex_float* C, lapack_int const* ldc,
1668  lapack_complex_float* work, lapack_int const* lwork,
1669  lapack_int* info );
1670 
1671 #define LAPACK_dgemlq LAPACK_GLOBAL(dgemlq,DGEMLQ)
1672 void LAPACK_dgemlq(
1673  char const* side, char const* trans,
1674  lapack_int const* m, lapack_int const* n, lapack_int const* k,
1675  double const* A, lapack_int const* lda,
1676  double const* T, lapack_int const* tsize,
1677  double* C, lapack_int const* ldc,
1678  double* work, lapack_int const* lwork,
1679  lapack_int* info );
1680 
1681 #define LAPACK_sgemlq LAPACK_GLOBAL(sgemlq,SGEMLQ)
1682 void LAPACK_sgemlq(
1683  char const* side, char const* trans,
1684  lapack_int const* m, lapack_int const* n, lapack_int const* k,
1685  float const* A, lapack_int const* lda,
1686  float const* T, lapack_int const* tsize,
1687  float* C, lapack_int const* ldc,
1688  float* work, lapack_int const* lwork,
1689  lapack_int* info );
1690 
1691 #define LAPACK_zgemlq LAPACK_GLOBAL(zgemlq,ZGEMLQ)
1692 void LAPACK_zgemlq(
1693  char const* side, char const* trans,
1694  lapack_int const* m, lapack_int const* n, lapack_int const* k,
1695  lapack_complex_double const* A, lapack_int const* lda,
1696  lapack_complex_double const* T, lapack_int const* tsize,
1697  lapack_complex_double* C, lapack_int const* ldc,
1698  lapack_complex_double* work, lapack_int const* lwork,
1699  lapack_int* info );
1700 
1701 #define LAPACK_cgemqr LAPACK_GLOBAL(cgemqr,CGEMQR)
1702 void LAPACK_cgemqr(
1703  char const* side, char const* trans,
1704  lapack_int const* m, lapack_int const* n, lapack_int const* k,
1705  lapack_complex_float const* A, lapack_int const* lda,
1706  lapack_complex_float const* T, lapack_int const* tsize,
1707  lapack_complex_float* C, lapack_int const* ldc,
1708  lapack_complex_float* work, lapack_int const* lwork,
1709  lapack_int* info );
1710 
1711 #define LAPACK_dgemqr LAPACK_GLOBAL(dgemqr,DGEMQR)
1712 void LAPACK_dgemqr(
1713  char const* side, char const* trans,
1714  lapack_int const* m, lapack_int const* n, lapack_int const* k,
1715  double const* A, lapack_int const* lda,
1716  double const* T, lapack_int const* tsize,
1717  double* C, lapack_int const* ldc,
1718  double* work, lapack_int const* lwork,
1719  lapack_int* info );
1720 
1721 #define LAPACK_sgemqr LAPACK_GLOBAL(sgemqr,SGEMQR)
1722 void LAPACK_sgemqr(
1723  char const* side, char const* trans,
1724  lapack_int const* m, lapack_int const* n, lapack_int const* k,
1725  float const* A, lapack_int const* lda,
1726  float const* T, lapack_int const* tsize,
1727  float* C, lapack_int const* ldc,
1728  float* work, lapack_int const* lwork,
1729  lapack_int* info );
1730 
1731 #define LAPACK_zgemqr LAPACK_GLOBAL(zgemqr,ZGEMQR)
1732 void LAPACK_zgemqr(
1733  char const* side, char const* trans,
1734  lapack_int const* m, lapack_int const* n, lapack_int const* k,
1735  lapack_complex_double const* A, lapack_int const* lda,
1736  lapack_complex_double const* T, lapack_int const* tsize,
1737  lapack_complex_double* C, lapack_int const* ldc,
1738  lapack_complex_double* work, lapack_int const* lwork,
1739  lapack_int* info );
1740 
1741 #define LAPACK_cgemqrt LAPACK_GLOBAL(cgemqrt,CGEMQRT)
1742 void LAPACK_cgemqrt(
1743  char const* side, char const* trans,
1744  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* nb,
1745  lapack_complex_float const* V, lapack_int const* ldv,
1746  lapack_complex_float const* T, lapack_int const* ldt,
1747  lapack_complex_float* C, lapack_int const* ldc,
1748  lapack_complex_float* work,
1749  lapack_int* info );
1750 
1751 #define LAPACK_dgemqrt LAPACK_GLOBAL(dgemqrt,DGEMQRT)
1752 void LAPACK_dgemqrt(
1753  char const* side, char const* trans,
1754  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* nb,
1755  double const* V, lapack_int const* ldv,
1756  double const* T, lapack_int const* ldt,
1757  double* C, lapack_int const* ldc,
1758  double* work,
1759  lapack_int* info );
1760 
1761 #define LAPACK_sgemqrt LAPACK_GLOBAL(sgemqrt,SGEMQRT)
1762 void LAPACK_sgemqrt(
1763  char const* side, char const* trans,
1764  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* nb,
1765  float const* V, lapack_int const* ldv,
1766  float const* T, lapack_int const* ldt,
1767  float* C, lapack_int const* ldc,
1768  float* work,
1769  lapack_int* info );
1770 
1771 #define LAPACK_zgemqrt LAPACK_GLOBAL(zgemqrt,ZGEMQRT)
1772 void LAPACK_zgemqrt(
1773  char const* side, char const* trans,
1774  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* nb,
1775  lapack_complex_double const* V, lapack_int const* ldv,
1776  lapack_complex_double const* T, lapack_int const* ldt,
1777  lapack_complex_double* C, lapack_int const* ldc,
1778  lapack_complex_double* work,
1779  lapack_int* info );
1780 
1781 #define LAPACK_cgeql2 LAPACK_GLOBAL(cgeql2,CGEQL2)
1782 void LAPACK_cgeql2(
1783  lapack_int const* m, lapack_int const* n,
1784  lapack_complex_float* A, lapack_int const* lda,
1785  lapack_complex_float* tau,
1786  lapack_complex_float* work,
1787  lapack_int* info );
1788 
1789 #define LAPACK_dgeql2 LAPACK_GLOBAL(dgeql2,DGEQL2)
1790 void LAPACK_dgeql2(
1791  lapack_int const* m, lapack_int const* n,
1792  double* A, lapack_int const* lda,
1793  double* tau,
1794  double* work,
1795  lapack_int* info );
1796 
1797 #define LAPACK_sgeql2 LAPACK_GLOBAL(sgeql2,SGEQL2)
1798 void LAPACK_sgeql2(
1799  lapack_int const* m, lapack_int const* n,
1800  float* A, lapack_int const* lda,
1801  float* tau,
1802  float* work,
1803  lapack_int* info );
1804 
1805 #define LAPACK_zgeql2 LAPACK_GLOBAL(zgeql2,ZGEQL2)
1806 void LAPACK_zgeql2(
1807  lapack_int const* m, lapack_int const* n,
1808  lapack_complex_double* A, lapack_int const* lda,
1809  lapack_complex_double* tau,
1810  lapack_complex_double* work,
1811  lapack_int* info );
1812 
1813 #define LAPACK_cgeqlf LAPACK_GLOBAL(cgeqlf,CGEQLF)
1814 void LAPACK_cgeqlf(
1815  lapack_int const* m, lapack_int const* n,
1816  lapack_complex_float* A, lapack_int const* lda,
1817  lapack_complex_float* tau,
1818  lapack_complex_float* work, lapack_int const* lwork,
1819  lapack_int* info );
1820 
1821 #define LAPACK_dgeqlf LAPACK_GLOBAL(dgeqlf,DGEQLF)
1822 void LAPACK_dgeqlf(
1823  lapack_int const* m, lapack_int const* n,
1824  double* A, lapack_int const* lda,
1825  double* tau,
1826  double* work, lapack_int const* lwork,
1827  lapack_int* info );
1828 
1829 #define LAPACK_sgeqlf LAPACK_GLOBAL(sgeqlf,SGEQLF)
1830 void LAPACK_sgeqlf(
1831  lapack_int const* m, lapack_int const* n,
1832  float* A, lapack_int const* lda,
1833  float* tau,
1834  float* work, lapack_int const* lwork,
1835  lapack_int* info );
1836 
1837 #define LAPACK_zgeqlf LAPACK_GLOBAL(zgeqlf,ZGEQLF)
1838 void LAPACK_zgeqlf(
1839  lapack_int const* m, lapack_int const* n,
1840  lapack_complex_double* A, lapack_int const* lda,
1841  lapack_complex_double* tau,
1842  lapack_complex_double* work, lapack_int const* lwork,
1843  lapack_int* info );
1844 
1845 #define LAPACK_sgeqpf LAPACK_GLOBAL(sgeqpf,SGEQPF)
1846 void LAPACK_sgeqpf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
1847  lapack_int* jpvt, float* tau, float* work,
1848  lapack_int *info );
1849 
1850 #define LAPACK_dgeqpf LAPACK_GLOBAL(dgeqpf,DGEQPF)
1851 void LAPACK_dgeqpf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
1852  lapack_int* jpvt, double* tau, double* work,
1853  lapack_int *info );
1854 
1855 #define LAPACK_cgeqpf LAPACK_GLOBAL(cgeqpf,CGEQPF)
1856 void LAPACK_cgeqpf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
1857  lapack_int* lda, lapack_int* jpvt,
1858  lapack_complex_float* tau, lapack_complex_float* work,
1859  float* rwork, lapack_int *info );
1860 
1861 #define LAPACK_zgeqpf LAPACK_GLOBAL(zgeqpf,ZGEQPF)
1862 void LAPACK_zgeqpf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
1863  lapack_int* lda, lapack_int* jpvt,
1864  lapack_complex_double* tau, lapack_complex_double* work,
1865  double* rwork, lapack_int *info );
1866 
1867 #define LAPACK_cgeqp3 LAPACK_GLOBAL(cgeqp3,CGEQP3)
1868 void LAPACK_cgeqp3(
1869  lapack_int const* m, lapack_int const* n,
1870  lapack_complex_float* A, lapack_int const* lda, lapack_int* JPVT,
1871  lapack_complex_float* tau,
1872  lapack_complex_float* work, lapack_int const* lwork,
1873  float* rwork,
1874  lapack_int* info );
1875 
1876 #define LAPACK_dgeqp3 LAPACK_GLOBAL(dgeqp3,DGEQP3)
1877 void LAPACK_dgeqp3(
1878  lapack_int const* m, lapack_int const* n,
1879  double* A, lapack_int const* lda, lapack_int* JPVT,
1880  double* tau,
1881  double* work, lapack_int const* lwork,
1882  lapack_int* info );
1883 
1884 #define LAPACK_sgeqp3 LAPACK_GLOBAL(sgeqp3,SGEQP3)
1885 void LAPACK_sgeqp3(
1886  lapack_int const* m, lapack_int const* n,
1887  float* A, lapack_int const* lda, lapack_int* JPVT,
1888  float* tau,
1889  float* work, lapack_int const* lwork,
1890  lapack_int* info );
1891 
1892 #define LAPACK_zgeqp3 LAPACK_GLOBAL(zgeqp3,ZGEQP3)
1893 void LAPACK_zgeqp3(
1894  lapack_int const* m, lapack_int const* n,
1895  lapack_complex_double* A, lapack_int const* lda, lapack_int* JPVT,
1896  lapack_complex_double* tau,
1897  lapack_complex_double* work, lapack_int const* lwork,
1898  double* rwork,
1899  lapack_int* info );
1900 
1901 #define LAPACK_cgeqr LAPACK_GLOBAL(cgeqr,CGEQR)
1902 void LAPACK_cgeqr(
1903  lapack_int const* m, lapack_int const* n,
1904  lapack_complex_float* A, lapack_int const* lda,
1905  lapack_complex_float* T, lapack_int const* tsize,
1906  lapack_complex_float* work, lapack_int const* lwork,
1907  lapack_int* info );
1908 
1909 #define LAPACK_dgeqr LAPACK_GLOBAL(dgeqr,DGEQR)
1910 void LAPACK_dgeqr(
1911  lapack_int const* m, lapack_int const* n,
1912  double* A, lapack_int const* lda,
1913  double* T, lapack_int const* tsize,
1914  double* work, lapack_int const* lwork,
1915  lapack_int* info );
1916 
1917 #define LAPACK_sgeqr LAPACK_GLOBAL(sgeqr,SGEQR)
1918 void LAPACK_sgeqr(
1919  lapack_int const* m, lapack_int const* n,
1920  float* A, lapack_int const* lda,
1921  float* T, lapack_int const* tsize,
1922  float* work, lapack_int const* lwork,
1923  lapack_int* info );
1924 
1925 #define LAPACK_zgeqr LAPACK_GLOBAL(zgeqr,ZGEQR)
1926 void LAPACK_zgeqr(
1927  lapack_int const* m, lapack_int const* n,
1928  lapack_complex_double* A, lapack_int const* lda,
1929  lapack_complex_double* T, lapack_int const* tsize,
1930  lapack_complex_double* work, lapack_int const* lwork,
1931  lapack_int* info );
1932 
1933 #define LAPACK_cgeqr2 LAPACK_GLOBAL(cgeqr2,CGEQR2)
1934 void LAPACK_cgeqr2(
1935  lapack_int const* m, lapack_int const* n,
1936  lapack_complex_float* A, lapack_int const* lda,
1937  lapack_complex_float* tau,
1938  lapack_complex_float* work,
1939  lapack_int* info );
1940 
1941 #define LAPACK_dgeqr2 LAPACK_GLOBAL(dgeqr2,DGEQR2)
1942 void LAPACK_dgeqr2(
1943  lapack_int const* m, lapack_int const* n,
1944  double* A, lapack_int const* lda,
1945  double* tau,
1946  double* work,
1947  lapack_int* info );
1948 
1949 #define LAPACK_sgeqr2 LAPACK_GLOBAL(sgeqr2,SGEQR2)
1950 void LAPACK_sgeqr2(
1951  lapack_int const* m, lapack_int const* n,
1952  float* A, lapack_int const* lda,
1953  float* tau,
1954  float* work,
1955  lapack_int* info );
1956 
1957 #define LAPACK_zgeqr2 LAPACK_GLOBAL(zgeqr2,ZGEQR2)
1958 void LAPACK_zgeqr2(
1959  lapack_int const* m, lapack_int const* n,
1960  lapack_complex_double* A, lapack_int const* lda,
1961  lapack_complex_double* tau,
1962  lapack_complex_double* work,
1963  lapack_int* info );
1964 
1965 #define LAPACK_cgeqrf LAPACK_GLOBAL(cgeqrf,CGEQRF)
1966 void LAPACK_cgeqrf(
1967  lapack_int const* m, lapack_int const* n,
1968  lapack_complex_float* A, lapack_int const* lda,
1969  lapack_complex_float* tau,
1970  lapack_complex_float* work, lapack_int const* lwork,
1971  lapack_int* info );
1972 
1973 #define LAPACK_dgeqrf LAPACK_GLOBAL(dgeqrf,DGEQRF)
1974 void LAPACK_dgeqrf(
1975  lapack_int const* m, lapack_int const* n,
1976  double* A, lapack_int const* lda,
1977  double* tau,
1978  double* work, lapack_int const* lwork,
1979  lapack_int* info );
1980 
1981 #define LAPACK_sgeqrf LAPACK_GLOBAL(sgeqrf,SGEQRF)
1982 void LAPACK_sgeqrf(
1983  lapack_int const* m, lapack_int const* n,
1984  float* A, lapack_int const* lda,
1985  float* tau,
1986  float* work, lapack_int const* lwork,
1987  lapack_int* info );
1988 
1989 #define LAPACK_zgeqrf LAPACK_GLOBAL(zgeqrf,ZGEQRF)
1990 void LAPACK_zgeqrf(
1991  lapack_int const* m, lapack_int const* n,
1992  lapack_complex_double* A, lapack_int const* lda,
1993  lapack_complex_double* tau,
1994  lapack_complex_double* work, lapack_int const* lwork,
1995  lapack_int* info );
1996 
1997 #define LAPACK_cgeqrfp LAPACK_GLOBAL(cgeqrfp,CGEQRFP)
1998 void LAPACK_cgeqrfp(
1999  lapack_int const* m, lapack_int const* n,
2000  lapack_complex_float* A, lapack_int const* lda,
2001  lapack_complex_float* tau,
2002  lapack_complex_float* work, lapack_int const* lwork,
2003  lapack_int* info );
2004 
2005 #define LAPACK_dgeqrfp LAPACK_GLOBAL(dgeqrfp,DGEQRFP)
2006 void LAPACK_dgeqrfp(
2007  lapack_int const* m, lapack_int const* n,
2008  double* A, lapack_int const* lda,
2009  double* tau,
2010  double* work, lapack_int const* lwork,
2011  lapack_int* info );
2012 
2013 #define LAPACK_sgeqrfp LAPACK_GLOBAL(sgeqrfp,SGEQRFP)
2014 void LAPACK_sgeqrfp(
2015  lapack_int const* m, lapack_int const* n,
2016  float* A, lapack_int const* lda,
2017  float* tau,
2018  float* work, lapack_int const* lwork,
2019  lapack_int* info );
2020 
2021 #define LAPACK_zgeqrfp LAPACK_GLOBAL(zgeqrfp,ZGEQRFP)
2022 void LAPACK_zgeqrfp(
2023  lapack_int const* m, lapack_int const* n,
2024  lapack_complex_double* A, lapack_int const* lda,
2025  lapack_complex_double* tau,
2026  lapack_complex_double* work, lapack_int const* lwork,
2027  lapack_int* info );
2028 
2029 #define LAPACK_cgeqrt LAPACK_GLOBAL(cgeqrt,CGEQRT)
2030 void LAPACK_cgeqrt(
2031  lapack_int const* m, lapack_int const* n, lapack_int const* nb,
2032  lapack_complex_float* A, lapack_int const* lda,
2033  lapack_complex_float* T, lapack_int const* ldt,
2034  lapack_complex_float* work,
2035  lapack_int* info );
2036 
2037 #define LAPACK_dgeqrt LAPACK_GLOBAL(dgeqrt,DGEQRT)
2038 void LAPACK_dgeqrt(
2039  lapack_int const* m, lapack_int const* n, lapack_int const* nb,
2040  double* A, lapack_int const* lda,
2041  double* T, lapack_int const* ldt,
2042  double* work,
2043  lapack_int* info );
2044 
2045 #define LAPACK_sgeqrt LAPACK_GLOBAL(sgeqrt,SGEQRT)
2046 void LAPACK_sgeqrt(
2047  lapack_int const* m, lapack_int const* n, lapack_int const* nb,
2048  float* A, lapack_int const* lda,
2049  float* T, lapack_int const* ldt,
2050  float* work,
2051  lapack_int* info );
2052 
2053 #define LAPACK_zgeqrt LAPACK_GLOBAL(zgeqrt,ZGEQRT)
2054 void LAPACK_zgeqrt(
2055  lapack_int const* m, lapack_int const* n, lapack_int const* nb,
2056  lapack_complex_double* A, lapack_int const* lda,
2057  lapack_complex_double* T, lapack_int const* ldt,
2058  lapack_complex_double* work,
2059  lapack_int* info );
2060 
2061 #define LAPACK_cgeqrt2 LAPACK_GLOBAL(cgeqrt2,CGEQRT2)
2062 void LAPACK_cgeqrt2(
2063  lapack_int const* m, lapack_int const* n,
2064  lapack_complex_float* A, lapack_int const* lda,
2065  lapack_complex_float* T, lapack_int const* ldt,
2066  lapack_int* info );
2067 
2068 #define LAPACK_dgeqrt2 LAPACK_GLOBAL(dgeqrt2,DGEQRT2)
2069 void LAPACK_dgeqrt2(
2070  lapack_int const* m, lapack_int const* n,
2071  double* A, lapack_int const* lda,
2072  double* T, lapack_int const* ldt,
2073  lapack_int* info );
2074 
2075 #define LAPACK_sgeqrt2 LAPACK_GLOBAL(sgeqrt2,SGEQRT2)
2076 void LAPACK_sgeqrt2(
2077  lapack_int const* m, lapack_int const* n,
2078  float* A, lapack_int const* lda,
2079  float* T, lapack_int const* ldt,
2080  lapack_int* info );
2081 
2082 #define LAPACK_zgeqrt2 LAPACK_GLOBAL(zgeqrt2,ZGEQRT2)
2083 void LAPACK_zgeqrt2(
2084  lapack_int const* m, lapack_int const* n,
2085  lapack_complex_double* A, lapack_int const* lda,
2086  lapack_complex_double* T, lapack_int const* ldt,
2087  lapack_int* info );
2088 
2089 #define LAPACK_cgeqrt3 LAPACK_GLOBAL(cgeqrt3,CGEQRT3)
2090 void LAPACK_cgeqrt3(
2091  lapack_int const* m, lapack_int const* n,
2092  lapack_complex_float* A, lapack_int const* lda,
2093  lapack_complex_float* T, lapack_int const* ldt,
2094  lapack_int* info );
2095 
2096 #define LAPACK_dgeqrt3 LAPACK_GLOBAL(dgeqrt3,DGEQRT3)
2097 void LAPACK_dgeqrt3(
2098  lapack_int const* m, lapack_int const* n,
2099  double* A, lapack_int const* lda,
2100  double* T, lapack_int const* ldt,
2101  lapack_int* info );
2102 
2103 #define LAPACK_sgeqrt3 LAPACK_GLOBAL(sgeqrt3,SGEQRT3)
2104 void LAPACK_sgeqrt3(
2105  lapack_int const* m, lapack_int const* n,
2106  float* A, lapack_int const* lda,
2107  float* T, lapack_int const* ldt,
2108  lapack_int* info );
2109 
2110 #define LAPACK_zgeqrt3 LAPACK_GLOBAL(zgeqrt3,ZGEQRT3)
2111 void LAPACK_zgeqrt3(
2112  lapack_int const* m, lapack_int const* n,
2113  lapack_complex_double* A, lapack_int const* lda,
2114  lapack_complex_double* T, lapack_int const* ldt,
2115  lapack_int* info );
2116 
2117 #define LAPACK_cgerfs LAPACK_GLOBAL(cgerfs,CGERFS)
2118 void LAPACK_cgerfs(
2119  char const* trans,
2120  lapack_int const* n, lapack_int const* nrhs,
2121  lapack_complex_float const* A, lapack_int const* lda,
2122  lapack_complex_float const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
2123  lapack_complex_float const* B, lapack_int const* ldb,
2124  lapack_complex_float* X, lapack_int const* ldx,
2125  float* ferr,
2126  float* berr,
2127  lapack_complex_float* work,
2128  float* rwork,
2129  lapack_int* info );
2130 
2131 #define LAPACK_dgerfs LAPACK_GLOBAL(dgerfs,DGERFS)
2132 void LAPACK_dgerfs(
2133  char const* trans,
2134  lapack_int const* n, lapack_int const* nrhs,
2135  double const* A, lapack_int const* lda,
2136  double const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
2137  double const* B, lapack_int const* ldb,
2138  double* X, lapack_int const* ldx,
2139  double* ferr,
2140  double* berr,
2141  double* work,
2142  lapack_int* iwork,
2143  lapack_int* info );
2144 
2145 #define LAPACK_sgerfs LAPACK_GLOBAL(sgerfs,SGERFS)
2146 void LAPACK_sgerfs(
2147  char const* trans,
2148  lapack_int const* n, lapack_int const* nrhs,
2149  float const* A, lapack_int const* lda,
2150  float const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
2151  float const* B, lapack_int const* ldb,
2152  float* X, lapack_int const* ldx,
2153  float* ferr,
2154  float* berr,
2155  float* work,
2156  lapack_int* iwork,
2157  lapack_int* info );
2158 
2159 #define LAPACK_zgerfs LAPACK_GLOBAL(zgerfs,ZGERFS)
2160 void LAPACK_zgerfs(
2161  char const* trans,
2162  lapack_int const* n, lapack_int const* nrhs,
2163  lapack_complex_double const* A, lapack_int const* lda,
2164  lapack_complex_double const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
2165  lapack_complex_double const* B, lapack_int const* ldb,
2166  lapack_complex_double* X, lapack_int const* ldx,
2167  double* ferr,
2168  double* berr,
2169  lapack_complex_double* work,
2170  double* rwork,
2171  lapack_int* info );
2172 
2173 #define LAPACK_cgerfsx LAPACK_GLOBAL(cgerfsx,CGERFSX)
2174 void LAPACK_cgerfsx(
2175  char const* trans, char const* equed,
2176  lapack_int const* n, lapack_int const* nrhs,
2177  lapack_complex_float const* A, lapack_int const* lda,
2178  lapack_complex_float const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
2179  float const* R,
2180  float const* C,
2181  lapack_complex_float const* B, lapack_int const* ldb,
2182  lapack_complex_float* X, lapack_int const* ldx,
2183  float* rcond,
2184  float* berr, lapack_int const* n_err_bnds,
2185  float* err_bnds_norm,
2186  float* err_bnds_comp, lapack_int const* nparams,
2187  float* params,
2188  lapack_complex_float* work,
2189  float* rwork,
2190  lapack_int* info );
2191 
2192 #define LAPACK_dgerfsx LAPACK_GLOBAL(dgerfsx,DGERFSX)
2193 void LAPACK_dgerfsx(
2194  char const* trans, char const* equed,
2195  lapack_int const* n, lapack_int const* nrhs,
2196  double const* A, lapack_int const* lda,
2197  double const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
2198  double const* R,
2199  double const* C,
2200  double const* B, lapack_int const* ldb,
2201  double* X, lapack_int const* ldx,
2202  double* rcond,
2203  double* berr, lapack_int const* n_err_bnds,
2204  double* err_bnds_norm,
2205  double* err_bnds_comp, lapack_int const* nparams,
2206  double* params,
2207  double* work,
2208  lapack_int* iwork,
2209  lapack_int* info );
2210 
2211 #define LAPACK_sgerfsx LAPACK_GLOBAL(sgerfsx,SGERFSX)
2212 void LAPACK_sgerfsx(
2213  char const* trans, char const* equed,
2214  lapack_int const* n, lapack_int const* nrhs,
2215  float const* A, lapack_int const* lda,
2216  float const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
2217  float const* R,
2218  float const* C,
2219  float const* B, lapack_int const* ldb,
2220  float* X, lapack_int const* ldx,
2221  float* rcond,
2222  float* berr, lapack_int const* n_err_bnds,
2223  float* err_bnds_norm,
2224  float* err_bnds_comp, lapack_int const* nparams,
2225  float* params,
2226  float* work,
2227  lapack_int* iwork,
2228  lapack_int* info );
2229 
2230 #define LAPACK_zgerfsx LAPACK_GLOBAL(zgerfsx,ZGERFSX)
2231 void LAPACK_zgerfsx(
2232  char const* trans, char const* equed,
2233  lapack_int const* n, lapack_int const* nrhs,
2234  lapack_complex_double const* A, lapack_int const* lda,
2235  lapack_complex_double const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
2236  double const* R,
2237  double const* C,
2238  lapack_complex_double const* B, lapack_int const* ldb,
2239  lapack_complex_double* X, lapack_int const* ldx,
2240  double* rcond,
2241  double* berr, lapack_int const* n_err_bnds,
2242  double* err_bnds_norm,
2243  double* err_bnds_comp, lapack_int const* nparams,
2244  double* params,
2245  lapack_complex_double* work,
2246  double* rwork,
2247  lapack_int* info );
2248 
2249 #define LAPACK_cgerq2 LAPACK_GLOBAL(cgerq2,CGERQ2)
2250 void LAPACK_cgerq2(
2251  lapack_int const* m, lapack_int const* n,
2252  lapack_complex_float* A, lapack_int const* lda,
2253  lapack_complex_float* tau,
2254  lapack_complex_float* work,
2255  lapack_int* info );
2256 
2257 #define LAPACK_dgerq2 LAPACK_GLOBAL(dgerq2,DGERQ2)
2258 void LAPACK_dgerq2(
2259  lapack_int const* m, lapack_int const* n,
2260  double* A, lapack_int const* lda,
2261  double* tau,
2262  double* work,
2263  lapack_int* info );
2264 
2265 #define LAPACK_sgerq2 LAPACK_GLOBAL(sgerq2,SGERQ2)
2266 void LAPACK_sgerq2(
2267  lapack_int const* m, lapack_int const* n,
2268  float* A, lapack_int const* lda,
2269  float* tau,
2270  float* work,
2271  lapack_int* info );
2272 
2273 #define LAPACK_zgerq2 LAPACK_GLOBAL(zgerq2,ZGERQ2)
2274 void LAPACK_zgerq2(
2275  lapack_int const* m, lapack_int const* n,
2276  lapack_complex_double* A, lapack_int const* lda,
2277  lapack_complex_double* tau,
2278  lapack_complex_double* work,
2279  lapack_int* info );
2280 
2281 #define LAPACK_cgerqf LAPACK_GLOBAL(cgerqf,CGERQF)
2282 void LAPACK_cgerqf(
2283  lapack_int const* m, lapack_int const* n,
2284  lapack_complex_float* A, lapack_int const* lda,
2285  lapack_complex_float* tau,
2286  lapack_complex_float* work, lapack_int const* lwork,
2287  lapack_int* info );
2288 
2289 #define LAPACK_dgerqf LAPACK_GLOBAL(dgerqf,DGERQF)
2290 void LAPACK_dgerqf(
2291  lapack_int const* m, lapack_int const* n,
2292  double* A, lapack_int const* lda,
2293  double* tau,
2294  double* work, lapack_int const* lwork,
2295  lapack_int* info );
2296 
2297 #define LAPACK_sgerqf LAPACK_GLOBAL(sgerqf,SGERQF)
2298 void LAPACK_sgerqf(
2299  lapack_int const* m, lapack_int const* n,
2300  float* A, lapack_int const* lda,
2301  float* tau,
2302  float* work, lapack_int const* lwork,
2303  lapack_int* info );
2304 
2305 #define LAPACK_zgerqf LAPACK_GLOBAL(zgerqf,ZGERQF)
2306 void LAPACK_zgerqf(
2307  lapack_int const* m, lapack_int const* n,
2308  lapack_complex_double* A, lapack_int const* lda,
2309  lapack_complex_double* tau,
2310  lapack_complex_double* work, lapack_int const* lwork,
2311  lapack_int* info );
2312 
2313 #define LAPACK_cgesdd LAPACK_GLOBAL(cgesdd,CGESDD)
2314 void LAPACK_cgesdd(
2315  char const* jobz,
2316  lapack_int const* m, lapack_int const* n,
2317  lapack_complex_float* A, lapack_int const* lda,
2318  float* S,
2319  lapack_complex_float* U, lapack_int const* ldu,
2320  lapack_complex_float* VT, lapack_int const* ldvt,
2321  lapack_complex_float* work, lapack_int const* lwork,
2322  float* rwork,
2323  lapack_int* iwork,
2324  lapack_int* info );
2325 
2326 #define LAPACK_dgesdd LAPACK_GLOBAL(dgesdd,DGESDD)
2327 void LAPACK_dgesdd(
2328  char const* jobz,
2329  lapack_int const* m, lapack_int const* n,
2330  double* A, lapack_int const* lda,
2331  double* S,
2332  double* U, lapack_int const* ldu,
2333  double* VT, lapack_int const* ldvt,
2334  double* work, lapack_int const* lwork,
2335  lapack_int* iwork,
2336  lapack_int* info );
2337 
2338 #define LAPACK_sgesdd LAPACK_GLOBAL(sgesdd,SGESDD)
2339 void LAPACK_sgesdd(
2340  char const* jobz,
2341  lapack_int const* m, lapack_int const* n,
2342  float* A, lapack_int const* lda,
2343  float* S,
2344  float* U, lapack_int const* ldu,
2345  float* VT, lapack_int const* ldvt,
2346  float* work, lapack_int const* lwork,
2347  lapack_int* iwork,
2348  lapack_int* info );
2349 
2350 #define LAPACK_zgesdd LAPACK_GLOBAL(zgesdd,ZGESDD)
2351 void LAPACK_zgesdd(
2352  char const* jobz,
2353  lapack_int const* m, lapack_int const* n,
2354  lapack_complex_double* A, lapack_int const* lda,
2355  double* S,
2356  lapack_complex_double* U, lapack_int const* ldu,
2357  lapack_complex_double* VT, lapack_int const* ldvt,
2358  lapack_complex_double* work, lapack_int const* lwork,
2359  double* rwork,
2360  lapack_int* iwork,
2361  lapack_int* info );
2362 
2363 #define LAPACK_cgesv LAPACK_GLOBAL(cgesv,CGESV)
2364 void LAPACK_cgesv(
2365  lapack_int const* n, lapack_int const* nrhs,
2366  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
2367  lapack_complex_float* B, lapack_int const* ldb,
2368  lapack_int* info );
2369 
2370 #define LAPACK_dgesv LAPACK_GLOBAL(dgesv,DGESV)
2371 void LAPACK_dgesv(
2372  lapack_int const* n, lapack_int const* nrhs,
2373  double* A, lapack_int const* lda, lapack_int* ipiv,
2374  double* B, lapack_int const* ldb,
2375  lapack_int* info );
2376 
2377 #define LAPACK_sgesv LAPACK_GLOBAL(sgesv,SGESV)
2378 void LAPACK_sgesv(
2379  lapack_int const* n, lapack_int const* nrhs,
2380  float* A, lapack_int const* lda, lapack_int* ipiv,
2381  float* B, lapack_int const* ldb,
2382  lapack_int* info );
2383 
2384 #define LAPACK_zgesv LAPACK_GLOBAL(zgesv,ZGESV)
2385 void LAPACK_zgesv(
2386  lapack_int const* n, lapack_int const* nrhs,
2387  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
2388  lapack_complex_double* B, lapack_int const* ldb,
2389  lapack_int* info );
2390 
2391 #define LAPACK_dsgesv LAPACK_GLOBAL(dsgesv,DSGESV)
2392 void LAPACK_dsgesv(
2393  lapack_int const* n, lapack_int const* nrhs,
2394  double* A, lapack_int const* lda, lapack_int* ipiv,
2395  double const* B, lapack_int const* ldb,
2396  double* X, lapack_int const* ldx,
2397  double* work,
2398  float* swork, lapack_int* iter,
2399  lapack_int* info );
2400 
2401 #define LAPACK_zcgesv LAPACK_GLOBAL(zcgesv,ZCGESV)
2402 void LAPACK_zcgesv(
2403  lapack_int const* n, lapack_int const* nrhs,
2404  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
2405  lapack_complex_double const* B, lapack_int const* ldb,
2406  lapack_complex_double* X, lapack_int const* ldx,
2407  lapack_complex_double* work,
2408  lapack_complex_float* swork,
2409  double* rwork, lapack_int* iter,
2410  lapack_int* info );
2411 
2412 #define LAPACK_cgesvd LAPACK_GLOBAL(cgesvd,CGESVD)
2413 void LAPACK_cgesvd(
2414  char const* jobu, char const* jobvt,
2415  lapack_int const* m, lapack_int const* n,
2416  lapack_complex_float* A, lapack_int const* lda,
2417  float* S,
2418  lapack_complex_float* U, lapack_int const* ldu,
2419  lapack_complex_float* VT, lapack_int const* ldvt,
2420  lapack_complex_float* work, lapack_int const* lwork,
2421  float* rwork,
2422  lapack_int* info );
2423 
2424 #define LAPACK_dgesvd LAPACK_GLOBAL(dgesvd,DGESVD)
2425 void LAPACK_dgesvd(
2426  char const* jobu, char const* jobvt,
2427  lapack_int const* m, lapack_int const* n,
2428  double* A, lapack_int const* lda,
2429  double* S,
2430  double* U, lapack_int const* ldu,
2431  double* VT, lapack_int const* ldvt,
2432  double* work, lapack_int const* lwork,
2433  lapack_int* info );
2434 
2435 #define LAPACK_sgesvd LAPACK_GLOBAL(sgesvd,SGESVD)
2436 void LAPACK_sgesvd(
2437  char const* jobu, char const* jobvt,
2438  lapack_int const* m, lapack_int const* n,
2439  float* A, lapack_int const* lda,
2440  float* S,
2441  float* U, lapack_int const* ldu,
2442  float* VT, lapack_int const* ldvt,
2443  float* work, lapack_int const* lwork,
2444  lapack_int* info );
2445 
2446 #define LAPACK_zgesvd LAPACK_GLOBAL(zgesvd,ZGESVD)
2447 void LAPACK_zgesvd(
2448  char const* jobu, char const* jobvt,
2449  lapack_int const* m, lapack_int const* n,
2450  lapack_complex_double* A, lapack_int const* lda,
2451  double* S,
2452  lapack_complex_double* U, lapack_int const* ldu,
2453  lapack_complex_double* VT, lapack_int const* ldvt,
2454  lapack_complex_double* work, lapack_int const* lwork,
2455  double* rwork,
2456  lapack_int* info );
2457 
2458 #define LAPACK_cgesvdq LAPACK_GLOBAL(cgesvdq,CGESVDQ)
2459 void LAPACK_cgesvdq(
2460  char const* joba, char const* jobp, char const* jobr, char const* jobu, char const* jobv,
2461  lapack_int const* m, lapack_int const* n,
2462  lapack_complex_float* A, lapack_int const* lda,
2463  float* S,
2464  lapack_complex_float* U, lapack_int const* ldu,
2465  lapack_complex_float* V, lapack_int const* ldv, lapack_int* numrank,
2466  lapack_int* iwork, lapack_int const* liwork,
2467  lapack_complex_float* cwork, lapack_int* lcwork,
2468  float* rwork, lapack_int const* lrwork,
2469  lapack_int* info );
2470 
2471 #define LAPACK_dgesvdq LAPACK_GLOBAL(dgesvdq,DGESVDQ)
2472 void LAPACK_dgesvdq(
2473  char const* joba, char const* jobp, char const* jobr, char const* jobu, char const* jobv,
2474  lapack_int const* m, lapack_int const* n,
2475  double* A, lapack_int const* lda,
2476  double* S,
2477  double* U, lapack_int const* ldu,
2478  double* V, lapack_int const* ldv, lapack_int* numrank,
2479  lapack_int* iwork, lapack_int const* liwork,
2480  double* work, lapack_int* lwork,
2481  double* rwork, lapack_int const* lrwork,
2482  lapack_int* info );
2483 
2484 #define LAPACK_sgesvdq LAPACK_GLOBAL(sgesvdq,SGESVDQ)
2485 void LAPACK_sgesvdq(
2486  char const* joba, char const* jobp, char const* jobr, char const* jobu, char const* jobv,
2487  lapack_int const* m, lapack_int const* n,
2488  float* A, lapack_int const* lda,
2489  float* S,
2490  float* U, lapack_int const* ldu,
2491  float* V, lapack_int const* ldv, lapack_int* numrank,
2492  lapack_int* iwork, lapack_int const* liwork,
2493  float* work, lapack_int* lwork,
2494  float* rwork, lapack_int const* lrwork,
2495  lapack_int* info );
2496 
2497 #define LAPACK_zgesvdq LAPACK_GLOBAL(zgesvdq,ZGESVDQ)
2498 void LAPACK_zgesvdq(
2499  char const* joba, char const* jobp, char const* jobr, char const* jobu, char const* jobv,
2500  lapack_int const* m, lapack_int const* n,
2501  lapack_complex_double* A, lapack_int const* lda,
2502  double* S,
2503  lapack_complex_double* U, lapack_int const* ldu,
2504  lapack_complex_double* V, lapack_int const* ldv, lapack_int* numrank,
2505  lapack_int* iwork, lapack_int const* liwork,
2506  lapack_complex_float* cwork, lapack_int* lcwork,
2507  double* rwork, lapack_int const* lrwork,
2508  lapack_int* info );
2509 
2510 #define LAPACK_cgesvdx LAPACK_GLOBAL(cgesvdx,CGESVDX)
2511 void LAPACK_cgesvdx(
2512  char const* jobu, char const* jobvt, char const* range,
2513  lapack_int const* m, lapack_int const* n,
2514  lapack_complex_float* A, lapack_int const* lda,
2515  float const* vl,
2516  float const* vu, lapack_int const* il, lapack_int const* iu, lapack_int* ns,
2517  float* S,
2518  lapack_complex_float* U, lapack_int const* ldu,
2519  lapack_complex_float* VT, lapack_int const* ldvt,
2520  lapack_complex_float* work, lapack_int const* lwork,
2521  float* rwork,
2522  lapack_int* iwork,
2523  lapack_int* info );
2524 
2525 #define LAPACK_dgesvdx LAPACK_GLOBAL(dgesvdx,DGESVDX)
2526 void LAPACK_dgesvdx(
2527  char const* jobu, char const* jobvt, char const* range,
2528  lapack_int const* m, lapack_int const* n,
2529  double* A, lapack_int const* lda,
2530  double const* vl,
2531  double const* vu, lapack_int const* il, lapack_int const* iu, lapack_int* ns,
2532  double* S,
2533  double* U, lapack_int const* ldu,
2534  double* VT, lapack_int const* ldvt,
2535  double* work, lapack_int const* lwork,
2536  lapack_int* iwork,
2537  lapack_int* info );
2538 
2539 #define LAPACK_sgesvdx LAPACK_GLOBAL(sgesvdx,SGESVDX)
2540 void LAPACK_sgesvdx(
2541  char const* jobu, char const* jobvt, char const* range,
2542  lapack_int const* m, lapack_int const* n,
2543  float* A, lapack_int const* lda,
2544  float const* vl,
2545  float const* vu, lapack_int const* il, lapack_int const* iu, lapack_int* ns,
2546  float* S,
2547  float* U, lapack_int const* ldu,
2548  float* VT, lapack_int const* ldvt,
2549  float* work, lapack_int const* lwork,
2550  lapack_int* iwork,
2551  lapack_int* info );
2552 
2553 #define LAPACK_zgesvdx LAPACK_GLOBAL(zgesvdx,ZGESVDX)
2554 void LAPACK_zgesvdx(
2555  char const* jobu, char const* jobvt, char const* range,
2556  lapack_int const* m, lapack_int const* n,
2557  lapack_complex_double* A, lapack_int const* lda,
2558  double const* vl,
2559  double const* vu, lapack_int const* il, lapack_int const* iu, lapack_int* ns,
2560  double* S,
2561  lapack_complex_double* U, lapack_int const* ldu,
2562  lapack_complex_double* VT, lapack_int const* ldvt,
2563  lapack_complex_double* work, lapack_int const* lwork,
2564  double* rwork,
2565  lapack_int* iwork,
2566  lapack_int* info );
2567 
2568 #define LAPACK_cgesvj LAPACK_GLOBAL(cgesvj,CGESVJ)
2569 void LAPACK_cgesvj(
2570  char const* joba, char const* jobu, char const* jobv,
2571  lapack_int const* m, lapack_int const* n,
2572  lapack_complex_float* A, lapack_int const* lda,
2573  float* SVA, lapack_int const* mv,
2574  lapack_complex_float* V, lapack_int const* ldv,
2575  lapack_complex_float* cwork, lapack_int const* lwork,
2576  float* rwork, lapack_int const* lrwork,
2577  lapack_int* info );
2578 
2579 #define LAPACK_dgesvj LAPACK_GLOBAL(dgesvj,DGESVJ)
2580 void LAPACK_dgesvj(
2581  char const* joba, char const* jobu, char const* jobv,
2582  lapack_int const* m, lapack_int const* n,
2583  double* A, lapack_int const* lda,
2584  double* SVA, lapack_int const* mv,
2585  double* V, lapack_int const* ldv,
2586  double* work, lapack_int const* lwork,
2587  lapack_int* info );
2588 
2589 #define LAPACK_sgesvj LAPACK_GLOBAL(sgesvj,SGESVJ)
2590 void LAPACK_sgesvj(
2591  char const* joba, char const* jobu, char const* jobv,
2592  lapack_int const* m, lapack_int const* n,
2593  float* A, lapack_int const* lda,
2594  float* SVA, lapack_int const* mv,
2595  float* V, lapack_int const* ldv,
2596  float* work, lapack_int const* lwork,
2597  lapack_int* info );
2598 
2599 #define LAPACK_zgesvj LAPACK_GLOBAL(zgesvj,ZGESVJ)
2600 void LAPACK_zgesvj(
2601  char const* joba, char const* jobu, char const* jobv,
2602  lapack_int const* m, lapack_int const* n,
2603  lapack_complex_double* A, lapack_int const* lda,
2604  double* SVA, lapack_int const* mv,
2605  lapack_complex_double* V, lapack_int const* ldv,
2606  lapack_complex_double* cwork, lapack_int const* lwork,
2607  double* rwork, lapack_int const* lrwork,
2608  lapack_int* info );
2609 
2610 #define LAPACK_cgesvx LAPACK_GLOBAL(cgesvx,CGESVX)
2611 void LAPACK_cgesvx(
2612  char const* fact, char const* trans,
2613  lapack_int const* n, lapack_int const* nrhs,
2614  lapack_complex_float* A, lapack_int const* lda,
2615  lapack_complex_float* AF, lapack_int const* ldaf, lapack_int* ipiv, char* equed,
2616  float* R,
2617  float* C,
2618  lapack_complex_float* B,
2619  lapack_int const* ldb,
2620  lapack_complex_float* X, lapack_int const* ldx,
2621  float* rcond,
2622  float* ferr,
2623  float* berr,
2624  lapack_complex_float* work,
2625  float* rwork,
2626  lapack_int* info );
2627 
2628 #define LAPACK_dgesvx LAPACK_GLOBAL(dgesvx,DGESVX)
2629 void LAPACK_dgesvx(
2630  char const* fact, char const* trans,
2631  lapack_int const* n, lapack_int const* nrhs,
2632  double* A, lapack_int const* lda,
2633  double* AF, lapack_int const* ldaf, lapack_int* ipiv, char* equed,
2634  double* R,
2635  double* C,
2636  double* B,
2637  lapack_int const* ldb,
2638  double* X, lapack_int const* ldx,
2639  double* rcond,
2640  double* ferr,
2641  double* berr,
2642  double* work,
2643  lapack_int* iwork,
2644  lapack_int* info );
2645 
2646 #define LAPACK_sgesvx LAPACK_GLOBAL(sgesvx,SGESVX)
2647 void LAPACK_sgesvx(
2648  char const* fact, char const* trans,
2649  lapack_int const* n, lapack_int const* nrhs,
2650  float* A, lapack_int const* lda,
2651  float* AF, lapack_int const* ldaf, lapack_int* ipiv, char* equed,
2652  float* R,
2653  float* C,
2654  float* B,
2655  lapack_int const* ldb,
2656  float* X, lapack_int const* ldx,
2657  float* rcond,
2658  float* ferr,
2659  float* berr,
2660  float* work,
2661  lapack_int* iwork,
2662  lapack_int* info );
2663 
2664 #define LAPACK_zgesvx LAPACK_GLOBAL(zgesvx,ZGESVX)
2665 void LAPACK_zgesvx(
2666  char const* fact, char const* trans,
2667  lapack_int const* n, lapack_int const* nrhs,
2668  lapack_complex_double* A, lapack_int const* lda,
2669  lapack_complex_double* AF, lapack_int const* ldaf, lapack_int* ipiv, char* equed,
2670  double* R,
2671  double* C,
2672  lapack_complex_double* B,
2673  lapack_int const* ldb,
2674  lapack_complex_double* X, lapack_int const* ldx,
2675  double* rcond,
2676  double* ferr,
2677  double* berr,
2678  lapack_complex_double* work,
2679  double* rwork,
2680  lapack_int* info );
2681 
2682 #define LAPACK_cgesvxx LAPACK_GLOBAL(cgesvxx,CGESVXX)
2683 void LAPACK_cgesvxx(
2684  char const* fact, char const* trans,
2685  lapack_int const* n, lapack_int const* nrhs,
2686  lapack_complex_float* A, lapack_int const* lda,
2687  lapack_complex_float* AF, lapack_int const* ldaf, lapack_int* ipiv, char* equed,
2688  float* R,
2689  float* C,
2690  lapack_complex_float* B,
2691  lapack_int const* ldb,
2692  lapack_complex_float* X, lapack_int const* ldx,
2693  float* rcond,
2694  float* rpvgrw,
2695  float* berr, lapack_int const* n_err_bnds,
2696  float* err_bnds_norm,
2697  float* err_bnds_comp, lapack_int const* nparams,
2698  float* params,
2699  lapack_complex_float* work,
2700  float* rwork,
2701  lapack_int* info );
2702 
2703 #define LAPACK_dgesvxx LAPACK_GLOBAL(dgesvxx,DGESVXX)
2704 void LAPACK_dgesvxx(
2705  char const* fact, char const* trans,
2706  lapack_int const* n, lapack_int const* nrhs,
2707  double* A, lapack_int const* lda,
2708  double* AF, lapack_int const* ldaf, lapack_int* ipiv, char* equed,
2709  double* R,
2710  double* C,
2711  double* B,
2712  lapack_int const* ldb,
2713  double* X, lapack_int const* ldx,
2714  double* rcond,
2715  double* rpvgrw,
2716  double* berr, lapack_int const* n_err_bnds,
2717  double* err_bnds_norm,
2718  double* err_bnds_comp, lapack_int const* nparams,
2719  double* params,
2720  double* work,
2721  lapack_int* iwork,
2722  lapack_int* info );
2723 
2724 #define LAPACK_sgesvxx LAPACK_GLOBAL(sgesvxx,SGESVXX)
2725 void LAPACK_sgesvxx(
2726  char const* fact, char const* trans,
2727  lapack_int const* n, lapack_int const* nrhs,
2728  float* A, lapack_int const* lda,
2729  float* AF, lapack_int const* ldaf, lapack_int* ipiv, char* equed,
2730  float* R,
2731  float* C,
2732  float* B,
2733  lapack_int const* ldb,
2734  float* X, lapack_int const* ldx,
2735  float* rcond,
2736  float* rpvgrw,
2737  float* berr, lapack_int const* n_err_bnds,
2738  float* err_bnds_norm,
2739  float* err_bnds_comp, lapack_int const* nparams,
2740  float* params,
2741  float* work,
2742  lapack_int* iwork,
2743  lapack_int* info );
2744 
2745 #define LAPACK_zgesvxx LAPACK_GLOBAL(zgesvxx,ZGESVXX)
2746 void LAPACK_zgesvxx(
2747  char const* fact, char const* trans,
2748  lapack_int const* n, lapack_int const* nrhs,
2749  lapack_complex_double* A, lapack_int const* lda,
2750  lapack_complex_double* AF, lapack_int const* ldaf, lapack_int* ipiv, char* equed,
2751  double* R,
2752  double* C,
2753  lapack_complex_double* B,
2754  lapack_int const* ldb,
2755  lapack_complex_double* X, lapack_int const* ldx,
2756  double* rcond,
2757  double* rpvgrw,
2758  double* berr, lapack_int const* n_err_bnds,
2759  double* err_bnds_norm,
2760  double* err_bnds_comp, lapack_int const* nparams,
2761  double* params,
2762  lapack_complex_double* work,
2763  double* rwork,
2764  lapack_int* info );
2765 
2766 #define LAPACK_cgetf2 LAPACK_GLOBAL(cgetf2,CGETF2)
2767 void LAPACK_cgetf2(
2768  lapack_int const* m, lapack_int const* n,
2769  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
2770  lapack_int* info );
2771 
2772 #define LAPACK_dgetf2 LAPACK_GLOBAL(dgetf2,DGETF2)
2773 void LAPACK_dgetf2(
2774  lapack_int const* m, lapack_int const* n,
2775  double* A, lapack_int const* lda, lapack_int* ipiv,
2776  lapack_int* info );
2777 
2778 #define LAPACK_sgetf2 LAPACK_GLOBAL(sgetf2,SGETF2)
2779 void LAPACK_sgetf2(
2780  lapack_int const* m, lapack_int const* n,
2781  float* A, lapack_int const* lda, lapack_int* ipiv,
2782  lapack_int* info );
2783 
2784 #define LAPACK_zgetf2 LAPACK_GLOBAL(zgetf2,ZGETF2)
2785 void LAPACK_zgetf2(
2786  lapack_int const* m, lapack_int const* n,
2787  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
2788  lapack_int* info );
2789 
2790 #define LAPACK_cgetrf LAPACK_GLOBAL(cgetrf,CGETRF)
2791 void LAPACK_cgetrf(
2792  lapack_int const* m, lapack_int const* n,
2793  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
2794  lapack_int* info );
2795 
2796 #define LAPACK_dgetrf LAPACK_GLOBAL(dgetrf,DGETRF)
2797 void LAPACK_dgetrf(
2798  lapack_int const* m, lapack_int const* n,
2799  double* A, lapack_int const* lda, lapack_int* ipiv,
2800  lapack_int* info );
2801 
2802 #define LAPACK_sgetrf LAPACK_GLOBAL(sgetrf,SGETRF)
2803 void LAPACK_sgetrf(
2804  lapack_int const* m, lapack_int const* n,
2805  float* A, lapack_int const* lda, lapack_int* ipiv,
2806  lapack_int* info );
2807 
2808 #define LAPACK_zgetrf LAPACK_GLOBAL(zgetrf,ZGETRF)
2809 void LAPACK_zgetrf(
2810  lapack_int const* m, lapack_int const* n,
2811  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
2812  lapack_int* info );
2813 
2814 #define LAPACK_cgetrf2 LAPACK_GLOBAL(cgetrf2,CGETRF2)
2815 void LAPACK_cgetrf2(
2816  lapack_int const* m, lapack_int const* n,
2817  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
2818  lapack_int* info );
2819 
2820 #define LAPACK_dgetrf2 LAPACK_GLOBAL(dgetrf2,DGETRF2)
2821 void LAPACK_dgetrf2(
2822  lapack_int const* m, lapack_int const* n,
2823  double* A, lapack_int const* lda, lapack_int* ipiv,
2824  lapack_int* info );
2825 
2826 #define LAPACK_sgetrf2 LAPACK_GLOBAL(sgetrf2,SGETRF2)
2827 void LAPACK_sgetrf2(
2828  lapack_int const* m, lapack_int const* n,
2829  float* A, lapack_int const* lda, lapack_int* ipiv,
2830  lapack_int* info );
2831 
2832 #define LAPACK_zgetrf2 LAPACK_GLOBAL(zgetrf2,ZGETRF2)
2833 void LAPACK_zgetrf2(
2834  lapack_int const* m, lapack_int const* n,
2835  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
2836  lapack_int* info );
2837 
2838 #define LAPACK_cgetri LAPACK_GLOBAL(cgetri,CGETRI)
2839 void LAPACK_cgetri(
2840  lapack_int const* n,
2841  lapack_complex_float* A, lapack_int const* lda, lapack_int const* ipiv,
2842  lapack_complex_float* work, lapack_int const* lwork,
2843  lapack_int* info );
2844 
2845 #define LAPACK_dgetri LAPACK_GLOBAL(dgetri,DGETRI)
2846 void LAPACK_dgetri(
2847  lapack_int const* n,
2848  double* A, lapack_int const* lda, lapack_int const* ipiv,
2849  double* work, lapack_int const* lwork,
2850  lapack_int* info );
2851 
2852 #define LAPACK_sgetri LAPACK_GLOBAL(sgetri,SGETRI)
2853 void LAPACK_sgetri(
2854  lapack_int const* n,
2855  float* A, lapack_int const* lda, lapack_int const* ipiv,
2856  float* work, lapack_int const* lwork,
2857  lapack_int* info );
2858 
2859 #define LAPACK_zgetri LAPACK_GLOBAL(zgetri,ZGETRI)
2860 void LAPACK_zgetri(
2861  lapack_int const* n,
2862  lapack_complex_double* A, lapack_int const* lda, lapack_int const* ipiv,
2863  lapack_complex_double* work, lapack_int const* lwork,
2864  lapack_int* info );
2865 
2866 #define LAPACK_cgetrs LAPACK_GLOBAL(cgetrs,CGETRS)
2867 void LAPACK_cgetrs(
2868  char const* trans,
2869  lapack_int const* n, lapack_int const* nrhs,
2870  lapack_complex_float const* A, lapack_int const* lda, lapack_int const* ipiv,
2871  lapack_complex_float* B, lapack_int const* ldb,
2872  lapack_int* info );
2873 
2874 #define LAPACK_dgetrs LAPACK_GLOBAL(dgetrs,DGETRS)
2875 void LAPACK_dgetrs(
2876  char const* trans,
2877  lapack_int const* n, lapack_int const* nrhs,
2878  double const* A, lapack_int const* lda, lapack_int const* ipiv,
2879  double* B, lapack_int const* ldb,
2880  lapack_int* info );
2881 
2882 #define LAPACK_sgetrs LAPACK_GLOBAL(sgetrs,SGETRS)
2883 void LAPACK_sgetrs(
2884  char const* trans,
2885  lapack_int const* n, lapack_int const* nrhs,
2886  float const* A, lapack_int const* lda, lapack_int const* ipiv,
2887  float* B, lapack_int const* ldb,
2888  lapack_int* info );
2889 
2890 #define LAPACK_zgetrs LAPACK_GLOBAL(zgetrs,ZGETRS)
2891 void LAPACK_zgetrs(
2892  char const* trans,
2893  lapack_int const* n, lapack_int const* nrhs,
2894  lapack_complex_double const* A, lapack_int const* lda, lapack_int const* ipiv,
2895  lapack_complex_double* B, lapack_int const* ldb,
2896  lapack_int* info );
2897 
2898 #define LAPACK_cgetsls LAPACK_GLOBAL(cgetsls,CGETSLS)
2899 void LAPACK_cgetsls(
2900  char const* trans,
2901  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
2902  lapack_complex_float* A, lapack_int const* lda,
2903  lapack_complex_float* B, lapack_int const* ldb,
2904  lapack_complex_float* work, lapack_int const* lwork,
2905  lapack_int* info );
2906 
2907 #define LAPACK_dgetsls LAPACK_GLOBAL(dgetsls,DGETSLS)
2908 void LAPACK_dgetsls(
2909  char const* trans,
2910  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
2911  double* A, lapack_int const* lda,
2912  double* B, lapack_int const* ldb,
2913  double* work, lapack_int const* lwork,
2914  lapack_int* info );
2915 
2916 #define LAPACK_sgetsls LAPACK_GLOBAL(sgetsls,SGETSLS)
2917 void LAPACK_sgetsls(
2918  char const* trans,
2919  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
2920  float* A, lapack_int const* lda,
2921  float* B, lapack_int const* ldb,
2922  float* work, lapack_int const* lwork,
2923  lapack_int* info );
2924 
2925 #define LAPACK_zgetsls LAPACK_GLOBAL(zgetsls,ZGETSLS)
2926 void LAPACK_zgetsls(
2927  char const* trans,
2928  lapack_int const* m, lapack_int const* n, lapack_int const* nrhs,
2929  lapack_complex_double* A, lapack_int const* lda,
2930  lapack_complex_double* B, lapack_int const* ldb,
2931  lapack_complex_double* work, lapack_int const* lwork,
2932  lapack_int* info );
2933 
2934 #define LAPACK_cggbak LAPACK_GLOBAL(cggbak,CGGBAK)
2935 void LAPACK_cggbak(
2936  char const* job, char const* side,
2937  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
2938  float const* lscale,
2939  float const* rscale, lapack_int const* m,
2940  lapack_complex_float* V, lapack_int const* ldv,
2941  lapack_int* info );
2942 
2943 #define LAPACK_dggbak LAPACK_GLOBAL(dggbak,DGGBAK)
2944 void LAPACK_dggbak(
2945  char const* job, char const* side,
2946  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
2947  double const* lscale,
2948  double const* rscale, lapack_int const* m,
2949  double* V, lapack_int const* ldv,
2950  lapack_int* info );
2951 
2952 #define LAPACK_sggbak LAPACK_GLOBAL(sggbak,SGGBAK)
2953 void LAPACK_sggbak(
2954  char const* job, char const* side,
2955  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
2956  float const* lscale,
2957  float const* rscale, lapack_int const* m,
2958  float* V, lapack_int const* ldv,
2959  lapack_int* info );
2960 
2961 #define LAPACK_zggbak LAPACK_GLOBAL(zggbak,ZGGBAK)
2962 void LAPACK_zggbak(
2963  char const* job, char const* side,
2964  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
2965  double const* lscale,
2966  double const* rscale, lapack_int const* m,
2967  lapack_complex_double* V, lapack_int const* ldv,
2968  lapack_int* info );
2969 
2970 #define LAPACK_cggbal LAPACK_GLOBAL(cggbal,CGGBAL)
2971 void LAPACK_cggbal(
2972  char const* job,
2973  lapack_int const* n,
2974  lapack_complex_float* A, lapack_int const* lda,
2975  lapack_complex_float* B, lapack_int const* ldb, lapack_int* ilo, lapack_int* ihi,
2976  float* lscale,
2977  float* rscale,
2978  float* work,
2979  lapack_int* info );
2980 
2981 #define LAPACK_dggbal LAPACK_GLOBAL(dggbal,DGGBAL)
2982 void LAPACK_dggbal(
2983  char const* job,
2984  lapack_int const* n,
2985  double* A, lapack_int const* lda,
2986  double* B, lapack_int const* ldb, lapack_int* ilo, lapack_int* ihi,
2987  double* lscale,
2988  double* rscale,
2989  double* work,
2990  lapack_int* info );
2991 
2992 #define LAPACK_sggbal LAPACK_GLOBAL(sggbal,SGGBAL)
2993 void LAPACK_sggbal(
2994  char const* job,
2995  lapack_int const* n,
2996  float* A, lapack_int const* lda,
2997  float* B, lapack_int const* ldb, lapack_int* ilo, lapack_int* ihi,
2998  float* lscale,
2999  float* rscale,
3000  float* work,
3001  lapack_int* info );
3002 
3003 #define LAPACK_zggbal LAPACK_GLOBAL(zggbal,ZGGBAL)
3004 void LAPACK_zggbal(
3005  char const* job,
3006  lapack_int const* n,
3007  lapack_complex_double* A, lapack_int const* lda,
3008  lapack_complex_double* B, lapack_int const* ldb, lapack_int* ilo, lapack_int* ihi,
3009  double* lscale,
3010  double* rscale,
3011  double* work,
3012  lapack_int* info );
3013 
3014 #define LAPACK_cgges LAPACK_GLOBAL(cgges,CGGES)
3015 void LAPACK_cgges(
3016  char const* jobvsl, char const* jobvsr, char const* sort, LAPACK_C_SELECT2 selctg,
3017  lapack_int const* n,
3018  lapack_complex_float* A, lapack_int const* lda,
3019  lapack_complex_float* B, lapack_int const* ldb, lapack_int* sdim,
3020  lapack_complex_float* alpha,
3021  lapack_complex_float* beta,
3022  lapack_complex_float* VSL, lapack_int const* ldvsl,
3023  lapack_complex_float* VSR, lapack_int const* ldvsr,
3024  lapack_complex_float* work, lapack_int const* lwork,
3025  float* rwork, lapack_logical* BWORK,
3026  lapack_int* info );
3027 
3028 #define LAPACK_dgges LAPACK_GLOBAL(dgges,DGGES)
3029 void LAPACK_dgges(
3030  char const* jobvsl, char const* jobvsr, char const* sort, LAPACK_D_SELECT3 selctg,
3031  lapack_int const* n,
3032  double* A, lapack_int const* lda,
3033  double* B, lapack_int const* ldb, lapack_int* sdim,
3034  double* alphar,
3035  double* alphai,
3036  double* beta,
3037  double* VSL, lapack_int const* ldvsl,
3038  double* VSR, lapack_int const* ldvsr,
3039  double* work, lapack_int const* lwork, lapack_logical* BWORK,
3040  lapack_int* info );
3041 
3042 #define LAPACK_sgges LAPACK_GLOBAL(sgges,SGGES)
3043 void LAPACK_sgges(
3044  char const* jobvsl, char const* jobvsr, char const* sort, LAPACK_S_SELECT3 selctg,
3045  lapack_int const* n,
3046  float* A, lapack_int const* lda,
3047  float* B, lapack_int const* ldb, lapack_int* sdim,
3048  float* alphar,
3049  float* alphai,
3050  float* beta,
3051  float* VSL, lapack_int const* ldvsl,
3052  float* VSR, lapack_int const* ldvsr,
3053  float* work, lapack_int const* lwork, lapack_logical* BWORK,
3054  lapack_int* info );
3055 
3056 #define LAPACK_zgges LAPACK_GLOBAL(zgges,ZGGES)
3057 void LAPACK_zgges(
3058  char const* jobvsl, char const* jobvsr, char const* sort, LAPACK_Z_SELECT2 selctg,
3059  lapack_int const* n,
3060  lapack_complex_double* A, lapack_int const* lda,
3061  lapack_complex_double* B, lapack_int const* ldb, lapack_int* sdim,
3062  lapack_complex_double* alpha,
3063  lapack_complex_double* beta,
3064  lapack_complex_double* VSL, lapack_int const* ldvsl,
3065  lapack_complex_double* VSR, lapack_int const* ldvsr,
3066  lapack_complex_double* work, lapack_int const* lwork,
3067  double* rwork, lapack_logical* BWORK,
3068  lapack_int* info );
3069 
3070 #define LAPACK_cgges3 LAPACK_GLOBAL(cgges3,CGGES3)
3071 void LAPACK_cgges3(
3072  char const* jobvsl, char const* jobvsr, char const* sort, LAPACK_C_SELECT2 selctg,
3073  lapack_int const* n,
3074  lapack_complex_float* A, lapack_int const* lda,
3075  lapack_complex_float* B, lapack_int const* ldb, lapack_int* sdim,
3076  lapack_complex_float* alpha,
3077  lapack_complex_float* beta,
3078  lapack_complex_float* VSL, lapack_int const* ldvsl,
3079  lapack_complex_float* VSR, lapack_int const* ldvsr,
3080  lapack_complex_float* work, lapack_int const* lwork,
3081  float* rwork, lapack_logical* BWORK,
3082  lapack_int* info );
3083 
3084 #define LAPACK_dgges3 LAPACK_GLOBAL(dgges3,DGGES3)
3085 void LAPACK_dgges3(
3086  char const* jobvsl, char const* jobvsr, char const* sort, LAPACK_D_SELECT3 selctg,
3087  lapack_int const* n,
3088  double* A, lapack_int const* lda,
3089  double* B, lapack_int const* ldb, lapack_int* sdim,
3090  double* alphar,
3091  double* alphai,
3092  double* beta,
3093  double* VSL, lapack_int const* ldvsl,
3094  double* VSR, lapack_int const* ldvsr,
3095  double* work, lapack_int const* lwork, lapack_logical* BWORK,
3096  lapack_int* info );
3097 
3098 #define LAPACK_sgges3 LAPACK_GLOBAL(sgges3,SGGES3)
3099 void LAPACK_sgges3(
3100  char const* jobvsl, char const* jobvsr, char const* sort, LAPACK_S_SELECT3 selctg,
3101  lapack_int const* n,
3102  float* A, lapack_int const* lda,
3103  float* B, lapack_int const* ldb, lapack_int* sdim,
3104  float* alphar,
3105  float* alphai,
3106  float* beta,
3107  float* VSL, lapack_int const* ldvsl,
3108  float* VSR, lapack_int const* ldvsr,
3109  float* work, lapack_int const* lwork, lapack_logical* BWORK,
3110  lapack_int* info );
3111 
3112 #define LAPACK_zgges3 LAPACK_GLOBAL(zgges3,ZGGES3)
3113 void LAPACK_zgges3(
3114  char const* jobvsl, char const* jobvsr, char const* sort, LAPACK_Z_SELECT2 selctg,
3115  lapack_int const* n,
3116  lapack_complex_double* A, lapack_int const* lda,
3117  lapack_complex_double* B, lapack_int const* ldb, lapack_int* sdim,
3118  lapack_complex_double* alpha,
3119  lapack_complex_double* beta,
3120  lapack_complex_double* VSL, lapack_int const* ldvsl,
3121  lapack_complex_double* VSR, lapack_int const* ldvsr,
3122  lapack_complex_double* work, lapack_int const* lwork,
3123  double* rwork, lapack_logical* BWORK,
3124  lapack_int* info );
3125 
3126 #define LAPACK_cggesx LAPACK_GLOBAL(cggesx,CGGESX)
3127 void LAPACK_cggesx(
3128  char const* jobvsl, char const* jobvsr, char const* sort, LAPACK_C_SELECT2 selctg, char const* sense,
3129  lapack_int const* n,
3130  lapack_complex_float* A, lapack_int const* lda,
3131  lapack_complex_float* B, lapack_int const* ldb, lapack_int* sdim,
3132  lapack_complex_float* alpha,
3133  lapack_complex_float* beta,
3134  lapack_complex_float* VSL, lapack_int const* ldvsl,
3135  lapack_complex_float* VSR, lapack_int const* ldvsr,
3136  float* rconde,
3137  float* rcondv,
3138  lapack_complex_float* work, lapack_int const* lwork,
3139  float* rwork,
3140  lapack_int* iwork, lapack_int const* liwork, lapack_logical* BWORK,
3141  lapack_int* info );
3142 
3143 #define LAPACK_dggesx LAPACK_GLOBAL(dggesx,DGGESX)
3144 void LAPACK_dggesx(
3145  char const* jobvsl, char const* jobvsr, char const* sort, LAPACK_D_SELECT3 selctg, char const* sense,
3146  lapack_int const* n,
3147  double* A, lapack_int const* lda,
3148  double* B, lapack_int const* ldb, lapack_int* sdim,
3149  double* alphar,
3150  double* alphai,
3151  double* beta,
3152  double* VSL, lapack_int const* ldvsl,
3153  double* VSR, lapack_int const* ldvsr,
3154  double* rconde,
3155  double* rcondv,
3156  double* work, lapack_int const* lwork,
3157  lapack_int* iwork, lapack_int const* liwork, lapack_logical* BWORK,
3158  lapack_int* info );
3159 
3160 #define LAPACK_sggesx LAPACK_GLOBAL(sggesx,SGGESX)
3161 void LAPACK_sggesx(
3162  char const* jobvsl, char const* jobvsr, char const* sort, LAPACK_S_SELECT3 selctg, char const* sense,
3163  lapack_int const* n,
3164  float* A, lapack_int const* lda,
3165  float* B, lapack_int const* ldb, lapack_int* sdim,
3166  float* alphar,
3167  float* alphai,
3168  float* beta,
3169  float* VSL, lapack_int const* ldvsl,
3170  float* VSR, lapack_int const* ldvsr,
3171  float* rconde,
3172  float* rcondv,
3173  float* work, lapack_int const* lwork,
3174  lapack_int* iwork, lapack_int const* liwork, lapack_logical* BWORK,
3175  lapack_int* info );
3176 
3177 #define LAPACK_zggesx LAPACK_GLOBAL(zggesx,ZGGESX)
3178 void LAPACK_zggesx(
3179  char const* jobvsl, char const* jobvsr, char const* sort, LAPACK_Z_SELECT2 selctg, char const* sense,
3180  lapack_int const* n,
3181  lapack_complex_double* A, lapack_int const* lda,
3182  lapack_complex_double* B, lapack_int const* ldb, lapack_int* sdim,
3183  lapack_complex_double* alpha,
3184  lapack_complex_double* beta,
3185  lapack_complex_double* VSL, lapack_int const* ldvsl,
3186  lapack_complex_double* VSR, lapack_int const* ldvsr,
3187  double* rconde,
3188  double* rcondv,
3189  lapack_complex_double* work, lapack_int const* lwork,
3190  double* rwork,
3191  lapack_int* iwork, lapack_int const* liwork, lapack_logical* BWORK,
3192  lapack_int* info );
3193 
3194 #define LAPACK_cggev LAPACK_GLOBAL(cggev,CGGEV)
3195 void LAPACK_cggev(
3196  char const* jobvl, char const* jobvr,
3197  lapack_int const* n,
3198  lapack_complex_float* A, lapack_int const* lda,
3199  lapack_complex_float* B, lapack_int const* ldb,
3200  lapack_complex_float* alpha,
3201  lapack_complex_float* beta,
3202  lapack_complex_float* VL, lapack_int const* ldvl,
3203  lapack_complex_float* VR, lapack_int const* ldvr,
3204  lapack_complex_float* work, lapack_int const* lwork,
3205  float* rwork,
3206  lapack_int* info );
3207 
3208 #define LAPACK_dggev LAPACK_GLOBAL(dggev,DGGEV)
3209 void LAPACK_dggev(
3210  char const* jobvl, char const* jobvr,
3211  lapack_int const* n,
3212  double* A, lapack_int const* lda,
3213  double* B, lapack_int const* ldb,
3214  double* alphar,
3215  double* alphai,
3216  double* beta,
3217  double* VL, lapack_int const* ldvl,
3218  double* VR, lapack_int const* ldvr,
3219  double* work, lapack_int const* lwork,
3220  lapack_int* info );
3221 
3222 #define LAPACK_sggev LAPACK_GLOBAL(sggev,SGGEV)
3223 void LAPACK_sggev(
3224  char const* jobvl, char const* jobvr,
3225  lapack_int const* n,
3226  float* A, lapack_int const* lda,
3227  float* B, lapack_int const* ldb,
3228  float* alphar,
3229  float* alphai,
3230  float* beta,
3231  float* VL, lapack_int const* ldvl,
3232  float* VR, lapack_int const* ldvr,
3233  float* work, lapack_int const* lwork,
3234  lapack_int* info );
3235 
3236 #define LAPACK_zggev LAPACK_GLOBAL(zggev,ZGGEV)
3237 void LAPACK_zggev(
3238  char const* jobvl, char const* jobvr,
3239  lapack_int const* n,
3240  lapack_complex_double* A, lapack_int const* lda,
3241  lapack_complex_double* B, lapack_int const* ldb,
3242  lapack_complex_double* alpha,
3243  lapack_complex_double* beta,
3244  lapack_complex_double* VL, lapack_int const* ldvl,
3245  lapack_complex_double* VR, lapack_int const* ldvr,
3246  lapack_complex_double* work, lapack_int const* lwork,
3247  double* rwork,
3248  lapack_int* info );
3249 
3250 #define LAPACK_cggev3 LAPACK_GLOBAL(cggev3,CGGEV3)
3251 void LAPACK_cggev3(
3252  char const* jobvl, char const* jobvr,
3253  lapack_int const* n,
3254  lapack_complex_float* A, lapack_int const* lda,
3255  lapack_complex_float* B, lapack_int const* ldb,
3256  lapack_complex_float* alpha,
3257  lapack_complex_float* beta,
3258  lapack_complex_float* VL, lapack_int const* ldvl,
3259  lapack_complex_float* VR, lapack_int const* ldvr,
3260  lapack_complex_float* work, lapack_int const* lwork,
3261  float* rwork,
3262  lapack_int* info );
3263 
3264 #define LAPACK_dggev3 LAPACK_GLOBAL(dggev3,DGGEV3)
3265 void LAPACK_dggev3(
3266  char const* jobvl, char const* jobvr,
3267  lapack_int const* n,
3268  double* A, lapack_int const* lda,
3269  double* B, lapack_int const* ldb,
3270  double* alphar,
3271  double* alphai,
3272  double* beta,
3273  double* VL, lapack_int const* ldvl,
3274  double* VR, lapack_int const* ldvr,
3275  double* work, lapack_int const* lwork,
3276  lapack_int* info );
3277 
3278 #define LAPACK_sggev3 LAPACK_GLOBAL(sggev3,SGGEV3)
3279 void LAPACK_sggev3(
3280  char const* jobvl, char const* jobvr,
3281  lapack_int const* n,
3282  float* A, lapack_int const* lda,
3283  float* B, lapack_int const* ldb,
3284  float* alphar,
3285  float* alphai,
3286  float* beta,
3287  float* VL, lapack_int const* ldvl,
3288  float* VR, lapack_int const* ldvr,
3289  float* work, lapack_int const* lwork,
3290  lapack_int* info );
3291 
3292 #define LAPACK_zggev3 LAPACK_GLOBAL(zggev3,ZGGEV3)
3293 void LAPACK_zggev3(
3294  char const* jobvl, char const* jobvr,
3295  lapack_int const* n,
3296  lapack_complex_double* A, lapack_int const* lda,
3297  lapack_complex_double* B, lapack_int const* ldb,
3298  lapack_complex_double* alpha,
3299  lapack_complex_double* beta,
3300  lapack_complex_double* VL, lapack_int const* ldvl,
3301  lapack_complex_double* VR, lapack_int const* ldvr,
3302  lapack_complex_double* work, lapack_int const* lwork,
3303  double* rwork,
3304  lapack_int* info );
3305 
3306 #define LAPACK_cggevx LAPACK_GLOBAL(cggevx,CGGEVX)
3307 void LAPACK_cggevx(
3308  char const* balanc, char const* jobvl, char const* jobvr, char const* sense,
3309  lapack_int const* n,
3310  lapack_complex_float* A, lapack_int const* lda,
3311  lapack_complex_float* B, lapack_int const* ldb,
3312  lapack_complex_float* alpha,
3313  lapack_complex_float* beta,
3314  lapack_complex_float* VL, lapack_int const* ldvl,
3315  lapack_complex_float* VR, lapack_int const* ldvr, lapack_int* ilo, lapack_int* ihi,
3316  float* lscale,
3317  float* rscale,
3318  float* abnrm,
3319  float* bbnrm,
3320  float* rconde,
3321  float* rcondv,
3322  lapack_complex_float* work, lapack_int const* lwork,
3323  float* rwork,
3324  lapack_int* iwork, lapack_logical* BWORK,
3325  lapack_int* info );
3326 
3327 #define LAPACK_dggevx LAPACK_GLOBAL(dggevx,DGGEVX)
3328 void LAPACK_dggevx(
3329  char const* balanc, char const* jobvl, char const* jobvr, char const* sense,
3330  lapack_int const* n,
3331  double* A, lapack_int const* lda,
3332  double* B, lapack_int const* ldb,
3333  double* alphar,
3334  double* alphai,
3335  double* beta,
3336  double* VL, lapack_int const* ldvl,
3337  double* VR, lapack_int const* ldvr, lapack_int* ilo, lapack_int* ihi,
3338  double* lscale,
3339  double* rscale,
3340  double* abnrm,
3341  double* bbnrm,
3342  double* rconde,
3343  double* rcondv,
3344  double* work, lapack_int const* lwork,
3345  lapack_int* iwork, lapack_logical* BWORK,
3346  lapack_int* info );
3347 
3348 #define LAPACK_sggevx LAPACK_GLOBAL(sggevx,SGGEVX)
3349 void LAPACK_sggevx(
3350  char const* balanc, char const* jobvl, char const* jobvr, char const* sense,
3351  lapack_int const* n,
3352  float* A, lapack_int const* lda,
3353  float* B, lapack_int const* ldb,
3354  float* alphar,
3355  float* alphai,
3356  float* beta,
3357  float* VL, lapack_int const* ldvl,
3358  float* VR, lapack_int const* ldvr, lapack_int* ilo, lapack_int* ihi,
3359  float* lscale,
3360  float* rscale,
3361  float* abnrm,
3362  float* bbnrm,
3363  float* rconde,
3364  float* rcondv,
3365  float* work, lapack_int const* lwork,
3366  lapack_int* iwork, lapack_logical* BWORK,
3367  lapack_int* info );
3368 
3369 #define LAPACK_zggevx LAPACK_GLOBAL(zggevx,ZGGEVX)
3370 void LAPACK_zggevx(
3371  char const* balanc, char const* jobvl, char const* jobvr, char const* sense,
3372  lapack_int const* n,
3373  lapack_complex_double* A, lapack_int const* lda,
3374  lapack_complex_double* B, lapack_int const* ldb,
3375  lapack_complex_double* alpha,
3376  lapack_complex_double* beta,
3377  lapack_complex_double* VL, lapack_int const* ldvl,
3378  lapack_complex_double* VR, lapack_int const* ldvr, lapack_int* ilo, lapack_int* ihi,
3379  double* lscale,
3380  double* rscale,
3381  double* abnrm,
3382  double* bbnrm,
3383  double* rconde,
3384  double* rcondv,
3385  lapack_complex_double* work, lapack_int const* lwork,
3386  double* rwork,
3387  lapack_int* iwork, lapack_logical* BWORK,
3388  lapack_int* info );
3389 
3390 #define LAPACK_cggglm LAPACK_GLOBAL(cggglm,CGGGLM)
3391 void LAPACK_cggglm(
3392  lapack_int const* n, lapack_int const* m, lapack_int const* p,
3393  lapack_complex_float* A, lapack_int const* lda,
3394  lapack_complex_float* B, lapack_int const* ldb,
3395  lapack_complex_float* D,
3396  lapack_complex_float* X,
3397  lapack_complex_float* Y,
3398  lapack_complex_float* work, lapack_int const* lwork,
3399  lapack_int* info );
3400 
3401 #define LAPACK_dggglm LAPACK_GLOBAL(dggglm,DGGGLM)
3402 void LAPACK_dggglm(
3403  lapack_int const* n, lapack_int const* m, lapack_int const* p,
3404  double* A, lapack_int const* lda,
3405  double* B, lapack_int const* ldb,
3406  double* D,
3407  double* X,
3408  double* Y,
3409  double* work, lapack_int const* lwork,
3410  lapack_int* info );
3411 
3412 #define LAPACK_sggglm LAPACK_GLOBAL(sggglm,SGGGLM)
3413 void LAPACK_sggglm(
3414  lapack_int const* n, lapack_int const* m, lapack_int const* p,
3415  float* A, lapack_int const* lda,
3416  float* B, lapack_int const* ldb,
3417  float* D,
3418  float* X,
3419  float* Y,
3420  float* work, lapack_int const* lwork,
3421  lapack_int* info );
3422 
3423 #define LAPACK_zggglm LAPACK_GLOBAL(zggglm,ZGGGLM)
3424 void LAPACK_zggglm(
3425  lapack_int const* n, lapack_int const* m, lapack_int const* p,
3426  lapack_complex_double* A, lapack_int const* lda,
3427  lapack_complex_double* B, lapack_int const* ldb,
3428  lapack_complex_double* D,
3429  lapack_complex_double* X,
3430  lapack_complex_double* Y,
3431  lapack_complex_double* work, lapack_int const* lwork,
3432  lapack_int* info );
3433 
3434 #define LAPACK_cgghd3 LAPACK_GLOBAL(cgghd3,CGGHD3)
3435 void LAPACK_cgghd3(
3436  char const* compq, char const* compz,
3437  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
3438  lapack_complex_float* A, lapack_int const* lda,
3439  lapack_complex_float* B, lapack_int const* ldb,
3440  lapack_complex_float* Q, lapack_int const* ldq,
3441  lapack_complex_float* Z, lapack_int const* ldz,
3442  lapack_complex_float* work, lapack_int const* lwork,
3443  lapack_int* info );
3444 
3445 #define LAPACK_dgghd3 LAPACK_GLOBAL(dgghd3,DGGHD3)
3446 void LAPACK_dgghd3(
3447  char const* compq, char const* compz,
3448  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
3449  double* A, lapack_int const* lda,
3450  double* B, lapack_int const* ldb,
3451  double* Q, lapack_int const* ldq,
3452  double* Z, lapack_int const* ldz,
3453  double* work, lapack_int const* lwork,
3454  lapack_int* info );
3455 
3456 #define LAPACK_sgghd3 LAPACK_GLOBAL(sgghd3,SGGHD3)
3457 void LAPACK_sgghd3(
3458  char const* compq, char const* compz,
3459  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
3460  float* A, lapack_int const* lda,
3461  float* B, lapack_int const* ldb,
3462  float* Q, lapack_int const* ldq,
3463  float* Z, lapack_int const* ldz,
3464  float* work, lapack_int const* lwork,
3465  lapack_int* info );
3466 
3467 #define LAPACK_zgghd3 LAPACK_GLOBAL(zgghd3,ZGGHD3)
3468 void LAPACK_zgghd3(
3469  char const* compq, char const* compz,
3470  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
3471  lapack_complex_double* A, lapack_int const* lda,
3472  lapack_complex_double* B, lapack_int const* ldb,
3473  lapack_complex_double* Q, lapack_int const* ldq,
3474  lapack_complex_double* Z, lapack_int const* ldz,
3475  lapack_complex_double* work, lapack_int const* lwork,
3476  lapack_int* info );
3477 
3478 #define LAPACK_cgghrd LAPACK_GLOBAL(cgghrd,CGGHRD)
3479 void LAPACK_cgghrd(
3480  char const* compq, char const* compz,
3481  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
3482  lapack_complex_float* A, lapack_int const* lda,
3483  lapack_complex_float* B, lapack_int const* ldb,
3484  lapack_complex_float* Q, lapack_int const* ldq,
3485  lapack_complex_float* Z, lapack_int const* ldz,
3486  lapack_int* info );
3487 
3488 #define LAPACK_dgghrd LAPACK_GLOBAL(dgghrd,DGGHRD)
3489 void LAPACK_dgghrd(
3490  char const* compq, char const* compz,
3491  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
3492  double* A, lapack_int const* lda,
3493  double* B, lapack_int const* ldb,
3494  double* Q, lapack_int const* ldq,
3495  double* Z, lapack_int const* ldz,
3496  lapack_int* info );
3497 
3498 #define LAPACK_sgghrd LAPACK_GLOBAL(sgghrd,SGGHRD)
3499 void LAPACK_sgghrd(
3500  char const* compq, char const* compz,
3501  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
3502  float* A, lapack_int const* lda,
3503  float* B, lapack_int const* ldb,
3504  float* Q, lapack_int const* ldq,
3505  float* Z, lapack_int const* ldz,
3506  lapack_int* info );
3507 
3508 #define LAPACK_zgghrd LAPACK_GLOBAL(zgghrd,ZGGHRD)
3509 void LAPACK_zgghrd(
3510  char const* compq, char const* compz,
3511  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
3512  lapack_complex_double* A, lapack_int const* lda,
3513  lapack_complex_double* B, lapack_int const* ldb,
3514  lapack_complex_double* Q, lapack_int const* ldq,
3515  lapack_complex_double* Z, lapack_int const* ldz,
3516  lapack_int* info );
3517 
3518 #define LAPACK_cgglse LAPACK_GLOBAL(cgglse,CGGLSE)
3519 void LAPACK_cgglse(
3520  lapack_int const* m, lapack_int const* n, lapack_int const* p,
3521  lapack_complex_float* A, lapack_int const* lda,
3522  lapack_complex_float* B, lapack_int const* ldb,
3523  lapack_complex_float* C,
3524  lapack_complex_float* D,
3525  lapack_complex_float* X,
3526  lapack_complex_float* work, lapack_int const* lwork,
3527  lapack_int* info );
3528 
3529 #define LAPACK_dgglse LAPACK_GLOBAL(dgglse,DGGLSE)
3530 void LAPACK_dgglse(
3531  lapack_int const* m, lapack_int const* n, lapack_int const* p,
3532  double* A, lapack_int const* lda,
3533  double* B, lapack_int const* ldb,
3534  double* C,
3535  double* D,
3536  double* X,
3537  double* work, lapack_int const* lwork,
3538  lapack_int* info );
3539 
3540 #define LAPACK_sgglse LAPACK_GLOBAL(sgglse,SGGLSE)
3541 void LAPACK_sgglse(
3542  lapack_int const* m, lapack_int const* n, lapack_int const* p,
3543  float* A, lapack_int const* lda,
3544  float* B, lapack_int const* ldb,
3545  float* C,
3546  float* D,
3547  float* X,
3548  float* work, lapack_int const* lwork,
3549  lapack_int* info );
3550 
3551 #define LAPACK_zgglse LAPACK_GLOBAL(zgglse,ZGGLSE)
3552 void LAPACK_zgglse(
3553  lapack_int const* m, lapack_int const* n, lapack_int const* p,
3554  lapack_complex_double* A, lapack_int const* lda,
3555  lapack_complex_double* B, lapack_int const* ldb,
3556  lapack_complex_double* C,
3557  lapack_complex_double* D,
3558  lapack_complex_double* X,
3559  lapack_complex_double* work, lapack_int const* lwork,
3560  lapack_int* info );
3561 
3562 #define LAPACK_cggqrf LAPACK_GLOBAL(cggqrf,CGGQRF)
3563 void LAPACK_cggqrf(
3564  lapack_int const* n, lapack_int const* m, lapack_int const* p,
3565  lapack_complex_float* A, lapack_int const* lda,
3566  lapack_complex_float* taua,
3567  lapack_complex_float* B, lapack_int const* ldb,
3568  lapack_complex_float* taub,
3569  lapack_complex_float* work, lapack_int const* lwork,
3570  lapack_int* info );
3571 
3572 #define LAPACK_dggqrf LAPACK_GLOBAL(dggqrf,DGGQRF)
3573 void LAPACK_dggqrf(
3574  lapack_int const* n, lapack_int const* m, lapack_int const* p,
3575  double* A, lapack_int const* lda,
3576  double* taua,
3577  double* B, lapack_int const* ldb,
3578  double* taub,
3579  double* work, lapack_int const* lwork,
3580  lapack_int* info );
3581 
3582 #define LAPACK_sggqrf LAPACK_GLOBAL(sggqrf,SGGQRF)
3583 void LAPACK_sggqrf(
3584  lapack_int const* n, lapack_int const* m, lapack_int const* p,
3585  float* A, lapack_int const* lda,
3586  float* taua,
3587  float* B, lapack_int const* ldb,
3588  float* taub,
3589  float* work, lapack_int const* lwork,
3590  lapack_int* info );
3591 
3592 #define LAPACK_zggqrf LAPACK_GLOBAL(zggqrf,ZGGQRF)
3593 void LAPACK_zggqrf(
3594  lapack_int const* n, lapack_int const* m, lapack_int const* p,
3595  lapack_complex_double* A, lapack_int const* lda,
3596  lapack_complex_double* taua,
3597  lapack_complex_double* B, lapack_int const* ldb,
3598  lapack_complex_double* taub,
3599  lapack_complex_double* work, lapack_int const* lwork,
3600  lapack_int* info );
3601 
3602 #define LAPACK_cggrqf LAPACK_GLOBAL(cggrqf,CGGRQF)
3603 void LAPACK_cggrqf(
3604  lapack_int const* m, lapack_int const* p, lapack_int const* n,
3605  lapack_complex_float* A, lapack_int const* lda,
3606  lapack_complex_float* taua,
3607  lapack_complex_float* B, lapack_int const* ldb,
3608  lapack_complex_float* taub,
3609  lapack_complex_float* work, lapack_int const* lwork,
3610  lapack_int* info );
3611 
3612 #define LAPACK_dggrqf LAPACK_GLOBAL(dggrqf,DGGRQF)
3613 void LAPACK_dggrqf(
3614  lapack_int const* m, lapack_int const* p, lapack_int const* n,
3615  double* A, lapack_int const* lda,
3616  double* taua,
3617  double* B, lapack_int const* ldb,
3618  double* taub,
3619  double* work, lapack_int const* lwork,
3620  lapack_int* info );
3621 
3622 #define LAPACK_sggrqf LAPACK_GLOBAL(sggrqf,SGGRQF)
3623 void LAPACK_sggrqf(
3624  lapack_int const* m, lapack_int const* p, lapack_int const* n,
3625  float* A, lapack_int const* lda,
3626  float* taua,
3627  float* B, lapack_int const* ldb,
3628  float* taub,
3629  float* work, lapack_int const* lwork,
3630  lapack_int* info );
3631 
3632 #define LAPACK_zggrqf LAPACK_GLOBAL(zggrqf,ZGGRQF)
3633 void LAPACK_zggrqf(
3634  lapack_int const* m, lapack_int const* p, lapack_int const* n,
3635  lapack_complex_double* A, lapack_int const* lda,
3636  lapack_complex_double* taua,
3637  lapack_complex_double* B, lapack_int const* ldb,
3638  lapack_complex_double* taub,
3639  lapack_complex_double* work, lapack_int const* lwork,
3640  lapack_int* info );
3641 
3642 #define LAPACK_sggsvd LAPACK_GLOBAL(sggsvd,SGGSVD)
3643 lapack_int LAPACKE_sggsvd( int matrix_layout, char jobu, char jobv, char jobq,
3644  lapack_int m, lapack_int n, lapack_int p,
3645  lapack_int* k, lapack_int* l, float* a,
3646  lapack_int lda, float* b, lapack_int ldb,
3647  float* alpha, float* beta, float* u, lapack_int ldu,
3648  float* v, lapack_int ldv, float* q, lapack_int ldq,
3649  lapack_int* iwork );
3650 
3651 #define LAPACK_dggsvd LAPACK_GLOBAL(dggsvd,DGGSVD)
3652 lapack_int LAPACKE_dggsvd( int matrix_layout, char jobu, char jobv, char jobq,
3653  lapack_int m, lapack_int n, lapack_int p,
3654  lapack_int* k, lapack_int* l, double* a,
3655  lapack_int lda, double* b, lapack_int ldb,
3656  double* alpha, double* beta, double* u,
3657  lapack_int ldu, double* v, lapack_int ldv, double* q,
3658  lapack_int ldq, lapack_int* iwork );
3659 
3660 #define LAPACK_cggsvd LAPACK_GLOBAL(cggsvd,CGGSVD)
3661 lapack_int LAPACKE_cggsvd( int matrix_layout, char jobu, char jobv, char jobq,
3662  lapack_int m, lapack_int n, lapack_int p,
3663  lapack_int* k, lapack_int* l,
3664  lapack_complex_float* a, lapack_int lda,
3665  lapack_complex_float* b, lapack_int ldb,
3666  float* alpha, float* beta, lapack_complex_float* u,
3667  lapack_int ldu, lapack_complex_float* v,
3668  lapack_int ldv, lapack_complex_float* q,
3669  lapack_int ldq, lapack_int* iwork );
3670 
3671 #define LAPACK_zggsvd LAPACK_GLOBAL(zggsvd,ZGGSVD)
3672 lapack_int LAPACKE_zggsvd( int matrix_layout, char jobu, char jobv, char jobq,
3673  lapack_int m, lapack_int n, lapack_int p,
3674  lapack_int* k, lapack_int* l,
3675  lapack_complex_double* a, lapack_int lda,
3676  lapack_complex_double* b, lapack_int ldb,
3677  double* alpha, double* beta,
3678  lapack_complex_double* u, lapack_int ldu,
3679  lapack_complex_double* v, lapack_int ldv,
3680  lapack_complex_double* q, lapack_int ldq,
3681  lapack_int* iwork );
3682 
3683 #define LAPACK_cggsvd3 LAPACK_GLOBAL(cggsvd3,CGGSVD3)
3684 void LAPACK_cggsvd3(
3685  char const* jobu, char const* jobv, char const* jobq,
3686  lapack_int const* m, lapack_int const* n, lapack_int const* p, lapack_int* k, lapack_int* l,
3687  lapack_complex_float* A, lapack_int const* lda,
3688  lapack_complex_float* B, lapack_int const* ldb,
3689  float* alpha,
3690  float* beta,
3691  lapack_complex_float* U, lapack_int const* ldu,
3692  lapack_complex_float* V, lapack_int const* ldv,
3693  lapack_complex_float* Q, lapack_int const* ldq,
3694  lapack_complex_float* work, lapack_int const* lwork,
3695  float* rwork,
3696  lapack_int* iwork,
3697  lapack_int* info );
3698 
3699 #define LAPACK_dggsvd3 LAPACK_GLOBAL(dggsvd3,DGGSVD3)
3700 void LAPACK_dggsvd3(
3701  char const* jobu, char const* jobv, char const* jobq,
3702  lapack_int const* m, lapack_int const* n, lapack_int const* p, lapack_int* k, lapack_int* l,
3703  double* A, lapack_int const* lda,
3704  double* B, lapack_int const* ldb,
3705  double* alpha,
3706  double* beta,
3707  double* U, lapack_int const* ldu,
3708  double* V, lapack_int const* ldv,
3709  double* Q, lapack_int const* ldq,
3710  double* work, lapack_int const* lwork,
3711  lapack_int* iwork,
3712  lapack_int* info );
3713 
3714 #define LAPACK_sggsvd3 LAPACK_GLOBAL(sggsvd3,SGGSVD3)
3715 void LAPACK_sggsvd3(
3716  char const* jobu, char const* jobv, char const* jobq,
3717  lapack_int const* m, lapack_int const* n, lapack_int const* p, lapack_int* k, lapack_int* l,
3718  float* A, lapack_int const* lda,
3719  float* B, lapack_int const* ldb,
3720  float* alpha,
3721  float* beta,
3722  float* U, lapack_int const* ldu,
3723  float* V, lapack_int const* ldv,
3724  float* Q, lapack_int const* ldq,
3725  float* work, lapack_int const* lwork,
3726  lapack_int* iwork,
3727  lapack_int* info );
3728 
3729 #define LAPACK_zggsvd3 LAPACK_GLOBAL(zggsvd3,ZGGSVD3)
3730 void LAPACK_zggsvd3(
3731  char const* jobu, char const* jobv, char const* jobq,
3732  lapack_int const* m, lapack_int const* n, lapack_int const* p, lapack_int* k, lapack_int* l,
3733  lapack_complex_double* A, lapack_int const* lda,
3734  lapack_complex_double* B, lapack_int const* ldb,
3735  double* alpha,
3736  double* beta,
3737  lapack_complex_double* U, lapack_int const* ldu,
3738  lapack_complex_double* V, lapack_int const* ldv,
3739  lapack_complex_double* Q, lapack_int const* ldq,
3740  lapack_complex_double* work, lapack_int const* lwork,
3741  double* rwork,
3742  lapack_int* iwork,
3743  lapack_int* info );
3744 
3745 #define LAPACK_sggsvp LAPACK_GLOBAL(sggsvp,SGGSVP)
3746 lapack_int LAPACKE_sggsvp( int matrix_layout, char jobu, char jobv, char jobq,
3747  lapack_int m, lapack_int p, lapack_int n, float* a,
3748  lapack_int lda, float* b, lapack_int ldb, float tola,
3749  float tolb, lapack_int* k, lapack_int* l, float* u,
3750  lapack_int ldu, float* v, lapack_int ldv, float* q,
3751  lapack_int ldq );
3752 
3753 #define LAPACK_dggsvp LAPACK_GLOBAL(dggsvp,DGGSVP)
3754 lapack_int LAPACKE_dggsvp( int matrix_layout, char jobu, char jobv, char jobq,
3755  lapack_int m, lapack_int p, lapack_int n, double* a,
3756  lapack_int lda, double* b, lapack_int ldb,
3757  double tola, double tolb, lapack_int* k,
3758  lapack_int* l, double* u, lapack_int ldu, double* v,
3759  lapack_int ldv, double* q, lapack_int ldq );
3760 
3761 #define LAPACK_cggsvp LAPACK_GLOBAL(cggsvp,CGGSVP)
3762 lapack_int LAPACKE_cggsvp( int matrix_layout, char jobu, char jobv, char jobq,
3763  lapack_int m, lapack_int p, lapack_int n,
3764  lapack_complex_float* a, lapack_int lda,
3765  lapack_complex_float* b, lapack_int ldb, float tola,
3766  float tolb, lapack_int* k, lapack_int* l,
3767  lapack_complex_float* u, lapack_int ldu,
3768  lapack_complex_float* v, lapack_int ldv,
3769  lapack_complex_float* q, lapack_int ldq );
3770 
3771 #define LAPACK_zggsvp LAPACK_GLOBAL(zggsvp,ZGGSVP)
3772 lapack_int LAPACKE_zggsvp( int matrix_layout, char jobu, char jobv, char jobq,
3773  lapack_int m, lapack_int p, lapack_int n,
3774  lapack_complex_double* a, lapack_int lda,
3775  lapack_complex_double* b, lapack_int ldb,
3776  double tola, double tolb, lapack_int* k,
3777  lapack_int* l, lapack_complex_double* u,
3778  lapack_int ldu, lapack_complex_double* v,
3779  lapack_int ldv, lapack_complex_double* q,
3780  lapack_int ldq );
3781 
3782 #define LAPACK_cggsvp3 LAPACK_GLOBAL(cggsvp3,CGGSVP3)
3783 void LAPACK_cggsvp3(
3784  char const* jobu, char const* jobv, char const* jobq,
3785  lapack_int const* m, lapack_int const* p, lapack_int const* n,
3786  lapack_complex_float* A, lapack_int const* lda,
3787  lapack_complex_float* B, lapack_int const* ldb,
3788  float const* tola,
3789  float const* tolb, lapack_int* k, lapack_int* l,
3790  lapack_complex_float* U, lapack_int const* ldu,
3791  lapack_complex_float* V, lapack_int const* ldv,
3792  lapack_complex_float* Q, lapack_int const* ldq,
3793  lapack_int* iwork,
3794  float* rwork,
3795  lapack_complex_float* tau,
3796  lapack_complex_float* work, lapack_int const* lwork,
3797  lapack_int* info );
3798 
3799 #define LAPACK_dggsvp3 LAPACK_GLOBAL(dggsvp3,DGGSVP3)
3800 void LAPACK_dggsvp3(
3801  char const* jobu, char const* jobv, char const* jobq,
3802  lapack_int const* m, lapack_int const* p, lapack_int const* n,
3803  double* A, lapack_int const* lda,
3804  double* B, lapack_int const* ldb,
3805  double const* tola,
3806  double const* tolb, lapack_int* k, lapack_int* l,
3807  double* U, lapack_int const* ldu,
3808  double* V, lapack_int const* ldv,
3809  double* Q, lapack_int const* ldq,
3810  lapack_int* iwork,
3811  double* tau,
3812  double* work, lapack_int const* lwork,
3813  lapack_int* info );
3814 
3815 #define LAPACK_sggsvp3 LAPACK_GLOBAL(sggsvp3,SGGSVP3)
3816 void LAPACK_sggsvp3(
3817  char const* jobu, char const* jobv, char const* jobq,
3818  lapack_int const* m, lapack_int const* p, lapack_int const* n,
3819  float* A, lapack_int const* lda,
3820  float* B, lapack_int const* ldb,
3821  float const* tola,
3822  float const* tolb, lapack_int* k, lapack_int* l,
3823  float* U, lapack_int const* ldu,
3824  float* V, lapack_int const* ldv,
3825  float* Q, lapack_int const* ldq,
3826  lapack_int* iwork,
3827  float* tau,
3828  float* work, lapack_int const* lwork,
3829  lapack_int* info );
3830 
3831 #define LAPACK_zggsvp3 LAPACK_GLOBAL(zggsvp3,ZGGSVP3)
3832 void LAPACK_zggsvp3(
3833  char const* jobu, char const* jobv, char const* jobq,
3834  lapack_int const* m, lapack_int const* p, lapack_int const* n,
3835  lapack_complex_double* A, lapack_int const* lda,
3836  lapack_complex_double* B, lapack_int const* ldb,
3837  double const* tola,
3838  double const* tolb, lapack_int* k, lapack_int* l,
3839  lapack_complex_double* U, lapack_int const* ldu,
3840  lapack_complex_double* V, lapack_int const* ldv,
3841  lapack_complex_double* Q, lapack_int const* ldq,
3842  lapack_int* iwork,
3843  double* rwork,
3844  lapack_complex_double* tau,
3845  lapack_complex_double* work, lapack_int const* lwork,
3846  lapack_int* info );
3847 
3848 #define LAPACK_cgtcon LAPACK_GLOBAL(cgtcon,CGTCON)
3849 void LAPACK_cgtcon(
3850  char const* norm,
3851  lapack_int const* n,
3852  lapack_complex_float const* DL,
3853  lapack_complex_float const* D,
3854  lapack_complex_float const* DU,
3855  lapack_complex_float const* DU2, lapack_int const* ipiv,
3856  float const* anorm,
3857  float* rcond,
3858  lapack_complex_float* work,
3859  lapack_int* info );
3860 
3861 #define LAPACK_dgtcon LAPACK_GLOBAL(dgtcon,DGTCON)
3862 void LAPACK_dgtcon(
3863  char const* norm,
3864  lapack_int const* n,
3865  double const* DL,
3866  double const* D,
3867  double const* DU,
3868  double const* DU2, lapack_int const* ipiv,
3869  double const* anorm,
3870  double* rcond,
3871  double* work,
3872  lapack_int* iwork,
3873  lapack_int* info );
3874 
3875 #define LAPACK_sgtcon LAPACK_GLOBAL(sgtcon,SGTCON)
3876 void LAPACK_sgtcon(
3877  char const* norm,
3878  lapack_int const* n,
3879  float const* DL,
3880  float const* D,
3881  float const* DU,
3882  float const* DU2, lapack_int const* ipiv,
3883  float const* anorm,
3884  float* rcond,
3885  float* work,
3886  lapack_int* iwork,
3887  lapack_int* info );
3888 
3889 #define LAPACK_zgtcon LAPACK_GLOBAL(zgtcon,ZGTCON)
3890 void LAPACK_zgtcon(
3891  char const* norm,
3892  lapack_int const* n,
3893  lapack_complex_double const* DL,
3894  lapack_complex_double const* D,
3895  lapack_complex_double const* DU,
3896  lapack_complex_double const* DU2, lapack_int const* ipiv,
3897  double const* anorm,
3898  double* rcond,
3899  lapack_complex_double* work,
3900  lapack_int* info );
3901 
3902 #define LAPACK_cgtrfs LAPACK_GLOBAL(cgtrfs,CGTRFS)
3903 void LAPACK_cgtrfs(
3904  char const* trans,
3905  lapack_int const* n, lapack_int const* nrhs,
3906  lapack_complex_float const* DL,
3907  lapack_complex_float const* D,
3908  lapack_complex_float const* DU,
3909  lapack_complex_float const* DLF,
3910  lapack_complex_float const* DF,
3911  lapack_complex_float const* DUF,
3912  lapack_complex_float const* DU2, lapack_int const* ipiv,
3913  lapack_complex_float const* B, lapack_int const* ldb,
3914  lapack_complex_float* X, lapack_int const* ldx,
3915  float* ferr,
3916  float* berr,
3917  lapack_complex_float* work,
3918  float* rwork,
3919  lapack_int* info );
3920 
3921 #define LAPACK_dgtrfs LAPACK_GLOBAL(dgtrfs,DGTRFS)
3922 void LAPACK_dgtrfs(
3923  char const* trans,
3924  lapack_int const* n, lapack_int const* nrhs,
3925  double const* DL,
3926  double const* D,
3927  double const* DU,
3928  double const* DLF,
3929  double const* DF,
3930  double const* DUF,
3931  double const* DU2, lapack_int const* ipiv,
3932  double const* B, lapack_int const* ldb,
3933  double* X, lapack_int const* ldx,
3934  double* ferr,
3935  double* berr,
3936  double* work,
3937  lapack_int* iwork,
3938  lapack_int* info );
3939 
3940 #define LAPACK_sgtrfs LAPACK_GLOBAL(sgtrfs,SGTRFS)
3941 void LAPACK_sgtrfs(
3942  char const* trans,
3943  lapack_int const* n, lapack_int const* nrhs,
3944  float const* DL,
3945  float const* D,
3946  float const* DU,
3947  float const* DLF,
3948  float const* DF,
3949  float const* DUF,
3950  float const* DU2, lapack_int const* ipiv,
3951  float const* B, lapack_int const* ldb,
3952  float* X, lapack_int const* ldx,
3953  float* ferr,
3954  float* berr,
3955  float* work,
3956  lapack_int* iwork,
3957  lapack_int* info );
3958 
3959 #define LAPACK_zgtrfs LAPACK_GLOBAL(zgtrfs,ZGTRFS)
3960 void LAPACK_zgtrfs(
3961  char const* trans,
3962  lapack_int const* n, lapack_int const* nrhs,
3963  lapack_complex_double const* DL,
3964  lapack_complex_double const* D,
3965  lapack_complex_double const* DU,
3966  lapack_complex_double const* DLF,
3967  lapack_complex_double const* DF,
3968  lapack_complex_double const* DUF,
3969  lapack_complex_double const* DU2, lapack_int const* ipiv,
3970  lapack_complex_double const* B, lapack_int const* ldb,
3971  lapack_complex_double* X, lapack_int const* ldx,
3972  double* ferr,
3973  double* berr,
3974  lapack_complex_double* work,
3975  double* rwork,
3976  lapack_int* info );
3977 
3978 #define LAPACK_cgtsv LAPACK_GLOBAL(cgtsv,CGTSV)
3979 void LAPACK_cgtsv(
3980  lapack_int const* n, lapack_int const* nrhs,
3981  lapack_complex_float* DL,
3982  lapack_complex_float* D,
3983  lapack_complex_float* DU,
3984  lapack_complex_float* B, lapack_int const* ldb,
3985  lapack_int* info );
3986 
3987 #define LAPACK_dgtsv LAPACK_GLOBAL(dgtsv,DGTSV)
3988 void LAPACK_dgtsv(
3989  lapack_int const* n, lapack_int const* nrhs,
3990  double* DL,
3991  double* D,
3992  double* DU,
3993  double* B, lapack_int const* ldb,
3994  lapack_int* info );
3995 
3996 #define LAPACK_sgtsv LAPACK_GLOBAL(sgtsv,SGTSV)
3997 void LAPACK_sgtsv(
3998  lapack_int const* n, lapack_int const* nrhs,
3999  float* DL,
4000  float* D,
4001  float* DU,
4002  float* B, lapack_int const* ldb,
4003  lapack_int* info );
4004 
4005 #define LAPACK_zgtsv LAPACK_GLOBAL(zgtsv,ZGTSV)
4006 void LAPACK_zgtsv(
4007  lapack_int const* n, lapack_int const* nrhs,
4008  lapack_complex_double* DL,
4009  lapack_complex_double* D,
4010  lapack_complex_double* DU,
4011  lapack_complex_double* B, lapack_int const* ldb,
4012  lapack_int* info );
4013 
4014 #define LAPACK_cgtsvx LAPACK_GLOBAL(cgtsvx,CGTSVX)
4015 void LAPACK_cgtsvx(
4016  char const* fact, char const* trans,
4017  lapack_int const* n, lapack_int const* nrhs,
4018  lapack_complex_float const* DL,
4019  lapack_complex_float const* D,
4020  lapack_complex_float const* DU,
4021  lapack_complex_float* DLF,
4022  lapack_complex_float* DF,
4023  lapack_complex_float* DUF,
4024  lapack_complex_float* DU2, lapack_int* ipiv,
4025  lapack_complex_float const* B, lapack_int const* ldb,
4026  lapack_complex_float* X, lapack_int const* ldx,
4027  float* rcond,
4028  float* ferr,
4029  float* berr,
4030  lapack_complex_float* work,
4031  float* rwork,
4032  lapack_int* info );
4033 
4034 #define LAPACK_dgtsvx LAPACK_GLOBAL(dgtsvx,DGTSVX)
4035 void LAPACK_dgtsvx(
4036  char const* fact, char const* trans,
4037  lapack_int const* n, lapack_int const* nrhs,
4038  double const* DL,
4039  double const* D,
4040  double const* DU,
4041  double* DLF,
4042  double* DF,
4043  double* DUF,
4044  double* DU2, lapack_int* ipiv,
4045  double const* B, lapack_int const* ldb,
4046  double* X, lapack_int const* ldx,
4047  double* rcond,
4048  double* ferr,
4049  double* berr,
4050  double* work,
4051  lapack_int* iwork,
4052  lapack_int* info );
4053 
4054 #define LAPACK_sgtsvx LAPACK_GLOBAL(sgtsvx,SGTSVX)
4055 void LAPACK_sgtsvx(
4056  char const* fact, char const* trans,
4057  lapack_int const* n, lapack_int const* nrhs,
4058  float const* DL,
4059  float const* D,
4060  float const* DU,
4061  float* DLF,
4062  float* DF,
4063  float* DUF,
4064  float* DU2, lapack_int* ipiv,
4065  float const* B, lapack_int const* ldb,
4066  float* X, lapack_int const* ldx,
4067  float* rcond,
4068  float* ferr,
4069  float* berr,
4070  float* work,
4071  lapack_int* iwork,
4072  lapack_int* info );
4073 
4074 #define LAPACK_zgtsvx LAPACK_GLOBAL(zgtsvx,ZGTSVX)
4075 void LAPACK_zgtsvx(
4076  char const* fact, char const* trans,
4077  lapack_int const* n, lapack_int const* nrhs,
4078  lapack_complex_double const* DL,
4079  lapack_complex_double const* D,
4080  lapack_complex_double const* DU,
4081  lapack_complex_double* DLF,
4082  lapack_complex_double* DF,
4083  lapack_complex_double* DUF,
4084  lapack_complex_double* DU2, lapack_int* ipiv,
4085  lapack_complex_double const* B, lapack_int const* ldb,
4086  lapack_complex_double* X, lapack_int const* ldx,
4087  double* rcond,
4088  double* ferr,
4089  double* berr,
4090  lapack_complex_double* work,
4091  double* rwork,
4092  lapack_int* info );
4093 
4094 #define LAPACK_cgttrf LAPACK_GLOBAL(cgttrf,CGTTRF)
4095 void LAPACK_cgttrf(
4096  lapack_int const* n,
4097  lapack_complex_float* DL,
4098  lapack_complex_float* D,
4099  lapack_complex_float* DU,
4100  lapack_complex_float* DU2, lapack_int* ipiv,
4101  lapack_int* info );
4102 
4103 #define LAPACK_dgttrf LAPACK_GLOBAL(dgttrf,DGTTRF)
4104 void LAPACK_dgttrf(
4105  lapack_int const* n,
4106  double* DL,
4107  double* D,
4108  double* DU,
4109  double* DU2, lapack_int* ipiv,
4110  lapack_int* info );
4111 
4112 #define LAPACK_sgttrf LAPACK_GLOBAL(sgttrf,SGTTRF)
4113 void LAPACK_sgttrf(
4114  lapack_int const* n,
4115  float* DL,
4116  float* D,
4117  float* DU,
4118  float* DU2, lapack_int* ipiv,
4119  lapack_int* info );
4120 
4121 #define LAPACK_zgttrf LAPACK_GLOBAL(zgttrf,ZGTTRF)
4122 void LAPACK_zgttrf(
4123  lapack_int const* n,
4124  lapack_complex_double* DL,
4125  lapack_complex_double* D,
4126  lapack_complex_double* DU,
4127  lapack_complex_double* DU2, lapack_int* ipiv,
4128  lapack_int* info );
4129 
4130 #define LAPACK_cgttrs LAPACK_GLOBAL(cgttrs,CGTTRS)
4131 void LAPACK_cgttrs(
4132  char const* trans,
4133  lapack_int const* n, lapack_int const* nrhs,
4134  lapack_complex_float const* DL,
4135  lapack_complex_float const* D,
4136  lapack_complex_float const* DU,
4137  lapack_complex_float const* DU2, lapack_int const* ipiv,
4138  lapack_complex_float* B, lapack_int const* ldb,
4139  lapack_int* info );
4140 
4141 #define LAPACK_dgttrs LAPACK_GLOBAL(dgttrs,DGTTRS)
4142 void LAPACK_dgttrs(
4143  char const* trans,
4144  lapack_int const* n, lapack_int const* nrhs,
4145  double const* DL,
4146  double const* D,
4147  double const* DU,
4148  double const* DU2, lapack_int const* ipiv,
4149  double* B, lapack_int const* ldb,
4150  lapack_int* info );
4151 
4152 #define LAPACK_sgttrs LAPACK_GLOBAL(sgttrs,SGTTRS)
4153 void LAPACK_sgttrs(
4154  char const* trans,
4155  lapack_int const* n, lapack_int const* nrhs,
4156  float const* DL,
4157  float const* D,
4158  float const* DU,
4159  float const* DU2, lapack_int const* ipiv,
4160  float* B, lapack_int const* ldb,
4161  lapack_int* info );
4162 
4163 #define LAPACK_zgttrs LAPACK_GLOBAL(zgttrs,ZGTTRS)
4164 void LAPACK_zgttrs(
4165  char const* trans,
4166  lapack_int const* n, lapack_int const* nrhs,
4167  lapack_complex_double const* DL,
4168  lapack_complex_double const* D,
4169  lapack_complex_double const* DU,
4170  lapack_complex_double const* DU2, lapack_int const* ipiv,
4171  lapack_complex_double* B, lapack_int const* ldb,
4172  lapack_int* info );
4173 
4174 #define LAPACK_chbev LAPACK_GLOBAL(chbev,CHBEV)
4175 void LAPACK_chbev(
4176  char const* jobz, char const* uplo,
4177  lapack_int const* n, lapack_int const* kd,
4178  lapack_complex_float* AB, lapack_int const* ldab,
4179  float* W,
4180  lapack_complex_float* Z, lapack_int const* ldz,
4181  lapack_complex_float* work,
4182  float* rwork,
4183  lapack_int* info );
4184 
4185 #define LAPACK_zhbev LAPACK_GLOBAL(zhbev,ZHBEV)
4186 void LAPACK_zhbev(
4187  char const* jobz, char const* uplo,
4188  lapack_int const* n, lapack_int const* kd,
4189  lapack_complex_double* AB, lapack_int const* ldab,
4190  double* W,
4191  lapack_complex_double* Z, lapack_int const* ldz,
4192  lapack_complex_double* work,
4193  double* rwork,
4194  lapack_int* info );
4195 
4196 #define LAPACK_chbev_2stage LAPACK_GLOBAL(chbev_2stage,CHBEV_2STAGE)
4197 void LAPACK_chbev_2stage(
4198  char const* jobz, char const* uplo,
4199  lapack_int const* n, lapack_int const* kd,
4200  lapack_complex_float* AB, lapack_int const* ldab,
4201  float* W,
4202  lapack_complex_float* Z, lapack_int const* ldz,
4203  lapack_complex_float* work, lapack_int const* lwork,
4204  float* rwork,
4205  lapack_int* info );
4206 
4207 #define LAPACK_zhbev_2stage LAPACK_GLOBAL(zhbev_2stage,ZHBEV_2STAGE)
4208 void LAPACK_zhbev_2stage(
4209  char const* jobz, char const* uplo,
4210  lapack_int const* n, lapack_int const* kd,
4211  lapack_complex_double* AB, lapack_int const* ldab,
4212  double* W,
4213  lapack_complex_double* Z, lapack_int const* ldz,
4214  lapack_complex_double* work, lapack_int const* lwork,
4215  double* rwork,
4216  lapack_int* info );
4217 
4218 #define LAPACK_chbevd LAPACK_GLOBAL(chbevd,CHBEVD)
4219 void LAPACK_chbevd(
4220  char const* jobz, char const* uplo,
4221  lapack_int const* n, lapack_int const* kd,
4222  lapack_complex_float* AB, lapack_int const* ldab,
4223  float* W,
4224  lapack_complex_float* Z, lapack_int const* ldz,
4225  lapack_complex_float* work, lapack_int const* lwork,
4226  float* rwork, lapack_int const* lrwork,
4227  lapack_int* iwork, lapack_int const* liwork,
4228  lapack_int* info );
4229 
4230 #define LAPACK_zhbevd LAPACK_GLOBAL(zhbevd,ZHBEVD)
4231 void LAPACK_zhbevd(
4232  char const* jobz, char const* uplo,
4233  lapack_int const* n, lapack_int const* kd,
4234  lapack_complex_double* AB, lapack_int const* ldab,
4235  double* W,
4236  lapack_complex_double* Z, lapack_int const* ldz,
4237  lapack_complex_double* work, lapack_int const* lwork,
4238  double* rwork, lapack_int const* lrwork,
4239  lapack_int* iwork, lapack_int const* liwork,
4240  lapack_int* info );
4241 
4242 #define LAPACK_chbevd_2stage LAPACK_GLOBAL(chbevd_2stage,CHBEVD_2STAGE)
4243 void LAPACK_chbevd_2stage(
4244  char const* jobz, char const* uplo,
4245  lapack_int const* n, lapack_int const* kd,
4246  lapack_complex_float* AB, lapack_int const* ldab,
4247  float* W,
4248  lapack_complex_float* Z, lapack_int const* ldz,
4249  lapack_complex_float* work, lapack_int const* lwork,
4250  float* rwork, lapack_int const* lrwork,
4251  lapack_int* iwork, lapack_int const* liwork,
4252  lapack_int* info );
4253 
4254 #define LAPACK_zhbevd_2stage LAPACK_GLOBAL(zhbevd_2stage,ZHBEVD_2STAGE)
4255 void LAPACK_zhbevd_2stage(
4256  char const* jobz, char const* uplo,
4257  lapack_int const* n, lapack_int const* kd,
4258  lapack_complex_double* AB, lapack_int const* ldab,
4259  double* W,
4260  lapack_complex_double* Z, lapack_int const* ldz,
4261  lapack_complex_double* work, lapack_int const* lwork,
4262  double* rwork, lapack_int const* lrwork,
4263  lapack_int* iwork, lapack_int const* liwork,
4264  lapack_int* info );
4265 
4266 #define LAPACK_chbevx LAPACK_GLOBAL(chbevx,CHBEVX)
4267 void LAPACK_chbevx(
4268  char const* jobz, char const* range, char const* uplo,
4269  lapack_int const* n, lapack_int const* kd,
4270  lapack_complex_float* AB, lapack_int const* ldab,
4271  lapack_complex_float* Q, lapack_int const* ldq,
4272  float const* vl,
4273  float const* vu, lapack_int const* il, lapack_int const* iu,
4274  float const* abstol, lapack_int* m,
4275  float* W,
4276  lapack_complex_float* Z, lapack_int const* ldz,
4277  lapack_complex_float* work,
4278  float* rwork,
4279  lapack_int* iwork, lapack_int* IFAIL,
4280  lapack_int* info );
4281 
4282 #define LAPACK_zhbevx LAPACK_GLOBAL(zhbevx,ZHBEVX)
4283 void LAPACK_zhbevx(
4284  char const* jobz, char const* range, char const* uplo,
4285  lapack_int const* n, lapack_int const* kd,
4286  lapack_complex_double* AB, lapack_int const* ldab,
4287  lapack_complex_double* Q, lapack_int const* ldq,
4288  double const* vl,
4289  double const* vu, lapack_int const* il, lapack_int const* iu,
4290  double const* abstol, lapack_int* m,
4291  double* W,
4292  lapack_complex_double* Z, lapack_int const* ldz,
4293  lapack_complex_double* work,
4294  double* rwork,
4295  lapack_int* iwork, lapack_int* IFAIL,
4296  lapack_int* info );
4297 
4298 #define LAPACK_chbevx_2stage LAPACK_GLOBAL(chbevx_2stage,CHBEVX_2STAGE)
4299 void LAPACK_chbevx_2stage(
4300  char const* jobz, char const* range, char const* uplo,
4301  lapack_int const* n, lapack_int const* kd,
4302  lapack_complex_float* AB, lapack_int const* ldab,
4303  lapack_complex_float* Q, lapack_int const* ldq,
4304  float const* vl,
4305  float const* vu, lapack_int const* il, lapack_int const* iu,
4306  float const* abstol, lapack_int* m,
4307  float* W,
4308  lapack_complex_float* Z, lapack_int const* ldz,
4309  lapack_complex_float* work, lapack_int const* lwork,
4310  float* rwork,
4311  lapack_int* iwork, lapack_int* IFAIL,
4312  lapack_int* info );
4313 
4314 #define LAPACK_zhbevx_2stage LAPACK_GLOBAL(zhbevx_2stage,ZHBEVX_2STAGE)
4315 void LAPACK_zhbevx_2stage(
4316  char const* jobz, char const* range, char const* uplo,
4317  lapack_int const* n, lapack_int const* kd,
4318  lapack_complex_double* AB, lapack_int const* ldab,
4319  lapack_complex_double* Q, lapack_int const* ldq,
4320  double const* vl,
4321  double const* vu, lapack_int const* il, lapack_int const* iu,
4322  double const* abstol, lapack_int* m,
4323  double* W,
4324  lapack_complex_double* Z, lapack_int const* ldz,
4325  lapack_complex_double* work, lapack_int const* lwork,
4326  double* rwork,
4327  lapack_int* iwork, lapack_int* IFAIL,
4328  lapack_int* info );
4329 
4330 #define LAPACK_chbgst LAPACK_GLOBAL(chbgst,CHBGST)
4331 void LAPACK_chbgst(
4332  char const* vect, char const* uplo,
4333  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
4334  lapack_complex_float* AB, lapack_int const* ldab,
4335  lapack_complex_float const* BB, lapack_int const* ldbb,
4336  lapack_complex_float* X, lapack_int const* ldx,
4337  lapack_complex_float* work,
4338  float* rwork,
4339  lapack_int* info );
4340 
4341 #define LAPACK_zhbgst LAPACK_GLOBAL(zhbgst,ZHBGST)
4342 void LAPACK_zhbgst(
4343  char const* vect, char const* uplo,
4344  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
4345  lapack_complex_double* AB, lapack_int const* ldab,
4346  lapack_complex_double const* BB, lapack_int const* ldbb,
4347  lapack_complex_double* X, lapack_int const* ldx,
4348  lapack_complex_double* work,
4349  double* rwork,
4350  lapack_int* info );
4351 
4352 #define LAPACK_chbgv LAPACK_GLOBAL(chbgv,CHBGV)
4353 void LAPACK_chbgv(
4354  char const* jobz, char const* uplo,
4355  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
4356  lapack_complex_float* AB, lapack_int const* ldab,
4357  lapack_complex_float* BB, lapack_int const* ldbb,
4358  float* W,
4359  lapack_complex_float* Z, lapack_int const* ldz,
4360  lapack_complex_float* work,
4361  float* rwork,
4362  lapack_int* info );
4363 
4364 #define LAPACK_zhbgv LAPACK_GLOBAL(zhbgv,ZHBGV)
4365 void LAPACK_zhbgv(
4366  char const* jobz, char const* uplo,
4367  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
4368  lapack_complex_double* AB, lapack_int const* ldab,
4369  lapack_complex_double* BB, lapack_int const* ldbb,
4370  double* W,
4371  lapack_complex_double* Z, lapack_int const* ldz,
4372  lapack_complex_double* work,
4373  double* rwork,
4374  lapack_int* info );
4375 
4376 #define LAPACK_chbgvd LAPACK_GLOBAL(chbgvd,CHBGVD)
4377 void LAPACK_chbgvd(
4378  char const* jobz, char const* uplo,
4379  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
4380  lapack_complex_float* AB, lapack_int const* ldab,
4381  lapack_complex_float* BB, lapack_int const* ldbb,
4382  float* W,
4383  lapack_complex_float* Z, lapack_int const* ldz,
4384  lapack_complex_float* work, lapack_int const* lwork,
4385  float* rwork, lapack_int const* lrwork,
4386  lapack_int* iwork, lapack_int const* liwork,
4387  lapack_int* info );
4388 
4389 #define LAPACK_zhbgvd LAPACK_GLOBAL(zhbgvd,ZHBGVD)
4390 void LAPACK_zhbgvd(
4391  char const* jobz, char const* uplo,
4392  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
4393  lapack_complex_double* AB, lapack_int const* ldab,
4394  lapack_complex_double* BB, lapack_int const* ldbb,
4395  double* W,
4396  lapack_complex_double* Z, lapack_int const* ldz,
4397  lapack_complex_double* work, lapack_int const* lwork,
4398  double* rwork, lapack_int const* lrwork,
4399  lapack_int* iwork, lapack_int const* liwork,
4400  lapack_int* info );
4401 
4402 #define LAPACK_chbgvx LAPACK_GLOBAL(chbgvx,CHBGVX)
4403 void LAPACK_chbgvx(
4404  char const* jobz, char const* range, char const* uplo,
4405  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
4406  lapack_complex_float* AB, lapack_int const* ldab,
4407  lapack_complex_float* BB, lapack_int const* ldbb,
4408  lapack_complex_float* Q, lapack_int const* ldq,
4409  float const* vl,
4410  float const* vu, lapack_int const* il, lapack_int const* iu,
4411  float const* abstol, lapack_int* m,
4412  float* W,
4413  lapack_complex_float* Z, lapack_int const* ldz,
4414  lapack_complex_float* work,
4415  float* rwork,
4416  lapack_int* iwork, lapack_int* IFAIL,
4417  lapack_int* info );
4418 
4419 #define LAPACK_zhbgvx LAPACK_GLOBAL(zhbgvx,ZHBGVX)
4420 void LAPACK_zhbgvx(
4421  char const* jobz, char const* range, char const* uplo,
4422  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
4423  lapack_complex_double* AB, lapack_int const* ldab,
4424  lapack_complex_double* BB, lapack_int const* ldbb,
4425  lapack_complex_double* Q, lapack_int const* ldq,
4426  double const* vl,
4427  double const* vu, lapack_int const* il, lapack_int const* iu,
4428  double const* abstol, lapack_int* m,
4429  double* W,
4430  lapack_complex_double* Z, lapack_int const* ldz,
4431  lapack_complex_double* work,
4432  double* rwork,
4433  lapack_int* iwork, lapack_int* IFAIL,
4434  lapack_int* info );
4435 
4436 #define LAPACK_chbtrd LAPACK_GLOBAL(chbtrd,CHBTRD)
4437 void LAPACK_chbtrd(
4438  char const* vect, char const* uplo,
4439  lapack_int const* n, lapack_int const* kd,
4440  lapack_complex_float* AB, lapack_int const* ldab,
4441  float* D,
4442  float* E,
4443  lapack_complex_float* Q, lapack_int const* ldq,
4444  lapack_complex_float* work,
4445  lapack_int* info );
4446 
4447 #define LAPACK_zhbtrd LAPACK_GLOBAL(zhbtrd,ZHBTRD)
4448 void LAPACK_zhbtrd(
4449  char const* vect, char const* uplo,
4450  lapack_int const* n, lapack_int const* kd,
4451  lapack_complex_double* AB, lapack_int const* ldab,
4452  double* D,
4453  double* E,
4454  lapack_complex_double* Q, lapack_int const* ldq,
4455  lapack_complex_double* work,
4456  lapack_int* info );
4457 
4458 #define LAPACK_checon LAPACK_GLOBAL(checon,CHECON)
4459 void LAPACK_checon(
4460  char const* uplo,
4461  lapack_int const* n,
4462  lapack_complex_float const* A, lapack_int const* lda, lapack_int const* ipiv,
4463  float const* anorm,
4464  float* rcond,
4465  lapack_complex_float* work,
4466  lapack_int* info );
4467 
4468 #define LAPACK_zhecon LAPACK_GLOBAL(zhecon,ZHECON)
4469 void LAPACK_zhecon(
4470  char const* uplo,
4471  lapack_int const* n,
4472  lapack_complex_double const* A, lapack_int const* lda, lapack_int const* ipiv,
4473  double const* anorm,
4474  double* rcond,
4475  lapack_complex_double* work,
4476  lapack_int* info );
4477 
4478 #define LAPACK_checon_3 LAPACK_GLOBAL(checon_3,CHECON_3)
4479 void LAPACK_checon_3(
4480  char const* uplo,
4481  lapack_int const* n,
4482  lapack_complex_float const* A, lapack_int const* lda,
4483  lapack_complex_float const* E, lapack_int const* ipiv,
4484  float const* anorm,
4485  float* rcond,
4486  lapack_complex_float* work,
4487  lapack_int* info );
4488 
4489 #define LAPACK_zhecon_3 LAPACK_GLOBAL(zhecon_3,ZHECON_3)
4490 void LAPACK_zhecon_3(
4491  char const* uplo,
4492  lapack_int const* n,
4493  lapack_complex_double const* A, lapack_int const* lda,
4494  lapack_complex_double const* E, lapack_int const* ipiv,
4495  double const* anorm,
4496  double* rcond,
4497  lapack_complex_double* work,
4498  lapack_int* info );
4499 
4500 #define LAPACK_cheequb LAPACK_GLOBAL(cheequb,CHEEQUB)
4501 void LAPACK_cheequb(
4502  char const* uplo,
4503  lapack_int const* n,
4504  lapack_complex_float const* A, lapack_int const* lda,
4505  float* S,
4506  float* scond,
4507  float* amax,
4508  lapack_complex_float* work,
4509  lapack_int* info );
4510 
4511 #define LAPACK_zheequb LAPACK_GLOBAL(zheequb,ZHEEQUB)
4512 void LAPACK_zheequb(
4513  char const* uplo,
4514  lapack_int const* n,
4515  lapack_complex_double const* A, lapack_int const* lda,
4516  double* S,
4517  double* scond,
4518  double* amax,
4519  lapack_complex_double* work,
4520  lapack_int* info );
4521 
4522 #define LAPACK_cheev LAPACK_GLOBAL(cheev,CHEEV)
4523 void LAPACK_cheev(
4524  char const* jobz, char const* uplo,
4525  lapack_int const* n,
4526  lapack_complex_float* A, lapack_int const* lda,
4527  float* W,
4528  lapack_complex_float* work, lapack_int const* lwork,
4529  float* rwork,
4530  lapack_int* info );
4531 
4532 #define LAPACK_zheev LAPACK_GLOBAL(zheev,ZHEEV)
4533 void LAPACK_zheev(
4534  char const* jobz, char const* uplo,
4535  lapack_int const* n,
4536  lapack_complex_double* A, lapack_int const* lda,
4537  double* W,
4538  lapack_complex_double* work, lapack_int const* lwork,
4539  double* rwork,
4540  lapack_int* info );
4541 
4542 #define LAPACK_cheev_2stage LAPACK_GLOBAL(cheev_2stage,CHEEV_2STAGE)
4543 void LAPACK_cheev_2stage(
4544  char const* jobz, char const* uplo,
4545  lapack_int const* n,
4546  lapack_complex_float* A, lapack_int const* lda,
4547  float* W,
4548  lapack_complex_float* work, lapack_int const* lwork,
4549  float* rwork,
4550  lapack_int* info );
4551 
4552 #define LAPACK_zheev_2stage LAPACK_GLOBAL(zheev_2stage,ZHEEV_2STAGE)
4553 void LAPACK_zheev_2stage(
4554  char const* jobz, char const* uplo,
4555  lapack_int const* n,
4556  lapack_complex_double* A, lapack_int const* lda,
4557  double* W,
4558  lapack_complex_double* work, lapack_int const* lwork,
4559  double* rwork,
4560  lapack_int* info );
4561 
4562 #define LAPACK_cheevd LAPACK_GLOBAL(cheevd,CHEEVD)
4563 void LAPACK_cheevd(
4564  char const* jobz, char const* uplo,
4565  lapack_int const* n,
4566  lapack_complex_float* A, lapack_int const* lda,
4567  float* W,
4568  lapack_complex_float* work, lapack_int const* lwork,
4569  float* rwork, lapack_int const* lrwork,
4570  lapack_int* iwork, lapack_int const* liwork,
4571  lapack_int* info );
4572 
4573 #define LAPACK_zheevd LAPACK_GLOBAL(zheevd,ZHEEVD)
4574 void LAPACK_zheevd(
4575  char const* jobz, char const* uplo,
4576  lapack_int const* n,
4577  lapack_complex_double* A, lapack_int const* lda,
4578  double* W,
4579  lapack_complex_double* work, lapack_int const* lwork,
4580  double* rwork, lapack_int const* lrwork,
4581  lapack_int* iwork, lapack_int const* liwork,
4582  lapack_int* info );
4583 
4584 #define LAPACK_cheevd_2stage LAPACK_GLOBAL(cheevd_2stage,CHEEVD_2STAGE)
4585 void LAPACK_cheevd_2stage(
4586  char const* jobz, char const* uplo,
4587  lapack_int const* n,
4588  lapack_complex_float* A, lapack_int const* lda,
4589  float* W,
4590  lapack_complex_float* work, lapack_int const* lwork,
4591  float* rwork, lapack_int const* lrwork,
4592  lapack_int* iwork, lapack_int const* liwork,
4593  lapack_int* info );
4594 
4595 #define LAPACK_zheevd_2stage LAPACK_GLOBAL(zheevd_2stage,ZHEEVD_2STAGE)
4596 void LAPACK_zheevd_2stage(
4597  char const* jobz, char const* uplo,
4598  lapack_int const* n,
4599  lapack_complex_double* A, lapack_int const* lda,
4600  double* W,
4601  lapack_complex_double* work, lapack_int const* lwork,
4602  double* rwork, lapack_int const* lrwork,
4603  lapack_int* iwork, lapack_int const* liwork,
4604  lapack_int* info );
4605 
4606 #define LAPACK_cheevr LAPACK_GLOBAL(cheevr,CHEEVR)
4607 void LAPACK_cheevr(
4608  char const* jobz, char const* range, char const* uplo,
4609  lapack_int const* n,
4610  lapack_complex_float* A, lapack_int const* lda,
4611  float const* vl,
4612  float const* vu, lapack_int const* il, lapack_int const* iu,
4613  float const* abstol, lapack_int* m,
4614  float* W,
4615  lapack_complex_float* Z, lapack_int const* ldz, lapack_int* ISUPPZ,
4616  lapack_complex_float* work, lapack_int const* lwork,
4617  float* rwork, lapack_int const* lrwork,
4618  lapack_int* iwork, lapack_int const* liwork,
4619  lapack_int* info );
4620 
4621 #define LAPACK_zheevr LAPACK_GLOBAL(zheevr,ZHEEVR)
4622 void LAPACK_zheevr(
4623  char const* jobz, char const* range, char const* uplo,
4624  lapack_int const* n,
4625  lapack_complex_double* A, lapack_int const* lda,
4626  double const* vl,
4627  double const* vu, lapack_int const* il, lapack_int const* iu,
4628  double const* abstol, lapack_int* m,
4629  double* W,
4630  lapack_complex_double* Z, lapack_int const* ldz, lapack_int* ISUPPZ,
4631  lapack_complex_double* work, lapack_int const* lwork,
4632  double* rwork, lapack_int const* lrwork,
4633  lapack_int* iwork, lapack_int const* liwork,
4634  lapack_int* info );
4635 
4636 #define LAPACK_cheevr_2stage LAPACK_GLOBAL(cheevr_2stage,CHEEVR_2STAGE)
4637 void LAPACK_cheevr_2stage(
4638  char const* jobz, char const* range, char const* uplo,
4639  lapack_int const* n,
4640  lapack_complex_float* A, lapack_int const* lda,
4641  float const* vl,
4642  float const* vu, lapack_int const* il, lapack_int const* iu,
4643  float const* abstol, lapack_int* m,
4644  float* W,
4645  lapack_complex_float* Z, lapack_int const* ldz, lapack_int* ISUPPZ,
4646  lapack_complex_float* work, lapack_int const* lwork,
4647  float* rwork, lapack_int const* lrwork,
4648  lapack_int* iwork, lapack_int const* liwork,
4649  lapack_int* info );
4650 
4651 #define LAPACK_zheevr_2stage LAPACK_GLOBAL(zheevr_2stage,ZHEEVR_2STAGE)
4652 void LAPACK_zheevr_2stage(
4653  char const* jobz, char const* range, char const* uplo,
4654  lapack_int const* n,
4655  lapack_complex_double* A, lapack_int const* lda,
4656  double const* vl,
4657  double const* vu, lapack_int const* il, lapack_int const* iu,
4658  double const* abstol, lapack_int* m,
4659  double* W,
4660  lapack_complex_double* Z, lapack_int const* ldz, lapack_int* ISUPPZ,
4661  lapack_complex_double* work, lapack_int const* lwork,
4662  double* rwork, lapack_int const* lrwork,
4663  lapack_int* iwork, lapack_int const* liwork,
4664  lapack_int* info );
4665 
4666 #define LAPACK_cheevx LAPACK_GLOBAL(cheevx,CHEEVX)
4667 void LAPACK_cheevx(
4668  char const* jobz, char const* range, char const* uplo,
4669  lapack_int const* n,
4670  lapack_complex_float* A, lapack_int const* lda,
4671  float const* vl,
4672  float const* vu, lapack_int const* il, lapack_int const* iu,
4673  float const* abstol, lapack_int* m,
4674  float* W,
4675  lapack_complex_float* Z, lapack_int const* ldz,
4676  lapack_complex_float* work, lapack_int const* lwork,
4677  float* rwork,
4678  lapack_int* iwork, lapack_int* IFAIL,
4679  lapack_int* info );
4680 
4681 #define LAPACK_zheevx LAPACK_GLOBAL(zheevx,ZHEEVX)
4682 void LAPACK_zheevx(
4683  char const* jobz, char const* range, char const* uplo,
4684  lapack_int const* n,
4685  lapack_complex_double* A, lapack_int const* lda,
4686  double const* vl,
4687  double const* vu, lapack_int const* il, lapack_int const* iu,
4688  double const* abstol, lapack_int* m,
4689  double* W,
4690  lapack_complex_double* Z, lapack_int const* ldz,
4691  lapack_complex_double* work, lapack_int const* lwork,
4692  double* rwork,
4693  lapack_int* iwork, lapack_int* IFAIL,
4694  lapack_int* info );
4695 
4696 #define LAPACK_cheevx_2stage LAPACK_GLOBAL(cheevx_2stage,CHEEVX_2STAGE)
4697 void LAPACK_cheevx_2stage(
4698  char const* jobz, char const* range, char const* uplo,
4699  lapack_int const* n,
4700  lapack_complex_float* A, lapack_int const* lda,
4701  float const* vl,
4702  float const* vu, lapack_int const* il, lapack_int const* iu,
4703  float const* abstol, lapack_int* m,
4704  float* W,
4705  lapack_complex_float* Z, lapack_int const* ldz,
4706  lapack_complex_float* work, lapack_int const* lwork,
4707  float* rwork,
4708  lapack_int* iwork, lapack_int* IFAIL,
4709  lapack_int* info );
4710 
4711 #define LAPACK_zheevx_2stage LAPACK_GLOBAL(zheevx_2stage,ZHEEVX_2STAGE)
4712 void LAPACK_zheevx_2stage(
4713  char const* jobz, char const* range, char const* uplo,
4714  lapack_int const* n,
4715  lapack_complex_double* A, lapack_int const* lda,
4716  double const* vl,
4717  double const* vu, lapack_int const* il, lapack_int const* iu,
4718  double const* abstol, lapack_int* m,
4719  double* W,
4720  lapack_complex_double* Z, lapack_int const* ldz,
4721  lapack_complex_double* work, lapack_int const* lwork,
4722  double* rwork,
4723  lapack_int* iwork, lapack_int* IFAIL,
4724  lapack_int* info );
4725 
4726 #define LAPACK_chegst LAPACK_GLOBAL(chegst,CHEGST)
4727 void LAPACK_chegst(
4728  lapack_int const* itype, char const* uplo,
4729  lapack_int const* n,
4730  lapack_complex_float* A, lapack_int const* lda,
4731  lapack_complex_float* B, lapack_int const* ldb,
4732  lapack_int* info );
4733 
4734 #define LAPACK_zhegst LAPACK_GLOBAL(zhegst,ZHEGST)
4735 void LAPACK_zhegst(
4736  lapack_int const* itype, char const* uplo,
4737  lapack_int const* n,
4738  lapack_complex_double* A, lapack_int const* lda,
4739  lapack_complex_double* B, lapack_int const* ldb,
4740  lapack_int* info );
4741 
4742 #define LAPACK_chegv LAPACK_GLOBAL(chegv,CHEGV)
4743 void LAPACK_chegv(
4744  lapack_int const* itype, char const* jobz, char const* uplo,
4745  lapack_int const* n,
4746  lapack_complex_float* A, lapack_int const* lda,
4747  lapack_complex_float* B, lapack_int const* ldb,
4748  float* W,
4749  lapack_complex_float* work, lapack_int const* lwork,
4750  float* rwork,
4751  lapack_int* info );
4752 
4753 #define LAPACK_zhegv LAPACK_GLOBAL(zhegv,ZHEGV)
4754 void LAPACK_zhegv(
4755  lapack_int const* itype, char const* jobz, char const* uplo,
4756  lapack_int const* n,
4757  lapack_complex_double* A, lapack_int const* lda,
4758  lapack_complex_double* B, lapack_int const* ldb,
4759  double* W,
4760  lapack_complex_double* work, lapack_int const* lwork,
4761  double* rwork,
4762  lapack_int* info );
4763 
4764 #define LAPACK_chegv_2stage LAPACK_GLOBAL(chegv_2stage,CHEGV_2STAGE)
4765 void LAPACK_chegv_2stage(
4766  lapack_int const* itype, char const* jobz, char const* uplo,
4767  lapack_int const* n,
4768  lapack_complex_float* A, lapack_int const* lda,
4769  lapack_complex_float* B, lapack_int const* ldb,
4770  float* W,
4771  lapack_complex_float* work, lapack_int const* lwork,
4772  float* rwork,
4773  lapack_int* info );
4774 
4775 #define LAPACK_zhegv_2stage LAPACK_GLOBAL(zhegv_2stage,ZHEGV_2STAGE)
4776 void LAPACK_zhegv_2stage(
4777  lapack_int const* itype, char const* jobz, char const* uplo,
4778  lapack_int const* n,
4779  lapack_complex_double* A, lapack_int const* lda,
4780  lapack_complex_double* B, lapack_int const* ldb,
4781  double* W,
4782  lapack_complex_double* work, lapack_int const* lwork,
4783  double* rwork,
4784  lapack_int* info );
4785 
4786 #define LAPACK_chegvd LAPACK_GLOBAL(chegvd,CHEGVD)
4787 void LAPACK_chegvd(
4788  lapack_int const* itype, char const* jobz, char const* uplo,
4789  lapack_int const* n,
4790  lapack_complex_float* A, lapack_int const* lda,
4791  lapack_complex_float* B, lapack_int const* ldb,
4792  float* W,
4793  lapack_complex_float* work, lapack_int const* lwork,
4794  float* rwork, lapack_int const* lrwork,
4795  lapack_int* iwork, lapack_int const* liwork,
4796  lapack_int* info );
4797 
4798 #define LAPACK_zhegvd LAPACK_GLOBAL(zhegvd,ZHEGVD)
4799 void LAPACK_zhegvd(
4800  lapack_int const* itype, char const* jobz, char const* uplo,
4801  lapack_int const* n,
4802  lapack_complex_double* A, lapack_int const* lda,
4803  lapack_complex_double* B, lapack_int const* ldb,
4804  double* W,
4805  lapack_complex_double* work, lapack_int const* lwork,
4806  double* rwork, lapack_int const* lrwork,
4807  lapack_int* iwork, lapack_int const* liwork,
4808  lapack_int* info );
4809 
4810 #define LAPACK_chegvx LAPACK_GLOBAL(chegvx,CHEGVX)
4811 void LAPACK_chegvx(
4812  lapack_int const* itype, char const* jobz, char const* range, char const* uplo,
4813  lapack_int const* n,
4814  lapack_complex_float* A, lapack_int const* lda,
4815  lapack_complex_float* B, lapack_int const* ldb,
4816  float const* vl,
4817  float const* vu, lapack_int const* il, lapack_int const* iu,
4818  float const* abstol, lapack_int* m,
4819  float* W,
4820  lapack_complex_float* Z, lapack_int const* ldz,
4821  lapack_complex_float* work, lapack_int const* lwork,
4822  float* rwork,
4823  lapack_int* iwork, lapack_int* IFAIL,
4824  lapack_int* info );
4825 
4826 #define LAPACK_zhegvx LAPACK_GLOBAL(zhegvx,ZHEGVX)
4827 void LAPACK_zhegvx(
4828  lapack_int const* itype, char const* jobz, char const* range, char const* uplo,
4829  lapack_int const* n,
4830  lapack_complex_double* A, lapack_int const* lda,
4831  lapack_complex_double* B, lapack_int const* ldb,
4832  double const* vl,
4833  double const* vu, lapack_int const* il, lapack_int const* iu,
4834  double const* abstol, lapack_int* m,
4835  double* W,
4836  lapack_complex_double* Z, lapack_int const* ldz,
4837  lapack_complex_double* work, lapack_int const* lwork,
4838  double* rwork,
4839  lapack_int* iwork, lapack_int* IFAIL,
4840  lapack_int* info );
4841 
4842 #define LAPACK_cherfs LAPACK_GLOBAL(cherfs,CHERFS)
4843 void LAPACK_cherfs(
4844  char const* uplo,
4845  lapack_int const* n, lapack_int const* nrhs,
4846  lapack_complex_float const* A, lapack_int const* lda,
4847  lapack_complex_float const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
4848  lapack_complex_float const* B, lapack_int const* ldb,
4849  lapack_complex_float* X, lapack_int const* ldx,
4850  float* ferr,
4851  float* berr,
4852  lapack_complex_float* work,
4853  float* rwork,
4854  lapack_int* info );
4855 
4856 #define LAPACK_zherfs LAPACK_GLOBAL(zherfs,ZHERFS)
4857 void LAPACK_zherfs(
4858  char const* uplo,
4859  lapack_int const* n, lapack_int const* nrhs,
4860  lapack_complex_double const* A, lapack_int const* lda,
4861  lapack_complex_double const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
4862  lapack_complex_double const* B, lapack_int const* ldb,
4863  lapack_complex_double* X, lapack_int const* ldx,
4864  double* ferr,
4865  double* berr,
4866  lapack_complex_double* work,
4867  double* rwork,
4868  lapack_int* info );
4869 
4870 #define LAPACK_cherfsx LAPACK_GLOBAL(cherfsx,CHERFSX)
4871 void LAPACK_cherfsx(
4872  char const* uplo, char const* equed,
4873  lapack_int const* n, lapack_int const* nrhs,
4874  lapack_complex_float const* A, lapack_int const* lda,
4875  lapack_complex_float const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
4876  float* S,
4877  lapack_complex_float const* B, lapack_int const* ldb,
4878  lapack_complex_float* X, lapack_int const* ldx,
4879  float* rcond,
4880  float* berr, lapack_int const* n_err_bnds,
4881  float* err_bnds_norm,
4882  float* err_bnds_comp, lapack_int const* nparams,
4883  float* params,
4884  lapack_complex_float* work,
4885  float* rwork,
4886  lapack_int* info );
4887 
4888 #define LAPACK_zherfsx LAPACK_GLOBAL(zherfsx,ZHERFSX)
4889 void LAPACK_zherfsx(
4890  char const* uplo, char const* equed,
4891  lapack_int const* n, lapack_int const* nrhs,
4892  lapack_complex_double const* A, lapack_int const* lda,
4893  lapack_complex_double const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
4894  double* S,
4895  lapack_complex_double const* B, lapack_int const* ldb,
4896  lapack_complex_double* X, lapack_int const* ldx,
4897  double* rcond,
4898  double* berr, lapack_int const* n_err_bnds,
4899  double* err_bnds_norm,
4900  double* err_bnds_comp, lapack_int const* nparams,
4901  double* params,
4902  lapack_complex_double* work,
4903  double* rwork,
4904  lapack_int* info );
4905 
4906 #define LAPACK_chesv LAPACK_GLOBAL(chesv,CHESV)
4907 void LAPACK_chesv(
4908  char const* uplo,
4909  lapack_int const* n, lapack_int const* nrhs,
4910  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
4911  lapack_complex_float* B, lapack_int const* ldb,
4912  lapack_complex_float* work, lapack_int const* lwork,
4913  lapack_int* info );
4914 
4915 #define LAPACK_zhesv LAPACK_GLOBAL(zhesv,ZHESV)
4916 void LAPACK_zhesv(
4917  char const* uplo,
4918  lapack_int const* n, lapack_int const* nrhs,
4919  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
4920  lapack_complex_double* B, lapack_int const* ldb,
4921  lapack_complex_double* work, lapack_int const* lwork,
4922  lapack_int* info );
4923 
4924 #define LAPACK_chesv_aa LAPACK_GLOBAL(chesv_aa,CHESV_AA)
4925 void LAPACK_chesv_aa(
4926  char const* uplo,
4927  lapack_int const* n, lapack_int const* nrhs,
4928  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
4929  lapack_complex_float* B, lapack_int const* ldb,
4930  lapack_complex_float* work, lapack_int const* lwork,
4931  lapack_int* info );
4932 
4933 #define LAPACK_zhesv_aa LAPACK_GLOBAL(zhesv_aa,ZHESV_AA)
4934 void LAPACK_zhesv_aa(
4935  char const* uplo,
4936  lapack_int const* n, lapack_int const* nrhs,
4937  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
4938  lapack_complex_double* B, lapack_int const* ldb,
4939  lapack_complex_double* work, lapack_int const* lwork,
4940  lapack_int* info );
4941 
4942 #define LAPACK_chesv_aa_2stage LAPACK_GLOBAL(chesv_aa_2stage,CHESV_AA_2STAGE)
4943 void LAPACK_chesv_aa_2stage(
4944  char const* uplo,
4945  lapack_int const* n, lapack_int const* nrhs,
4946  lapack_complex_float* A, lapack_int const* lda,
4947  lapack_complex_float* TB, lapack_int const* ltb, lapack_int* ipiv, lapack_int* ipiv2,
4948  lapack_complex_float* B, lapack_int const* ldb,
4949  lapack_complex_float* work, lapack_int const* lwork,
4950  lapack_int* info );
4951 
4952 #define LAPACK_zhesv_aa_2stage LAPACK_GLOBAL(zhesv_aa_2stage,ZHESV_AA_2STAGE)
4953 void LAPACK_zhesv_aa_2stage(
4954  char const* uplo,
4955  lapack_int const* n, lapack_int const* nrhs,
4956  lapack_complex_double* A, lapack_int const* lda,
4957  lapack_complex_double* TB, lapack_int const* ltb, lapack_int* ipiv, lapack_int* ipiv2,
4958  lapack_complex_double* B, lapack_int const* ldb,
4959  lapack_complex_double* work, lapack_int const* lwork,
4960  lapack_int* info );
4961 
4962 #define LAPACK_chesv_rk LAPACK_GLOBAL(chesv_rk,CHESV_RK)
4963 void LAPACK_chesv_rk(
4964  char const* uplo,
4965  lapack_int const* n, lapack_int const* nrhs,
4966  lapack_complex_float* A, lapack_int const* lda,
4967  lapack_complex_float* E, lapack_int* ipiv,
4968  lapack_complex_float* B, lapack_int const* ldb,
4969  lapack_complex_float* work, lapack_int const* lwork,
4970  lapack_int* info );
4971 
4972 #define LAPACK_zhesv_rk LAPACK_GLOBAL(zhesv_rk,ZHESV_RK)
4973 void LAPACK_zhesv_rk(
4974  char const* uplo,
4975  lapack_int const* n, lapack_int const* nrhs,
4976  lapack_complex_double* A, lapack_int const* lda,
4977  lapack_complex_double* E, lapack_int* ipiv,
4978  lapack_complex_double* B, lapack_int const* ldb,
4979  lapack_complex_double* work, lapack_int const* lwork,
4980  lapack_int* info );
4981 
4982 #define LAPACK_chesv_rook LAPACK_GLOBAL(chesv_rook,CHESV_ROOK)
4983 void LAPACK_chesv_rook(
4984  char const* uplo,
4985  lapack_int const* n, lapack_int const* nrhs,
4986  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
4987  lapack_complex_float* B, lapack_int const* ldb,
4988  lapack_complex_float* work, lapack_int const* lwork,
4989  lapack_int* info );
4990 
4991 #define LAPACK_zhesv_rook LAPACK_GLOBAL(zhesv_rook,ZHESV_ROOK)
4992 void LAPACK_zhesv_rook(
4993  char const* uplo,
4994  lapack_int const* n, lapack_int const* nrhs,
4995  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
4996  lapack_complex_double* B, lapack_int const* ldb,
4997  lapack_complex_double* work, lapack_int const* lwork,
4998  lapack_int* info );
4999 
5000 #define LAPACK_chesvx LAPACK_GLOBAL(chesvx,CHESVX)
5001 void LAPACK_chesvx(
5002  char const* fact, char const* uplo,
5003  lapack_int const* n, lapack_int const* nrhs,
5004  lapack_complex_float const* A, lapack_int const* lda,
5005  lapack_complex_float* AF, lapack_int const* ldaf, lapack_int* ipiv,
5006  lapack_complex_float const* B, lapack_int const* ldb,
5007  lapack_complex_float* X, lapack_int const* ldx,
5008  float* rcond,
5009  float* ferr,
5010  float* berr,
5011  lapack_complex_float* work, lapack_int const* lwork,
5012  float* rwork,
5013  lapack_int* info );
5014 
5015 #define LAPACK_zhesvx LAPACK_GLOBAL(zhesvx,ZHESVX)
5016 void LAPACK_zhesvx(
5017  char const* fact, char const* uplo,
5018  lapack_int const* n, lapack_int const* nrhs,
5019  lapack_complex_double const* A, lapack_int const* lda,
5020  lapack_complex_double* AF, lapack_int const* ldaf, lapack_int* ipiv,
5021  lapack_complex_double const* B, lapack_int const* ldb,
5022  lapack_complex_double* X, lapack_int const* ldx,
5023  double* rcond,
5024  double* ferr,
5025  double* berr,
5026  lapack_complex_double* work, lapack_int const* lwork,
5027  double* rwork,
5028  lapack_int* info );
5029 
5030 #define LAPACK_chesvxx LAPACK_GLOBAL(chesvxx,CHESVXX)
5031 void LAPACK_chesvxx(
5032  char const* fact, char const* uplo,
5033  lapack_int const* n, lapack_int const* nrhs,
5034  lapack_complex_float* A, lapack_int const* lda,
5035  lapack_complex_float* AF, lapack_int const* ldaf, lapack_int* ipiv, char* equed,
5036  float* S,
5037  lapack_complex_float* B,
5038  lapack_int const* ldb,
5039  lapack_complex_float* X, lapack_int const* ldx,
5040  float* rcond,
5041  float* rpvgrw,
5042  float* berr, lapack_int const* n_err_bnds,
5043  float* err_bnds_norm,
5044  float* err_bnds_comp, lapack_int const* nparams,
5045  float* params,
5046  lapack_complex_float* work,
5047  float* rwork,
5048  lapack_int* info );
5049 
5050 #define LAPACK_zhesvxx LAPACK_GLOBAL(zhesvxx,ZHESVXX)
5051 void LAPACK_zhesvxx(
5052  char const* fact, char const* uplo,
5053  lapack_int const* n, lapack_int const* nrhs,
5054  lapack_complex_double* A, lapack_int const* lda,
5055  lapack_complex_double* AF, lapack_int const* ldaf, lapack_int* ipiv, char* equed,
5056  double* S,
5057  lapack_complex_double* B,
5058  lapack_int const* ldb,
5059  lapack_complex_double* X, lapack_int const* ldx,
5060  double* rcond,
5061  double* rpvgrw,
5062  double* berr, lapack_int const* n_err_bnds,
5063  double* err_bnds_norm,
5064  double* err_bnds_comp, lapack_int const* nparams,
5065  double* params,
5066  lapack_complex_double* work,
5067  double* rwork,
5068  lapack_int* info );
5069 
5070 #define LAPACK_cheswapr LAPACK_GLOBAL(cheswapr,CHESWAPR)
5071 void LAPACK_cheswapr(
5072  char const* uplo,
5073  lapack_int const* n,
5074  lapack_complex_float* A, lapack_int const* lda, lapack_int const* i1, lapack_int const* i2 );
5075 
5076 #define LAPACK_zheswapr LAPACK_GLOBAL(zheswapr,ZHESWAPR)
5077 void LAPACK_zheswapr(
5078  char const* uplo,
5079  lapack_int const* n,
5080  lapack_complex_double* A, lapack_int const* lda, lapack_int const* i1, lapack_int const* i2 );
5081 
5082 #define LAPACK_chetrd LAPACK_GLOBAL(chetrd,CHETRD)
5083 void LAPACK_chetrd(
5084  char const* uplo,
5085  lapack_int const* n,
5086  lapack_complex_float* A, lapack_int const* lda,
5087  float* D,
5088  float* E,
5089  lapack_complex_float* tau,
5090  lapack_complex_float* work, lapack_int const* lwork,
5091  lapack_int* info );
5092 
5093 #define LAPACK_zhetrd LAPACK_GLOBAL(zhetrd,ZHETRD)
5094 void LAPACK_zhetrd(
5095  char const* uplo,
5096  lapack_int const* n,
5097  lapack_complex_double* A, lapack_int const* lda,
5098  double* D,
5099  double* E,
5100  lapack_complex_double* tau,
5101  lapack_complex_double* work, lapack_int const* lwork,
5102  lapack_int* info );
5103 
5104 #define LAPACK_chetrd_2stage LAPACK_GLOBAL(chetrd_2stage,CHETRD_2STAGE)
5105 void LAPACK_chetrd_2stage(
5106  char const* vect, char const* uplo,
5107  lapack_int const* n,
5108  lapack_complex_float* A, lapack_int const* lda,
5109  float* D,
5110  float* E,
5111  lapack_complex_float* tau,
5112  lapack_complex_float* HOUS2, lapack_int const* lhous2,
5113  lapack_complex_float* work, lapack_int const* lwork,
5114  lapack_int* info );
5115 
5116 #define LAPACK_zhetrd_2stage LAPACK_GLOBAL(zhetrd_2stage,ZHETRD_2STAGE)
5117 void LAPACK_zhetrd_2stage(
5118  char const* vect, char const* uplo,
5119  lapack_int const* n,
5120  lapack_complex_double* A, lapack_int const* lda,
5121  double* D,
5122  double* E,
5123  lapack_complex_double* tau,
5124  lapack_complex_double* HOUS2, lapack_int const* lhous2,
5125  lapack_complex_double* work, lapack_int const* lwork,
5126  lapack_int* info );
5127 
5128 #define LAPACK_chetrf LAPACK_GLOBAL(chetrf,CHETRF)
5129 void LAPACK_chetrf(
5130  char const* uplo,
5131  lapack_int const* n,
5132  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
5133  lapack_complex_float* work, lapack_int const* lwork,
5134  lapack_int* info );
5135 
5136 #define LAPACK_zhetrf LAPACK_GLOBAL(zhetrf,ZHETRF)
5137 void LAPACK_zhetrf(
5138  char const* uplo,
5139  lapack_int const* n,
5140  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
5141  lapack_complex_double* work, lapack_int const* lwork,
5142  lapack_int* info );
5143 
5144 #define LAPACK_chetrf_aa LAPACK_GLOBAL(chetrf_aa,CHETRF_AA)
5145 void LAPACK_chetrf_aa(
5146  char const* uplo,
5147  lapack_int const* n,
5148  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
5149  lapack_complex_float* work, lapack_int const* lwork,
5150  lapack_int* info );
5151 
5152 #define LAPACK_zhetrf_aa LAPACK_GLOBAL(zhetrf_aa,ZHETRF_AA)
5153 void LAPACK_zhetrf_aa(
5154  char const* uplo,
5155  lapack_int const* n,
5156  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
5157  lapack_complex_double* work, lapack_int const* lwork,
5158  lapack_int* info );
5159 
5160 #define LAPACK_chetrf_aa_2stage LAPACK_GLOBAL(chetrf_aa_2stage,CHETRF_AA_2STAGE)
5161 void LAPACK_chetrf_aa_2stage(
5162  char const* uplo,
5163  lapack_int const* n,
5164  lapack_complex_float* A, lapack_int const* lda,
5165  lapack_complex_float* TB, lapack_int const* ltb, lapack_int* ipiv, lapack_int* ipiv2,
5166  lapack_complex_float* work, lapack_int const* lwork,
5167  lapack_int* info );
5168 
5169 #define LAPACK_zhetrf_aa_2stage LAPACK_GLOBAL(zhetrf_aa_2stage,ZHETRF_AA_2STAGE)
5170 void LAPACK_zhetrf_aa_2stage(
5171  char const* uplo,
5172  lapack_int const* n,
5173  lapack_complex_double* A, lapack_int const* lda,
5174  lapack_complex_double* TB, lapack_int const* ltb, lapack_int* ipiv, lapack_int* ipiv2,
5175  lapack_complex_double* work, lapack_int const* lwork,
5176  lapack_int* info );
5177 
5178 #define LAPACK_chetrf_rk LAPACK_GLOBAL(chetrf_rk,CHETRF_RK)
5179 void LAPACK_chetrf_rk(
5180  char const* uplo,
5181  lapack_int const* n,
5182  lapack_complex_float* A, lapack_int const* lda,
5183  lapack_complex_float* E, lapack_int* ipiv,
5184  lapack_complex_float* work, lapack_int const* lwork,
5185  lapack_int* info );
5186 
5187 #define LAPACK_zhetrf_rk LAPACK_GLOBAL(zhetrf_rk,ZHETRF_RK)
5188 void LAPACK_zhetrf_rk(
5189  char const* uplo,
5190  lapack_int const* n,
5191  lapack_complex_double* A, lapack_int const* lda,
5192  lapack_complex_double* E, lapack_int* ipiv,
5193  lapack_complex_double* work, lapack_int const* lwork,
5194  lapack_int* info );
5195 
5196 #define LAPACK_chetrf_rook LAPACK_GLOBAL(chetrf_rook,CHETRF_ROOK)
5197 void LAPACK_chetrf_rook(
5198  char const* uplo,
5199  lapack_int const* n,
5200  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
5201  lapack_complex_float* work, lapack_int const* lwork,
5202  lapack_int* info );
5203 
5204 #define LAPACK_zhetrf_rook LAPACK_GLOBAL(zhetrf_rook,ZHETRF_ROOK)
5205 void LAPACK_zhetrf_rook(
5206  char const* uplo,
5207  lapack_int const* n,
5208  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
5209  lapack_complex_double* work, lapack_int const* lwork,
5210  lapack_int* info );
5211 
5212 #define LAPACK_chetri LAPACK_GLOBAL(chetri,CHETRI)
5213 void LAPACK_chetri(
5214  char const* uplo,
5215  lapack_int const* n,
5216  lapack_complex_float* A, lapack_int const* lda, lapack_int const* ipiv,
5217  lapack_complex_float* work,
5218  lapack_int* info );
5219 
5220 #define LAPACK_zhetri LAPACK_GLOBAL(zhetri,ZHETRI)
5221 void LAPACK_zhetri(
5222  char const* uplo,
5223  lapack_int const* n,
5224  lapack_complex_double* A, lapack_int const* lda, lapack_int const* ipiv,
5225  lapack_complex_double* work,
5226  lapack_int* info );
5227 
5228 #define LAPACK_chetri2 LAPACK_GLOBAL(chetri2,CHETRI2)
5229 void LAPACK_chetri2(
5230  char const* uplo,
5231  lapack_int const* n,
5232  lapack_complex_float* A, lapack_int const* lda, lapack_int const* ipiv,
5233  lapack_complex_float* work, lapack_int const* lwork,
5234  lapack_int* info );
5235 
5236 #define LAPACK_zhetri2 LAPACK_GLOBAL(zhetri2,ZHETRI2)
5237 void LAPACK_zhetri2(
5238  char const* uplo,
5239  lapack_int const* n,
5240  lapack_complex_double* A, lapack_int const* lda, lapack_int const* ipiv,
5241  lapack_complex_double* work, lapack_int const* lwork,
5242  lapack_int* info );
5243 
5244 #define LAPACK_chetri2x LAPACK_GLOBAL(chetri2x,CHETRI2X)
5245 void LAPACK_chetri2x(
5246  char const* uplo,
5247  lapack_int const* n,
5248  lapack_complex_float* A, lapack_int const* lda, lapack_int const* ipiv,
5249  lapack_complex_float* work, lapack_int const* nb,
5250  lapack_int* info );
5251 
5252 #define LAPACK_zhetri2x LAPACK_GLOBAL(zhetri2x,ZHETRI2X)
5253 void LAPACK_zhetri2x(
5254  char const* uplo,
5255  lapack_int const* n,
5256  lapack_complex_double* A, lapack_int const* lda, lapack_int const* ipiv,
5257  lapack_complex_double* work, lapack_int const* nb,
5258  lapack_int* info );
5259 
5260 #define LAPACK_chetri_3 LAPACK_GLOBAL(chetri_3,CHETRI_3)
5261 void LAPACK_chetri_3(
5262  char const* uplo,
5263  lapack_int const* n,
5264  lapack_complex_float* A, lapack_int const* lda,
5265  lapack_complex_float const* E, lapack_int const* ipiv,
5266  lapack_complex_float* work, lapack_int const* lwork,
5267  lapack_int* info );
5268 
5269 #define LAPACK_zhetri_3 LAPACK_GLOBAL(zhetri_3,ZHETRI_3)
5270 void LAPACK_zhetri_3(
5271  char const* uplo,
5272  lapack_int const* n,
5273  lapack_complex_double* A, lapack_int const* lda,
5274  lapack_complex_double const* E, lapack_int const* ipiv,
5275  lapack_complex_double* work, lapack_int const* lwork,
5276  lapack_int* info );
5277 
5278 #define LAPACK_chetrs LAPACK_GLOBAL(chetrs,CHETRS)
5279 void LAPACK_chetrs(
5280  char const* uplo,
5281  lapack_int const* n, lapack_int const* nrhs,
5282  lapack_complex_float const* A, lapack_int const* lda, lapack_int const* ipiv,
5283  lapack_complex_float* B, lapack_int const* ldb,
5284  lapack_int* info );
5285 
5286 #define LAPACK_zhetrs LAPACK_GLOBAL(zhetrs,ZHETRS)
5287 void LAPACK_zhetrs(
5288  char const* uplo,
5289  lapack_int const* n, lapack_int const* nrhs,
5290  lapack_complex_double const* A, lapack_int const* lda, lapack_int const* ipiv,
5291  lapack_complex_double* B, lapack_int const* ldb,
5292  lapack_int* info );
5293 
5294 #define LAPACK_chetrs2 LAPACK_GLOBAL(chetrs2,CHETRS2)
5295 void LAPACK_chetrs2(
5296  char const* uplo,
5297  lapack_int const* n, lapack_int const* nrhs,
5298  lapack_complex_float const* A, lapack_int const* lda, lapack_int const* ipiv,
5299  lapack_complex_float* B, lapack_int const* ldb,
5300  lapack_complex_float* work,
5301  lapack_int* info );
5302 
5303 #define LAPACK_zhetrs2 LAPACK_GLOBAL(zhetrs2,ZHETRS2)
5304 void LAPACK_zhetrs2(
5305  char const* uplo,
5306  lapack_int const* n, lapack_int const* nrhs,
5307  lapack_complex_double const* A, lapack_int const* lda, lapack_int const* ipiv,
5308  lapack_complex_double* B, lapack_int const* ldb,
5309  lapack_complex_double* work,
5310  lapack_int* info );
5311 
5312 #define LAPACK_chetrs_3 LAPACK_GLOBAL(chetrs_3,CHETRS_3)
5313 void LAPACK_chetrs_3(
5314  char const* uplo,
5315  lapack_int const* n, lapack_int const* nrhs,
5316  lapack_complex_float const* A, lapack_int const* lda,
5317  lapack_complex_float const* E, lapack_int const* ipiv,
5318  lapack_complex_float* B, lapack_int const* ldb,
5319  lapack_int* info );
5320 
5321 #define LAPACK_zhetrs_3 LAPACK_GLOBAL(zhetrs_3,ZHETRS_3)
5322 void LAPACK_zhetrs_3(
5323  char const* uplo,
5324  lapack_int const* n, lapack_int const* nrhs,
5325  lapack_complex_double const* A, lapack_int const* lda,
5326  lapack_complex_double const* E, lapack_int const* ipiv,
5327  lapack_complex_double* B, lapack_int const* ldb,
5328  lapack_int* info );
5329 
5330 #define LAPACK_chetrs_aa LAPACK_GLOBAL(chetrs_aa,CHETRS_AA)
5331 void LAPACK_chetrs_aa(
5332  char const* uplo,
5333  lapack_int const* n, lapack_int const* nrhs,
5334  lapack_complex_float const* A, lapack_int const* lda, lapack_int const* ipiv,
5335  lapack_complex_float* B, lapack_int const* ldb,
5336  lapack_complex_float* work, lapack_int const* lwork,
5337  lapack_int* info );
5338 
5339 #define LAPACK_zhetrs_aa LAPACK_GLOBAL(zhetrs_aa,ZHETRS_AA)
5340 void LAPACK_zhetrs_aa(
5341  char const* uplo,
5342  lapack_int const* n, lapack_int const* nrhs,
5343  lapack_complex_double const* A, lapack_int const* lda, lapack_int const* ipiv,
5344  lapack_complex_double* B, lapack_int const* ldb,
5345  lapack_complex_double* work, lapack_int const* lwork,
5346  lapack_int* info );
5347 
5348 #define LAPACK_chetrs_aa_2stage LAPACK_GLOBAL(chetrs_aa_2stage,CHETRS_AA_2STAGE)
5349 void LAPACK_chetrs_aa_2stage(
5350  char const* uplo,
5351  lapack_int const* n, lapack_int const* nrhs,
5352  lapack_complex_float const* A, lapack_int const* lda,
5353  lapack_complex_float* TB, lapack_int const* ltb, lapack_int const* ipiv, lapack_int const* ipiv2,
5354  lapack_complex_float* B, lapack_int const* ldb,
5355  lapack_int* info );
5356 
5357 #define LAPACK_zhetrs_aa_2stage LAPACK_GLOBAL(zhetrs_aa_2stage,ZHETRS_AA_2STAGE)
5358 void LAPACK_zhetrs_aa_2stage(
5359  char const* uplo,
5360  lapack_int const* n, lapack_int const* nrhs,
5361  lapack_complex_double const* A, lapack_int const* lda,
5362  lapack_complex_double* TB, lapack_int const* ltb, lapack_int const* ipiv, lapack_int const* ipiv2,
5363  lapack_complex_double* B, lapack_int const* ldb,
5364  lapack_int* info );
5365 
5366 #define LAPACK_chetrs_rook LAPACK_GLOBAL(chetrs_rook,CHETRS_ROOK)
5367 void LAPACK_chetrs_rook(
5368  char const* uplo,
5369  lapack_int const* n, lapack_int const* nrhs,
5370  lapack_complex_float const* A, lapack_int const* lda, lapack_int const* ipiv,
5371  lapack_complex_float* B, lapack_int const* ldb,
5372  lapack_int* info );
5373 
5374 #define LAPACK_zhetrs_rook LAPACK_GLOBAL(zhetrs_rook,ZHETRS_ROOK)
5375 void LAPACK_zhetrs_rook(
5376  char const* uplo,
5377  lapack_int const* n, lapack_int const* nrhs,
5378  lapack_complex_double const* A, lapack_int const* lda, lapack_int const* ipiv,
5379  lapack_complex_double* B, lapack_int const* ldb,
5380  lapack_int* info );
5381 
5382 #define LAPACK_chfrk LAPACK_GLOBAL(chfrk,CHFRK)
5383 void LAPACK_chfrk(
5384  char const* transr, char const* uplo, char const* trans,
5385  lapack_int const* n, lapack_int const* k,
5386  float const* alpha,
5387  lapack_complex_float const* A, lapack_int const* lda,
5388  float const* beta,
5389  lapack_complex_float* C );
5390 
5391 #define LAPACK_zhfrk LAPACK_GLOBAL(zhfrk,ZHFRK)
5392 void LAPACK_zhfrk(
5393  char const* transr, char const* uplo, char const* trans,
5394  lapack_int const* n, lapack_int const* k,
5395  double const* alpha,
5396  lapack_complex_double const* A, lapack_int const* lda,
5397  double const* beta,
5398  lapack_complex_double* C );
5399 
5400 #define LAPACK_chgeqz LAPACK_GLOBAL(chgeqz,CHGEQZ)
5401 void LAPACK_chgeqz(
5402  char const* job, char const* compq, char const* compz,
5403  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
5404  lapack_complex_float* H, lapack_int const* ldh,
5405  lapack_complex_float* T, lapack_int const* ldt,
5406  lapack_complex_float* alpha,
5407  lapack_complex_float* beta,
5408  lapack_complex_float* Q, lapack_int const* ldq,
5409  lapack_complex_float* Z, lapack_int const* ldz,
5410  lapack_complex_float* work, lapack_int const* lwork,
5411  float* rwork,
5412  lapack_int* info );
5413 
5414 #define LAPACK_dhgeqz LAPACK_GLOBAL(dhgeqz,DHGEQZ)
5415 void LAPACK_dhgeqz(
5416  char const* job, char const* compq, char const* compz,
5417  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
5418  double* H, lapack_int const* ldh,
5419  double* T, lapack_int const* ldt,
5420  double* alphar,
5421  double* alphai,
5422  double* beta,
5423  double* Q, lapack_int const* ldq,
5424  double* Z, lapack_int const* ldz,
5425  double* work, lapack_int const* lwork,
5426  lapack_int* info );
5427 
5428 #define LAPACK_shgeqz LAPACK_GLOBAL(shgeqz,SHGEQZ)
5429 void LAPACK_shgeqz(
5430  char const* job, char const* compq, char const* compz,
5431  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
5432  float* H, lapack_int const* ldh,
5433  float* T, lapack_int const* ldt,
5434  float* alphar,
5435  float* alphai,
5436  float* beta,
5437  float* Q, lapack_int const* ldq,
5438  float* Z, lapack_int const* ldz,
5439  float* work, lapack_int const* lwork,
5440  lapack_int* info );
5441 
5442 #define LAPACK_zhgeqz LAPACK_GLOBAL(zhgeqz,ZHGEQZ)
5443 void LAPACK_zhgeqz(
5444  char const* job, char const* compq, char const* compz,
5445  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
5446  lapack_complex_double* H, lapack_int const* ldh,
5447  lapack_complex_double* T, lapack_int const* ldt,
5448  lapack_complex_double* alpha,
5449  lapack_complex_double* beta,
5450  lapack_complex_double* Q, lapack_int const* ldq,
5451  lapack_complex_double* Z, lapack_int const* ldz,
5452  lapack_complex_double* work, lapack_int const* lwork,
5453  double* rwork,
5454  lapack_int* info );
5455 
5456 #define LAPACK_chpcon LAPACK_GLOBAL(chpcon,CHPCON)
5457 void LAPACK_chpcon(
5458  char const* uplo,
5459  lapack_int const* n,
5460  lapack_complex_float const* AP, lapack_int const* ipiv,
5461  float const* anorm,
5462  float* rcond,
5463  lapack_complex_float* work,
5464  lapack_int* info );
5465 
5466 #define LAPACK_zhpcon LAPACK_GLOBAL(zhpcon,ZHPCON)
5467 void LAPACK_zhpcon(
5468  char const* uplo,
5469  lapack_int const* n,
5470  lapack_complex_double const* AP, lapack_int const* ipiv,
5471  double const* anorm,
5472  double* rcond,
5473  lapack_complex_double* work,
5474  lapack_int* info );
5475 
5476 #define LAPACK_chpev LAPACK_GLOBAL(chpev,CHPEV)
5477 void LAPACK_chpev(
5478  char const* jobz, char const* uplo,
5479  lapack_int const* n,
5480  lapack_complex_float* AP,
5481  float* W,
5482  lapack_complex_float* Z, lapack_int const* ldz,
5483  lapack_complex_float* work,
5484  float* rwork,
5485  lapack_int* info );
5486 
5487 #define LAPACK_zhpev LAPACK_GLOBAL(zhpev,ZHPEV)
5488 void LAPACK_zhpev(
5489  char const* jobz, char const* uplo,
5490  lapack_int const* n,
5491  lapack_complex_double* AP,
5492  double* W,
5493  lapack_complex_double* Z, lapack_int const* ldz,
5494  lapack_complex_double* work,
5495  double* rwork,
5496  lapack_int* info );
5497 
5498 #define LAPACK_chpevd LAPACK_GLOBAL(chpevd,CHPEVD)
5499 void LAPACK_chpevd(
5500  char const* jobz, char const* uplo,
5501  lapack_int const* n,
5502  lapack_complex_float* AP,
5503  float* W,
5504  lapack_complex_float* Z, lapack_int const* ldz,
5505  lapack_complex_float* work, lapack_int const* lwork,
5506  float* rwork, lapack_int const* lrwork,
5507  lapack_int* iwork, lapack_int const* liwork,
5508  lapack_int* info );
5509 
5510 #define LAPACK_zhpevd LAPACK_GLOBAL(zhpevd,ZHPEVD)
5511 void LAPACK_zhpevd(
5512  char const* jobz, char const* uplo,
5513  lapack_int const* n,
5514  lapack_complex_double* AP,
5515  double* W,
5516  lapack_complex_double* Z, lapack_int const* ldz,
5517  lapack_complex_double* work, lapack_int const* lwork,
5518  double* rwork, lapack_int const* lrwork,
5519  lapack_int* iwork, lapack_int const* liwork,
5520  lapack_int* info );
5521 
5522 #define LAPACK_chpevx LAPACK_GLOBAL(chpevx,CHPEVX)
5523 void LAPACK_chpevx(
5524  char const* jobz, char const* range, char const* uplo,
5525  lapack_int const* n,
5526  lapack_complex_float* AP,
5527  float const* vl,
5528  float const* vu, lapack_int const* il, lapack_int const* iu,
5529  float const* abstol, lapack_int* m,
5530  float* W,
5531  lapack_complex_float* Z, lapack_int const* ldz,
5532  lapack_complex_float* work,
5533  float* rwork,
5534  lapack_int* iwork, lapack_int* IFAIL,
5535  lapack_int* info );
5536 
5537 #define LAPACK_zhpevx LAPACK_GLOBAL(zhpevx,ZHPEVX)
5538 void LAPACK_zhpevx(
5539  char const* jobz, char const* range, char const* uplo,
5540  lapack_int const* n,
5541  lapack_complex_double* AP,
5542  double const* vl,
5543  double const* vu, lapack_int const* il, lapack_int const* iu,
5544  double const* abstol, lapack_int* m,
5545  double* W,
5546  lapack_complex_double* Z, lapack_int const* ldz,
5547  lapack_complex_double* work,
5548  double* rwork,
5549  lapack_int* iwork, lapack_int* IFAIL,
5550  lapack_int* info );
5551 
5552 #define LAPACK_chpgst LAPACK_GLOBAL(chpgst,CHPGST)
5553 void LAPACK_chpgst(
5554  lapack_int const* itype, char const* uplo,
5555  lapack_int const* n,
5556  lapack_complex_float* AP,
5557  lapack_complex_float const* BP,
5558  lapack_int* info );
5559 
5560 #define LAPACK_zhpgst LAPACK_GLOBAL(zhpgst,ZHPGST)
5561 void LAPACK_zhpgst(
5562  lapack_int const* itype, char const* uplo,
5563  lapack_int const* n,
5564  lapack_complex_double* AP,
5565  lapack_complex_double const* BP,
5566  lapack_int* info );
5567 
5568 #define LAPACK_chpgv LAPACK_GLOBAL(chpgv,CHPGV)
5569 void LAPACK_chpgv(
5570  lapack_int const* itype, char const* jobz, char const* uplo,
5571  lapack_int const* n,
5572  lapack_complex_float* AP,
5573  lapack_complex_float* BP,
5574  float* W,
5575  lapack_complex_float* Z, lapack_int const* ldz,
5576  lapack_complex_float* work,
5577  float* rwork,
5578  lapack_int* info );
5579 
5580 #define LAPACK_zhpgv LAPACK_GLOBAL(zhpgv,ZHPGV)
5581 void LAPACK_zhpgv(
5582  lapack_int const* itype, char const* jobz, char const* uplo,
5583  lapack_int const* n,
5584  lapack_complex_double* AP,
5585  lapack_complex_double* BP,
5586  double* W,
5587  lapack_complex_double* Z, lapack_int const* ldz,
5588  lapack_complex_double* work,
5589  double* rwork,
5590  lapack_int* info );
5591 
5592 #define LAPACK_chpgvd LAPACK_GLOBAL(chpgvd,CHPGVD)
5593 void LAPACK_chpgvd(
5594  lapack_int const* itype, char const* jobz, char const* uplo,
5595  lapack_int const* n,
5596  lapack_complex_float* AP,
5597  lapack_complex_float* BP,
5598  float* W,
5599  lapack_complex_float* Z, lapack_int const* ldz,
5600  lapack_complex_float* work, lapack_int const* lwork,
5601  float* rwork, lapack_int const* lrwork,
5602  lapack_int* iwork, lapack_int const* liwork,
5603  lapack_int* info );
5604 
5605 #define LAPACK_zhpgvd LAPACK_GLOBAL(zhpgvd,ZHPGVD)
5606 void LAPACK_zhpgvd(
5607  lapack_int const* itype, char const* jobz, char const* uplo,
5608  lapack_int const* n,
5609  lapack_complex_double* AP,
5610  lapack_complex_double* BP,
5611  double* W,
5612  lapack_complex_double* Z, lapack_int const* ldz,
5613  lapack_complex_double* work, lapack_int const* lwork,
5614  double* rwork, lapack_int const* lrwork,
5615  lapack_int* iwork, lapack_int const* liwork,
5616  lapack_int* info );
5617 
5618 #define LAPACK_chpgvx LAPACK_GLOBAL(chpgvx,CHPGVX)
5619 void LAPACK_chpgvx(
5620  lapack_int const* itype, char const* jobz, char const* range, char const* uplo,
5621  lapack_int const* n,
5622  lapack_complex_float* AP,
5623  lapack_complex_float* BP,
5624  float const* vl,
5625  float const* vu, lapack_int const* il, lapack_int const* iu,
5626  float const* abstol, lapack_int* m,
5627  float* W,
5628  lapack_complex_float* Z, lapack_int const* ldz,
5629  lapack_complex_float* work,
5630  float* rwork,
5631  lapack_int* iwork, lapack_int* IFAIL,
5632  lapack_int* info );
5633 
5634 #define LAPACK_zhpgvx LAPACK_GLOBAL(zhpgvx,ZHPGVX)
5635 void LAPACK_zhpgvx(
5636  lapack_int const* itype, char const* jobz, char const* range, char const* uplo,
5637  lapack_int const* n,
5638  lapack_complex_double* AP,
5639  lapack_complex_double* BP,
5640  double const* vl,
5641  double const* vu, lapack_int const* il, lapack_int const* iu,
5642  double const* abstol, lapack_int* m,
5643  double* W,
5644  lapack_complex_double* Z, lapack_int const* ldz,
5645  lapack_complex_double* work,
5646  double* rwork,
5647  lapack_int* iwork, lapack_int* IFAIL,
5648  lapack_int* info );
5649 
5650 #define LAPACK_chprfs LAPACK_GLOBAL(chprfs,CHPRFS)
5651 void LAPACK_chprfs(
5652  char const* uplo,
5653  lapack_int const* n, lapack_int const* nrhs,
5654  lapack_complex_float const* AP,
5655  lapack_complex_float const* AFP, lapack_int const* ipiv,
5656  lapack_complex_float const* B, lapack_int const* ldb,
5657  lapack_complex_float* X, lapack_int const* ldx,
5658  float* ferr,
5659  float* berr,
5660  lapack_complex_float* work,
5661  float* rwork,
5662  lapack_int* info );
5663 
5664 #define LAPACK_zhprfs LAPACK_GLOBAL(zhprfs,ZHPRFS)
5665 void LAPACK_zhprfs(
5666  char const* uplo,
5667  lapack_int const* n, lapack_int const* nrhs,
5668  lapack_complex_double const* AP,
5669  lapack_complex_double const* AFP, lapack_int const* ipiv,
5670  lapack_complex_double const* B, lapack_int const* ldb,
5671  lapack_complex_double* X, lapack_int const* ldx,
5672  double* ferr,
5673  double* berr,
5674  lapack_complex_double* work,
5675  double* rwork,
5676  lapack_int* info );
5677 
5678 #define LAPACK_chpsv LAPACK_GLOBAL(chpsv,CHPSV)
5679 void LAPACK_chpsv(
5680  char const* uplo,
5681  lapack_int const* n, lapack_int const* nrhs,
5682  lapack_complex_float* AP, lapack_int* ipiv,
5683  lapack_complex_float* B, lapack_int const* ldb,
5684  lapack_int* info );
5685 
5686 #define LAPACK_zhpsv LAPACK_GLOBAL(zhpsv,ZHPSV)
5687 void LAPACK_zhpsv(
5688  char const* uplo,
5689  lapack_int const* n, lapack_int const* nrhs,
5690  lapack_complex_double* AP, lapack_int* ipiv,
5691  lapack_complex_double* B, lapack_int const* ldb,
5692  lapack_int* info );
5693 
5694 #define LAPACK_chpsvx LAPACK_GLOBAL(chpsvx,CHPSVX)
5695 void LAPACK_chpsvx(
5696  char const* fact, char const* uplo,
5697  lapack_int const* n, lapack_int const* nrhs,
5698  lapack_complex_float const* AP,
5699  lapack_complex_float* AFP, lapack_int* ipiv,
5700  lapack_complex_float const* B, lapack_int const* ldb,
5701  lapack_complex_float* X, lapack_int const* ldx,
5702  float* rcond,
5703  float* ferr,
5704  float* berr,
5705  lapack_complex_float* work,
5706  float* rwork,
5707  lapack_int* info );
5708 
5709 #define LAPACK_zhpsvx LAPACK_GLOBAL(zhpsvx,ZHPSVX)
5710 void LAPACK_zhpsvx(
5711  char const* fact, char const* uplo,
5712  lapack_int const* n, lapack_int const* nrhs,
5713  lapack_complex_double const* AP,
5714  lapack_complex_double* AFP, lapack_int* ipiv,
5715  lapack_complex_double const* B, lapack_int const* ldb,
5716  lapack_complex_double* X, lapack_int const* ldx,
5717  double* rcond,
5718  double* ferr,
5719  double* berr,
5720  lapack_complex_double* work,
5721  double* rwork,
5722  lapack_int* info );
5723 
5724 #define LAPACK_chptrd LAPACK_GLOBAL(chptrd,CHPTRD)
5725 void LAPACK_chptrd(
5726  char const* uplo,
5727  lapack_int const* n,
5728  lapack_complex_float* AP,
5729  float* D,
5730  float* E,
5731  lapack_complex_float* tau,
5732  lapack_int* info );
5733 
5734 #define LAPACK_zhptrd LAPACK_GLOBAL(zhptrd,ZHPTRD)
5735 void LAPACK_zhptrd(
5736  char const* uplo,
5737  lapack_int const* n,
5738  lapack_complex_double* AP,
5739  double* D,
5740  double* E,
5741  lapack_complex_double* tau,
5742  lapack_int* info );
5743 
5744 #define LAPACK_chptrf LAPACK_GLOBAL(chptrf,CHPTRF)
5745 void LAPACK_chptrf(
5746  char const* uplo,
5747  lapack_int const* n,
5748  lapack_complex_float* AP, lapack_int* ipiv,
5749  lapack_int* info );
5750 
5751 #define LAPACK_zhptrf LAPACK_GLOBAL(zhptrf,ZHPTRF)
5752 void LAPACK_zhptrf(
5753  char const* uplo,
5754  lapack_int const* n,
5755  lapack_complex_double* AP, lapack_int* ipiv,
5756  lapack_int* info );
5757 
5758 #define LAPACK_chptri LAPACK_GLOBAL(chptri,CHPTRI)
5759 void LAPACK_chptri(
5760  char const* uplo,
5761  lapack_int const* n,
5762  lapack_complex_float* AP, lapack_int const* ipiv,
5763  lapack_complex_float* work,
5764  lapack_int* info );
5765 
5766 #define LAPACK_zhptri LAPACK_GLOBAL(zhptri,ZHPTRI)
5767 void LAPACK_zhptri(
5768  char const* uplo,
5769  lapack_int const* n,
5770  lapack_complex_double* AP, lapack_int const* ipiv,
5771  lapack_complex_double* work,
5772  lapack_int* info );
5773 
5774 #define LAPACK_chptrs LAPACK_GLOBAL(chptrs,CHPTRS)
5775 void LAPACK_chptrs(
5776  char const* uplo,
5777  lapack_int const* n, lapack_int const* nrhs,
5778  lapack_complex_float const* AP, lapack_int const* ipiv,
5779  lapack_complex_float* B, lapack_int const* ldb,
5780  lapack_int* info );
5781 
5782 #define LAPACK_zhptrs LAPACK_GLOBAL(zhptrs,ZHPTRS)
5783 void LAPACK_zhptrs(
5784  char const* uplo,
5785  lapack_int const* n, lapack_int const* nrhs,
5786  lapack_complex_double const* AP, lapack_int const* ipiv,
5787  lapack_complex_double* B, lapack_int const* ldb,
5788  lapack_int* info );
5789 
5790 #define LAPACK_chsein LAPACK_GLOBAL(chsein,CHSEIN)
5791 void LAPACK_chsein(
5792  char const* side, char const* eigsrc, char const* initv,
5793  lapack_logical const* select,
5794  lapack_int const* n,
5795  lapack_complex_float const* H, lapack_int const* ldh,
5796  lapack_complex_float* W,
5797  lapack_complex_float* VL, lapack_int const* ldvl,
5798  lapack_complex_float* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
5799  lapack_complex_float* work,
5800  float* rwork, lapack_int* IFAILL, lapack_int* IFAILR,
5801  lapack_int* info );
5802 
5803 #define LAPACK_dhsein LAPACK_GLOBAL(dhsein,DHSEIN)
5804 void LAPACK_dhsein(
5805  char const* side, char const* eigsrc, char const* initv,
5806  lapack_logical* select,
5807  lapack_int const* n,
5808  double const* H, lapack_int const* ldh,
5809  double* WR,
5810  double const* WI,
5811  double* VL, lapack_int const* ldvl,
5812  double* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
5813  double* work, lapack_int* IFAILL, lapack_int* IFAILR,
5814  lapack_int* info );
5815 
5816 #define LAPACK_shsein LAPACK_GLOBAL(shsein,SHSEIN)
5817 void LAPACK_shsein(
5818  char const* side, char const* eigsrc, char const* initv,
5819  lapack_logical* select,
5820  lapack_int const* n,
5821  float const* H, lapack_int const* ldh,
5822  float* WR,
5823  float const* WI,
5824  float* VL, lapack_int const* ldvl,
5825  float* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
5826  float* work, lapack_int* IFAILL, lapack_int* IFAILR,
5827  lapack_int* info );
5828 
5829 #define LAPACK_zhsein LAPACK_GLOBAL(zhsein,ZHSEIN)
5830 void LAPACK_zhsein(
5831  char const* side, char const* eigsrc, char const* initv,
5832  lapack_logical const* select,
5833  lapack_int const* n,
5834  lapack_complex_double const* H, lapack_int const* ldh,
5835  lapack_complex_double* W,
5836  lapack_complex_double* VL, lapack_int const* ldvl,
5837  lapack_complex_double* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
5838  lapack_complex_double* work,
5839  double* rwork, lapack_int* IFAILL, lapack_int* IFAILR,
5840  lapack_int* info );
5841 
5842 #define LAPACK_chseqr LAPACK_GLOBAL(chseqr,CHSEQR)
5843 void LAPACK_chseqr(
5844  char const* job, char const* compz,
5845  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
5846  lapack_complex_float* H, lapack_int const* ldh,
5847  lapack_complex_float* W,
5848  lapack_complex_float* Z, lapack_int const* ldz,
5849  lapack_complex_float* work, lapack_int const* lwork,
5850  lapack_int* info );
5851 
5852 #define LAPACK_dhseqr LAPACK_GLOBAL(dhseqr,DHSEQR)
5853 void LAPACK_dhseqr(
5854  char const* job, char const* compz,
5855  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
5856  double* H, lapack_int const* ldh,
5857  double* WR,
5858  double* WI,
5859  double* Z, lapack_int const* ldz,
5860  double* work, lapack_int const* lwork,
5861  lapack_int* info );
5862 
5863 #define LAPACK_shseqr LAPACK_GLOBAL(shseqr,SHSEQR)
5864 void LAPACK_shseqr(
5865  char const* job, char const* compz,
5866  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
5867  float* H, lapack_int const* ldh,
5868  float* WR,
5869  float* WI,
5870  float* Z, lapack_int const* ldz,
5871  float* work, lapack_int const* lwork,
5872  lapack_int* info );
5873 
5874 #define LAPACK_zhseqr LAPACK_GLOBAL(zhseqr,ZHSEQR)
5875 void LAPACK_zhseqr(
5876  char const* job, char const* compz,
5877  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
5878  lapack_complex_double* H, lapack_int const* ldh,
5879  lapack_complex_double* W,
5880  lapack_complex_double* Z, lapack_int const* ldz,
5881  lapack_complex_double* work, lapack_int const* lwork,
5882  lapack_int* info );
5883 
5884 #define LAPACK_clacgv LAPACK_GLOBAL(clacgv,CLACGV)
5885 void LAPACK_clacgv(
5886  lapack_int const* n,
5887  lapack_complex_float* X, lapack_int const* incx );
5888 
5889 #define LAPACK_zlacgv LAPACK_GLOBAL(zlacgv,ZLACGV)
5890 void LAPACK_zlacgv(
5891  lapack_int const* n,
5892  lapack_complex_double* X, lapack_int const* incx );
5893 
5894 #define LAPACK_clacn2 LAPACK_GLOBAL(clacn2,CLACN2)
5895 void LAPACK_clacn2(
5896  lapack_int const* n,
5897  lapack_complex_float* V,
5898  lapack_complex_float* X,
5899  float* est, lapack_int* kase, lapack_int* ISAVE );
5900 
5901 #define LAPACK_dlacn2 LAPACK_GLOBAL(dlacn2,DLACN2)
5902 void LAPACK_dlacn2(
5903  lapack_int const* n,
5904  double* V,
5905  double* X, lapack_int* ISGN,
5906  double* est, lapack_int* kase, lapack_int* ISAVE );
5907 
5908 #define LAPACK_slacn2 LAPACK_GLOBAL(slacn2,SLACN2)
5909 void LAPACK_slacn2(
5910  lapack_int const* n,
5911  float* V,
5912  float* X, lapack_int* ISGN,
5913  float* est, lapack_int* kase, lapack_int* ISAVE );
5914 
5915 #define LAPACK_zlacn2 LAPACK_GLOBAL(zlacn2,ZLACN2)
5916 void LAPACK_zlacn2(
5917  lapack_int const* n,
5918  lapack_complex_double* V,
5919  lapack_complex_double* X,
5920  double* est, lapack_int* kase, lapack_int* ISAVE );
5921 
5922 #define LAPACK_clacp2 LAPACK_GLOBAL(clacp2,CLACP2)
5923 void LAPACK_clacp2(
5924  char const* uplo,
5925  lapack_int const* m, lapack_int const* n,
5926  float const* A, lapack_int const* lda,
5927  lapack_complex_float* B, lapack_int const* ldb );
5928 
5929 #define LAPACK_zlacp2 LAPACK_GLOBAL(zlacp2,ZLACP2)
5930 void LAPACK_zlacp2(
5931  char const* uplo,
5932  lapack_int const* m, lapack_int const* n,
5933  double const* A, lapack_int const* lda,
5934  lapack_complex_double* B, lapack_int const* ldb );
5935 
5936 #define LAPACK_clacpy LAPACK_GLOBAL(clacpy,CLACPY)
5937 void LAPACK_clacpy(
5938  char const* uplo,
5939  lapack_int const* m, lapack_int const* n,
5940  lapack_complex_float const* A, lapack_int const* lda,
5941  lapack_complex_float* B, lapack_int const* ldb );
5942 
5943 #define LAPACK_dlacpy LAPACK_GLOBAL(dlacpy,DLACPY)
5944 void LAPACK_dlacpy(
5945  char const* uplo,
5946  lapack_int const* m, lapack_int const* n,
5947  double const* A, lapack_int const* lda,
5948  double* B, lapack_int const* ldb );
5949 
5950 #define LAPACK_slacpy LAPACK_GLOBAL(slacpy,SLACPY)
5951 void LAPACK_slacpy(
5952  char const* uplo,
5953  lapack_int const* m, lapack_int const* n,
5954  float const* A, lapack_int const* lda,
5955  float* B, lapack_int const* ldb );
5956 
5957 #define LAPACK_zlacpy LAPACK_GLOBAL(zlacpy,ZLACPY)
5958 void LAPACK_zlacpy(
5959  char const* uplo,
5960  lapack_int const* m, lapack_int const* n,
5961  lapack_complex_double const* A, lapack_int const* lda,
5962  lapack_complex_double* B, lapack_int const* ldb );
5963 
5964 #define LAPACK_clacrm LAPACK_GLOBAL(clacrm,CLACRM)
5965 void LAPACK_clacrm(
5966  lapack_int const* m, lapack_int const* n,
5967  lapack_complex_float const* A, lapack_int const* lda,
5968  float const* B, lapack_int const* ldb,
5969  lapack_complex_float* C, lapack_int const* ldc,
5970  float* rwork );
5971 
5972 #define LAPACK_zlacrm LAPACK_GLOBAL(zlacrm,ZLACRM)
5973 void LAPACK_zlacrm(
5974  lapack_int const* m, lapack_int const* n,
5975  lapack_complex_double const* A, lapack_int const* lda,
5976  double const* B, lapack_int const* ldb,
5977  lapack_complex_double* C, lapack_int const* ldc,
5978  double* rwork );
5979 
5980 #define LAPACK_zlag2c LAPACK_GLOBAL(zlag2c,ZLAG2C)
5981 void LAPACK_zlag2c(
5982  lapack_int const* m, lapack_int const* n,
5983  lapack_complex_double const* A, lapack_int const* lda,
5984  lapack_complex_float* SA, lapack_int const* ldsa,
5985  lapack_int* info );
5986 
5987 #define LAPACK_slag2d LAPACK_GLOBAL(slag2d,SLAG2D)
5988 void LAPACK_slag2d(
5989  lapack_int const* m, lapack_int const* n,
5990  float const* SA, lapack_int const* ldsa,
5991  double* A, lapack_int const* lda,
5992  lapack_int* info );
5993 
5994 #define LAPACK_dlag2s LAPACK_GLOBAL(dlag2s,DLAG2S)
5995 void LAPACK_dlag2s(
5996  lapack_int const* m, lapack_int const* n,
5997  double const* A, lapack_int const* lda,
5998  float* SA, lapack_int const* ldsa,
5999  lapack_int* info );
6000 
6001 #define LAPACK_clag2z LAPACK_GLOBAL(clag2z,CLAG2Z)
6002 void LAPACK_clag2z(
6003  lapack_int const* m, lapack_int const* n,
6004  lapack_complex_float const* SA, lapack_int const* ldsa,
6005  lapack_complex_double* A, lapack_int const* lda,
6006  lapack_int* info );
6007 
6008 #define LAPACK_clagge LAPACK_GLOBAL(clagge,CLAGGE)
6009 void LAPACK_clagge(
6010  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
6011  float const* D,
6012  lapack_complex_float* A, lapack_int const* lda, lapack_int* iseed,
6013  lapack_complex_float* work,
6014  lapack_int* info );
6015 
6016 #define LAPACK_dlagge LAPACK_GLOBAL(dlagge,DLAGGE)
6017 void LAPACK_dlagge(
6018  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
6019  double const* D,
6020  double* A, lapack_int const* lda, lapack_int* iseed,
6021  double* work,
6022  lapack_int* info );
6023 
6024 #define LAPACK_slagge LAPACK_GLOBAL(slagge,SLAGGE)
6025 void LAPACK_slagge(
6026  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
6027  float const* D,
6028  float* A, lapack_int const* lda, lapack_int* iseed,
6029  float* work,
6030  lapack_int* info );
6031 
6032 #define LAPACK_zlagge LAPACK_GLOBAL(zlagge,ZLAGGE)
6033 void LAPACK_zlagge(
6034  lapack_int const* m, lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
6035  double const* D,
6036  lapack_complex_double* A, lapack_int const* lda, lapack_int* iseed,
6037  lapack_complex_double* work,
6038  lapack_int* info );
6039 
6040 #define LAPACK_claghe LAPACK_GLOBAL(claghe,CLAGHE)
6041 void LAPACK_claghe(
6042  lapack_int const* n, lapack_int const* k,
6043  float const* D,
6044  lapack_complex_float* A, lapack_int const* lda, lapack_int* iseed,
6045  lapack_complex_float* work,
6046  lapack_int* info );
6047 
6048 #define LAPACK_zlaghe LAPACK_GLOBAL(zlaghe,ZLAGHE)
6049 void LAPACK_zlaghe(
6050  lapack_int const* n, lapack_int const* k,
6051  double const* D,
6052  lapack_complex_double* A, lapack_int const* lda, lapack_int* iseed,
6053  lapack_complex_double* work,
6054  lapack_int* info );
6055 
6056 #define LAPACK_clagsy LAPACK_GLOBAL(clagsy,CLAGSY)
6057 void LAPACK_clagsy(
6058  lapack_int const* n, lapack_int const* k,
6059  float const* D,
6060  lapack_complex_float* A, lapack_int const* lda, lapack_int* iseed,
6061  lapack_complex_float* work,
6062  lapack_int* info );
6063 
6064 #define LAPACK_dlagsy LAPACK_GLOBAL(dlagsy,DLAGSY)
6065 void LAPACK_dlagsy(
6066  lapack_int const* n, lapack_int const* k,
6067  double const* D,
6068  double* A, lapack_int const* lda, lapack_int* iseed,
6069  double* work,
6070  lapack_int* info );
6071 
6072 #define LAPACK_slagsy LAPACK_GLOBAL(slagsy,SLAGSY)
6073 void LAPACK_slagsy(
6074  lapack_int const* n, lapack_int const* k,
6075  float const* D,
6076  float* A, lapack_int const* lda, lapack_int* iseed,
6077  float* work,
6078  lapack_int* info );
6079 
6080 #define LAPACK_zlagsy LAPACK_GLOBAL(zlagsy,ZLAGSY)
6081 void LAPACK_zlagsy(
6082  lapack_int const* n, lapack_int const* k,
6083  double const* D,
6084  lapack_complex_double* A, lapack_int const* lda, lapack_int* iseed,
6085  lapack_complex_double* work,
6086  lapack_int* info );
6087 
6088 #define LAPACK_dlamch LAPACK_GLOBAL(dlamch,DLAMCH)
6089 double LAPACK_dlamch(
6090  char const* cmach );
6091 
6092 #define LAPACK_slamch LAPACK_GLOBAL(slamch,SLAMCH)
6093 lapack_float_return LAPACK_slamch(
6094  char const* cmach );
6095 
6096 #define LAPACK_clangb LAPACK_GLOBAL(clangb,CLANGB)
6097 lapack_float_return LAPACK_clangb(
6098  char const* norm,
6099  lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
6100  lapack_complex_float const* AB, lapack_int const* ldab,
6101  float* work );
6102 
6103 #define LAPACK_dlangb LAPACK_GLOBAL(dlangb,DLANGB)
6104 double LAPACK_dlangb(
6105  char const* norm,
6106  lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
6107  double const* AB, lapack_int const* ldab,
6108  double* work );
6109 
6110 #define LAPACK_slangb LAPACK_GLOBAL(slangb,SLANGB)
6111 lapack_float_return LAPACK_slangb(
6112  char const* norm,
6113  lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
6114  float const* AB, lapack_int const* ldab,
6115  float* work );
6116 
6117 #define LAPACK_zlangb LAPACK_GLOBAL(zlangb,ZLANGB)
6118 double LAPACK_zlangb(
6119  char const* norm,
6120  lapack_int const* n, lapack_int const* kl, lapack_int const* ku,
6121  lapack_complex_double const* AB, lapack_int const* ldab,
6122  double* work );
6123 
6124 #define LAPACK_clange LAPACK_GLOBAL(clange,CLANGE)
6125 lapack_float_return LAPACK_clange(
6126  char const* norm,
6127  lapack_int const* m, lapack_int const* n,
6128  lapack_complex_float const* A, lapack_int const* lda,
6129  float* work );
6130 
6131 #define LAPACK_dlange LAPACK_GLOBAL(dlange,DLANGE)
6132 double LAPACK_dlange(
6133  char const* norm,
6134  lapack_int const* m, lapack_int const* n,
6135  double const* A, lapack_int const* lda,
6136  double* work );
6137 
6138 #define LAPACK_slange LAPACK_GLOBAL(slange,SLANGE)
6139 lapack_float_return LAPACK_slange(
6140  char const* norm,
6141  lapack_int const* m, lapack_int const* n,
6142  float const* A, lapack_int const* lda,
6143  float* work );
6144 
6145 #define LAPACK_zlange LAPACK_GLOBAL(zlange,ZLANGE)
6146 double LAPACK_zlange(
6147  char const* norm,
6148  lapack_int const* m, lapack_int const* n,
6149  lapack_complex_double const* A, lapack_int const* lda,
6150  double* work );
6151 
6152 #define LAPACK_clangt LAPACK_GLOBAL(clangt,CLANGT)
6153 lapack_float_return LAPACK_clangt(
6154  char const* norm,
6155  lapack_int const* n,
6156  lapack_complex_float const* DL,
6157  lapack_complex_float const* D,
6158  lapack_complex_float const* DU );
6159 
6160 #define LAPACK_dlangt LAPACK_GLOBAL(dlangt,DLANGT)
6161 double LAPACK_dlangt(
6162  char const* norm,
6163  lapack_int const* n,
6164  double const* DL,
6165  double const* D,
6166  double const* DU );
6167 
6168 #define LAPACK_slangt LAPACK_GLOBAL(slangt,SLANGT)
6169 lapack_float_return LAPACK_slangt(
6170  char const* norm,
6171  lapack_int const* n,
6172  float const* DL,
6173  float const* D,
6174  float const* DU );
6175 
6176 #define LAPACK_zlangt LAPACK_GLOBAL(zlangt,ZLANGT)
6177 double LAPACK_zlangt(
6178  char const* norm,
6179  lapack_int const* n,
6180  lapack_complex_double const* DL,
6181  lapack_complex_double const* D,
6182  lapack_complex_double const* DU );
6183 
6184 #define LAPACK_clanhb LAPACK_GLOBAL(clanhb,CLANHB)
6185 lapack_float_return LAPACK_clanhb(
6186  char const* norm, char const* uplo,
6187  lapack_int const* n, lapack_int const* k,
6188  lapack_complex_float const* AB, lapack_int const* ldab,
6189  float* work );
6190 
6191 #define LAPACK_zlanhb LAPACK_GLOBAL(zlanhb,ZLANHB)
6192 double LAPACK_zlanhb(
6193  char const* norm, char const* uplo,
6194  lapack_int const* n, lapack_int const* k,
6195  lapack_complex_double const* AB, lapack_int const* ldab,
6196  double* work );
6197 
6198 #define LAPACK_clanhe LAPACK_GLOBAL(clanhe,CLANHE)
6199 lapack_float_return LAPACK_clanhe(
6200  char const* norm, char const* uplo,
6201  lapack_int const* n,
6202  lapack_complex_float const* A, lapack_int const* lda,
6203  float* work );
6204 
6205 #define LAPACK_zlanhe LAPACK_GLOBAL(zlanhe,ZLANHE)
6206 double LAPACK_zlanhe(
6207  char const* norm, char const* uplo,
6208  lapack_int const* n,
6209  lapack_complex_double const* A, lapack_int const* lda,
6210  double* work );
6211 
6212 #define LAPACK_clanhp LAPACK_GLOBAL(clanhp,CLANHP)
6213 lapack_float_return LAPACK_clanhp(
6214  char const* norm, char const* uplo,
6215  lapack_int const* n,
6216  lapack_complex_float const* AP,
6217  float* work );
6218 
6219 #define LAPACK_zlanhp LAPACK_GLOBAL(zlanhp,ZLANHP)
6220 double LAPACK_zlanhp(
6221  char const* norm, char const* uplo,
6222  lapack_int const* n,
6223  lapack_complex_double const* AP,
6224  double* work );
6225 
6226 #define LAPACK_clanhs LAPACK_GLOBAL(clanhs,CLANHS)
6227 lapack_float_return LAPACK_clanhs(
6228  char const* norm,
6229  lapack_int const* n,
6230  lapack_complex_float const* A, lapack_int const* lda,
6231  float* work );
6232 
6233 #define LAPACK_dlanhs LAPACK_GLOBAL(dlanhs,DLANHS)
6234 double LAPACK_dlanhs(
6235  char const* norm,
6236  lapack_int const* n,
6237  double const* A, lapack_int const* lda,
6238  double* work );
6239 
6240 #define LAPACK_slanhs LAPACK_GLOBAL(slanhs,SLANHS)
6241 lapack_float_return LAPACK_slanhs(
6242  char const* norm,
6243  lapack_int const* n,
6244  float const* A, lapack_int const* lda,
6245  float* work );
6246 
6247 #define LAPACK_zlanhs LAPACK_GLOBAL(zlanhs,ZLANHS)
6248 double LAPACK_zlanhs(
6249  char const* norm,
6250  lapack_int const* n,
6251  lapack_complex_double const* A, lapack_int const* lda,
6252  double* work );
6253 
6254 #define LAPACK_clanht LAPACK_GLOBAL(clanht,CLANHT)
6255 lapack_float_return LAPACK_clanht(
6256  char const* norm,
6257  lapack_int const* n,
6258  float const* D,
6259  lapack_complex_float const* E );
6260 
6261 #define LAPACK_zlanht LAPACK_GLOBAL(zlanht,ZLANHT)
6262 double LAPACK_zlanht(
6263  char const* norm,
6264  lapack_int const* n,
6265  double const* D,
6266  lapack_complex_double const* E );
6267 
6268 #define LAPACK_clansb LAPACK_GLOBAL(clansb,CLANSB)
6269 lapack_float_return LAPACK_clansb(
6270  char const* norm, char const* uplo,
6271  lapack_int const* n, lapack_int const* k,
6272  lapack_complex_float const* AB, lapack_int const* ldab,
6273  float* work );
6274 
6275 #define LAPACK_dlansb LAPACK_GLOBAL(dlansb,DLANSB)
6276 double LAPACK_dlansb(
6277  char const* norm, char const* uplo,
6278  lapack_int const* n, lapack_int const* k,
6279  double const* AB, lapack_int const* ldab,
6280  double* work );
6281 
6282 #define LAPACK_slansb LAPACK_GLOBAL(slansb,SLANSB)
6283 lapack_float_return LAPACK_slansb(
6284  char const* norm, char const* uplo,
6285  lapack_int const* n, lapack_int const* k,
6286  float const* AB, lapack_int const* ldab,
6287  float* work );
6288 
6289 #define LAPACK_zlansb LAPACK_GLOBAL(zlansb,ZLANSB)
6290 double LAPACK_zlansb(
6291  char const* norm, char const* uplo,
6292  lapack_int const* n, lapack_int const* k,
6293  lapack_complex_double const* AB, lapack_int const* ldab,
6294  double* work );
6295 
6296 #define LAPACK_clansp LAPACK_GLOBAL(clansp,CLANSP)
6297 lapack_float_return LAPACK_clansp(
6298  char const* norm, char const* uplo,
6299  lapack_int const* n,
6300  lapack_complex_float const* AP,
6301  float* work );
6302 
6303 #define LAPACK_dlansp LAPACK_GLOBAL(dlansp,DLANSP)
6304 double LAPACK_dlansp(
6305  char const* norm, char const* uplo,
6306  lapack_int const* n,
6307  double const* AP,
6308  double* work );
6309 
6310 #define LAPACK_slansp LAPACK_GLOBAL(slansp,SLANSP)
6311 lapack_float_return LAPACK_slansp(
6312  char const* norm, char const* uplo,
6313  lapack_int const* n,
6314  float const* AP,
6315  float* work );
6316 
6317 #define LAPACK_zlansp LAPACK_GLOBAL(zlansp,ZLANSP)
6318 double LAPACK_zlansp(
6319  char const* norm, char const* uplo,
6320  lapack_int const* n,
6321  lapack_complex_double const* AP,
6322  double* work );
6323 
6324 #define LAPACK_dlanst LAPACK_GLOBAL(dlanst,DLANST)
6325 double LAPACK_dlanst(
6326  char const* norm,
6327  lapack_int const* n,
6328  double const* D,
6329  double const* E );
6330 
6331 #define LAPACK_slanst LAPACK_GLOBAL(slanst,SLANST)
6332 lapack_float_return LAPACK_slanst(
6333  char const* norm,
6334  lapack_int const* n,
6335  float const* D,
6336  float const* E );
6337 
6338 #define LAPACK_clansy LAPACK_GLOBAL(clansy,CLANSY)
6339 lapack_float_return LAPACK_clansy(
6340  char const* norm, char const* uplo,
6341  lapack_int const* n,
6342  lapack_complex_float const* A, lapack_int const* lda,
6343  float* work );
6344 
6345 #define LAPACK_dlansy LAPACK_GLOBAL(dlansy,DLANSY)
6346 double LAPACK_dlansy(
6347  char const* norm, char const* uplo,
6348  lapack_int const* n,
6349  double const* A, lapack_int const* lda,
6350  double* work );
6351 
6352 #define LAPACK_slansy LAPACK_GLOBAL(slansy,SLANSY)
6353 lapack_float_return LAPACK_slansy(
6354  char const* norm, char const* uplo,
6355  lapack_int const* n,
6356  float const* A, lapack_int const* lda,
6357  float* work );
6358 
6359 #define LAPACK_zlansy LAPACK_GLOBAL(zlansy,ZLANSY)
6360 double LAPACK_zlansy(
6361  char const* norm, char const* uplo,
6362  lapack_int const* n,
6363  lapack_complex_double const* A, lapack_int const* lda,
6364  double* work );
6365 
6366 #define LAPACK_clantb LAPACK_GLOBAL(clantb,CLANTB)
6367 lapack_float_return LAPACK_clantb(
6368  char const* norm, char const* uplo, char const* diag,
6369  lapack_int const* n, lapack_int const* k,
6370  lapack_complex_float const* AB, lapack_int const* ldab,
6371  float* work );
6372 
6373 #define LAPACK_dlantb LAPACK_GLOBAL(dlantb,DLANTB)
6374 double LAPACK_dlantb(
6375  char const* norm, char const* uplo, char const* diag,
6376  lapack_int const* n, lapack_int const* k,
6377  double const* AB, lapack_int const* ldab,
6378  double* work );
6379 
6380 #define LAPACK_slantb LAPACK_GLOBAL(slantb,SLANTB)
6381 lapack_float_return LAPACK_slantb(
6382  char const* norm, char const* uplo, char const* diag,
6383  lapack_int const* n, lapack_int const* k,
6384  float const* AB, lapack_int const* ldab,
6385  float* work );
6386 
6387 #define LAPACK_zlantb LAPACK_GLOBAL(zlantb,ZLANTB)
6388 double LAPACK_zlantb(
6389  char const* norm, char const* uplo, char const* diag,
6390  lapack_int const* n, lapack_int const* k,
6391  lapack_complex_double const* AB, lapack_int const* ldab,
6392  double* work );
6393 
6394 #define LAPACK_clantp LAPACK_GLOBAL(clantp,CLANTP)
6395 lapack_float_return LAPACK_clantp(
6396  char const* norm, char const* uplo, char const* diag,
6397  lapack_int const* n,
6398  lapack_complex_float const* AP,
6399  float* work );
6400 
6401 #define LAPACK_dlantp LAPACK_GLOBAL(dlantp,DLANTP)
6402 double LAPACK_dlantp(
6403  char const* norm, char const* uplo, char const* diag,
6404  lapack_int const* n,
6405  double const* AP,
6406  double* work );
6407 
6408 #define LAPACK_slantp LAPACK_GLOBAL(slantp,SLANTP)
6409 lapack_float_return LAPACK_slantp(
6410  char const* norm, char const* uplo, char const* diag,
6411  lapack_int const* n,
6412  float const* AP,
6413  float* work );
6414 
6415 #define LAPACK_zlantp LAPACK_GLOBAL(zlantp,ZLANTP)
6416 double LAPACK_zlantp(
6417  char const* norm, char const* uplo, char const* diag,
6418  lapack_int const* n,
6419  lapack_complex_double const* AP,
6420  double* work );
6421 
6422 #define LAPACK_clantr LAPACK_GLOBAL(clantr,CLANTR)
6423 lapack_float_return LAPACK_clantr(
6424  char const* norm, char const* uplo, char const* diag,
6425  lapack_int const* m, lapack_int const* n,
6426  lapack_complex_float const* A, lapack_int const* lda,
6427  float* work );
6428 
6429 #define LAPACK_dlantr LAPACK_GLOBAL(dlantr,DLANTR)
6430 double LAPACK_dlantr(
6431  char const* norm, char const* uplo, char const* diag,
6432  lapack_int const* m, lapack_int const* n,
6433  double const* A, lapack_int const* lda,
6434  double* work );
6435 
6436 #define LAPACK_slantr LAPACK_GLOBAL(slantr,SLANTR)
6437 lapack_float_return LAPACK_slantr(
6438  char const* norm, char const* uplo, char const* diag,
6439  lapack_int const* m, lapack_int const* n,
6440  float const* A, lapack_int const* lda,
6441  float* work );
6442 
6443 #define LAPACK_zlantr LAPACK_GLOBAL(zlantr,ZLANTR)
6444 double LAPACK_zlantr(
6445  char const* norm, char const* uplo, char const* diag,
6446  lapack_int const* m, lapack_int const* n,
6447  lapack_complex_double const* A, lapack_int const* lda,
6448  double* work );
6449 
6450 #define LAPACK_clapmr LAPACK_GLOBAL(clapmr,CLAPMR)
6451 void LAPACK_clapmr(
6452  lapack_logical const* forwrd, lapack_int const* m, lapack_int const* n,
6453  lapack_complex_float* X, lapack_int const* ldx, lapack_int* K );
6454 
6455 #define LAPACK_dlapmr LAPACK_GLOBAL(dlapmr,DLAPMR)
6456 void LAPACK_dlapmr(
6457  lapack_logical const* forwrd, lapack_int const* m, lapack_int const* n,
6458  double* X, lapack_int const* ldx, lapack_int* K );
6459 
6460 #define LAPACK_slapmr LAPACK_GLOBAL(slapmr,SLAPMR)
6461 void LAPACK_slapmr(
6462  lapack_logical const* forwrd, lapack_int const* m, lapack_int const* n,
6463  float* X, lapack_int const* ldx, lapack_int* K );
6464 
6465 #define LAPACK_zlapmr LAPACK_GLOBAL(zlapmr,ZLAPMR)
6466 void LAPACK_zlapmr(
6467  lapack_logical const* forwrd, lapack_int const* m, lapack_int const* n,
6468  lapack_complex_double* X, lapack_int const* ldx, lapack_int* K );
6469 
6470 #define LAPACK_clapmt LAPACK_GLOBAL(clapmt,CLAPMT)
6471 void LAPACK_clapmt(
6472  lapack_logical const* forwrd, lapack_int const* m, lapack_int const* n,
6473  lapack_complex_float* X, lapack_int const* ldx, lapack_int* K );
6474 
6475 #define LAPACK_dlapmt LAPACK_GLOBAL(dlapmt,DLAPMT)
6476 void LAPACK_dlapmt(
6477  lapack_logical const* forwrd, lapack_int const* m, lapack_int const* n,
6478  double* X, lapack_int const* ldx, lapack_int* K );
6479 
6480 #define LAPACK_slapmt LAPACK_GLOBAL(slapmt,SLAPMT)
6481 void LAPACK_slapmt(
6482  lapack_logical const* forwrd, lapack_int const* m, lapack_int const* n,
6483  float* X, lapack_int const* ldx, lapack_int* K );
6484 
6485 #define LAPACK_zlapmt LAPACK_GLOBAL(zlapmt,ZLAPMT)
6486 void LAPACK_zlapmt(
6487  lapack_logical const* forwrd, lapack_int const* m, lapack_int const* n,
6488  lapack_complex_double* X, lapack_int const* ldx, lapack_int* K );
6489 
6490 #define LAPACK_dlapy2 LAPACK_GLOBAL(dlapy2,DLAPY2)
6491 double LAPACK_dlapy2(
6492  double const* x,
6493  double const* y );
6494 
6495 #define LAPACK_slapy2 LAPACK_GLOBAL(slapy2,SLAPY2)
6496 lapack_float_return LAPACK_slapy2(
6497  float const* x,
6498  float const* y );
6499 
6500 #define LAPACK_dlapy3 LAPACK_GLOBAL(dlapy3,DLAPY3)
6501 double LAPACK_dlapy3(
6502  double const* x,
6503  double const* y,
6504  double const* z );
6505 
6506 #define LAPACK_slapy3 LAPACK_GLOBAL(slapy3,SLAPY3)
6507 lapack_float_return LAPACK_slapy3(
6508  float const* x,
6509  float const* y,
6510  float const* z );
6511 
6512 #define LAPACK_clarcm LAPACK_GLOBAL(clarcm,CLARCM)
6513 void LAPACK_clarcm(
6514  lapack_int const* m, lapack_int const* n,
6515  float const* A, lapack_int const* lda,
6516  lapack_complex_float const* B, lapack_int const* ldb,
6517  lapack_complex_float* C, lapack_int const* ldc,
6518  float* rwork );
6519 
6520 #define LAPACK_zlarcm LAPACK_GLOBAL(zlarcm,ZLARCM)
6521 void LAPACK_zlarcm(
6522  lapack_int const* m, lapack_int const* n,
6523  double const* A, lapack_int const* lda,
6524  lapack_complex_double const* B, lapack_int const* ldb,
6525  lapack_complex_double* C, lapack_int const* ldc,
6526  double* rwork );
6527 
6528 #define LAPACK_clarf LAPACK_GLOBAL(clarf,CLARF)
6529 void LAPACK_clarf(
6530  char const* side,
6531  lapack_int const* m, lapack_int const* n,
6532  lapack_complex_float const* V, lapack_int const* incv,
6533  lapack_complex_float const* tau,
6534  lapack_complex_float* C, lapack_int const* ldc,
6535  lapack_complex_float* work );
6536 
6537 #define LAPACK_dlarf LAPACK_GLOBAL(dlarf,DLARF)
6538 void LAPACK_dlarf(
6539  char const* side,
6540  lapack_int const* m, lapack_int const* n,
6541  double const* V, lapack_int const* incv,
6542  double const* tau,
6543  double* C, lapack_int const* ldc,
6544  double* work );
6545 
6546 #define LAPACK_slarf LAPACK_GLOBAL(slarf,SLARF)
6547 void LAPACK_slarf(
6548  char const* side,
6549  lapack_int const* m, lapack_int const* n,
6550  float const* V, lapack_int const* incv,
6551  float const* tau,
6552  float* C, lapack_int const* ldc,
6553  float* work );
6554 
6555 #define LAPACK_zlarf LAPACK_GLOBAL(zlarf,ZLARF)
6556 void LAPACK_zlarf(
6557  char const* side,
6558  lapack_int const* m, lapack_int const* n,
6559  lapack_complex_double const* V, lapack_int const* incv,
6560  lapack_complex_double const* tau,
6561  lapack_complex_double* C, lapack_int const* ldc,
6562  lapack_complex_double* work );
6563 
6564 #define LAPACK_clarfb LAPACK_GLOBAL(clarfb,CLARFB)
6565 void LAPACK_clarfb(
6566  char const* side, char const* trans, char const* direct, char const* storev,
6567  lapack_int const* m, lapack_int const* n, lapack_int const* k,
6568  lapack_complex_float const* V, lapack_int const* ldv,
6569  lapack_complex_float const* T, lapack_int const* ldt,
6570  lapack_complex_float* C, lapack_int const* ldc,
6571  lapack_complex_float* work, lapack_int const* ldwork );
6572 
6573 #define LAPACK_dlarfb LAPACK_GLOBAL(dlarfb,DLARFB)
6574 void LAPACK_dlarfb(
6575  char const* side, char const* trans, char const* direct, char const* storev,
6576  lapack_int const* m, lapack_int const* n, lapack_int const* k,
6577  double const* V, lapack_int const* ldv,
6578  double const* T, lapack_int const* ldt,
6579  double* C, lapack_int const* ldc,
6580  double* work, lapack_int const* ldwork );
6581 
6582 #define LAPACK_slarfb LAPACK_GLOBAL(slarfb,SLARFB)
6583 void LAPACK_slarfb(
6584  char const* side, char const* trans, char const* direct, char const* storev,
6585  lapack_int const* m, lapack_int const* n, lapack_int const* k,
6586  float const* V, lapack_int const* ldv,
6587  float const* T, lapack_int const* ldt,
6588  float* C, lapack_int const* ldc,
6589  float* work, lapack_int const* ldwork );
6590 
6591 #define LAPACK_zlarfb LAPACK_GLOBAL(zlarfb,ZLARFB)
6592 void LAPACK_zlarfb(
6593  char const* side, char const* trans, char const* direct, char const* storev,
6594  lapack_int const* m, lapack_int const* n, lapack_int const* k,
6595  lapack_complex_double const* V, lapack_int const* ldv,
6596  lapack_complex_double const* T, lapack_int const* ldt,
6597  lapack_complex_double* C, lapack_int const* ldc,
6598  lapack_complex_double* work, lapack_int const* ldwork );
6599 
6600 #define LAPACK_clarfg LAPACK_GLOBAL(clarfg,CLARFG)
6601 void LAPACK_clarfg(
6602  lapack_int const* n,
6603  lapack_complex_float* alpha,
6604  lapack_complex_float* X, lapack_int const* incx,
6605  lapack_complex_float* tau );
6606 
6607 #define LAPACK_dlarfg LAPACK_GLOBAL(dlarfg,DLARFG)
6608 void LAPACK_dlarfg(
6609  lapack_int const* n,
6610  double* alpha,
6611  double* X, lapack_int const* incx,
6612  double* tau );
6613 
6614 #define LAPACK_slarfg LAPACK_GLOBAL(slarfg,SLARFG)
6615 void LAPACK_slarfg(
6616  lapack_int const* n,
6617  float* alpha,
6618  float* X, lapack_int const* incx,
6619  float* tau );
6620 
6621 #define LAPACK_zlarfg LAPACK_GLOBAL(zlarfg,ZLARFG)
6622 void LAPACK_zlarfg(
6623  lapack_int const* n,
6624  lapack_complex_double* alpha,
6625  lapack_complex_double* X, lapack_int const* incx,
6626  lapack_complex_double* tau );
6627 
6628 #define LAPACK_clarft LAPACK_GLOBAL(clarft,CLARFT)
6629 void LAPACK_clarft(
6630  char const* direct, char const* storev,
6631  lapack_int const* n, lapack_int const* k,
6632  lapack_complex_float const* V, lapack_int const* ldv,
6633  lapack_complex_float const* tau,
6634  lapack_complex_float* T, lapack_int const* ldt );
6635 
6636 #define LAPACK_dlarft LAPACK_GLOBAL(dlarft,DLARFT)
6637 void LAPACK_dlarft(
6638  char const* direct, char const* storev,
6639  lapack_int const* n, lapack_int const* k,
6640  double const* V, lapack_int const* ldv,
6641  double const* tau,
6642  double* T, lapack_int const* ldt );
6643 
6644 #define LAPACK_slarft LAPACK_GLOBAL(slarft,SLARFT)
6645 void LAPACK_slarft(
6646  char const* direct, char const* storev,
6647  lapack_int const* n, lapack_int const* k,
6648  float const* V, lapack_int const* ldv,
6649  float const* tau,
6650  float* T, lapack_int const* ldt );
6651 
6652 #define LAPACK_zlarft LAPACK_GLOBAL(zlarft,ZLARFT)
6653 void LAPACK_zlarft(
6654  char const* direct, char const* storev,
6655  lapack_int const* n, lapack_int const* k,
6656  lapack_complex_double const* V, lapack_int const* ldv,
6657  lapack_complex_double const* tau,
6658  lapack_complex_double* T, lapack_int const* ldt );
6659 
6660 #define LAPACK_clarfx LAPACK_GLOBAL(clarfx,CLARFX)
6661 void LAPACK_clarfx(
6662  char const* side,
6663  lapack_int const* m, lapack_int const* n,
6664  lapack_complex_float const* V,
6665  lapack_complex_float const* tau,
6666  lapack_complex_float* C, lapack_int const* ldc,
6667  lapack_complex_float* work );
6668 
6669 #define LAPACK_dlarfx LAPACK_GLOBAL(dlarfx,DLARFX)
6670 void LAPACK_dlarfx(
6671  char const* side,
6672  lapack_int const* m, lapack_int const* n,
6673  double const* V,
6674  double const* tau,
6675  double* C, lapack_int const* ldc,
6676  double* work );
6677 
6678 #define LAPACK_slarfx LAPACK_GLOBAL(slarfx,SLARFX)
6679 void LAPACK_slarfx(
6680  char const* side,
6681  lapack_int const* m, lapack_int const* n,
6682  float const* V,
6683  float const* tau,
6684  float* C, lapack_int const* ldc,
6685  float* work );
6686 
6687 #define LAPACK_zlarfx LAPACK_GLOBAL(zlarfx,ZLARFX)
6688 void LAPACK_zlarfx(
6689  char const* side,
6690  lapack_int const* m, lapack_int const* n,
6691  lapack_complex_double const* V,
6692  lapack_complex_double const* tau,
6693  lapack_complex_double* C, lapack_int const* ldc,
6694  lapack_complex_double* work );
6695 
6696 #define LAPACK_clarnv LAPACK_GLOBAL(clarnv,CLARNV)
6697 void LAPACK_clarnv(
6698  lapack_int const* idist, lapack_int* iseed, lapack_int const* n,
6699  lapack_complex_float* X );
6700 
6701 #define LAPACK_dlarnv LAPACK_GLOBAL(dlarnv,DLARNV)
6702 void LAPACK_dlarnv(
6703  lapack_int const* idist, lapack_int* iseed, lapack_int const* n,
6704  double* X );
6705 
6706 #define LAPACK_slarnv LAPACK_GLOBAL(slarnv,SLARNV)
6707 void LAPACK_slarnv(
6708  lapack_int const* idist, lapack_int* iseed, lapack_int const* n,
6709  float* X );
6710 
6711 #define LAPACK_zlarnv LAPACK_GLOBAL(zlarnv,ZLARNV)
6712 void LAPACK_zlarnv(
6713  lapack_int const* idist, lapack_int* iseed, lapack_int const* n,
6714  lapack_complex_double* X );
6715 
6716 #define LAPACK_dlartgp LAPACK_GLOBAL(dlartgp,DLARTGP)
6717 void LAPACK_dlartgp(
6718  double const* f,
6719  double const* g,
6720  double* cs,
6721  double* sn,
6722  double* r );
6723 
6724 #define LAPACK_slartgp LAPACK_GLOBAL(slartgp,SLARTGP)
6725 void LAPACK_slartgp(
6726  float const* f,
6727  float const* g,
6728  float* cs,
6729  float* sn,
6730  float* r );
6731 
6732 #define LAPACK_dlartgs LAPACK_GLOBAL(dlartgs,DLARTGS)
6733 void LAPACK_dlartgs(
6734  double const* x,
6735  double const* y,
6736  double const* sigma,
6737  double* cs,
6738  double* sn );
6739 
6740 #define LAPACK_slartgs LAPACK_GLOBAL(slartgs,SLARTGS)
6741 void LAPACK_slartgs(
6742  float const* x,
6743  float const* y,
6744  float const* sigma,
6745  float* cs,
6746  float* sn );
6747 
6748 #define LAPACK_clascl LAPACK_GLOBAL(clascl,CLASCL)
6749 void LAPACK_clascl(
6750  char const* type,
6751  lapack_int const* kl, lapack_int const* ku,
6752  float const* cfrom,
6753  float const* cto, lapack_int const* m, lapack_int const* n,
6754  lapack_complex_float* A, lapack_int const* lda,
6755  lapack_int* info );
6756 
6757 #define LAPACK_dlascl LAPACK_GLOBAL(dlascl,DLASCL)
6758 void LAPACK_dlascl(
6759  char const* type,
6760  lapack_int const* kl, lapack_int const* ku,
6761  double const* cfrom,
6762  double const* cto, lapack_int const* m, lapack_int const* n,
6763  double* A, lapack_int const* lda,
6764  lapack_int* info );
6765 
6766 #define LAPACK_slascl LAPACK_GLOBAL(slascl,SLASCL)
6767 void LAPACK_slascl(
6768  char const* type,
6769  lapack_int const* kl, lapack_int const* ku,
6770  float const* cfrom,
6771  float const* cto, lapack_int const* m, lapack_int const* n,
6772  float* A, lapack_int const* lda,
6773  lapack_int* info );
6774 
6775 #define LAPACK_zlascl LAPACK_GLOBAL(zlascl,ZLASCL)
6776 void LAPACK_zlascl(
6777  char const* type,
6778  lapack_int const* kl, lapack_int const* ku,
6779  double const* cfrom,
6780  double const* cto, lapack_int const* m, lapack_int const* n,
6781  lapack_complex_double* A, lapack_int const* lda,
6782  lapack_int* info );
6783 
6784 #define LAPACK_claset LAPACK_GLOBAL(claset,CLASET)
6785 void LAPACK_claset(
6786  char const* uplo,
6787  lapack_int const* m, lapack_int const* n,
6788  lapack_complex_float const* alpha,
6789  lapack_complex_float const* beta,
6790  lapack_complex_float* A, lapack_int const* lda );
6791 
6792 #define LAPACK_dlaset LAPACK_GLOBAL(dlaset,DLASET)
6793 void LAPACK_dlaset(
6794  char const* uplo,
6795  lapack_int const* m, lapack_int const* n,
6796  double const* alpha,
6797  double const* beta,
6798  double* A, lapack_int const* lda );
6799 
6800 #define LAPACK_slaset LAPACK_GLOBAL(slaset,SLASET)
6801 void LAPACK_slaset(
6802  char const* uplo,
6803  lapack_int const* m, lapack_int const* n,
6804  float const* alpha,
6805  float const* beta,
6806  float* A, lapack_int const* lda );
6807 
6808 #define LAPACK_zlaset LAPACK_GLOBAL(zlaset,ZLASET)
6809 void LAPACK_zlaset(
6810  char const* uplo,
6811  lapack_int const* m, lapack_int const* n,
6812  lapack_complex_double const* alpha,
6813  lapack_complex_double const* beta,
6814  lapack_complex_double* A, lapack_int const* lda );
6815 
6816 #define LAPACK_dlasrt LAPACK_GLOBAL(dlasrt,DLASRT)
6817 void LAPACK_dlasrt(
6818  char const* id,
6819  lapack_int const* n,
6820  double* D,
6821  lapack_int* info );
6822 
6823 #define LAPACK_slasrt LAPACK_GLOBAL(slasrt,SLASRT)
6824 void LAPACK_slasrt(
6825  char const* id,
6826  lapack_int const* n,
6827  float* D,
6828  lapack_int* info );
6829 
6830 #define LAPACK_classq LAPACK_GLOBAL(classq,CLASSQ)
6831 void LAPACK_classq(
6832  lapack_int const* n,
6833  lapack_complex_float const* X, lapack_int const* incx,
6834  float* scale,
6835  float* sumsq );
6836 
6837 #define LAPACK_dlassq LAPACK_GLOBAL(dlassq,DLASSQ)
6838 void LAPACK_dlassq(
6839  lapack_int const* n,
6840  double const* X, lapack_int const* incx,
6841  double* scale,
6842  double* sumsq );
6843 
6844 #define LAPACK_slassq LAPACK_GLOBAL(slassq,SLASSQ)
6845 void LAPACK_slassq(
6846  lapack_int const* n,
6847  float const* X, lapack_int const* incx,
6848  float* scale,
6849  float* sumsq );
6850 
6851 #define LAPACK_zlassq LAPACK_GLOBAL(zlassq,ZLASSQ)
6852 void LAPACK_zlassq(
6853  lapack_int const* n,
6854  lapack_complex_double const* X, lapack_int const* incx,
6855  double* scale,
6856  double* sumsq );
6857 
6858 #define LAPACK_claswp LAPACK_GLOBAL(claswp,CLASWP)
6859 void LAPACK_claswp(
6860  lapack_int const* n,
6861  lapack_complex_float* A, lapack_int const* lda, lapack_int const* k1, lapack_int const* k2, lapack_int const* ipiv, lapack_int const* incx );
6862 
6863 #define LAPACK_dlaswp LAPACK_GLOBAL(dlaswp,DLASWP)
6864 void LAPACK_dlaswp(
6865  lapack_int const* n,
6866  double* A, lapack_int const* lda, lapack_int const* k1, lapack_int const* k2, lapack_int const* ipiv, lapack_int const* incx );
6867 
6868 #define LAPACK_slaswp LAPACK_GLOBAL(slaswp,SLASWP)
6869 void LAPACK_slaswp(
6870  lapack_int const* n,
6871  float* A, lapack_int const* lda, lapack_int const* k1, lapack_int const* k2, lapack_int const* ipiv, lapack_int const* incx );
6872 
6873 #define LAPACK_zlaswp LAPACK_GLOBAL(zlaswp,ZLASWP)
6874 void LAPACK_zlaswp(
6875  lapack_int const* n,
6876  lapack_complex_double* A, lapack_int const* lda, lapack_int const* k1, lapack_int const* k2, lapack_int const* ipiv, lapack_int const* incx );
6877 
6878 #define LAPACK_clatms LAPACK_GLOBAL(clatms,CLATMS)
6879 void LAPACK_clatms(
6880  lapack_int const* m, lapack_int const* n, char const* dist,
6881  lapack_int* iseed, char const* sym,
6882  float* D,
6883  lapack_int const* mode,
6884  float const* cond,
6885  float const* dmax, lapack_int const* kl, lapack_int const* ku, char const* pack,
6886  lapack_complex_float* A,
6887  lapack_int const* lda,
6888  lapack_complex_float* work,
6889  lapack_int* info );
6890 
6891 #define LAPACK_dlatms LAPACK_GLOBAL(dlatms,DLATMS)
6892 void LAPACK_dlatms(
6893  lapack_int const* m, lapack_int const* n, char const* dist,
6894  lapack_int* iseed, char const* sym,
6895  double* D,
6896  lapack_int const* mode,
6897  double const* cond,
6898  double const* dmax, lapack_int const* kl, lapack_int const* ku, char const* pack,
6899  double* A,
6900  lapack_int const* lda,
6901  double* work,
6902  lapack_int* info );
6903 
6904 #define LAPACK_slatms LAPACK_GLOBAL(slatms,SLATMS)
6905 void LAPACK_slatms(
6906  lapack_int const* m, lapack_int const* n, char const* dist,
6907  lapack_int* iseed, char const* sym,
6908  float* D,
6909  lapack_int const* mode,
6910  float const* cond,
6911  float const* dmax, lapack_int const* kl, lapack_int const* ku, char const* pack,
6912  float* A,
6913  lapack_int const* lda,
6914  float* work,
6915  lapack_int* info );
6916 
6917 #define LAPACK_zlatms LAPACK_GLOBAL(zlatms,ZLATMS)
6918 void LAPACK_zlatms(
6919  lapack_int const* m, lapack_int const* n, char const* dist,
6920  lapack_int* iseed, char const* sym,
6921  double* D,
6922  lapack_int const* mode,
6923  double const* cond,
6924  double const* dmax, lapack_int const* kl, lapack_int const* ku, char const* pack,
6925  lapack_complex_double* A,
6926  lapack_int const* lda,
6927  lapack_complex_double* work,
6928  lapack_int* info );
6929 
6930 #define LAPACK_clauum LAPACK_GLOBAL(clauum,CLAUUM)
6931 void LAPACK_clauum(
6932  char const* uplo,
6933  lapack_int const* n,
6934  lapack_complex_float* A, lapack_int const* lda,
6935  lapack_int* info );
6936 
6937 #define LAPACK_dlauum LAPACK_GLOBAL(dlauum,DLAUUM)
6938 void LAPACK_dlauum(
6939  char const* uplo,
6940  lapack_int const* n,
6941  double* A, lapack_int const* lda,
6942  lapack_int* info );
6943 
6944 #define LAPACK_slauum LAPACK_GLOBAL(slauum,SLAUUM)
6945 void LAPACK_slauum(
6946  char const* uplo,
6947  lapack_int const* n,
6948  float* A, lapack_int const* lda,
6949  lapack_int* info );
6950 
6951 #define LAPACK_zlauum LAPACK_GLOBAL(zlauum,ZLAUUM)
6952 void LAPACK_zlauum(
6953  char const* uplo,
6954  lapack_int const* n,
6955  lapack_complex_double* A, lapack_int const* lda,
6956  lapack_int* info );
6957 
6958 #define LAPACK_ilaver LAPACK_GLOBAL(ilaver,ILAVER)
6959 void LAPACK_ilaver(
6960  lapack_int* vers_major, lapack_int* vers_minor, lapack_int* vers_patch );
6961 
6962 #define LAPACK_dopgtr LAPACK_GLOBAL(dopgtr,DOPGTR)
6963 void LAPACK_dopgtr(
6964  char const* uplo,
6965  lapack_int const* n,
6966  double const* AP,
6967  double const* tau,
6968  double* Q, lapack_int const* ldq,
6969  double* work,
6970  lapack_int* info );
6971 
6972 #define LAPACK_sopgtr LAPACK_GLOBAL(sopgtr,SOPGTR)
6973 void LAPACK_sopgtr(
6974  char const* uplo,
6975  lapack_int const* n,
6976  float const* AP,
6977  float const* tau,
6978  float* Q, lapack_int const* ldq,
6979  float* work,
6980  lapack_int* info );
6981 
6982 #define LAPACK_dopmtr LAPACK_GLOBAL(dopmtr,DOPMTR)
6983 void LAPACK_dopmtr(
6984  char const* side, char const* uplo, char const* trans,
6985  lapack_int const* m, lapack_int const* n,
6986  double const* AP,
6987  double const* tau,
6988  double* C, lapack_int const* ldc,
6989  double* work,
6990  lapack_int* info );
6991 
6992 #define LAPACK_sopmtr LAPACK_GLOBAL(sopmtr,SOPMTR)
6993 void LAPACK_sopmtr(
6994  char const* side, char const* uplo, char const* trans,
6995  lapack_int const* m, lapack_int const* n,
6996  float const* AP,
6997  float const* tau,
6998  float* C, lapack_int const* ldc,
6999  float* work,
7000  lapack_int* info );
7001 
7002 #define LAPACK_dorbdb LAPACK_GLOBAL(dorbdb,DORBDB)
7003 void LAPACK_dorbdb(
7004  char const* trans, char const* signs,
7005  lapack_int const* m, lapack_int const* p, lapack_int const* q,
7006  double* X11, lapack_int const* ldx11,
7007  double* X12, lapack_int const* ldx12,
7008  double* X21, lapack_int const* ldx21,
7009  double* X22, lapack_int const* ldx22,
7010  double* theta,
7011  double* phi,
7012  double* TAUP1,
7013  double* TAUP2,
7014  double* TAUQ1,
7015  double* TAUQ2,
7016  double* work, lapack_int const* lwork,
7017  lapack_int* info );
7018 
7019 #define LAPACK_sorbdb LAPACK_GLOBAL(sorbdb,SORBDB)
7020 void LAPACK_sorbdb(
7021  char const* trans, char const* signs,
7022  lapack_int const* m, lapack_int const* p, lapack_int const* q,
7023  float* X11, lapack_int const* ldx11,
7024  float* X12, lapack_int const* ldx12,
7025  float* X21, lapack_int const* ldx21,
7026  float* X22, lapack_int const* ldx22,
7027  float* theta,
7028  float* phi,
7029  float* TAUP1,
7030  float* TAUP2,
7031  float* TAUQ1,
7032  float* TAUQ2,
7033  float* work, lapack_int const* lwork,
7034  lapack_int* info );
7035 
7036 #define LAPACK_dorcsd LAPACK_GLOBAL(dorcsd,DORCSD)
7037 void LAPACK_dorcsd(
7038  char const* jobu1, char const* jobu2, char const* jobv1t, char const* jobv2t, char const* trans, char const* signs,
7039  lapack_int const* m, lapack_int const* p, lapack_int const* q,
7040  double* X11, lapack_int const* ldx11,
7041  double* X12, lapack_int const* ldx12,
7042  double* X21, lapack_int const* ldx21,
7043  double* X22, lapack_int const* ldx22,
7044  double* theta,
7045  double* U1, lapack_int const* ldu1,
7046  double* U2, lapack_int const* ldu2,
7047  double* V1T, lapack_int const* ldv1t,
7048  double* V2T, lapack_int const* ldv2t,
7049  double* work, lapack_int const* lwork,
7050  lapack_int* iwork,
7051  lapack_int* info );
7052 
7053 #define LAPACK_sorcsd LAPACK_GLOBAL(sorcsd,SORCSD)
7054 void LAPACK_sorcsd(
7055  char const* jobu1, char const* jobu2, char const* jobv1t, char const* jobv2t, char const* trans, char const* signs,
7056  lapack_int const* m, lapack_int const* p, lapack_int const* q,
7057  float* X11, lapack_int const* ldx11,
7058  float* X12, lapack_int const* ldx12,
7059  float* X21, lapack_int const* ldx21,
7060  float* X22, lapack_int const* ldx22,
7061  float* theta,
7062  float* U1, lapack_int const* ldu1,
7063  float* U2, lapack_int const* ldu2,
7064  float* V1T, lapack_int const* ldv1t,
7065  float* V2T, lapack_int const* ldv2t,
7066  float* work, lapack_int const* lwork,
7067  lapack_int* iwork,
7068  lapack_int* info );
7069 
7070 #define LAPACK_dorcsd2by1 LAPACK_GLOBAL(dorcsd2by1,DORCSD2BY1)
7071 void LAPACK_dorcsd2by1(
7072  char const* jobu1, char const* jobu2, char const* jobv1t,
7073  lapack_int const* m, lapack_int const* p, lapack_int const* q,
7074  double* X11, lapack_int const* ldx11,
7075  double* X21, lapack_int const* ldx21,
7076  double* theta,
7077  double* U1, lapack_int const* ldu1,
7078  double* U2, lapack_int const* ldu2,
7079  double* V1T, lapack_int const* ldv1t,
7080  double* work, lapack_int const* lwork,
7081  lapack_int* iwork,
7082  lapack_int* info );
7083 
7084 #define LAPACK_sorcsd2by1 LAPACK_GLOBAL(sorcsd2by1,SORCSD2BY1)
7085 void LAPACK_sorcsd2by1(
7086  char const* jobu1, char const* jobu2, char const* jobv1t,
7087  lapack_int const* m, lapack_int const* p, lapack_int const* q,
7088  float* X11, lapack_int const* ldx11,
7089  float* X21, lapack_int const* ldx21,
7090  float* theta,
7091  float* U1, lapack_int const* ldu1,
7092  float* U2, lapack_int const* ldu2,
7093  float* V1T, lapack_int const* ldv1t,
7094  float* work, lapack_int const* lwork,
7095  lapack_int* iwork,
7096  lapack_int* info );
7097 
7098 #define LAPACK_dorgbr LAPACK_GLOBAL(dorgbr,DORGBR)
7099 void LAPACK_dorgbr(
7100  char const* vect,
7101  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7102  double* A, lapack_int const* lda,
7103  double const* tau,
7104  double* work, lapack_int const* lwork,
7105  lapack_int* info );
7106 
7107 #define LAPACK_sorgbr LAPACK_GLOBAL(sorgbr,SORGBR)
7108 void LAPACK_sorgbr(
7109  char const* vect,
7110  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7111  float* A, lapack_int const* lda,
7112  float const* tau,
7113  float* work, lapack_int const* lwork,
7114  lapack_int* info );
7115 
7116 #define LAPACK_dorghr LAPACK_GLOBAL(dorghr,DORGHR)
7117 void LAPACK_dorghr(
7118  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
7119  double* A, lapack_int const* lda,
7120  double const* tau,
7121  double* work, lapack_int const* lwork,
7122  lapack_int* info );
7123 
7124 #define LAPACK_sorghr LAPACK_GLOBAL(sorghr,SORGHR)
7125 void LAPACK_sorghr(
7126  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
7127  float* A, lapack_int const* lda,
7128  float const* tau,
7129  float* work, lapack_int const* lwork,
7130  lapack_int* info );
7131 
7132 #define LAPACK_dorglq LAPACK_GLOBAL(dorglq,DORGLQ)
7133 void LAPACK_dorglq(
7134  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7135  double* A, lapack_int const* lda,
7136  double const* tau,
7137  double* work, lapack_int const* lwork,
7138  lapack_int* info );
7139 
7140 #define LAPACK_sorglq LAPACK_GLOBAL(sorglq,SORGLQ)
7141 void LAPACK_sorglq(
7142  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7143  float* A, lapack_int const* lda,
7144  float const* tau,
7145  float* work, lapack_int const* lwork,
7146  lapack_int* info );
7147 
7148 #define LAPACK_dorgql LAPACK_GLOBAL(dorgql,DORGQL)
7149 void LAPACK_dorgql(
7150  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7151  double* A, lapack_int const* lda,
7152  double const* tau,
7153  double* work, lapack_int const* lwork,
7154  lapack_int* info );
7155 
7156 #define LAPACK_sorgql LAPACK_GLOBAL(sorgql,SORGQL)
7157 void LAPACK_sorgql(
7158  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7159  float* A, lapack_int const* lda,
7160  float const* tau,
7161  float* work, lapack_int const* lwork,
7162  lapack_int* info );
7163 
7164 #define LAPACK_dorgqr LAPACK_GLOBAL(dorgqr,DORGQR)
7165 void LAPACK_dorgqr(
7166  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7167  double* A, lapack_int const* lda,
7168  double const* tau,
7169  double* work, lapack_int const* lwork,
7170  lapack_int* info );
7171 
7172 #define LAPACK_sorgqr LAPACK_GLOBAL(sorgqr,SORGQR)
7173 void LAPACK_sorgqr(
7174  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7175  float* A, lapack_int const* lda,
7176  float const* tau,
7177  float* work, lapack_int const* lwork,
7178  lapack_int* info );
7179 
7180 #define LAPACK_dorgrq LAPACK_GLOBAL(dorgrq,DORGRQ)
7181 void LAPACK_dorgrq(
7182  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7183  double* A, lapack_int const* lda,
7184  double const* tau,
7185  double* work, lapack_int const* lwork,
7186  lapack_int* info );
7187 
7188 #define LAPACK_sorgrq LAPACK_GLOBAL(sorgrq,SORGRQ)
7189 void LAPACK_sorgrq(
7190  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7191  float* A, lapack_int const* lda,
7192  float const* tau,
7193  float* work, lapack_int const* lwork,
7194  lapack_int* info );
7195 
7196 #define LAPACK_dorgtr LAPACK_GLOBAL(dorgtr,DORGTR)
7197 void LAPACK_dorgtr(
7198  char const* uplo,
7199  lapack_int const* n,
7200  double* A, lapack_int const* lda,
7201  double const* tau,
7202  double* work, lapack_int const* lwork,
7203  lapack_int* info );
7204 
7205 #define LAPACK_sorgtr LAPACK_GLOBAL(sorgtr,SORGTR)
7206 void LAPACK_sorgtr(
7207  char const* uplo,
7208  lapack_int const* n,
7209  float* A, lapack_int const* lda,
7210  float const* tau,
7211  float* work, lapack_int const* lwork,
7212  lapack_int* info );
7213 
7214 #define LAPACK_dormbr LAPACK_GLOBAL(dormbr,DORMBR)
7215 void LAPACK_dormbr(
7216  char const* vect, char const* side, char const* trans,
7217  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7218  double const* A, lapack_int const* lda,
7219  double const* tau,
7220  double* C, lapack_int const* ldc,
7221  double* work, lapack_int const* lwork,
7222  lapack_int* info );
7223 
7224 #define LAPACK_sormbr LAPACK_GLOBAL(sormbr,SORMBR)
7225 void LAPACK_sormbr(
7226  char const* vect, char const* side, char const* trans,
7227  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7228  float const* A, lapack_int const* lda,
7229  float const* tau,
7230  float* C, lapack_int const* ldc,
7231  float* work, lapack_int const* lwork,
7232  lapack_int* info );
7233 
7234 #define LAPACK_dormhr LAPACK_GLOBAL(dormhr,DORMHR)
7235 void LAPACK_dormhr(
7236  char const* side, char const* trans,
7237  lapack_int const* m, lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
7238  double const* A, lapack_int const* lda,
7239  double const* tau,
7240  double* C, lapack_int const* ldc,
7241  double* work, lapack_int const* lwork,
7242  lapack_int* info );
7243 
7244 #define LAPACK_sormhr LAPACK_GLOBAL(sormhr,SORMHR)
7245 void LAPACK_sormhr(
7246  char const* side, char const* trans,
7247  lapack_int const* m, lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
7248  float const* A, lapack_int const* lda,
7249  float const* tau,
7250  float* C, lapack_int const* ldc,
7251  float* work, lapack_int const* lwork,
7252  lapack_int* info );
7253 
7254 #define LAPACK_dormlq LAPACK_GLOBAL(dormlq,DORMLQ)
7255 void LAPACK_dormlq(
7256  char const* side, char const* trans,
7257  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7258  double const* A, lapack_int const* lda,
7259  double const* tau,
7260  double* C, lapack_int const* ldc,
7261  double* work, lapack_int const* lwork,
7262  lapack_int* info );
7263 
7264 #define LAPACK_sormlq LAPACK_GLOBAL(sormlq,SORMLQ)
7265 void LAPACK_sormlq(
7266  char const* side, char const* trans,
7267  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7268  float const* A, lapack_int const* lda,
7269  float const* tau,
7270  float* C, lapack_int const* ldc,
7271  float* work, lapack_int const* lwork,
7272  lapack_int* info );
7273 
7274 #define LAPACK_dormql LAPACK_GLOBAL(dormql,DORMQL)
7275 void LAPACK_dormql(
7276  char const* side, char const* trans,
7277  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7278  double const* A, lapack_int const* lda,
7279  double const* tau,
7280  double* C, lapack_int const* ldc,
7281  double* work, lapack_int const* lwork,
7282  lapack_int* info );
7283 
7284 #define LAPACK_sormql LAPACK_GLOBAL(sormql,SORMQL)
7285 void LAPACK_sormql(
7286  char const* side, char const* trans,
7287  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7288  float const* A, lapack_int const* lda,
7289  float const* tau,
7290  float* C, lapack_int const* ldc,
7291  float* work, lapack_int const* lwork,
7292  lapack_int* info );
7293 
7294 #define LAPACK_dormqr LAPACK_GLOBAL(dormqr,DORMQR)
7295 void LAPACK_dormqr(
7296  char const* side, char const* trans,
7297  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7298  double const* A, lapack_int const* lda,
7299  double const* tau,
7300  double* C, lapack_int const* ldc,
7301  double* work, lapack_int const* lwork,
7302  lapack_int* info );
7303 
7304 #define LAPACK_sormqr LAPACK_GLOBAL(sormqr,SORMQR)
7305 void LAPACK_sormqr(
7306  char const* side, char const* trans,
7307  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7308  float const* A, lapack_int const* lda,
7309  float const* tau,
7310  float* C, lapack_int const* ldc,
7311  float* work, lapack_int const* lwork,
7312  lapack_int* info );
7313 
7314 #define LAPACK_dormrq LAPACK_GLOBAL(dormrq,DORMRQ)
7315 void LAPACK_dormrq(
7316  char const* side, char const* trans,
7317  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7318  double const* A, lapack_int const* lda,
7319  double const* tau,
7320  double* C, lapack_int const* ldc,
7321  double* work, lapack_int const* lwork,
7322  lapack_int* info );
7323 
7324 #define LAPACK_sormrq LAPACK_GLOBAL(sormrq,SORMRQ)
7325 void LAPACK_sormrq(
7326  char const* side, char const* trans,
7327  lapack_int const* m, lapack_int const* n, lapack_int const* k,
7328  float const* A, lapack_int const* lda,
7329  float const* tau,
7330  float* C, lapack_int const* ldc,
7331  float* work, lapack_int const* lwork,
7332  lapack_int* info );
7333 
7334 #define LAPACK_dormrz LAPACK_GLOBAL(dormrz,DORMRZ)
7335 void LAPACK_dormrz(
7336  char const* side, char const* trans,
7337  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l,
7338  double const* A, lapack_int const* lda,
7339  double const* tau,
7340  double* C, lapack_int const* ldc,
7341  double* work, lapack_int const* lwork,
7342  lapack_int* info );
7343 
7344 #define LAPACK_sormrz LAPACK_GLOBAL(sormrz,SORMRZ)
7345 void LAPACK_sormrz(
7346  char const* side, char const* trans,
7347  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l,
7348  float const* A, lapack_int const* lda,
7349  float const* tau,
7350  float* C, lapack_int const* ldc,
7351  float* work, lapack_int const* lwork,
7352  lapack_int* info );
7353 
7354 #define LAPACK_dormtr LAPACK_GLOBAL(dormtr,DORMTR)
7355 void LAPACK_dormtr(
7356  char const* side, char const* uplo, char const* trans,
7357  lapack_int const* m, lapack_int const* n,
7358  double const* A, lapack_int const* lda,
7359  double const* tau,
7360  double* C, lapack_int const* ldc,
7361  double* work, lapack_int const* lwork,
7362  lapack_int* info );
7363 
7364 #define LAPACK_sormtr LAPACK_GLOBAL(sormtr,SORMTR)
7365 void LAPACK_sormtr(
7366  char const* side, char const* uplo, char const* trans,
7367  lapack_int const* m, lapack_int const* n,
7368  float const* A, lapack_int const* lda,
7369  float const* tau,
7370  float* C, lapack_int const* ldc,
7371  float* work, lapack_int const* lwork,
7372  lapack_int* info );
7373 
7374 #define LAPACK_cpbcon LAPACK_GLOBAL(cpbcon,CPBCON)
7375 void LAPACK_cpbcon(
7376  char const* uplo,
7377  lapack_int const* n, lapack_int const* kd,
7378  lapack_complex_float const* AB, lapack_int const* ldab,
7379  float const* anorm,
7380  float* rcond,
7381  lapack_complex_float* work,
7382  float* rwork,
7383  lapack_int* info );
7384 
7385 #define LAPACK_dpbcon LAPACK_GLOBAL(dpbcon,DPBCON)
7386 void LAPACK_dpbcon(
7387  char const* uplo,
7388  lapack_int const* n, lapack_int const* kd,
7389  double const* AB, lapack_int const* ldab,
7390  double const* anorm,
7391  double* rcond,
7392  double* work,
7393  lapack_int* iwork,
7394  lapack_int* info );
7395 
7396 #define LAPACK_spbcon LAPACK_GLOBAL(spbcon,SPBCON)
7397 void LAPACK_spbcon(
7398  char const* uplo,
7399  lapack_int const* n, lapack_int const* kd,
7400  float const* AB, lapack_int const* ldab,
7401  float const* anorm,
7402  float* rcond,
7403  float* work,
7404  lapack_int* iwork,
7405  lapack_int* info );
7406 
7407 #define LAPACK_zpbcon LAPACK_GLOBAL(zpbcon,ZPBCON)
7408 void LAPACK_zpbcon(
7409  char const* uplo,
7410  lapack_int const* n, lapack_int const* kd,
7411  lapack_complex_double const* AB, lapack_int const* ldab,
7412  double const* anorm,
7413  double* rcond,
7414  lapack_complex_double* work,
7415  double* rwork,
7416  lapack_int* info );
7417 
7418 #define LAPACK_cpbequ LAPACK_GLOBAL(cpbequ,CPBEQU)
7419 void LAPACK_cpbequ(
7420  char const* uplo,
7421  lapack_int const* n, lapack_int const* kd,
7422  lapack_complex_float const* AB, lapack_int const* ldab,
7423  float* S,
7424  float* scond,
7425  float* amax,
7426  lapack_int* info );
7427 
7428 #define LAPACK_dpbequ LAPACK_GLOBAL(dpbequ,DPBEQU)
7429 void LAPACK_dpbequ(
7430  char const* uplo,
7431  lapack_int const* n, lapack_int const* kd,
7432  double const* AB, lapack_int const* ldab,
7433  double* S,
7434  double* scond,
7435  double* amax,
7436  lapack_int* info );
7437 
7438 #define LAPACK_spbequ LAPACK_GLOBAL(spbequ,SPBEQU)
7439 void LAPACK_spbequ(
7440  char const* uplo,
7441  lapack_int const* n, lapack_int const* kd,
7442  float const* AB, lapack_int const* ldab,
7443  float* S,
7444  float* scond,
7445  float* amax,
7446  lapack_int* info );
7447 
7448 #define LAPACK_zpbequ LAPACK_GLOBAL(zpbequ,ZPBEQU)
7449 void LAPACK_zpbequ(
7450  char const* uplo,
7451  lapack_int const* n, lapack_int const* kd,
7452  lapack_complex_double const* AB, lapack_int const* ldab,
7453  double* S,
7454  double* scond,
7455  double* amax,
7456  lapack_int* info );
7457 
7458 #define LAPACK_cpbrfs LAPACK_GLOBAL(cpbrfs,CPBRFS)
7459 void LAPACK_cpbrfs(
7460  char const* uplo,
7461  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7462  lapack_complex_float const* AB, lapack_int const* ldab,
7463  lapack_complex_float const* AFB, lapack_int const* ldafb,
7464  lapack_complex_float const* B, lapack_int const* ldb,
7465  lapack_complex_float* X, lapack_int const* ldx,
7466  float* ferr,
7467  float* berr,
7468  lapack_complex_float* work,
7469  float* rwork,
7470  lapack_int* info );
7471 
7472 #define LAPACK_dpbrfs LAPACK_GLOBAL(dpbrfs,DPBRFS)
7473 void LAPACK_dpbrfs(
7474  char const* uplo,
7475  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7476  double const* AB, lapack_int const* ldab,
7477  double const* AFB, lapack_int const* ldafb,
7478  double const* B, lapack_int const* ldb,
7479  double* X, lapack_int const* ldx,
7480  double* ferr,
7481  double* berr,
7482  double* work,
7483  lapack_int* iwork,
7484  lapack_int* info );
7485 
7486 #define LAPACK_spbrfs LAPACK_GLOBAL(spbrfs,SPBRFS)
7487 void LAPACK_spbrfs(
7488  char const* uplo,
7489  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7490  float const* AB, lapack_int const* ldab,
7491  float const* AFB, lapack_int const* ldafb,
7492  float const* B, lapack_int const* ldb,
7493  float* X, lapack_int const* ldx,
7494  float* ferr,
7495  float* berr,
7496  float* work,
7497  lapack_int* iwork,
7498  lapack_int* info );
7499 
7500 #define LAPACK_zpbrfs LAPACK_GLOBAL(zpbrfs,ZPBRFS)
7501 void LAPACK_zpbrfs(
7502  char const* uplo,
7503  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7504  lapack_complex_double const* AB, lapack_int const* ldab,
7505  lapack_complex_double const* AFB, lapack_int const* ldafb,
7506  lapack_complex_double const* B, lapack_int const* ldb,
7507  lapack_complex_double* X, lapack_int const* ldx,
7508  double* ferr,
7509  double* berr,
7510  lapack_complex_double* work,
7511  double* rwork,
7512  lapack_int* info );
7513 
7514 #define LAPACK_cpbstf LAPACK_GLOBAL(cpbstf,CPBSTF)
7515 void LAPACK_cpbstf(
7516  char const* uplo,
7517  lapack_int const* n, lapack_int const* kd,
7518  lapack_complex_float* AB, lapack_int const* ldab,
7519  lapack_int* info );
7520 
7521 #define LAPACK_dpbstf LAPACK_GLOBAL(dpbstf,DPBSTF)
7522 void LAPACK_dpbstf(
7523  char const* uplo,
7524  lapack_int const* n, lapack_int const* kd,
7525  double* AB, lapack_int const* ldab,
7526  lapack_int* info );
7527 
7528 #define LAPACK_spbstf LAPACK_GLOBAL(spbstf,SPBSTF)
7529 void LAPACK_spbstf(
7530  char const* uplo,
7531  lapack_int const* n, lapack_int const* kd,
7532  float* AB, lapack_int const* ldab,
7533  lapack_int* info );
7534 
7535 #define LAPACK_zpbstf LAPACK_GLOBAL(zpbstf,ZPBSTF)
7536 void LAPACK_zpbstf(
7537  char const* uplo,
7538  lapack_int const* n, lapack_int const* kd,
7539  lapack_complex_double* AB, lapack_int const* ldab,
7540  lapack_int* info );
7541 
7542 #define LAPACK_cpbsv LAPACK_GLOBAL(cpbsv,CPBSV)
7543 void LAPACK_cpbsv(
7544  char const* uplo,
7545  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7546  lapack_complex_float* AB, lapack_int const* ldab,
7547  lapack_complex_float* B, lapack_int const* ldb,
7548  lapack_int* info );
7549 
7550 #define LAPACK_dpbsv LAPACK_GLOBAL(dpbsv,DPBSV)
7551 void LAPACK_dpbsv(
7552  char const* uplo,
7553  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7554  double* AB, lapack_int const* ldab,
7555  double* B, lapack_int const* ldb,
7556  lapack_int* info );
7557 
7558 #define LAPACK_spbsv LAPACK_GLOBAL(spbsv,SPBSV)
7559 void LAPACK_spbsv(
7560  char const* uplo,
7561  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7562  float* AB, lapack_int const* ldab,
7563  float* B, lapack_int const* ldb,
7564  lapack_int* info );
7565 
7566 #define LAPACK_zpbsv LAPACK_GLOBAL(zpbsv,ZPBSV)
7567 void LAPACK_zpbsv(
7568  char const* uplo,
7569  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7570  lapack_complex_double* AB, lapack_int const* ldab,
7571  lapack_complex_double* B, lapack_int const* ldb,
7572  lapack_int* info );
7573 
7574 #define LAPACK_cpbsvx LAPACK_GLOBAL(cpbsvx,CPBSVX)
7575 void LAPACK_cpbsvx(
7576  char const* fact, char const* uplo,
7577  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7578  lapack_complex_float* AB, lapack_int const* ldab,
7579  lapack_complex_float* AFB, lapack_int const* ldafb, char* equed,
7580  float* S,
7581  lapack_complex_float* B,
7582  lapack_int const* ldb,
7583  lapack_complex_float* X, lapack_int const* ldx,
7584  float* rcond,
7585  float* ferr,
7586  float* berr,
7587  lapack_complex_float* work,
7588  float* rwork,
7589  lapack_int* info );
7590 
7591 #define LAPACK_dpbsvx LAPACK_GLOBAL(dpbsvx,DPBSVX)
7592 void LAPACK_dpbsvx(
7593  char const* fact, char const* uplo,
7594  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7595  double* AB, lapack_int const* ldab,
7596  double* AFB, lapack_int const* ldafb, char* equed,
7597  double* S,
7598  double* B,
7599  lapack_int const* ldb,
7600  double* X, lapack_int const* ldx,
7601  double* rcond,
7602  double* ferr,
7603  double* berr,
7604  double* work,
7605  lapack_int* iwork,
7606  lapack_int* info );
7607 
7608 #define LAPACK_spbsvx LAPACK_GLOBAL(spbsvx,SPBSVX)
7609 void LAPACK_spbsvx(
7610  char const* fact, char const* uplo,
7611  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7612  float* AB, lapack_int const* ldab,
7613  float* AFB, lapack_int const* ldafb, char* equed,
7614  float* S,
7615  float* B,
7616  lapack_int const* ldb,
7617  float* X, lapack_int const* ldx,
7618  float* rcond,
7619  float* ferr,
7620  float* berr,
7621  float* work,
7622  lapack_int* iwork,
7623  lapack_int* info );
7624 
7625 #define LAPACK_zpbsvx LAPACK_GLOBAL(zpbsvx,ZPBSVX)
7626 void LAPACK_zpbsvx(
7627  char const* fact, char const* uplo,
7628  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7629  lapack_complex_double* AB, lapack_int const* ldab,
7630  lapack_complex_double* AFB, lapack_int const* ldafb, char* equed,
7631  double* S,
7632  lapack_complex_double* B,
7633  lapack_int const* ldb,
7634  lapack_complex_double* X, lapack_int const* ldx,
7635  double* rcond,
7636  double* ferr,
7637  double* berr,
7638  lapack_complex_double* work,
7639  double* rwork,
7640  lapack_int* info );
7641 
7642 #define LAPACK_cpbtrf LAPACK_GLOBAL(cpbtrf,CPBTRF)
7643 void LAPACK_cpbtrf(
7644  char const* uplo,
7645  lapack_int const* n, lapack_int const* kd,
7646  lapack_complex_float* AB, lapack_int const* ldab,
7647  lapack_int* info );
7648 
7649 #define LAPACK_dpbtrf LAPACK_GLOBAL(dpbtrf,DPBTRF)
7650 void LAPACK_dpbtrf(
7651  char const* uplo,
7652  lapack_int const* n, lapack_int const* kd,
7653  double* AB, lapack_int const* ldab,
7654  lapack_int* info );
7655 
7656 #define LAPACK_spbtrf LAPACK_GLOBAL(spbtrf,SPBTRF)
7657 void LAPACK_spbtrf(
7658  char const* uplo,
7659  lapack_int const* n, lapack_int const* kd,
7660  float* AB, lapack_int const* ldab,
7661  lapack_int* info );
7662 
7663 #define LAPACK_zpbtrf LAPACK_GLOBAL(zpbtrf,ZPBTRF)
7664 void LAPACK_zpbtrf(
7665  char const* uplo,
7666  lapack_int const* n, lapack_int const* kd,
7667  lapack_complex_double* AB, lapack_int const* ldab,
7668  lapack_int* info );
7669 
7670 #define LAPACK_cpbtrs LAPACK_GLOBAL(cpbtrs,CPBTRS)
7671 void LAPACK_cpbtrs(
7672  char const* uplo,
7673  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7674  lapack_complex_float const* AB, lapack_int const* ldab,
7675  lapack_complex_float* B, lapack_int const* ldb,
7676  lapack_int* info );
7677 
7678 #define LAPACK_dpbtrs LAPACK_GLOBAL(dpbtrs,DPBTRS)
7679 void LAPACK_dpbtrs(
7680  char const* uplo,
7681  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7682  double const* AB, lapack_int const* ldab,
7683  double* B, lapack_int const* ldb,
7684  lapack_int* info );
7685 
7686 #define LAPACK_spbtrs LAPACK_GLOBAL(spbtrs,SPBTRS)
7687 void LAPACK_spbtrs(
7688  char const* uplo,
7689  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7690  float const* AB, lapack_int const* ldab,
7691  float* B, lapack_int const* ldb,
7692  lapack_int* info );
7693 
7694 #define LAPACK_zpbtrs LAPACK_GLOBAL(zpbtrs,ZPBTRS)
7695 void LAPACK_zpbtrs(
7696  char const* uplo,
7697  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
7698  lapack_complex_double const* AB, lapack_int const* ldab,
7699  lapack_complex_double* B, lapack_int const* ldb,
7700  lapack_int* info );
7701 
7702 #define LAPACK_cpftrf LAPACK_GLOBAL(cpftrf,CPFTRF)
7703 void LAPACK_cpftrf(
7704  char const* transr, char const* uplo,
7705  lapack_int const* n,
7706  lapack_complex_float* A,
7707  lapack_int* info );
7708 
7709 #define LAPACK_dpftrf LAPACK_GLOBAL(dpftrf,DPFTRF)
7710 void LAPACK_dpftrf(
7711  char const* transr, char const* uplo,
7712  lapack_int const* n,
7713  double* A,
7714  lapack_int* info );
7715 
7716 #define LAPACK_spftrf LAPACK_GLOBAL(spftrf,SPFTRF)
7717 void LAPACK_spftrf(
7718  char const* transr, char const* uplo,
7719  lapack_int const* n,
7720  float* A,
7721  lapack_int* info );
7722 
7723 #define LAPACK_zpftrf LAPACK_GLOBAL(zpftrf,ZPFTRF)
7724 void LAPACK_zpftrf(
7725  char const* transr, char const* uplo,
7726  lapack_int const* n,
7727  lapack_complex_double* A,
7728  lapack_int* info );
7729 
7730 #define LAPACK_cpftri LAPACK_GLOBAL(cpftri,CPFTRI)
7731 void LAPACK_cpftri(
7732  char const* transr, char const* uplo,
7733  lapack_int const* n,
7734  lapack_complex_float* A,
7735  lapack_int* info );
7736 
7737 #define LAPACK_dpftri LAPACK_GLOBAL(dpftri,DPFTRI)
7738 void LAPACK_dpftri(
7739  char const* transr, char const* uplo,
7740  lapack_int const* n,
7741  double* A,
7742  lapack_int* info );
7743 
7744 #define LAPACK_spftri LAPACK_GLOBAL(spftri,SPFTRI)
7745 void LAPACK_spftri(
7746  char const* transr, char const* uplo,
7747  lapack_int const* n,
7748  float* A,
7749  lapack_int* info );
7750 
7751 #define LAPACK_zpftri LAPACK_GLOBAL(zpftri,ZPFTRI)
7752 void LAPACK_zpftri(
7753  char const* transr, char const* uplo,
7754  lapack_int const* n,
7755  lapack_complex_double* A,
7756  lapack_int* info );
7757 
7758 #define LAPACK_cpftrs LAPACK_GLOBAL(cpftrs,CPFTRS)
7759 void LAPACK_cpftrs(
7760  char const* transr, char const* uplo,
7761  lapack_int const* n, lapack_int const* nrhs,
7762  lapack_complex_float const* A,
7763  lapack_complex_float* B, lapack_int const* ldb,
7764  lapack_int* info );
7765 
7766 #define LAPACK_dpftrs LAPACK_GLOBAL(dpftrs,DPFTRS)
7767 void LAPACK_dpftrs(
7768  char const* transr, char const* uplo,
7769  lapack_int const* n, lapack_int const* nrhs,
7770  double const* A,
7771  double* B, lapack_int const* ldb,
7772  lapack_int* info );
7773 
7774 #define LAPACK_spftrs LAPACK_GLOBAL(spftrs,SPFTRS)
7775 void LAPACK_spftrs(
7776  char const* transr, char const* uplo,
7777  lapack_int const* n, lapack_int const* nrhs,
7778  float const* A,
7779  float* B, lapack_int const* ldb,
7780  lapack_int* info );
7781 
7782 #define LAPACK_zpftrs LAPACK_GLOBAL(zpftrs,ZPFTRS)
7783 void LAPACK_zpftrs(
7784  char const* transr, char const* uplo,
7785  lapack_int const* n, lapack_int const* nrhs,
7786  lapack_complex_double const* A,
7787  lapack_complex_double* B, lapack_int const* ldb,
7788  lapack_int* info );
7789 
7790 #define LAPACK_cpocon LAPACK_GLOBAL(cpocon,CPOCON)
7791 void LAPACK_cpocon(
7792  char const* uplo,
7793  lapack_int const* n,
7794  lapack_complex_float const* A, lapack_int const* lda,
7795  float const* anorm,
7796  float* rcond,
7797  lapack_complex_float* work,
7798  float* rwork,
7799  lapack_int* info );
7800 
7801 #define LAPACK_dpocon LAPACK_GLOBAL(dpocon,DPOCON)
7802 void LAPACK_dpocon(
7803  char const* uplo,
7804  lapack_int const* n,
7805  double const* A, lapack_int const* lda,
7806  double const* anorm,
7807  double* rcond,
7808  double* work,
7809  lapack_int* iwork,
7810  lapack_int* info );
7811 
7812 #define LAPACK_spocon LAPACK_GLOBAL(spocon,SPOCON)
7813 void LAPACK_spocon(
7814  char const* uplo,
7815  lapack_int const* n,
7816  float const* A, lapack_int const* lda,
7817  float const* anorm,
7818  float* rcond,
7819  float* work,
7820  lapack_int* iwork,
7821  lapack_int* info );
7822 
7823 #define LAPACK_zpocon LAPACK_GLOBAL(zpocon,ZPOCON)
7824 void LAPACK_zpocon(
7825  char const* uplo,
7826  lapack_int const* n,
7827  lapack_complex_double const* A, lapack_int const* lda,
7828  double const* anorm,
7829  double* rcond,
7830  lapack_complex_double* work,
7831  double* rwork,
7832  lapack_int* info );
7833 
7834 #define LAPACK_cpoequ LAPACK_GLOBAL(cpoequ,CPOEQU)
7835 void LAPACK_cpoequ(
7836  lapack_int const* n,
7837  lapack_complex_float const* A, lapack_int const* lda,
7838  float* S,
7839  float* scond,
7840  float* amax,
7841  lapack_int* info );
7842 
7843 #define LAPACK_dpoequ LAPACK_GLOBAL(dpoequ,DPOEQU)
7844 void LAPACK_dpoequ(
7845  lapack_int const* n,
7846  double const* A, lapack_int const* lda,
7847  double* S,
7848  double* scond,
7849  double* amax,
7850  lapack_int* info );
7851 
7852 #define LAPACK_spoequ LAPACK_GLOBAL(spoequ,SPOEQU)
7853 void LAPACK_spoequ(
7854  lapack_int const* n,
7855  float const* A, lapack_int const* lda,
7856  float* S,
7857  float* scond,
7858  float* amax,
7859  lapack_int* info );
7860 
7861 #define LAPACK_zpoequ LAPACK_GLOBAL(zpoequ,ZPOEQU)
7862 void LAPACK_zpoequ(
7863  lapack_int const* n,
7864  lapack_complex_double const* A, lapack_int const* lda,
7865  double* S,
7866  double* scond,
7867  double* amax,
7868  lapack_int* info );
7869 
7870 #define LAPACK_cpoequb LAPACK_GLOBAL(cpoequb,CPOEQUB)
7871 void LAPACK_cpoequb(
7872  lapack_int const* n,
7873  lapack_complex_float const* A, lapack_int const* lda,
7874  float* S,
7875  float* scond,
7876  float* amax,
7877  lapack_int* info );
7878 
7879 #define LAPACK_dpoequb LAPACK_GLOBAL(dpoequb,DPOEQUB)
7880 void LAPACK_dpoequb(
7881  lapack_int const* n,
7882  double const* A, lapack_int const* lda,
7883  double* S,
7884  double* scond,
7885  double* amax,
7886  lapack_int* info );
7887 
7888 #define LAPACK_spoequb LAPACK_GLOBAL(spoequb,SPOEQUB)
7889 void LAPACK_spoequb(
7890  lapack_int const* n,
7891  float const* A, lapack_int const* lda,
7892  float* S,
7893  float* scond,
7894  float* amax,
7895  lapack_int* info );
7896 
7897 #define LAPACK_zpoequb LAPACK_GLOBAL(zpoequb,ZPOEQUB)
7898 void LAPACK_zpoequb(
7899  lapack_int const* n,
7900  lapack_complex_double const* A, lapack_int const* lda,
7901  double* S,
7902  double* scond,
7903  double* amax,
7904  lapack_int* info );
7905 
7906 #define LAPACK_cporfs LAPACK_GLOBAL(cporfs,CPORFS)
7907 void LAPACK_cporfs(
7908  char const* uplo,
7909  lapack_int const* n, lapack_int const* nrhs,
7910  lapack_complex_float const* A, lapack_int const* lda,
7911  lapack_complex_float const* AF, lapack_int const* ldaf,
7912  lapack_complex_float const* B, lapack_int const* ldb,
7913  lapack_complex_float* X, lapack_int const* ldx,
7914  float* ferr,
7915  float* berr,
7916  lapack_complex_float* work,
7917  float* rwork,
7918  lapack_int* info );
7919 
7920 #define LAPACK_dporfs LAPACK_GLOBAL(dporfs,DPORFS)
7921 void LAPACK_dporfs(
7922  char const* uplo,
7923  lapack_int const* n, lapack_int const* nrhs,
7924  double const* A, lapack_int const* lda,
7925  double const* AF, lapack_int const* ldaf,
7926  double const* B, lapack_int const* ldb,
7927  double* X, lapack_int const* ldx,
7928  double* ferr,
7929  double* berr,
7930  double* work,
7931  lapack_int* iwork,
7932  lapack_int* info );
7933 
7934 #define LAPACK_sporfs LAPACK_GLOBAL(sporfs,SPORFS)
7935 void LAPACK_sporfs(
7936  char const* uplo,
7937  lapack_int const* n, lapack_int const* nrhs,
7938  float const* A, lapack_int const* lda,
7939  float const* AF, lapack_int const* ldaf,
7940  float const* B, lapack_int const* ldb,
7941  float* X, lapack_int const* ldx,
7942  float* ferr,
7943  float* berr,
7944  float* work,
7945  lapack_int* iwork,
7946  lapack_int* info );
7947 
7948 #define LAPACK_zporfs LAPACK_GLOBAL(zporfs,ZPORFS)
7949 void LAPACK_zporfs(
7950  char const* uplo,
7951  lapack_int const* n, lapack_int const* nrhs,
7952  lapack_complex_double const* A, lapack_int const* lda,
7953  lapack_complex_double const* AF, lapack_int const* ldaf,
7954  lapack_complex_double const* B, lapack_int const* ldb,
7955  lapack_complex_double* X, lapack_int const* ldx,
7956  double* ferr,
7957  double* berr,
7958  lapack_complex_double* work,
7959  double* rwork,
7960  lapack_int* info );
7961 
7962 #define LAPACK_cporfsx LAPACK_GLOBAL(cporfsx,CPORFSX)
7963 void LAPACK_cporfsx(
7964  char const* uplo, char const* equed,
7965  lapack_int const* n, lapack_int const* nrhs,
7966  lapack_complex_float const* A, lapack_int const* lda,
7967  lapack_complex_float const* AF, lapack_int const* ldaf,
7968  float* S,
7969  lapack_complex_float const* B, lapack_int const* ldb,
7970  lapack_complex_float* X, lapack_int const* ldx,
7971  float* rcond,
7972  float* berr, lapack_int const* n_err_bnds,
7973  float* err_bnds_norm,
7974  float* err_bnds_comp, lapack_int const* nparams,
7975  float* params,
7976  lapack_complex_float* work,
7977  float* rwork,
7978  lapack_int* info );
7979 
7980 #define LAPACK_dporfsx LAPACK_GLOBAL(dporfsx,DPORFSX)
7981 void LAPACK_dporfsx(
7982  char const* uplo, char const* equed,
7983  lapack_int const* n, lapack_int const* nrhs,
7984  double const* A, lapack_int const* lda,
7985  double const* AF, lapack_int const* ldaf,
7986  double* S,
7987  double const* B, lapack_int const* ldb,
7988  double* X, lapack_int const* ldx,
7989  double* rcond,
7990  double* berr, lapack_int const* n_err_bnds,
7991  double* err_bnds_norm,
7992  double* err_bnds_comp, lapack_int const* nparams,
7993  double* params,
7994  double* work,
7995  lapack_int* iwork,
7996  lapack_int* info );
7997 
7998 #define LAPACK_sporfsx LAPACK_GLOBAL(sporfsx,SPORFSX)
7999 void LAPACK_sporfsx(
8000  char const* uplo, char const* equed,
8001  lapack_int const* n, lapack_int const* nrhs,
8002  float const* A, lapack_int const* lda,
8003  float const* AF, lapack_int const* ldaf,
8004  float* S,
8005  float const* B, lapack_int const* ldb,
8006  float* X, lapack_int const* ldx,
8007  float* rcond,
8008  float* berr, lapack_int const* n_err_bnds,
8009  float* err_bnds_norm,
8010  float* err_bnds_comp, lapack_int const* nparams,
8011  float* params,
8012  float* work,
8013  lapack_int* iwork,
8014  lapack_int* info );
8015 
8016 #define LAPACK_zporfsx LAPACK_GLOBAL(zporfsx,ZPORFSX)
8017 void LAPACK_zporfsx(
8018  char const* uplo, char const* equed,
8019  lapack_int const* n, lapack_int const* nrhs,
8020  lapack_complex_double const* A, lapack_int const* lda,
8021  lapack_complex_double const* AF, lapack_int const* ldaf,
8022  double* S,
8023  lapack_complex_double const* B, lapack_int const* ldb,
8024  lapack_complex_double* X, lapack_int const* ldx,
8025  double* rcond,
8026  double* berr, lapack_int const* n_err_bnds,
8027  double* err_bnds_norm,
8028  double* err_bnds_comp, lapack_int const* nparams,
8029  double* params,
8030  lapack_complex_double* work,
8031  double* rwork,
8032  lapack_int* info );
8033 
8034 #define LAPACK_cposv LAPACK_GLOBAL(cposv,CPOSV)
8035 void LAPACK_cposv(
8036  char const* uplo,
8037  lapack_int const* n, lapack_int const* nrhs,
8038  lapack_complex_float* A, lapack_int const* lda,
8039  lapack_complex_float* B, lapack_int const* ldb,
8040  lapack_int* info );
8041 
8042 #define LAPACK_dposv LAPACK_GLOBAL(dposv,DPOSV)
8043 void LAPACK_dposv(
8044  char const* uplo,
8045  lapack_int const* n, lapack_int const* nrhs,
8046  double* A, lapack_int const* lda,
8047  double* B, lapack_int const* ldb,
8048  lapack_int* info );
8049 
8050 #define LAPACK_sposv LAPACK_GLOBAL(sposv,SPOSV)
8051 void LAPACK_sposv(
8052  char const* uplo,
8053  lapack_int const* n, lapack_int const* nrhs,
8054  float* A, lapack_int const* lda,
8055  float* B, lapack_int const* ldb,
8056  lapack_int* info );
8057 
8058 #define LAPACK_zposv LAPACK_GLOBAL(zposv,ZPOSV)
8059 void LAPACK_zposv(
8060  char const* uplo,
8061  lapack_int const* n, lapack_int const* nrhs,
8062  lapack_complex_double* A, lapack_int const* lda,
8063  lapack_complex_double* B, lapack_int const* ldb,
8064  lapack_int* info );
8065 
8066 #define LAPACK_dsposv LAPACK_GLOBAL(dsposv,DSPOSV)
8067 void LAPACK_dsposv(
8068  char const* uplo,
8069  lapack_int const* n, lapack_int const* nrhs,
8070  double* A, lapack_int const* lda,
8071  double const* B, lapack_int const* ldb,
8072  double* X, lapack_int const* ldx,
8073  double* work,
8074  float* swork, lapack_int* iter,
8075  lapack_int* info );
8076 
8077 #define LAPACK_zcposv LAPACK_GLOBAL(zcposv,ZCPOSV)
8078 void LAPACK_zcposv(
8079  char const* uplo,
8080  lapack_int const* n, lapack_int const* nrhs,
8081  lapack_complex_double* A, lapack_int const* lda,
8082  lapack_complex_double const* B, lapack_int const* ldb,
8083  lapack_complex_double* X, lapack_int const* ldx,
8084  lapack_complex_double* work,
8085  lapack_complex_float* swork,
8086  double* rwork, lapack_int* iter,
8087  lapack_int* info );
8088 
8089 #define LAPACK_cposvx LAPACK_GLOBAL(cposvx,CPOSVX)
8090 void LAPACK_cposvx(
8091  char const* fact, char const* uplo,
8092  lapack_int const* n, lapack_int const* nrhs,
8093  lapack_complex_float* A, lapack_int const* lda,
8094  lapack_complex_float* AF, lapack_int const* ldaf, char* equed,
8095  float* S,
8096  lapack_complex_float* B,
8097  lapack_int const* ldb,
8098  lapack_complex_float* X, lapack_int const* ldx,
8099  float* rcond,
8100  float* ferr,
8101  float* berr,
8102  lapack_complex_float* work,
8103  float* rwork,
8104  lapack_int* info );
8105 
8106 #define LAPACK_dposvx LAPACK_GLOBAL(dposvx,DPOSVX)
8107 void LAPACK_dposvx(
8108  char const* fact, char const* uplo,
8109  lapack_int const* n, lapack_int const* nrhs,
8110  double* A, lapack_int const* lda,
8111  double* AF, lapack_int const* ldaf, char* equed,
8112  double* S,
8113  double* B,
8114  lapack_int const* ldb,
8115  double* X, lapack_int const* ldx,
8116  double* rcond,
8117  double* ferr,
8118  double* berr,
8119  double* work,
8120  lapack_int* iwork,
8121  lapack_int* info );
8122 
8123 #define LAPACK_sposvx LAPACK_GLOBAL(sposvx,SPOSVX)
8124 void LAPACK_sposvx(
8125  char const* fact, char const* uplo,
8126  lapack_int const* n, lapack_int const* nrhs,
8127  float* A, lapack_int const* lda,
8128  float* AF, lapack_int const* ldaf, char* equed,
8129  float* S,
8130  float* B,
8131  lapack_int const* ldb,
8132  float* X, lapack_int const* ldx,
8133  float* rcond,
8134  float* ferr,
8135  float* berr,
8136  float* work,
8137  lapack_int* iwork,
8138  lapack_int* info );
8139 
8140 #define LAPACK_zposvx LAPACK_GLOBAL(zposvx,ZPOSVX)
8141 void LAPACK_zposvx(
8142  char const* fact, char const* uplo,
8143  lapack_int const* n, lapack_int const* nrhs,
8144  lapack_complex_double* A, lapack_int const* lda,
8145  lapack_complex_double* AF, lapack_int const* ldaf, char* equed,
8146  double* S,
8147  lapack_complex_double* B,
8148  lapack_int const* ldb,
8149  lapack_complex_double* X, lapack_int const* ldx,
8150  double* rcond,
8151  double* ferr,
8152  double* berr,
8153  lapack_complex_double* work,
8154  double* rwork,
8155  lapack_int* info );
8156 
8157 #define LAPACK_cposvxx LAPACK_GLOBAL(cposvxx,CPOSVXX)
8158 void LAPACK_cposvxx(
8159  char const* fact, char const* uplo,
8160  lapack_int const* n, lapack_int const* nrhs,
8161  lapack_complex_float* A, lapack_int const* lda,
8162  lapack_complex_float* AF, lapack_int const* ldaf, char* equed,
8163  float* S,
8164  lapack_complex_float* B,
8165  lapack_int const* ldb,
8166  lapack_complex_float* X, lapack_int const* ldx,
8167  float* rcond,
8168  float* rpvgrw,
8169  float* berr, lapack_int const* n_err_bnds,
8170  float* err_bnds_norm,
8171  float* err_bnds_comp, lapack_int const* nparams,
8172  float* params,
8173  lapack_complex_float* work,
8174  float* rwork,
8175  lapack_int* info );
8176 
8177 #define LAPACK_dposvxx LAPACK_GLOBAL(dposvxx,DPOSVXX)
8178 void LAPACK_dposvxx(
8179  char const* fact, char const* uplo,
8180  lapack_int const* n, lapack_int const* nrhs,
8181  double* A, lapack_int const* lda,
8182  double* AF, lapack_int const* ldaf, char* equed,
8183  double* S,
8184  double* B,
8185  lapack_int const* ldb,
8186  double* X, lapack_int const* ldx,
8187  double* rcond,
8188  double* rpvgrw,
8189  double* berr, lapack_int const* n_err_bnds,
8190  double* err_bnds_norm,
8191  double* err_bnds_comp, lapack_int const* nparams,
8192  double* params,
8193  double* work,
8194  lapack_int* iwork,
8195  lapack_int* info );
8196 
8197 #define LAPACK_sposvxx LAPACK_GLOBAL(sposvxx,SPOSVXX)
8198 void LAPACK_sposvxx(
8199  char const* fact, char const* uplo,
8200  lapack_int const* n, lapack_int const* nrhs,
8201  float* A, lapack_int const* lda,
8202  float* AF, lapack_int const* ldaf, char* equed,
8203  float* S,
8204  float* B,
8205  lapack_int const* ldb,
8206  float* X, lapack_int const* ldx,
8207  float* rcond,
8208  float* rpvgrw,
8209  float* berr, lapack_int const* n_err_bnds,
8210  float* err_bnds_norm,
8211  float* err_bnds_comp, lapack_int const* nparams,
8212  float* params,
8213  float* work,
8214  lapack_int* iwork,
8215  lapack_int* info );
8216 
8217 #define LAPACK_zposvxx LAPACK_GLOBAL(zposvxx,ZPOSVXX)
8218 void LAPACK_zposvxx(
8219  char const* fact, char const* uplo,
8220  lapack_int const* n, lapack_int const* nrhs,
8221  lapack_complex_double* A, lapack_int const* lda,
8222  lapack_complex_double* AF, lapack_int const* ldaf, char* equed,
8223  double* S,
8224  lapack_complex_double* B,
8225  lapack_int const* ldb,
8226  lapack_complex_double* X, lapack_int const* ldx,
8227  double* rcond,
8228  double* rpvgrw,
8229  double* berr, lapack_int const* n_err_bnds,
8230  double* err_bnds_norm,
8231  double* err_bnds_comp, lapack_int const* nparams,
8232  double* params,
8233  lapack_complex_double* work,
8234  double* rwork,
8235  lapack_int* info );
8236 
8237 #define LAPACK_cpotf2 LAPACK_GLOBAL(cpotf2,CPOTF2)
8238 void LAPACK_cpotf2(
8239  char const* uplo,
8240  lapack_int const* n,
8241  lapack_complex_float* A, lapack_int const* lda,
8242  lapack_int* info );
8243 
8244 #define LAPACK_dpotf2 LAPACK_GLOBAL(dpotf2,DPOTF2)
8245 void LAPACK_dpotf2(
8246  char const* uplo,
8247  lapack_int const* n,
8248  double* A, lapack_int const* lda,
8249  lapack_int* info );
8250 
8251 #define LAPACK_spotf2 LAPACK_GLOBAL(spotf2,SPOTF2)
8252 void LAPACK_spotf2(
8253  char const* uplo,
8254  lapack_int const* n,
8255  float* A, lapack_int const* lda,
8256  lapack_int* info );
8257 
8258 #define LAPACK_zpotf2 LAPACK_GLOBAL(zpotf2,ZPOTF2)
8259 void LAPACK_zpotf2(
8260  char const* uplo,
8261  lapack_int const* n,
8262  lapack_complex_double* A, lapack_int const* lda,
8263  lapack_int* info );
8264 
8265 #define LAPACK_cpotrf LAPACK_GLOBAL(cpotrf,CPOTRF)
8266 void LAPACK_cpotrf(
8267  char const* uplo,
8268  lapack_int const* n,
8269  lapack_complex_float* A, lapack_int const* lda,
8270  lapack_int* info );
8271 
8272 #define LAPACK_dpotrf LAPACK_GLOBAL(dpotrf,DPOTRF)
8273 void LAPACK_dpotrf(
8274  char const* uplo,
8275  lapack_int const* n,
8276  double* A, lapack_int const* lda,
8277  lapack_int* info );
8278 
8279 #define LAPACK_spotrf LAPACK_GLOBAL(spotrf,SPOTRF)
8280 void LAPACK_spotrf(
8281  char const* uplo,
8282  lapack_int const* n,
8283  float* A, lapack_int const* lda,
8284  lapack_int* info );
8285 
8286 #define LAPACK_zpotrf LAPACK_GLOBAL(zpotrf,ZPOTRF)
8287 void LAPACK_zpotrf(
8288  char const* uplo,
8289  lapack_int const* n,
8290  lapack_complex_double* A, lapack_int const* lda,
8291  lapack_int* info );
8292 
8293 #define LAPACK_cpotrf2 LAPACK_GLOBAL(cpotrf2,CPOTRF2)
8294 void LAPACK_cpotrf2(
8295  char const* uplo,
8296  lapack_int const* n,
8297  lapack_complex_float* A, lapack_int const* lda,
8298  lapack_int* info );
8299 
8300 #define LAPACK_dpotrf2 LAPACK_GLOBAL(dpotrf2,DPOTRF2)
8301 void LAPACK_dpotrf2(
8302  char const* uplo,
8303  lapack_int const* n,
8304  double* A, lapack_int const* lda,
8305  lapack_int* info );
8306 
8307 #define LAPACK_spotrf2 LAPACK_GLOBAL(spotrf2,SPOTRF2)
8308 void LAPACK_spotrf2(
8309  char const* uplo,
8310  lapack_int const* n,
8311  float* A, lapack_int const* lda,
8312  lapack_int* info );
8313 
8314 #define LAPACK_zpotrf2 LAPACK_GLOBAL(zpotrf2,ZPOTRF2)
8315 void LAPACK_zpotrf2(
8316  char const* uplo,
8317  lapack_int const* n,
8318  lapack_complex_double* A, lapack_int const* lda,
8319  lapack_int* info );
8320 
8321 #define LAPACK_cpotri LAPACK_GLOBAL(cpotri,CPOTRI)
8322 void LAPACK_cpotri(
8323  char const* uplo,
8324  lapack_int const* n,
8325  lapack_complex_float* A, lapack_int const* lda,
8326  lapack_int* info );
8327 
8328 #define LAPACK_dpotri LAPACK_GLOBAL(dpotri,DPOTRI)
8329 void LAPACK_dpotri(
8330  char const* uplo,
8331  lapack_int const* n,
8332  double* A, lapack_int const* lda,
8333  lapack_int* info );
8334 
8335 #define LAPACK_spotri LAPACK_GLOBAL(spotri,SPOTRI)
8336 void LAPACK_spotri(
8337  char const* uplo,
8338  lapack_int const* n,
8339  float* A, lapack_int const* lda,
8340  lapack_int* info );
8341 
8342 #define LAPACK_zpotri LAPACK_GLOBAL(zpotri,ZPOTRI)
8343 void LAPACK_zpotri(
8344  char const* uplo,
8345  lapack_int const* n,
8346  lapack_complex_double* A, lapack_int const* lda,
8347  lapack_int* info );
8348 
8349 #define LAPACK_cpotrs LAPACK_GLOBAL(cpotrs,CPOTRS)
8350 void LAPACK_cpotrs(
8351  char const* uplo,
8352  lapack_int const* n, lapack_int const* nrhs,
8353  lapack_complex_float const* A, lapack_int const* lda,
8354  lapack_complex_float* B, lapack_int const* ldb,
8355  lapack_int* info );
8356 
8357 #define LAPACK_dpotrs LAPACK_GLOBAL(dpotrs,DPOTRS)
8358 void LAPACK_dpotrs(
8359  char const* uplo,
8360  lapack_int const* n, lapack_int const* nrhs,
8361  double const* A, lapack_int const* lda,
8362  double* B, lapack_int const* ldb,
8363  lapack_int* info );
8364 
8365 #define LAPACK_spotrs LAPACK_GLOBAL(spotrs,SPOTRS)
8366 void LAPACK_spotrs(
8367  char const* uplo,
8368  lapack_int const* n, lapack_int const* nrhs,
8369  float const* A, lapack_int const* lda,
8370  float* B, lapack_int const* ldb,
8371  lapack_int* info );
8372 
8373 #define LAPACK_zpotrs LAPACK_GLOBAL(zpotrs,ZPOTRS)
8374 void LAPACK_zpotrs(
8375  char const* uplo,
8376  lapack_int const* n, lapack_int const* nrhs,
8377  lapack_complex_double const* A, lapack_int const* lda,
8378  lapack_complex_double* B, lapack_int const* ldb,
8379  lapack_int* info );
8380 
8381 #define LAPACK_cppcon LAPACK_GLOBAL(cppcon,CPPCON)
8382 void LAPACK_cppcon(
8383  char const* uplo,
8384  lapack_int const* n,
8385  lapack_complex_float const* AP,
8386  float const* anorm,
8387  float* rcond,
8388  lapack_complex_float* work,
8389  float* rwork,
8390  lapack_int* info );
8391 
8392 #define LAPACK_dppcon LAPACK_GLOBAL(dppcon,DPPCON)
8393 void LAPACK_dppcon(
8394  char const* uplo,
8395  lapack_int const* n,
8396  double const* AP,
8397  double const* anorm,
8398  double* rcond,
8399  double* work,
8400  lapack_int* iwork,
8401  lapack_int* info );
8402 
8403 #define LAPACK_sppcon LAPACK_GLOBAL(sppcon,SPPCON)
8404 void LAPACK_sppcon(
8405  char const* uplo,
8406  lapack_int const* n,
8407  float const* AP,
8408  float const* anorm,
8409  float* rcond,
8410  float* work,
8411  lapack_int* iwork,
8412  lapack_int* info );
8413 
8414 #define LAPACK_zppcon LAPACK_GLOBAL(zppcon,ZPPCON)
8415 void LAPACK_zppcon(
8416  char const* uplo,
8417  lapack_int const* n,
8418  lapack_complex_double const* AP,
8419  double const* anorm,
8420  double* rcond,
8421  lapack_complex_double* work,
8422  double* rwork,
8423  lapack_int* info );
8424 
8425 #define LAPACK_cppequ LAPACK_GLOBAL(cppequ,CPPEQU)
8426 void LAPACK_cppequ(
8427  char const* uplo,
8428  lapack_int const* n,
8429  lapack_complex_float const* AP,
8430  float* S,
8431  float* scond,
8432  float* amax,
8433  lapack_int* info );
8434 
8435 #define LAPACK_dppequ LAPACK_GLOBAL(dppequ,DPPEQU)
8436 void LAPACK_dppequ(
8437  char const* uplo,
8438  lapack_int const* n,
8439  double const* AP,
8440  double* S,
8441  double* scond,
8442  double* amax,
8443  lapack_int* info );
8444 
8445 #define LAPACK_sppequ LAPACK_GLOBAL(sppequ,SPPEQU)
8446 void LAPACK_sppequ(
8447  char const* uplo,
8448  lapack_int const* n,
8449  float const* AP,
8450  float* S,
8451  float* scond,
8452  float* amax,
8453  lapack_int* info );
8454 
8455 #define LAPACK_zppequ LAPACK_GLOBAL(zppequ,ZPPEQU)
8456 void LAPACK_zppequ(
8457  char const* uplo,
8458  lapack_int const* n,
8459  lapack_complex_double const* AP,
8460  double* S,
8461  double* scond,
8462  double* amax,
8463  lapack_int* info );
8464 
8465 #define LAPACK_cpprfs LAPACK_GLOBAL(cpprfs,CPPRFS)
8466 void LAPACK_cpprfs(
8467  char const* uplo,
8468  lapack_int const* n, lapack_int const* nrhs,
8469  lapack_complex_float const* AP,
8470  lapack_complex_float const* AFP,
8471  lapack_complex_float const* B, lapack_int const* ldb,
8472  lapack_complex_float* X, lapack_int const* ldx,
8473  float* ferr,
8474  float* berr,
8475  lapack_complex_float* work,
8476  float* rwork,
8477  lapack_int* info );
8478 
8479 #define LAPACK_dpprfs LAPACK_GLOBAL(dpprfs,DPPRFS)
8480 void LAPACK_dpprfs(
8481  char const* uplo,
8482  lapack_int const* n, lapack_int const* nrhs,
8483  double const* AP,
8484  double const* AFP,
8485  double const* B, lapack_int const* ldb,
8486  double* X, lapack_int const* ldx,
8487  double* ferr,
8488  double* berr,
8489  double* work,
8490  lapack_int* iwork,
8491  lapack_int* info );
8492 
8493 #define LAPACK_spprfs LAPACK_GLOBAL(spprfs,SPPRFS)
8494 void LAPACK_spprfs(
8495  char const* uplo,
8496  lapack_int const* n, lapack_int const* nrhs,
8497  float const* AP,
8498  float const* AFP,
8499  float const* B, lapack_int const* ldb,
8500  float* X, lapack_int const* ldx,
8501  float* ferr,
8502  float* berr,
8503  float* work,
8504  lapack_int* iwork,
8505  lapack_int* info );
8506 
8507 #define LAPACK_zpprfs LAPACK_GLOBAL(zpprfs,ZPPRFS)
8508 void LAPACK_zpprfs(
8509  char const* uplo,
8510  lapack_int const* n, lapack_int const* nrhs,
8511  lapack_complex_double const* AP,
8512  lapack_complex_double const* AFP,
8513  lapack_complex_double const* B, lapack_int const* ldb,
8514  lapack_complex_double* X, lapack_int const* ldx,
8515  double* ferr,
8516  double* berr,
8517  lapack_complex_double* work,
8518  double* rwork,
8519  lapack_int* info );
8520 
8521 #define LAPACK_cppsv LAPACK_GLOBAL(cppsv,CPPSV)
8522 void LAPACK_cppsv(
8523  char const* uplo,
8524  lapack_int const* n, lapack_int const* nrhs,
8525  lapack_complex_float* AP,
8526  lapack_complex_float* B, lapack_int const* ldb,
8527  lapack_int* info );
8528 
8529 #define LAPACK_dppsv LAPACK_GLOBAL(dppsv,DPPSV)
8530 void LAPACK_dppsv(
8531  char const* uplo,
8532  lapack_int const* n, lapack_int const* nrhs,
8533  double* AP,
8534  double* B, lapack_int const* ldb,
8535  lapack_int* info );
8536 
8537 #define LAPACK_sppsv LAPACK_GLOBAL(sppsv,SPPSV)
8538 void LAPACK_sppsv(
8539  char const* uplo,
8540  lapack_int const* n, lapack_int const* nrhs,
8541  float* AP,
8542  float* B, lapack_int const* ldb,
8543  lapack_int* info );
8544 
8545 #define LAPACK_zppsv LAPACK_GLOBAL(zppsv,ZPPSV)
8546 void LAPACK_zppsv(
8547  char const* uplo,
8548  lapack_int const* n, lapack_int const* nrhs,
8549  lapack_complex_double* AP,
8550  lapack_complex_double* B, lapack_int const* ldb,
8551  lapack_int* info );
8552 
8553 #define LAPACK_cppsvx LAPACK_GLOBAL(cppsvx,CPPSVX)
8554 void LAPACK_cppsvx(
8555  char const* fact, char const* uplo,
8556  lapack_int const* n, lapack_int const* nrhs,
8557  lapack_complex_float* AP,
8558  lapack_complex_float* AFP, char* equed,
8559  float* S,
8560  lapack_complex_float* B,
8561  lapack_int const* ldb,
8562  lapack_complex_float* X, lapack_int const* ldx,
8563  float* rcond,
8564  float* ferr,
8565  float* berr,
8566  lapack_complex_float* work,
8567  float* rwork,
8568  lapack_int* info );
8569 
8570 #define LAPACK_dppsvx LAPACK_GLOBAL(dppsvx,DPPSVX)
8571 void LAPACK_dppsvx(
8572  char const* fact, char const* uplo,
8573  lapack_int const* n, lapack_int const* nrhs,
8574  double* AP,
8575  double* AFP, char* equed,
8576  double* S,
8577  double* B,
8578  lapack_int const* ldb,
8579  double* X, lapack_int const* ldx,
8580  double* rcond,
8581  double* ferr,
8582  double* berr,
8583  double* work,
8584  lapack_int* iwork,
8585  lapack_int* info );
8586 
8587 #define LAPACK_sppsvx LAPACK_GLOBAL(sppsvx,SPPSVX)
8588 void LAPACK_sppsvx(
8589  char const* fact, char const* uplo,
8590  lapack_int const* n, lapack_int const* nrhs,
8591  float* AP,
8592  float* AFP, char* equed,
8593  float* S,
8594  float* B,
8595  lapack_int const* ldb,
8596  float* X, lapack_int const* ldx,
8597  float* rcond,
8598  float* ferr,
8599  float* berr,
8600  float* work,
8601  lapack_int* iwork,
8602  lapack_int* info );
8603 
8604 #define LAPACK_zppsvx LAPACK_GLOBAL(zppsvx,ZPPSVX)
8605 void LAPACK_zppsvx(
8606  char const* fact, char const* uplo,
8607  lapack_int const* n, lapack_int const* nrhs,
8608  lapack_complex_double* AP,
8609  lapack_complex_double* AFP, char* equed,
8610  double* S,
8611  lapack_complex_double* B,
8612  lapack_int const* ldb,
8613  lapack_complex_double* X, lapack_int const* ldx,
8614  double* rcond,
8615  double* ferr,
8616  double* berr,
8617  lapack_complex_double* work,
8618  double* rwork,
8619  lapack_int* info );
8620 
8621 #define LAPACK_cpptrf LAPACK_GLOBAL(cpptrf,CPPTRF)
8622 void LAPACK_cpptrf(
8623  char const* uplo,
8624  lapack_int const* n,
8625  lapack_complex_float* AP,
8626  lapack_int* info );
8627 
8628 #define LAPACK_dpptrf LAPACK_GLOBAL(dpptrf,DPPTRF)
8629 void LAPACK_dpptrf(
8630  char const* uplo,
8631  lapack_int const* n,
8632  double* AP,
8633  lapack_int* info );
8634 
8635 #define LAPACK_spptrf LAPACK_GLOBAL(spptrf,SPPTRF)
8636 void LAPACK_spptrf(
8637  char const* uplo,
8638  lapack_int const* n,
8639  float* AP,
8640  lapack_int* info );
8641 
8642 #define LAPACK_zpptrf LAPACK_GLOBAL(zpptrf,ZPPTRF)
8643 void LAPACK_zpptrf(
8644  char const* uplo,
8645  lapack_int const* n,
8646  lapack_complex_double* AP,
8647  lapack_int* info );
8648 
8649 #define LAPACK_cpptri LAPACK_GLOBAL(cpptri,CPPTRI)
8650 void LAPACK_cpptri(
8651  char const* uplo,
8652  lapack_int const* n,
8653  lapack_complex_float* AP,
8654  lapack_int* info );
8655 
8656 #define LAPACK_dpptri LAPACK_GLOBAL(dpptri,DPPTRI)
8657 void LAPACK_dpptri(
8658  char const* uplo,
8659  lapack_int const* n,
8660  double* AP,
8661  lapack_int* info );
8662 
8663 #define LAPACK_spptri LAPACK_GLOBAL(spptri,SPPTRI)
8664 void LAPACK_spptri(
8665  char const* uplo,
8666  lapack_int const* n,
8667  float* AP,
8668  lapack_int* info );
8669 
8670 #define LAPACK_zpptri LAPACK_GLOBAL(zpptri,ZPPTRI)
8671 void LAPACK_zpptri(
8672  char const* uplo,
8673  lapack_int const* n,
8674  lapack_complex_double* AP,
8675  lapack_int* info );
8676 
8677 #define LAPACK_cpptrs LAPACK_GLOBAL(cpptrs,CPPTRS)
8678 void LAPACK_cpptrs(
8679  char const* uplo,
8680  lapack_int const* n, lapack_int const* nrhs,
8681  lapack_complex_float const* AP,
8682  lapack_complex_float* B, lapack_int const* ldb,
8683  lapack_int* info );
8684 
8685 #define LAPACK_dpptrs LAPACK_GLOBAL(dpptrs,DPPTRS)
8686 void LAPACK_dpptrs(
8687  char const* uplo,
8688  lapack_int const* n, lapack_int const* nrhs,
8689  double const* AP,
8690  double* B, lapack_int const* ldb,
8691  lapack_int* info );
8692 
8693 #define LAPACK_spptrs LAPACK_GLOBAL(spptrs,SPPTRS)
8694 void LAPACK_spptrs(
8695  char const* uplo,
8696  lapack_int const* n, lapack_int const* nrhs,
8697  float const* AP,
8698  float* B, lapack_int const* ldb,
8699  lapack_int* info );
8700 
8701 #define LAPACK_zpptrs LAPACK_GLOBAL(zpptrs,ZPPTRS)
8702 void LAPACK_zpptrs(
8703  char const* uplo,
8704  lapack_int const* n, lapack_int const* nrhs,
8705  lapack_complex_double const* AP,
8706  lapack_complex_double* B, lapack_int const* ldb,
8707  lapack_int* info );
8708 
8709 #define LAPACK_cpstrf LAPACK_GLOBAL(cpstrf,CPSTRF)
8710 void LAPACK_cpstrf(
8711  char const* uplo,
8712  lapack_int const* n,
8713  lapack_complex_float* A, lapack_int const* lda, lapack_int* piv, lapack_int* rank,
8714  float const* tol,
8715  float* work,
8716  lapack_int* info );
8717 
8718 #define LAPACK_dpstrf LAPACK_GLOBAL(dpstrf,DPSTRF)
8719 void LAPACK_dpstrf(
8720  char const* uplo,
8721  lapack_int const* n,
8722  double* A, lapack_int const* lda, lapack_int* piv, lapack_int* rank,
8723  double const* tol,
8724  double* work,
8725  lapack_int* info );
8726 
8727 #define LAPACK_spstrf LAPACK_GLOBAL(spstrf,SPSTRF)
8728 void LAPACK_spstrf(
8729  char const* uplo,
8730  lapack_int const* n,
8731  float* A, lapack_int const* lda, lapack_int* piv, lapack_int* rank,
8732  float const* tol,
8733  float* work,
8734  lapack_int* info );
8735 
8736 #define LAPACK_zpstrf LAPACK_GLOBAL(zpstrf,ZPSTRF)
8737 void LAPACK_zpstrf(
8738  char const* uplo,
8739  lapack_int const* n,
8740  lapack_complex_double* A, lapack_int const* lda, lapack_int* piv, lapack_int* rank,
8741  double const* tol,
8742  double* work,
8743  lapack_int* info );
8744 
8745 #define LAPACK_cptcon LAPACK_GLOBAL(cptcon,CPTCON)
8746 void LAPACK_cptcon(
8747  lapack_int const* n,
8748  float const* D,
8749  lapack_complex_float const* E,
8750  float const* anorm,
8751  float* rcond,
8752  float* rwork,
8753  lapack_int* info );
8754 
8755 #define LAPACK_dptcon LAPACK_GLOBAL(dptcon,DPTCON)
8756 void LAPACK_dptcon(
8757  lapack_int const* n,
8758  double const* D,
8759  double const* E,
8760  double const* anorm,
8761  double* rcond,
8762  double* work,
8763  lapack_int* info );
8764 
8765 #define LAPACK_sptcon LAPACK_GLOBAL(sptcon,SPTCON)
8766 void LAPACK_sptcon(
8767  lapack_int const* n,
8768  float const* D,
8769  float const* E,
8770  float const* anorm,
8771  float* rcond,
8772  float* work,
8773  lapack_int* info );
8774 
8775 #define LAPACK_zptcon LAPACK_GLOBAL(zptcon,ZPTCON)
8776 void LAPACK_zptcon(
8777  lapack_int const* n,
8778  double const* D,
8779  lapack_complex_double const* E,
8780  double const* anorm,
8781  double* rcond,
8782  double* rwork,
8783  lapack_int* info );
8784 
8785 #define LAPACK_cpteqr LAPACK_GLOBAL(cpteqr,CPTEQR)
8786 void LAPACK_cpteqr(
8787  char const* compz,
8788  lapack_int const* n,
8789  float* D,
8790  float* E,
8791  lapack_complex_float* Z, lapack_int const* ldz,
8792  float* work,
8793  lapack_int* info );
8794 
8795 #define LAPACK_dpteqr LAPACK_GLOBAL(dpteqr,DPTEQR)
8796 void LAPACK_dpteqr(
8797  char const* compz,
8798  lapack_int const* n,
8799  double* D,
8800  double* E,
8801  double* Z, lapack_int const* ldz,
8802  double* work,
8803  lapack_int* info );
8804 
8805 #define LAPACK_spteqr LAPACK_GLOBAL(spteqr,SPTEQR)
8806 void LAPACK_spteqr(
8807  char const* compz,
8808  lapack_int const* n,
8809  float* D,
8810  float* E,
8811  float* Z, lapack_int const* ldz,
8812  float* work,
8813  lapack_int* info );
8814 
8815 #define LAPACK_zpteqr LAPACK_GLOBAL(zpteqr,ZPTEQR)
8816 void LAPACK_zpteqr(
8817  char const* compz,
8818  lapack_int const* n,
8819  double* D,
8820  double* E,
8821  lapack_complex_double* Z, lapack_int const* ldz,
8822  double* work,
8823  lapack_int* info );
8824 
8825 #define LAPACK_cptrfs LAPACK_GLOBAL(cptrfs,CPTRFS)
8826 void LAPACK_cptrfs(
8827  char const* uplo,
8828  lapack_int const* n, lapack_int const* nrhs,
8829  float const* D,
8830  lapack_complex_float const* E,
8831  float const* DF,
8832  lapack_complex_float const* EF,
8833  lapack_complex_float const* B, lapack_int const* ldb,
8834  lapack_complex_float* X, lapack_int const* ldx,
8835  float* ferr,
8836  float* berr,
8837  lapack_complex_float* work,
8838  float* rwork,
8839  lapack_int* info );
8840 
8841 #define LAPACK_dptrfs LAPACK_GLOBAL(dptrfs,DPTRFS)
8842 void LAPACK_dptrfs(
8843  lapack_int const* n, lapack_int const* nrhs,
8844  double const* D,
8845  double const* E,
8846  double const* DF,
8847  double const* EF,
8848  double const* B, lapack_int const* ldb,
8849  double* X, lapack_int const* ldx,
8850  double* ferr,
8851  double* berr,
8852  double* work,
8853  lapack_int* info );
8854 
8855 #define LAPACK_sptrfs LAPACK_GLOBAL(sptrfs,SPTRFS)
8856 void LAPACK_sptrfs(
8857  lapack_int const* n, lapack_int const* nrhs,
8858  float const* D,
8859  float const* E,
8860  float const* DF,
8861  float const* EF,
8862  float const* B, lapack_int const* ldb,
8863  float* X, lapack_int const* ldx,
8864  float* ferr,
8865  float* berr,
8866  float* work,
8867  lapack_int* info );
8868 
8869 #define LAPACK_zptrfs LAPACK_GLOBAL(zptrfs,ZPTRFS)
8870 void LAPACK_zptrfs(
8871  char const* uplo,
8872  lapack_int const* n, lapack_int const* nrhs,
8873  double const* D,
8874  lapack_complex_double const* E,
8875  double const* DF,
8876  lapack_complex_double const* EF,
8877  lapack_complex_double const* B, lapack_int const* ldb,
8878  lapack_complex_double* X, lapack_int const* ldx,
8879  double* ferr,
8880  double* berr,
8881  lapack_complex_double* work,
8882  double* rwork,
8883  lapack_int* info );
8884 
8885 #define LAPACK_cptsv LAPACK_GLOBAL(cptsv,CPTSV)
8886 void LAPACK_cptsv(
8887  lapack_int const* n, lapack_int const* nrhs,
8888  float* D,
8889  lapack_complex_float* E,
8890  lapack_complex_float* B, lapack_int const* ldb,
8891  lapack_int* info );
8892 
8893 #define LAPACK_dptsv LAPACK_GLOBAL(dptsv,DPTSV)
8894 void LAPACK_dptsv(
8895  lapack_int const* n, lapack_int const* nrhs,
8896  double* D,
8897  double* E,
8898  double* B, lapack_int const* ldb,
8899  lapack_int* info );
8900 
8901 #define LAPACK_sptsv LAPACK_GLOBAL(sptsv,SPTSV)
8902 void LAPACK_sptsv(
8903  lapack_int const* n, lapack_int const* nrhs,
8904  float* D,
8905  float* E,
8906  float* B, lapack_int const* ldb,
8907  lapack_int* info );
8908 
8909 #define LAPACK_zptsv LAPACK_GLOBAL(zptsv,ZPTSV)
8910 void LAPACK_zptsv(
8911  lapack_int const* n, lapack_int const* nrhs,
8912  double* D,
8913  lapack_complex_double* E,
8914  lapack_complex_double* B, lapack_int const* ldb,
8915  lapack_int* info );
8916 
8917 #define LAPACK_cptsvx LAPACK_GLOBAL(cptsvx,CPTSVX)
8918 void LAPACK_cptsvx(
8919  char const* fact,
8920  lapack_int const* n, lapack_int const* nrhs,
8921  float const* D,
8922  lapack_complex_float const* E,
8923  float* DF,
8924  lapack_complex_float* EF,
8925  lapack_complex_float const* B, lapack_int const* ldb,
8926  lapack_complex_float* X, lapack_int const* ldx,
8927  float* rcond,
8928  float* ferr,
8929  float* berr,
8930  lapack_complex_float* work,
8931  float* rwork,
8932  lapack_int* info );
8933 
8934 #define LAPACK_dptsvx LAPACK_GLOBAL(dptsvx,DPTSVX)
8935 void LAPACK_dptsvx(
8936  char const* fact,
8937  lapack_int const* n, lapack_int const* nrhs,
8938  double const* D,
8939  double const* E,
8940  double* DF,
8941  double* EF,
8942  double const* B, lapack_int const* ldb,
8943  double* X, lapack_int const* ldx,
8944  double* rcond,
8945  double* ferr,
8946  double* berr,
8947  double* work,
8948  lapack_int* info );
8949 
8950 #define LAPACK_sptsvx LAPACK_GLOBAL(sptsvx,SPTSVX)
8951 void LAPACK_sptsvx(
8952  char const* fact,
8953  lapack_int const* n, lapack_int const* nrhs,
8954  float const* D,
8955  float const* E,
8956  float* DF,
8957  float* EF,
8958  float const* B, lapack_int const* ldb,
8959  float* X, lapack_int const* ldx,
8960  float* rcond,
8961  float* ferr,
8962  float* berr,
8963  float* work,
8964  lapack_int* info );
8965 
8966 #define LAPACK_zptsvx LAPACK_GLOBAL(zptsvx,ZPTSVX)
8967 void LAPACK_zptsvx(
8968  char const* fact,
8969  lapack_int const* n, lapack_int const* nrhs,
8970  double const* D,
8971  lapack_complex_double const* E,
8972  double* DF,
8973  lapack_complex_double* EF,
8974  lapack_complex_double const* B, lapack_int const* ldb,
8975  lapack_complex_double* X, lapack_int const* ldx,
8976  double* rcond,
8977  double* ferr,
8978  double* berr,
8979  lapack_complex_double* work,
8980  double* rwork,
8981  lapack_int* info );
8982 
8983 #define LAPACK_cpttrf LAPACK_GLOBAL(cpttrf,CPTTRF)
8984 void LAPACK_cpttrf(
8985  lapack_int const* n,
8986  float* D,
8987  lapack_complex_float* E,
8988  lapack_int* info );
8989 
8990 #define LAPACK_dpttrf LAPACK_GLOBAL(dpttrf,DPTTRF)
8991 void LAPACK_dpttrf(
8992  lapack_int const* n,
8993  double* D,
8994  double* E,
8995  lapack_int* info );
8996 
8997 #define LAPACK_spttrf LAPACK_GLOBAL(spttrf,SPTTRF)
8998 void LAPACK_spttrf(
8999  lapack_int const* n,
9000  float* D,
9001  float* E,
9002  lapack_int* info );
9003 
9004 #define LAPACK_zpttrf LAPACK_GLOBAL(zpttrf,ZPTTRF)
9005 void LAPACK_zpttrf(
9006  lapack_int const* n,
9007  double* D,
9008  lapack_complex_double* E,
9009  lapack_int* info );
9010 
9011 #define LAPACK_cpttrs LAPACK_GLOBAL(cpttrs,CPTTRS)
9012 void LAPACK_cpttrs(
9013  char const* uplo,
9014  lapack_int const* n, lapack_int const* nrhs,
9015  float const* D,
9016  lapack_complex_float const* E,
9017  lapack_complex_float* B, lapack_int const* ldb,
9018  lapack_int* info );
9019 
9020 #define LAPACK_dpttrs LAPACK_GLOBAL(dpttrs,DPTTRS)
9021 void LAPACK_dpttrs(
9022  lapack_int const* n, lapack_int const* nrhs,
9023  double const* D,
9024  double const* E,
9025  double* B, lapack_int const* ldb,
9026  lapack_int* info );
9027 
9028 #define LAPACK_spttrs LAPACK_GLOBAL(spttrs,SPTTRS)
9029 void LAPACK_spttrs(
9030  lapack_int const* n, lapack_int const* nrhs,
9031  float const* D,
9032  float const* E,
9033  float* B, lapack_int const* ldb,
9034  lapack_int* info );
9035 
9036 #define LAPACK_zpttrs LAPACK_GLOBAL(zpttrs,ZPTTRS)
9037 void LAPACK_zpttrs(
9038  char const* uplo,
9039  lapack_int const* n, lapack_int const* nrhs,
9040  double const* D,
9041  lapack_complex_double const* E,
9042  lapack_complex_double* B, lapack_int const* ldb,
9043  lapack_int* info );
9044 
9045 #define LAPACK_dsbev LAPACK_GLOBAL(dsbev,DSBEV)
9046 void LAPACK_dsbev(
9047  char const* jobz, char const* uplo,
9048  lapack_int const* n, lapack_int const* kd,
9049  double* AB, lapack_int const* ldab,
9050  double* W,
9051  double* Z, lapack_int const* ldz,
9052  double* work,
9053  lapack_int* info );
9054 
9055 #define LAPACK_ssbev LAPACK_GLOBAL(ssbev,SSBEV)
9056 void LAPACK_ssbev(
9057  char const* jobz, char const* uplo,
9058  lapack_int const* n, lapack_int const* kd,
9059  float* AB, lapack_int const* ldab,
9060  float* W,
9061  float* Z, lapack_int const* ldz,
9062  float* work,
9063  lapack_int* info );
9064 
9065 #define LAPACK_dsbev_2stage LAPACK_GLOBAL(dsbev_2stage,DSBEV_2STAGE)
9066 void LAPACK_dsbev_2stage(
9067  char const* jobz, char const* uplo,
9068  lapack_int const* n, lapack_int const* kd,
9069  double* AB, lapack_int const* ldab,
9070  double* W,
9071  double* Z, lapack_int const* ldz,
9072  double* work, lapack_int const* lwork,
9073  lapack_int* info );
9074 
9075 #define LAPACK_ssbev_2stage LAPACK_GLOBAL(ssbev_2stage,SSBEV_2STAGE)
9076 void LAPACK_ssbev_2stage(
9077  char const* jobz, char const* uplo,
9078  lapack_int const* n, lapack_int const* kd,
9079  float* AB, lapack_int const* ldab,
9080  float* W,
9081  float* Z, lapack_int const* ldz,
9082  float* work, lapack_int const* lwork,
9083  lapack_int* info );
9084 
9085 #define LAPACK_dsbevd LAPACK_GLOBAL(dsbevd,DSBEVD)
9086 void LAPACK_dsbevd(
9087  char const* jobz, char const* uplo,
9088  lapack_int const* n, lapack_int const* kd,
9089  double* AB, lapack_int const* ldab,
9090  double* W,
9091  double* Z, lapack_int const* ldz,
9092  double* work, lapack_int const* lwork,
9093  lapack_int* iwork, lapack_int const* liwork,
9094  lapack_int* info );
9095 
9096 #define LAPACK_ssbevd LAPACK_GLOBAL(ssbevd,SSBEVD)
9097 void LAPACK_ssbevd(
9098  char const* jobz, char const* uplo,
9099  lapack_int const* n, lapack_int const* kd,
9100  float* AB, lapack_int const* ldab,
9101  float* W,
9102  float* Z, lapack_int const* ldz,
9103  float* work, lapack_int const* lwork,
9104  lapack_int* iwork, lapack_int const* liwork,
9105  lapack_int* info );
9106 
9107 #define LAPACK_dsbevd_2stage LAPACK_GLOBAL(dsbevd_2stage,DSBEVD_2STAGE)
9108 void LAPACK_dsbevd_2stage(
9109  char const* jobz, char const* uplo,
9110  lapack_int const* n, lapack_int const* kd,
9111  double* AB, lapack_int const* ldab,
9112  double* W,
9113  double* Z, lapack_int const* ldz,
9114  double* work, lapack_int const* lwork,
9115  lapack_int* iwork, lapack_int const* liwork,
9116  lapack_int* info );
9117 
9118 #define LAPACK_ssbevd_2stage LAPACK_GLOBAL(ssbevd_2stage,SSBEVD_2STAGE)
9119 void LAPACK_ssbevd_2stage(
9120  char const* jobz, char const* uplo,
9121  lapack_int const* n, lapack_int const* kd,
9122  float* AB, lapack_int const* ldab,
9123  float* W,
9124  float* Z, lapack_int const* ldz,
9125  float* work, lapack_int const* lwork,
9126  lapack_int* iwork, lapack_int const* liwork,
9127  lapack_int* info );
9128 
9129 #define LAPACK_dsbevx LAPACK_GLOBAL(dsbevx,DSBEVX)
9130 void LAPACK_dsbevx(
9131  char const* jobz, char const* range, char const* uplo,
9132  lapack_int const* n, lapack_int const* kd,
9133  double* AB, lapack_int const* ldab,
9134  double* Q, lapack_int const* ldq,
9135  double const* vl,
9136  double const* vu, lapack_int const* il, lapack_int const* iu,
9137  double const* abstol, lapack_int* m,
9138  double* W,
9139  double* Z, lapack_int const* ldz,
9140  double* work,
9141  lapack_int* iwork, lapack_int* IFAIL,
9142  lapack_int* info );
9143 
9144 #define LAPACK_ssbevx LAPACK_GLOBAL(ssbevx,SSBEVX)
9145 void LAPACK_ssbevx(
9146  char const* jobz, char const* range, char const* uplo,
9147  lapack_int const* n, lapack_int const* kd,
9148  float* AB, lapack_int const* ldab,
9149  float* Q, lapack_int const* ldq,
9150  float const* vl,
9151  float const* vu, lapack_int const* il, lapack_int const* iu,
9152  float const* abstol, lapack_int* m,
9153  float* W,
9154  float* Z, lapack_int const* ldz,
9155  float* work,
9156  lapack_int* iwork, lapack_int* IFAIL,
9157  lapack_int* info );
9158 
9159 #define LAPACK_dsbevx_2stage LAPACK_GLOBAL(dsbevx_2stage,DSBEVX_2STAGE)
9160 void LAPACK_dsbevx_2stage(
9161  char const* jobz, char const* range, char const* uplo,
9162  lapack_int const* n, lapack_int const* kd,
9163  double* AB, lapack_int const* ldab,
9164  double* Q, lapack_int const* ldq,
9165  double const* vl,
9166  double const* vu, lapack_int const* il, lapack_int const* iu,
9167  double const* abstol, lapack_int* m,
9168  double* W,
9169  double* Z, lapack_int const* ldz,
9170  double* work, lapack_int const* lwork,
9171  lapack_int* iwork, lapack_int* IFAIL,
9172  lapack_int* info );
9173 
9174 #define LAPACK_ssbevx_2stage LAPACK_GLOBAL(ssbevx_2stage,SSBEVX_2STAGE)
9175 void LAPACK_ssbevx_2stage(
9176  char const* jobz, char const* range, char const* uplo,
9177  lapack_int const* n, lapack_int const* kd,
9178  float* AB, lapack_int const* ldab,
9179  float* Q, lapack_int const* ldq,
9180  float const* vl,
9181  float const* vu, lapack_int const* il, lapack_int const* iu,
9182  float const* abstol, lapack_int* m,
9183  float* W,
9184  float* Z, lapack_int const* ldz,
9185  float* work, lapack_int const* lwork,
9186  lapack_int* iwork, lapack_int* IFAIL,
9187  lapack_int* info );
9188 
9189 #define LAPACK_dsbgst LAPACK_GLOBAL(dsbgst,DSBGST)
9190 void LAPACK_dsbgst(
9191  char const* vect, char const* uplo,
9192  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
9193  double* AB, lapack_int const* ldab,
9194  double const* BB, lapack_int const* ldbb,
9195  double* X, lapack_int const* ldx,
9196  double* work,
9197  lapack_int* info );
9198 
9199 #define LAPACK_ssbgst LAPACK_GLOBAL(ssbgst,SSBGST)
9200 void LAPACK_ssbgst(
9201  char const* vect, char const* uplo,
9202  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
9203  float* AB, lapack_int const* ldab,
9204  float const* BB, lapack_int const* ldbb,
9205  float* X, lapack_int const* ldx,
9206  float* work,
9207  lapack_int* info );
9208 
9209 #define LAPACK_dsbgv LAPACK_GLOBAL(dsbgv,DSBGV)
9210 void LAPACK_dsbgv(
9211  char const* jobz, char const* uplo,
9212  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
9213  double* AB, lapack_int const* ldab,
9214  double* BB, lapack_int const* ldbb,
9215  double* W,
9216  double* Z, lapack_int const* ldz,
9217  double* work,
9218  lapack_int* info );
9219 
9220 #define LAPACK_ssbgv LAPACK_GLOBAL(ssbgv,SSBGV)
9221 void LAPACK_ssbgv(
9222  char const* jobz, char const* uplo,
9223  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
9224  float* AB, lapack_int const* ldab,
9225  float* BB, lapack_int const* ldbb,
9226  float* W,
9227  float* Z, lapack_int const* ldz,
9228  float* work,
9229  lapack_int* info );
9230 
9231 #define LAPACK_dsbgvd LAPACK_GLOBAL(dsbgvd,DSBGVD)
9232 void LAPACK_dsbgvd(
9233  char const* jobz, char const* uplo,
9234  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
9235  double* AB, lapack_int const* ldab,
9236  double* BB, lapack_int const* ldbb,
9237  double* W,
9238  double* Z, lapack_int const* ldz,
9239  double* work, lapack_int const* lwork,
9240  lapack_int* iwork, lapack_int const* liwork,
9241  lapack_int* info );
9242 
9243 #define LAPACK_ssbgvd LAPACK_GLOBAL(ssbgvd,SSBGVD)
9244 void LAPACK_ssbgvd(
9245  char const* jobz, char const* uplo,
9246  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
9247  float* AB, lapack_int const* ldab,
9248  float* BB, lapack_int const* ldbb,
9249  float* W,
9250  float* Z, lapack_int const* ldz,
9251  float* work, lapack_int const* lwork,
9252  lapack_int* iwork, lapack_int const* liwork,
9253  lapack_int* info );
9254 
9255 #define LAPACK_dsbgvx LAPACK_GLOBAL(dsbgvx,DSBGVX)
9256 void LAPACK_dsbgvx(
9257  char const* jobz, char const* range, char const* uplo,
9258  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
9259  double* AB, lapack_int const* ldab,
9260  double* BB, lapack_int const* ldbb,
9261  double* Q, lapack_int const* ldq,
9262  double const* vl,
9263  double const* vu, lapack_int const* il, lapack_int const* iu,
9264  double const* abstol, lapack_int* m,
9265  double* W,
9266  double* Z, lapack_int const* ldz,
9267  double* work,
9268  lapack_int* iwork, lapack_int* IFAIL,
9269  lapack_int* info );
9270 
9271 #define LAPACK_ssbgvx LAPACK_GLOBAL(ssbgvx,SSBGVX)
9272 void LAPACK_ssbgvx(
9273  char const* jobz, char const* range, char const* uplo,
9274  lapack_int const* n, lapack_int const* ka, lapack_int const* kb,
9275  float* AB, lapack_int const* ldab,
9276  float* BB, lapack_int const* ldbb,
9277  float* Q, lapack_int const* ldq,
9278  float const* vl,
9279  float const* vu, lapack_int const* il, lapack_int const* iu,
9280  float const* abstol, lapack_int* m,
9281  float* W,
9282  float* Z, lapack_int const* ldz,
9283  float* work,
9284  lapack_int* iwork, lapack_int* IFAIL,
9285  lapack_int* info );
9286 
9287 #define LAPACK_dsbtrd LAPACK_GLOBAL(dsbtrd,DSBTRD)
9288 void LAPACK_dsbtrd(
9289  char const* vect, char const* uplo,
9290  lapack_int const* n, lapack_int const* kd,
9291  double* AB, lapack_int const* ldab,
9292  double* D,
9293  double* E,
9294  double* Q, lapack_int const* ldq,
9295  double* work,
9296  lapack_int* info );
9297 
9298 #define LAPACK_ssbtrd LAPACK_GLOBAL(ssbtrd,SSBTRD)
9299 void LAPACK_ssbtrd(
9300  char const* vect, char const* uplo,
9301  lapack_int const* n, lapack_int const* kd,
9302  float* AB, lapack_int const* ldab,
9303  float* D,
9304  float* E,
9305  float* Q, lapack_int const* ldq,
9306  float* work,
9307  lapack_int* info );
9308 
9309 #define LAPACK_dsfrk LAPACK_GLOBAL(dsfrk,DSFRK)
9310 void LAPACK_dsfrk(
9311  char const* transr, char const* uplo, char const* trans,
9312  lapack_int const* n, lapack_int const* k,
9313  double const* alpha,
9314  double const* A, lapack_int const* lda,
9315  double const* beta,
9316  double* C );
9317 
9318 #define LAPACK_ssfrk LAPACK_GLOBAL(ssfrk,SSFRK)
9319 void LAPACK_ssfrk(
9320  char const* transr, char const* uplo, char const* trans,
9321  lapack_int const* n, lapack_int const* k,
9322  float const* alpha,
9323  float const* A, lapack_int const* lda,
9324  float const* beta,
9325  float* C );
9326 
9327 #define LAPACK_cspcon LAPACK_GLOBAL(cspcon,CSPCON)
9328 void LAPACK_cspcon(
9329  char const* uplo,
9330  lapack_int const* n,
9331  lapack_complex_float const* AP, lapack_int const* ipiv,
9332  float const* anorm,
9333  float* rcond,
9334  lapack_complex_float* work,
9335  lapack_int* info );
9336 
9337 #define LAPACK_dspcon LAPACK_GLOBAL(dspcon,DSPCON)
9338 void LAPACK_dspcon(
9339  char const* uplo,
9340  lapack_int const* n,
9341  double const* AP, lapack_int const* ipiv,
9342  double const* anorm,
9343  double* rcond,
9344  double* work,
9345  lapack_int* iwork,
9346  lapack_int* info );
9347 
9348 #define LAPACK_sspcon LAPACK_GLOBAL(sspcon,SSPCON)
9349 void LAPACK_sspcon(
9350  char const* uplo,
9351  lapack_int const* n,
9352  float const* AP, lapack_int const* ipiv,
9353  float const* anorm,
9354  float* rcond,
9355  float* work,
9356  lapack_int* iwork,
9357  lapack_int* info );
9358 
9359 #define LAPACK_zspcon LAPACK_GLOBAL(zspcon,ZSPCON)
9360 void LAPACK_zspcon(
9361  char const* uplo,
9362  lapack_int const* n,
9363  lapack_complex_double const* AP, lapack_int const* ipiv,
9364  double const* anorm,
9365  double* rcond,
9366  lapack_complex_double* work,
9367  lapack_int* info );
9368 
9369 #define LAPACK_dspev LAPACK_GLOBAL(dspev,DSPEV)
9370 void LAPACK_dspev(
9371  char const* jobz, char const* uplo,
9372  lapack_int const* n,
9373  double* AP,
9374  double* W,
9375  double* Z, lapack_int const* ldz,
9376  double* work,
9377  lapack_int* info );
9378 
9379 #define LAPACK_sspev LAPACK_GLOBAL(sspev,SSPEV)
9380 void LAPACK_sspev(
9381  char const* jobz, char const* uplo,
9382  lapack_int const* n,
9383  float* AP,
9384  float* W,
9385  float* Z, lapack_int const* ldz,
9386  float* work,
9387  lapack_int* info );
9388 
9389 #define LAPACK_dspevd LAPACK_GLOBAL(dspevd,DSPEVD)
9390 void LAPACK_dspevd(
9391  char const* jobz, char const* uplo,
9392  lapack_int const* n,
9393  double* AP,
9394  double* W,
9395  double* Z, lapack_int const* ldz,
9396  double* work, lapack_int const* lwork,
9397  lapack_int* iwork, lapack_int const* liwork,
9398  lapack_int* info );
9399 
9400 #define LAPACK_sspevd LAPACK_GLOBAL(sspevd,SSPEVD)
9401 void LAPACK_sspevd(
9402  char const* jobz, char const* uplo,
9403  lapack_int const* n,
9404  float* AP,
9405  float* W,
9406  float* Z, lapack_int const* ldz,
9407  float* work, lapack_int const* lwork,
9408  lapack_int* iwork, lapack_int const* liwork,
9409  lapack_int* info );
9410 
9411 #define LAPACK_dspevx LAPACK_GLOBAL(dspevx,DSPEVX)
9412 void LAPACK_dspevx(
9413  char const* jobz, char const* range, char const* uplo,
9414  lapack_int const* n,
9415  double* AP,
9416  double const* vl,
9417  double const* vu, lapack_int const* il, lapack_int const* iu,
9418  double const* abstol, lapack_int* m,
9419  double* W,
9420  double* Z, lapack_int const* ldz,
9421  double* work,
9422  lapack_int* iwork, lapack_int* IFAIL,
9423  lapack_int* info );
9424 
9425 #define LAPACK_sspevx LAPACK_GLOBAL(sspevx,SSPEVX)
9426 void LAPACK_sspevx(
9427  char const* jobz, char const* range, char const* uplo,
9428  lapack_int const* n,
9429  float* AP,
9430  float const* vl,
9431  float const* vu, lapack_int const* il, lapack_int const* iu,
9432  float const* abstol, lapack_int* m,
9433  float* W,
9434  float* Z, lapack_int const* ldz,
9435  float* work,
9436  lapack_int* iwork, lapack_int* IFAIL,
9437  lapack_int* info );
9438 
9439 #define LAPACK_dspgst LAPACK_GLOBAL(dspgst,DSPGST)
9440 void LAPACK_dspgst(
9441  lapack_int const* itype, char const* uplo,
9442  lapack_int const* n,
9443  double* AP,
9444  double const* BP,
9445  lapack_int* info );
9446 
9447 #define LAPACK_sspgst LAPACK_GLOBAL(sspgst,SSPGST)
9448 void LAPACK_sspgst(
9449  lapack_int const* itype, char const* uplo,
9450  lapack_int const* n,
9451  float* AP,
9452  float const* BP,
9453  lapack_int* info );
9454 
9455 #define LAPACK_dspgv LAPACK_GLOBAL(dspgv,DSPGV)
9456 void LAPACK_dspgv(
9457  lapack_int const* itype, char const* jobz, char const* uplo,
9458  lapack_int const* n,
9459  double* AP,
9460  double* BP,
9461  double* W,
9462  double* Z, lapack_int const* ldz,
9463  double* work,
9464  lapack_int* info );
9465 
9466 #define LAPACK_sspgv LAPACK_GLOBAL(sspgv,SSPGV)
9467 void LAPACK_sspgv(
9468  lapack_int const* itype, char const* jobz, char const* uplo,
9469  lapack_int const* n,
9470  float* AP,
9471  float* BP,
9472  float* W,
9473  float* Z, lapack_int const* ldz,
9474  float* work,
9475  lapack_int* info );
9476 
9477 #define LAPACK_dspgvd LAPACK_GLOBAL(dspgvd,DSPGVD)
9478 void LAPACK_dspgvd(
9479  lapack_int const* itype, char const* jobz, char const* uplo,
9480  lapack_int const* n,
9481  double* AP,
9482  double* BP,
9483  double* W,
9484  double* Z, lapack_int const* ldz,
9485  double* work, lapack_int const* lwork,
9486  lapack_int* iwork, lapack_int const* liwork,
9487  lapack_int* info );
9488 
9489 #define LAPACK_sspgvd LAPACK_GLOBAL(sspgvd,SSPGVD)
9490 void LAPACK_sspgvd(
9491  lapack_int const* itype, char const* jobz, char const* uplo,
9492  lapack_int const* n,
9493  float* AP,
9494  float* BP,
9495  float* W,
9496  float* Z, lapack_int const* ldz,
9497  float* work, lapack_int const* lwork,
9498  lapack_int* iwork, lapack_int const* liwork,
9499  lapack_int* info );
9500 
9501 #define LAPACK_dspgvx LAPACK_GLOBAL(dspgvx,DSPGVX)
9502 void LAPACK_dspgvx(
9503  lapack_int const* itype, char const* jobz, char const* range, char const* uplo,
9504  lapack_int const* n,
9505  double* AP,
9506  double* BP,
9507  double const* vl,
9508  double const* vu, lapack_int const* il, lapack_int const* iu,
9509  double const* abstol, lapack_int* m,
9510  double* W,
9511  double* Z, lapack_int const* ldz,
9512  double* work,
9513  lapack_int* iwork, lapack_int* IFAIL,
9514  lapack_int* info );
9515 
9516 #define LAPACK_sspgvx LAPACK_GLOBAL(sspgvx,SSPGVX)
9517 void LAPACK_sspgvx(
9518  lapack_int const* itype, char const* jobz, char const* range, char const* uplo,
9519  lapack_int const* n,
9520  float* AP,
9521  float* BP,
9522  float const* vl,
9523  float const* vu, lapack_int const* il, lapack_int const* iu,
9524  float const* abstol, lapack_int* m,
9525  float* W,
9526  float* Z, lapack_int const* ldz,
9527  float* work,
9528  lapack_int* iwork, lapack_int* IFAIL,
9529  lapack_int* info );
9530 
9531 #define LAPACK_csprfs LAPACK_GLOBAL(csprfs,CSPRFS)
9532 void LAPACK_csprfs(
9533  char const* uplo,
9534  lapack_int const* n, lapack_int const* nrhs,
9535  lapack_complex_float const* AP,
9536  lapack_complex_float const* AFP, lapack_int const* ipiv,
9537  lapack_complex_float const* B, lapack_int const* ldb,
9538  lapack_complex_float* X, lapack_int const* ldx,
9539  float* ferr,
9540  float* berr,
9541  lapack_complex_float* work,
9542  float* rwork,
9543  lapack_int* info );
9544 
9545 #define LAPACK_dsprfs LAPACK_GLOBAL(dsprfs,DSPRFS)
9546 void LAPACK_dsprfs(
9547  char const* uplo,
9548  lapack_int const* n, lapack_int const* nrhs,
9549  double const* AP,
9550  double const* AFP, lapack_int const* ipiv,
9551  double const* B, lapack_int const* ldb,
9552  double* X, lapack_int const* ldx,
9553  double* ferr,
9554  double* berr,
9555  double* work,
9556  lapack_int* iwork,
9557  lapack_int* info );
9558 
9559 #define LAPACK_ssprfs LAPACK_GLOBAL(ssprfs,SSPRFS)
9560 void LAPACK_ssprfs(
9561  char const* uplo,
9562  lapack_int const* n, lapack_int const* nrhs,
9563  float const* AP,
9564  float const* AFP, lapack_int const* ipiv,
9565  float const* B, lapack_int const* ldb,
9566  float* X, lapack_int const* ldx,
9567  float* ferr,
9568  float* berr,
9569  float* work,
9570  lapack_int* iwork,
9571  lapack_int* info );
9572 
9573 #define LAPACK_zsprfs LAPACK_GLOBAL(zsprfs,ZSPRFS)
9574 void LAPACK_zsprfs(
9575  char const* uplo,
9576  lapack_int const* n, lapack_int const* nrhs,
9577  lapack_complex_double const* AP,
9578  lapack_complex_double const* AFP, lapack_int const* ipiv,
9579  lapack_complex_double const* B, lapack_int const* ldb,
9580  lapack_complex_double* X, lapack_int const* ldx,
9581  double* ferr,
9582  double* berr,
9583  lapack_complex_double* work,
9584  double* rwork,
9585  lapack_int* info );
9586 
9587 #define LAPACK_cspsv LAPACK_GLOBAL(cspsv,CSPSV)
9588 void LAPACK_cspsv(
9589  char const* uplo,
9590  lapack_int const* n, lapack_int const* nrhs,
9591  lapack_complex_float* AP, lapack_int* ipiv,
9592  lapack_complex_float* B, lapack_int const* ldb,
9593  lapack_int* info );
9594 
9595 #define LAPACK_dspsv LAPACK_GLOBAL(dspsv,DSPSV)
9596 void LAPACK_dspsv(
9597  char const* uplo,
9598  lapack_int const* n, lapack_int const* nrhs,
9599  double* AP, lapack_int* ipiv,
9600  double* B, lapack_int const* ldb,
9601  lapack_int* info );
9602 
9603 #define LAPACK_sspsv LAPACK_GLOBAL(sspsv,SSPSV)
9604 void LAPACK_sspsv(
9605  char const* uplo,
9606  lapack_int const* n, lapack_int const* nrhs,
9607  float* AP, lapack_int* ipiv,
9608  float* B, lapack_int const* ldb,
9609  lapack_int* info );
9610 
9611 #define LAPACK_zspsv LAPACK_GLOBAL(zspsv,ZSPSV)
9612 void LAPACK_zspsv(
9613  char const* uplo,
9614  lapack_int const* n, lapack_int const* nrhs,
9615  lapack_complex_double* AP, lapack_int* ipiv,
9616  lapack_complex_double* B, lapack_int const* ldb,
9617  lapack_int* info );
9618 
9619 #define LAPACK_cspsvx LAPACK_GLOBAL(cspsvx,CSPSVX)
9620 void LAPACK_cspsvx(
9621  char const* fact, char const* uplo,
9622  lapack_int const* n, lapack_int const* nrhs,
9623  lapack_complex_float const* AP,
9624  lapack_complex_float* AFP, lapack_int* ipiv,
9625  lapack_complex_float const* B, lapack_int const* ldb,
9626  lapack_complex_float* X, lapack_int const* ldx,
9627  float* rcond,
9628  float* ferr,
9629  float* berr,
9630  lapack_complex_float* work,
9631  float* rwork,
9632  lapack_int* info );
9633 
9634 #define LAPACK_dspsvx LAPACK_GLOBAL(dspsvx,DSPSVX)
9635 void LAPACK_dspsvx(
9636  char const* fact, char const* uplo,
9637  lapack_int const* n, lapack_int const* nrhs,
9638  double const* AP,
9639  double* AFP, lapack_int* ipiv,
9640  double const* B, lapack_int const* ldb,
9641  double* X, lapack_int const* ldx,
9642  double* rcond,
9643  double* ferr,
9644  double* berr,
9645  double* work,
9646  lapack_int* iwork,
9647  lapack_int* info );
9648 
9649 #define LAPACK_sspsvx LAPACK_GLOBAL(sspsvx,SSPSVX)
9650 void LAPACK_sspsvx(
9651  char const* fact, char const* uplo,
9652  lapack_int const* n, lapack_int const* nrhs,
9653  float const* AP,
9654  float* AFP, lapack_int* ipiv,
9655  float const* B, lapack_int const* ldb,
9656  float* X, lapack_int const* ldx,
9657  float* rcond,
9658  float* ferr,
9659  float* berr,
9660  float* work,
9661  lapack_int* iwork,
9662  lapack_int* info );
9663 
9664 #define LAPACK_zspsvx LAPACK_GLOBAL(zspsvx,ZSPSVX)
9665 void LAPACK_zspsvx(
9666  char const* fact, char const* uplo,
9667  lapack_int const* n, lapack_int const* nrhs,
9668  lapack_complex_double const* AP,
9669  lapack_complex_double* AFP, lapack_int* ipiv,
9670  lapack_complex_double const* B, lapack_int const* ldb,
9671  lapack_complex_double* X, lapack_int const* ldx,
9672  double* rcond,
9673  double* ferr,
9674  double* berr,
9675  lapack_complex_double* work,
9676  double* rwork,
9677  lapack_int* info );
9678 
9679 #define LAPACK_dsptrd LAPACK_GLOBAL(dsptrd,DSPTRD)
9680 void LAPACK_dsptrd(
9681  char const* uplo,
9682  lapack_int const* n,
9683  double* AP,
9684  double* D,
9685  double* E,
9686  double* tau,
9687  lapack_int* info );
9688 
9689 #define LAPACK_ssptrd LAPACK_GLOBAL(ssptrd,SSPTRD)
9690 void LAPACK_ssptrd(
9691  char const* uplo,
9692  lapack_int const* n,
9693  float* AP,
9694  float* D,
9695  float* E,
9696  float* tau,
9697  lapack_int* info );
9698 
9699 #define LAPACK_csptrf LAPACK_GLOBAL(csptrf,CSPTRF)
9700 void LAPACK_csptrf(
9701  char const* uplo,
9702  lapack_int const* n,
9703  lapack_complex_float* AP, lapack_int* ipiv,
9704  lapack_int* info );
9705 
9706 #define LAPACK_dsptrf LAPACK_GLOBAL(dsptrf,DSPTRF)
9707 void LAPACK_dsptrf(
9708  char const* uplo,
9709  lapack_int const* n,
9710  double* AP, lapack_int* ipiv,
9711  lapack_int* info );
9712 
9713 #define LAPACK_ssptrf LAPACK_GLOBAL(ssptrf,SSPTRF)
9714 void LAPACK_ssptrf(
9715  char const* uplo,
9716  lapack_int const* n,
9717  float* AP, lapack_int* ipiv,
9718  lapack_int* info );
9719 
9720 #define LAPACK_zsptrf LAPACK_GLOBAL(zsptrf,ZSPTRF)
9721 void LAPACK_zsptrf(
9722  char const* uplo,
9723  lapack_int const* n,
9724  lapack_complex_double* AP, lapack_int* ipiv,
9725  lapack_int* info );
9726 
9727 #define LAPACK_csptri LAPACK_GLOBAL(csptri,CSPTRI)
9728 void LAPACK_csptri(
9729  char const* uplo,
9730  lapack_int const* n,
9731  lapack_complex_float* AP, lapack_int const* ipiv,
9732  lapack_complex_float* work,
9733  lapack_int* info );
9734 
9735 #define LAPACK_dsptri LAPACK_GLOBAL(dsptri,DSPTRI)
9736 void LAPACK_dsptri(
9737  char const* uplo,
9738  lapack_int const* n,
9739  double* AP, lapack_int const* ipiv,
9740  double* work,
9741  lapack_int* info );
9742 
9743 #define LAPACK_ssptri LAPACK_GLOBAL(ssptri,SSPTRI)
9744 void LAPACK_ssptri(
9745  char const* uplo,
9746  lapack_int const* n,
9747  float* AP, lapack_int const* ipiv,
9748  float* work,
9749  lapack_int* info );
9750 
9751 #define LAPACK_zsptri LAPACK_GLOBAL(zsptri,ZSPTRI)
9752 void LAPACK_zsptri(
9753  char const* uplo,
9754  lapack_int const* n,
9755  lapack_complex_double* AP, lapack_int const* ipiv,
9756  lapack_complex_double* work,
9757  lapack_int* info );
9758 
9759 #define LAPACK_csptrs LAPACK_GLOBAL(csptrs,CSPTRS)
9760 void LAPACK_csptrs(
9761  char const* uplo,
9762  lapack_int const* n, lapack_int const* nrhs,
9763  lapack_complex_float const* AP, lapack_int const* ipiv,
9764  lapack_complex_float* B, lapack_int const* ldb,
9765  lapack_int* info );
9766 
9767 #define LAPACK_dsptrs LAPACK_GLOBAL(dsptrs,DSPTRS)
9768 void LAPACK_dsptrs(
9769  char const* uplo,
9770  lapack_int const* n, lapack_int const* nrhs,
9771  double const* AP, lapack_int const* ipiv,
9772  double* B, lapack_int const* ldb,
9773  lapack_int* info );
9774 
9775 #define LAPACK_ssptrs LAPACK_GLOBAL(ssptrs,SSPTRS)
9776 void LAPACK_ssptrs(
9777  char const* uplo,
9778  lapack_int const* n, lapack_int const* nrhs,
9779  float const* AP, lapack_int const* ipiv,
9780  float* B, lapack_int const* ldb,
9781  lapack_int* info );
9782 
9783 #define LAPACK_zsptrs LAPACK_GLOBAL(zsptrs,ZSPTRS)
9784 void LAPACK_zsptrs(
9785  char const* uplo,
9786  lapack_int const* n, lapack_int const* nrhs,
9787  lapack_complex_double const* AP, lapack_int const* ipiv,
9788  lapack_complex_double* B, lapack_int const* ldb,
9789  lapack_int* info );
9790 
9791 #define LAPACK_dstebz LAPACK_GLOBAL(dstebz,DSTEBZ)
9792 void LAPACK_dstebz(
9793  char const* range, char const* order,
9794  lapack_int const* n,
9795  double const* vl,
9796  double const* vu, lapack_int const* il, lapack_int const* iu,
9797  double const* abstol,
9798  double const* D,
9799  double const* E, lapack_int* m, lapack_int* nsplit,
9800  double* W, lapack_int* IBLOCK, lapack_int* ISPLIT,
9801  double* work,
9802  lapack_int* iwork,
9803  lapack_int* info );
9804 
9805 #define LAPACK_sstebz LAPACK_GLOBAL(sstebz,SSTEBZ)
9806 void LAPACK_sstebz(
9807  char const* range, char const* order,
9808  lapack_int const* n,
9809  float const* vl,
9810  float const* vu, lapack_int const* il, lapack_int const* iu,
9811  float const* abstol,
9812  float const* D,
9813  float const* E, lapack_int* m, lapack_int* nsplit,
9814  float* W, lapack_int* IBLOCK, lapack_int* ISPLIT,
9815  float* work,
9816  lapack_int* iwork,
9817  lapack_int* info );
9818 
9819 #define LAPACK_cstedc LAPACK_GLOBAL(cstedc,CSTEDC)
9820 void LAPACK_cstedc(
9821  char const* compz,
9822  lapack_int const* n,
9823  float* D,
9824  float* E,
9825  lapack_complex_float* Z, lapack_int const* ldz,
9826  lapack_complex_float* work, lapack_int const* lwork,
9827  float* rwork, lapack_int const* lrwork,
9828  lapack_int* iwork, lapack_int const* liwork,
9829  lapack_int* info );
9830 
9831 #define LAPACK_dstedc LAPACK_GLOBAL(dstedc,DSTEDC)
9832 void LAPACK_dstedc(
9833  char const* compz,
9834  lapack_int const* n,
9835  double* D,
9836  double* E,
9837  double* Z, lapack_int const* ldz,
9838  double* work, lapack_int const* lwork,
9839  lapack_int* iwork, lapack_int const* liwork,
9840  lapack_int* info );
9841 
9842 #define LAPACK_sstedc LAPACK_GLOBAL(sstedc,SSTEDC)
9843 void LAPACK_sstedc(
9844  char const* compz,
9845  lapack_int const* n,
9846  float* D,
9847  float* E,
9848  float* Z, lapack_int const* ldz,
9849  float* work, lapack_int const* lwork,
9850  lapack_int* iwork, lapack_int const* liwork,
9851  lapack_int* info );
9852 
9853 #define LAPACK_zstedc LAPACK_GLOBAL(zstedc,ZSTEDC)
9854 void LAPACK_zstedc(
9855  char const* compz,
9856  lapack_int const* n,
9857  double* D,
9858  double* E,
9859  lapack_complex_double* Z, lapack_int const* ldz,
9860  lapack_complex_double* work, lapack_int const* lwork,
9861  double* rwork, lapack_int const* lrwork,
9862  lapack_int* iwork, lapack_int const* liwork,
9863  lapack_int* info );
9864 
9865 #define LAPACK_cstegr LAPACK_GLOBAL(cstegr,CSTEGR)
9866 void LAPACK_cstegr(
9867  char const* jobz, char const* range,
9868  lapack_int const* n,
9869  float* D,
9870  float* E,
9871  float const* vl,
9872  float const* vu, lapack_int const* il, lapack_int const* iu,
9873  float const* abstol, lapack_int* m,
9874  float* W,
9875  lapack_complex_float* Z, lapack_int const* ldz, lapack_int* ISUPPZ,
9876  float* work, lapack_int const* lwork,
9877  lapack_int* iwork, lapack_int const* liwork,
9878  lapack_int* info );
9879 
9880 #define LAPACK_dstegr LAPACK_GLOBAL(dstegr,DSTEGR)
9881 void LAPACK_dstegr(
9882  char const* jobz, char const* range,
9883  lapack_int const* n,
9884  double* D,
9885  double* E,
9886  double const* vl,
9887  double const* vu, lapack_int const* il, lapack_int const* iu,
9888  double const* abstol, lapack_int* m,
9889  double* W,
9890  double* Z, lapack_int const* ldz, lapack_int* ISUPPZ,
9891  double* work, lapack_int const* lwork,
9892  lapack_int* iwork, lapack_int const* liwork,
9893  lapack_int* info );
9894 
9895 #define LAPACK_sstegr LAPACK_GLOBAL(sstegr,SSTEGR)
9896 void LAPACK_sstegr(
9897  char const* jobz, char const* range,
9898  lapack_int const* n,
9899  float* D,
9900  float* E,
9901  float const* vl,
9902  float const* vu, lapack_int const* il, lapack_int const* iu,
9903  float const* abstol, lapack_int* m,
9904  float* W,
9905  float* Z, lapack_int const* ldz, lapack_int* ISUPPZ,
9906  float* work, lapack_int const* lwork,
9907  lapack_int* iwork, lapack_int const* liwork,
9908  lapack_int* info );
9909 
9910 #define LAPACK_zstegr LAPACK_GLOBAL(zstegr,ZSTEGR)
9911 void LAPACK_zstegr(
9912  char const* jobz, char const* range,
9913  lapack_int const* n,
9914  double* D,
9915  double* E,
9916  double const* vl,
9917  double const* vu, lapack_int const* il, lapack_int const* iu,
9918  double const* abstol, lapack_int* m,
9919  double* W,
9920  lapack_complex_double* Z, lapack_int const* ldz, lapack_int* ISUPPZ,
9921  double* work, lapack_int const* lwork,
9922  lapack_int* iwork, lapack_int const* liwork,
9923  lapack_int* info );
9924 
9925 #define LAPACK_cstein LAPACK_GLOBAL(cstein,CSTEIN)
9926 void LAPACK_cstein(
9927  lapack_int const* n,
9928  float const* D,
9929  float const* E, lapack_int const* m,
9930  float const* W, lapack_int const* IBLOCK, lapack_int const* ISPLIT,
9931  lapack_complex_float* Z, lapack_int const* ldz,
9932  float* work,
9933  lapack_int* iwork, lapack_int* IFAIL,
9934  lapack_int* info );
9935 
9936 #define LAPACK_dstein LAPACK_GLOBAL(dstein,DSTEIN)
9937 void LAPACK_dstein(
9938  lapack_int const* n,
9939  double const* D,
9940  double const* E, lapack_int const* m,
9941  double const* W, lapack_int const* IBLOCK, lapack_int const* ISPLIT,
9942  double* Z, lapack_int const* ldz,
9943  double* work,
9944  lapack_int* iwork, lapack_int* IFAIL,
9945  lapack_int* info );
9946 
9947 #define LAPACK_sstein LAPACK_GLOBAL(sstein,SSTEIN)
9948 void LAPACK_sstein(
9949  lapack_int const* n,
9950  float const* D,
9951  float const* E, lapack_int const* m,
9952  float const* W, lapack_int const* IBLOCK, lapack_int const* ISPLIT,
9953  float* Z, lapack_int const* ldz,
9954  float* work,
9955  lapack_int* iwork, lapack_int* IFAIL,
9956  lapack_int* info );
9957 
9958 #define LAPACK_zstein LAPACK_GLOBAL(zstein,ZSTEIN)
9959 void LAPACK_zstein(
9960  lapack_int const* n,
9961  double const* D,
9962  double const* E, lapack_int const* m,
9963  double const* W, lapack_int const* IBLOCK, lapack_int const* ISPLIT,
9964  lapack_complex_double* Z, lapack_int const* ldz,
9965  double* work,
9966  lapack_int* iwork, lapack_int* IFAIL,
9967  lapack_int* info );
9968 
9969 #define LAPACK_cstemr LAPACK_GLOBAL(cstemr,CSTEMR)
9970 void LAPACK_cstemr(
9971  char const* jobz, char const* range,
9972  lapack_int const* n,
9973  float* D,
9974  float* E,
9975  float const* vl,
9976  float const* vu, lapack_int const* il, lapack_int const* iu, lapack_int* m,
9977  float* W,
9978  lapack_complex_float* Z, lapack_int const* ldz, lapack_int const* nzc, lapack_int* ISUPPZ, lapack_logical* tryrac,
9979  float* work, lapack_int const* lwork,
9980  lapack_int* iwork, lapack_int const* liwork,
9981  lapack_int* info );
9982 
9983 #define LAPACK_dstemr LAPACK_GLOBAL(dstemr,DSTEMR)
9984 void LAPACK_dstemr(
9985  char const* jobz, char const* range,
9986  lapack_int const* n,
9987  double* D,
9988  double* E,
9989  double const* vl,
9990  double const* vu, lapack_int const* il, lapack_int const* iu, lapack_int* m,
9991  double* W,
9992  double* Z, lapack_int const* ldz, lapack_int const* nzc, lapack_int* ISUPPZ, lapack_logical* tryrac,
9993  double* work, lapack_int const* lwork,
9994  lapack_int* iwork, lapack_int const* liwork,
9995  lapack_int* info );
9996 
9997 #define LAPACK_sstemr LAPACK_GLOBAL(sstemr,SSTEMR)
9998 void LAPACK_sstemr(
9999  char const* jobz, char const* range,
10000  lapack_int const* n,
10001  float* D,
10002  float* E,
10003  float const* vl,
10004  float const* vu, lapack_int const* il, lapack_int const* iu, lapack_int* m,
10005  float* W,
10006  float* Z, lapack_int const* ldz, lapack_int const* nzc, lapack_int* ISUPPZ, lapack_logical* tryrac,
10007  float* work, lapack_int const* lwork,
10008  lapack_int* iwork, lapack_int const* liwork,
10009  lapack_int* info );
10010 
10011 #define LAPACK_zstemr LAPACK_GLOBAL(zstemr,ZSTEMR)
10012 void LAPACK_zstemr(
10013  char const* jobz, char const* range,
10014  lapack_int const* n,
10015  double* D,
10016  double* E,
10017  double const* vl,
10018  double const* vu, lapack_int const* il, lapack_int const* iu, lapack_int* m,
10019  double* W,
10020  lapack_complex_double* Z, lapack_int const* ldz, lapack_int const* nzc, lapack_int* ISUPPZ, lapack_logical* tryrac,
10021  double* work, lapack_int const* lwork,
10022  lapack_int* iwork, lapack_int const* liwork,
10023  lapack_int* info );
10024 
10025 #define LAPACK_csteqr LAPACK_GLOBAL(csteqr,CSTEQR)
10026 void LAPACK_csteqr(
10027  char const* compz,
10028  lapack_int const* n,
10029  float* D,
10030  float* E,
10031  lapack_complex_float* Z, lapack_int const* ldz,
10032  float* work,
10033  lapack_int* info );
10034 
10035 #define LAPACK_dsteqr LAPACK_GLOBAL(dsteqr,DSTEQR)
10036 void LAPACK_dsteqr(
10037  char const* compz,
10038  lapack_int const* n,
10039  double* D,
10040  double* E,
10041  double* Z, lapack_int const* ldz,
10042  double* work,
10043  lapack_int* info );
10044 
10045 #define LAPACK_ssteqr LAPACK_GLOBAL(ssteqr,SSTEQR)
10046 void LAPACK_ssteqr(
10047  char const* compz,
10048  lapack_int const* n,
10049  float* D,
10050  float* E,
10051  float* Z, lapack_int const* ldz,
10052  float* work,
10053  lapack_int* info );
10054 
10055 #define LAPACK_zsteqr LAPACK_GLOBAL(zsteqr,ZSTEQR)
10056 void LAPACK_zsteqr(
10057  char const* compz,
10058  lapack_int const* n,
10059  double* D,
10060  double* E,
10061  lapack_complex_double* Z, lapack_int const* ldz,
10062  double* work,
10063  lapack_int* info );
10064 
10065 #define LAPACK_dsterf LAPACK_GLOBAL(dsterf,DSTERF)
10066 void LAPACK_dsterf(
10067  lapack_int const* n,
10068  double* D,
10069  double* E,
10070  lapack_int* info );
10071 
10072 #define LAPACK_ssterf LAPACK_GLOBAL(ssterf,SSTERF)
10073 void LAPACK_ssterf(
10074  lapack_int const* n,
10075  float* D,
10076  float* E,
10077  lapack_int* info );
10078 
10079 #define LAPACK_dstev LAPACK_GLOBAL(dstev,DSTEV)
10080 void LAPACK_dstev(
10081  char const* jobz,
10082  lapack_int const* n,
10083  double* D,
10084  double* E,
10085  double* Z, lapack_int const* ldz,
10086  double* work,
10087  lapack_int* info );
10088 
10089 #define LAPACK_sstev LAPACK_GLOBAL(sstev,SSTEV)
10090 void LAPACK_sstev(
10091  char const* jobz,
10092  lapack_int const* n,
10093  float* D,
10094  float* E,
10095  float* Z, lapack_int const* ldz,
10096  float* work,
10097  lapack_int* info );
10098 
10099 #define LAPACK_dstevd LAPACK_GLOBAL(dstevd,DSTEVD)
10100 void LAPACK_dstevd(
10101  char const* jobz,
10102  lapack_int const* n,
10103  double* D,
10104  double* E,
10105  double* Z, lapack_int const* ldz,
10106  double* work, lapack_int const* lwork,
10107  lapack_int* iwork, lapack_int const* liwork,
10108  lapack_int* info );
10109 
10110 #define LAPACK_sstevd LAPACK_GLOBAL(sstevd,SSTEVD)
10111 void LAPACK_sstevd(
10112  char const* jobz,
10113  lapack_int const* n,
10114  float* D,
10115  float* E,
10116  float* Z, lapack_int const* ldz,
10117  float* work, lapack_int const* lwork,
10118  lapack_int* iwork, lapack_int const* liwork,
10119  lapack_int* info );
10120 
10121 #define LAPACK_dstevr LAPACK_GLOBAL(dstevr,DSTEVR)
10122 void LAPACK_dstevr(
10123  char const* jobz, char const* range,
10124  lapack_int const* n,
10125  double* D,
10126  double* E,
10127  double const* vl,
10128  double const* vu, lapack_int const* il, lapack_int const* iu,
10129  double const* abstol, lapack_int* m,
10130  double* W,
10131  double* Z, lapack_int const* ldz, lapack_int* ISUPPZ,
10132  double* work, lapack_int const* lwork,
10133  lapack_int* iwork, lapack_int const* liwork,
10134  lapack_int* info );
10135 
10136 #define LAPACK_sstevr LAPACK_GLOBAL(sstevr,SSTEVR)
10137 void LAPACK_sstevr(
10138  char const* jobz, char const* range,
10139  lapack_int const* n,
10140  float* D,
10141  float* E,
10142  float const* vl,
10143  float const* vu, lapack_int const* il, lapack_int const* iu,
10144  float const* abstol, lapack_int* m,
10145  float* W,
10146  float* Z, lapack_int const* ldz, lapack_int* ISUPPZ,
10147  float* work, lapack_int const* lwork,
10148  lapack_int* iwork, lapack_int const* liwork,
10149  lapack_int* info );
10150 
10151 #define LAPACK_dstevx LAPACK_GLOBAL(dstevx,DSTEVX)
10152 void LAPACK_dstevx(
10153  char const* jobz, char const* range,
10154  lapack_int const* n,
10155  double* D,
10156  double* E,
10157  double const* vl,
10158  double const* vu, lapack_int const* il, lapack_int const* iu,
10159  double const* abstol, lapack_int* m,
10160  double* W,
10161  double* Z, lapack_int const* ldz,
10162  double* work,
10163  lapack_int* iwork, lapack_int* IFAIL,
10164  lapack_int* info );
10165 
10166 #define LAPACK_sstevx LAPACK_GLOBAL(sstevx,SSTEVX)
10167 void LAPACK_sstevx(
10168  char const* jobz, char const* range,
10169  lapack_int const* n,
10170  float* D,
10171  float* E,
10172  float const* vl,
10173  float const* vu, lapack_int const* il, lapack_int const* iu,
10174  float const* abstol, lapack_int* m,
10175  float* W,
10176  float* Z, lapack_int const* ldz,
10177  float* work,
10178  lapack_int* iwork, lapack_int* IFAIL,
10179  lapack_int* info );
10180 
10181 #define LAPACK_csycon LAPACK_GLOBAL(csycon,CSYCON)
10182 void LAPACK_csycon(
10183  char const* uplo,
10184  lapack_int const* n,
10185  lapack_complex_float const* A, lapack_int const* lda, lapack_int const* ipiv,
10186  float const* anorm,
10187  float* rcond,
10188  lapack_complex_float* work,
10189  lapack_int* info );
10190 
10191 #define LAPACK_dsycon LAPACK_GLOBAL(dsycon,DSYCON)
10192 void LAPACK_dsycon(
10193  char const* uplo,
10194  lapack_int const* n,
10195  double const* A, lapack_int const* lda, lapack_int const* ipiv,
10196  double const* anorm,
10197  double* rcond,
10198  double* work,
10199  lapack_int* iwork,
10200  lapack_int* info );
10201 
10202 #define LAPACK_ssycon LAPACK_GLOBAL(ssycon,SSYCON)
10203 void LAPACK_ssycon(
10204  char const* uplo,
10205  lapack_int const* n,
10206  float const* A, lapack_int const* lda, lapack_int const* ipiv,
10207  float const* anorm,
10208  float* rcond,
10209  float* work,
10210  lapack_int* iwork,
10211  lapack_int* info );
10212 
10213 #define LAPACK_zsycon LAPACK_GLOBAL(zsycon,ZSYCON)
10214 void LAPACK_zsycon(
10215  char const* uplo,
10216  lapack_int const* n,
10217  lapack_complex_double const* A, lapack_int const* lda, lapack_int const* ipiv,
10218  double const* anorm,
10219  double* rcond,
10220  lapack_complex_double* work,
10221  lapack_int* info );
10222 
10223 #define LAPACK_csycon_3 LAPACK_GLOBAL(csycon_3,CSYCON_3)
10224 void LAPACK_csycon_3(
10225  char const* uplo,
10226  lapack_int const* n,
10227  lapack_complex_float const* A, lapack_int const* lda,
10228  lapack_complex_float const* E, lapack_int const* ipiv,
10229  float const* anorm,
10230  float* rcond,
10231  lapack_complex_float* work,
10232  lapack_int* info );
10233 
10234 #define LAPACK_dsycon_3 LAPACK_GLOBAL(dsycon_3,DSYCON_3)
10235 void LAPACK_dsycon_3(
10236  char const* uplo,
10237  lapack_int const* n,
10238  double const* A, lapack_int const* lda,
10239  double const* E, lapack_int const* ipiv,
10240  double const* anorm,
10241  double* rcond,
10242  double* work,
10243  lapack_int* iwork,
10244  lapack_int* info );
10245 
10246 #define LAPACK_ssycon_3 LAPACK_GLOBAL(ssycon_3,SSYCON_3)
10247 void LAPACK_ssycon_3(
10248  char const* uplo,
10249  lapack_int const* n,
10250  float const* A, lapack_int const* lda,
10251  float const* E, lapack_int const* ipiv,
10252  float const* anorm,
10253  float* rcond,
10254  float* work,
10255  lapack_int* iwork,
10256  lapack_int* info );
10257 
10258 #define LAPACK_zsycon_3 LAPACK_GLOBAL(zsycon_3,ZSYCON_3)
10259 void LAPACK_zsycon_3(
10260  char const* uplo,
10261  lapack_int const* n,
10262  lapack_complex_double const* A, lapack_int const* lda,
10263  lapack_complex_double const* E, lapack_int const* ipiv,
10264  double const* anorm,
10265  double* rcond,
10266  lapack_complex_double* work,
10267  lapack_int* info );
10268 
10269 #define LAPACK_csyconv LAPACK_GLOBAL(csyconv,CSYCONV)
10270 void LAPACK_csyconv(
10271  char const* uplo, char const* way,
10272  lapack_int const* n,
10273  lapack_complex_float* A, lapack_int const* lda, lapack_int const* ipiv,
10274  lapack_complex_float* E,
10275  lapack_int* info );
10276 
10277 #define LAPACK_dsyconv LAPACK_GLOBAL(dsyconv,DSYCONV)
10278 void LAPACK_dsyconv(
10279  char const* uplo, char const* way,
10280  lapack_int const* n,
10281  double* A, lapack_int const* lda, lapack_int const* ipiv,
10282  double* E,
10283  lapack_int* info );
10284 
10285 #define LAPACK_ssyconv LAPACK_GLOBAL(ssyconv,SSYCONV)
10286 void LAPACK_ssyconv(
10287  char const* uplo, char const* way,
10288  lapack_int const* n,
10289  float* A, lapack_int const* lda, lapack_int const* ipiv,
10290  float* E,
10291  lapack_int* info );
10292 
10293 #define LAPACK_zsyconv LAPACK_GLOBAL(zsyconv,ZSYCONV)
10294 void LAPACK_zsyconv(
10295  char const* uplo, char const* way,
10296  lapack_int const* n,
10297  lapack_complex_double* A, lapack_int const* lda, lapack_int const* ipiv,
10298  lapack_complex_double* E,
10299  lapack_int* info );
10300 
10301 #define LAPACK_csyequb LAPACK_GLOBAL(csyequb,CSYEQUB)
10302 void LAPACK_csyequb(
10303  char const* uplo,
10304  lapack_int const* n,
10305  lapack_complex_float const* A, lapack_int const* lda,
10306  float* S,
10307  float* scond,
10308  float* amax,
10309  lapack_complex_float* work,
10310  lapack_int* info );
10311 
10312 #define LAPACK_dsyequb LAPACK_GLOBAL(dsyequb,DSYEQUB)
10313 void LAPACK_dsyequb(
10314  char const* uplo,
10315  lapack_int const* n,
10316  double const* A, lapack_int const* lda,
10317  double* S,
10318  double* scond,
10319  double* amax,
10320  double* work,
10321  lapack_int* info );
10322 
10323 #define LAPACK_ssyequb LAPACK_GLOBAL(ssyequb,SSYEQUB)
10324 void LAPACK_ssyequb(
10325  char const* uplo,
10326  lapack_int const* n,
10327  float const* A, lapack_int const* lda,
10328  float* S,
10329  float* scond,
10330  float* amax,
10331  float* work,
10332  lapack_int* info );
10333 
10334 #define LAPACK_zsyequb LAPACK_GLOBAL(zsyequb,ZSYEQUB)
10335 void LAPACK_zsyequb(
10336  char const* uplo,
10337  lapack_int const* n,
10338  lapack_complex_double const* A, lapack_int const* lda,
10339  double* S,
10340  double* scond,
10341  double* amax,
10342  lapack_complex_double* work,
10343  lapack_int* info );
10344 
10345 #define LAPACK_dsyev LAPACK_GLOBAL(dsyev,DSYEV)
10346 void LAPACK_dsyev(
10347  char const* jobz, char const* uplo,
10348  lapack_int const* n,
10349  double* A, lapack_int const* lda,
10350  double* W,
10351  double* work, lapack_int const* lwork,
10352  lapack_int* info );
10353 
10354 #define LAPACK_ssyev LAPACK_GLOBAL(ssyev,SSYEV)
10355 void LAPACK_ssyev(
10356  char const* jobz, char const* uplo,
10357  lapack_int const* n,
10358  float* A, lapack_int const* lda,
10359  float* W,
10360  float* work, lapack_int const* lwork,
10361  lapack_int* info );
10362 
10363 #define LAPACK_dsyev_2stage LAPACK_GLOBAL(dsyev_2stage,DSYEV_2STAGE)
10364 void LAPACK_dsyev_2stage(
10365  char const* jobz, char const* uplo,
10366  lapack_int const* n,
10367  double* A, lapack_int const* lda,
10368  double* W,
10369  double* work, lapack_int const* lwork,
10370  lapack_int* info );
10371 
10372 #define LAPACK_ssyev_2stage LAPACK_GLOBAL(ssyev_2stage,SSYEV_2STAGE)
10373 void LAPACK_ssyev_2stage(
10374  char const* jobz, char const* uplo,
10375  lapack_int const* n,
10376  float* A, lapack_int const* lda,
10377  float* W,
10378  float* work, lapack_int const* lwork,
10379  lapack_int* info );
10380 
10381 #define LAPACK_dsyevd LAPACK_GLOBAL(dsyevd,DSYEVD)
10382 void LAPACK_dsyevd(
10383  char const* jobz, char const* uplo,
10384  lapack_int const* n,
10385  double* A, lapack_int const* lda,
10386  double* W,
10387  double* work, lapack_int const* lwork,
10388  lapack_int* iwork, lapack_int const* liwork,
10389  lapack_int* info );
10390 
10391 #define LAPACK_ssyevd LAPACK_GLOBAL(ssyevd,SSYEVD)
10392 void LAPACK_ssyevd(
10393  char const* jobz, char const* uplo,
10394  lapack_int const* n,
10395  float* A, lapack_int const* lda,
10396  float* W,
10397  float* work, lapack_int const* lwork,
10398  lapack_int* iwork, lapack_int const* liwork,
10399  lapack_int* info );
10400 
10401 #define LAPACK_dsyevd_2stage LAPACK_GLOBAL(dsyevd_2stage,DSYEVD_2STAGE)
10402 void LAPACK_dsyevd_2stage(
10403  char const* jobz, char const* uplo,
10404  lapack_int const* n,
10405  double* A, lapack_int const* lda,
10406  double* W,
10407  double* work, lapack_int const* lwork,
10408  lapack_int* iwork, lapack_int const* liwork,
10409  lapack_int* info );
10410 
10411 #define LAPACK_ssyevd_2stage LAPACK_GLOBAL(ssyevd_2stage,SSYEVD_2STAGE)
10412 void LAPACK_ssyevd_2stage(
10413  char const* jobz, char const* uplo,
10414  lapack_int const* n,
10415  float* A, lapack_int const* lda,
10416  float* W,
10417  float* work, lapack_int const* lwork,
10418  lapack_int* iwork, lapack_int const* liwork,
10419  lapack_int* info );
10420 
10421 #define LAPACK_dsyevr LAPACK_GLOBAL(dsyevr,DSYEVR)
10422 void LAPACK_dsyevr(
10423  char const* jobz, char const* range, char const* uplo,
10424  lapack_int const* n,
10425  double* A, lapack_int const* lda,
10426  double const* vl,
10427  double const* vu, lapack_int const* il, lapack_int const* iu,
10428  double const* abstol, lapack_int* m,
10429  double* W,
10430  double* Z, lapack_int const* ldz, lapack_int* ISUPPZ,
10431  double* work, lapack_int const* lwork,
10432  lapack_int* iwork, lapack_int const* liwork,
10433  lapack_int* info );
10434 
10435 #define LAPACK_ssyevr LAPACK_GLOBAL(ssyevr,SSYEVR)
10436 void LAPACK_ssyevr(
10437  char const* jobz, char const* range, char const* uplo,
10438  lapack_int const* n,
10439  float* A, lapack_int const* lda,
10440  float const* vl,
10441  float const* vu, lapack_int const* il, lapack_int const* iu,
10442  float const* abstol, lapack_int* m,
10443  float* W,
10444  float* Z, lapack_int const* ldz, lapack_int* ISUPPZ,
10445  float* work, lapack_int const* lwork,
10446  lapack_int* iwork, lapack_int const* liwork,
10447  lapack_int* info );
10448 
10449 #define LAPACK_dsyevr_2stage LAPACK_GLOBAL(dsyevr_2stage,DSYEVR_2STAGE)
10450 void LAPACK_dsyevr_2stage(
10451  char const* jobz, char const* range, char const* uplo,
10452  lapack_int const* n,
10453  double* A, lapack_int const* lda,
10454  double const* vl,
10455  double const* vu, lapack_int const* il, lapack_int const* iu,
10456  double const* abstol, lapack_int* m,
10457  double* W,
10458  double* Z, lapack_int const* ldz, lapack_int* ISUPPZ,
10459  double* work, lapack_int const* lwork,
10460  lapack_int* iwork, lapack_int const* liwork,
10461  lapack_int* info );
10462 
10463 #define LAPACK_ssyevr_2stage LAPACK_GLOBAL(ssyevr_2stage,SSYEVR_2STAGE)
10464 void LAPACK_ssyevr_2stage(
10465  char const* jobz, char const* range, char const* uplo,
10466  lapack_int const* n,
10467  float* A, lapack_int const* lda,
10468  float const* vl,
10469  float const* vu, lapack_int const* il, lapack_int const* iu,
10470  float const* abstol, lapack_int* m,
10471  float* W,
10472  float* Z, lapack_int const* ldz, lapack_int* ISUPPZ,
10473  float* work, lapack_int const* lwork,
10474  lapack_int* iwork, lapack_int const* liwork,
10475  lapack_int* info );
10476 
10477 #define LAPACK_dsyevx LAPACK_GLOBAL(dsyevx,DSYEVX)
10478 void LAPACK_dsyevx(
10479  char const* jobz, char const* range, char const* uplo,
10480  lapack_int const* n,
10481  double* A, lapack_int const* lda,
10482  double const* vl,
10483  double const* vu, lapack_int const* il, lapack_int const* iu,
10484  double const* abstol, lapack_int* m,
10485  double* W,
10486  double* Z, lapack_int const* ldz,
10487  double* work, lapack_int const* lwork,
10488  lapack_int* iwork, lapack_int* IFAIL,
10489  lapack_int* info );
10490 
10491 #define LAPACK_ssyevx LAPACK_GLOBAL(ssyevx,SSYEVX)
10492 void LAPACK_ssyevx(
10493  char const* jobz, char const* range, char const* uplo,
10494  lapack_int const* n,
10495  float* A, lapack_int const* lda,
10496  float const* vl,
10497  float const* vu, lapack_int const* il, lapack_int const* iu,
10498  float const* abstol, lapack_int* m,
10499  float* W,
10500  float* Z, lapack_int const* ldz,
10501  float* work, lapack_int const* lwork,
10502  lapack_int* iwork, lapack_int* IFAIL,
10503  lapack_int* info );
10504 
10505 #define LAPACK_dsyevx_2stage LAPACK_GLOBAL(dsyevx_2stage,DSYEVX_2STAGE)
10506 void LAPACK_dsyevx_2stage(
10507  char const* jobz, char const* range, char const* uplo,
10508  lapack_int const* n,
10509  double* A, lapack_int const* lda,
10510  double const* vl,
10511  double const* vu, lapack_int const* il, lapack_int const* iu,
10512  double const* abstol, lapack_int* m,
10513  double* W,
10514  double* Z, lapack_int const* ldz,
10515  double* work, lapack_int const* lwork,
10516  lapack_int* iwork, lapack_int* IFAIL,
10517  lapack_int* info );
10518 
10519 #define LAPACK_ssyevx_2stage LAPACK_GLOBAL(ssyevx_2stage,SSYEVX_2STAGE)
10520 void LAPACK_ssyevx_2stage(
10521  char const* jobz, char const* range, char const* uplo,
10522  lapack_int const* n,
10523  float* A, lapack_int const* lda,
10524  float const* vl,
10525  float const* vu, lapack_int const* il, lapack_int const* iu,
10526  float const* abstol, lapack_int* m,
10527  float* W,
10528  float* Z, lapack_int const* ldz,
10529  float* work, lapack_int const* lwork,
10530  lapack_int* iwork, lapack_int* IFAIL,
10531  lapack_int* info );
10532 
10533 #define LAPACK_dsygst LAPACK_GLOBAL(dsygst,DSYGST)
10534 void LAPACK_dsygst(
10535  lapack_int const* itype, char const* uplo,
10536  lapack_int const* n,
10537  double* A, lapack_int const* lda,
10538  double const* B, lapack_int const* ldb,
10539  lapack_int* info );
10540 
10541 #define LAPACK_ssygst LAPACK_GLOBAL(ssygst,SSYGST)
10542 void LAPACK_ssygst(
10543  lapack_int const* itype, char const* uplo,
10544  lapack_int const* n,
10545  float* A, lapack_int const* lda,
10546  float const* B, lapack_int const* ldb,
10547  lapack_int* info );
10548 
10549 #define LAPACK_dsygv LAPACK_GLOBAL(dsygv,DSYGV)
10550 void LAPACK_dsygv(
10551  lapack_int const* itype, char const* jobz, char const* uplo,
10552  lapack_int const* n,
10553  double* A, lapack_int const* lda,
10554  double* B, lapack_int const* ldb,
10555  double* W,
10556  double* work, lapack_int const* lwork,
10557  lapack_int* info );
10558 
10559 #define LAPACK_ssygv LAPACK_GLOBAL(ssygv,SSYGV)
10560 void LAPACK_ssygv(
10561  lapack_int const* itype, char const* jobz, char const* uplo,
10562  lapack_int const* n,
10563  float* A, lapack_int const* lda,
10564  float* B, lapack_int const* ldb,
10565  float* W,
10566  float* work, lapack_int const* lwork,
10567  lapack_int* info );
10568 
10569 #define LAPACK_dsygv_2stage LAPACK_GLOBAL(dsygv_2stage,DSYGV_2STAGE)
10570 void LAPACK_dsygv_2stage(
10571  lapack_int const* itype, char const* jobz, char const* uplo,
10572  lapack_int const* n,
10573  double* A, lapack_int const* lda,
10574  double* B, lapack_int const* ldb,
10575  double* W,
10576  double* work, lapack_int const* lwork,
10577  lapack_int* info );
10578 
10579 #define LAPACK_ssygv_2stage LAPACK_GLOBAL(ssygv_2stage,SSYGV_2STAGE)
10580 void LAPACK_ssygv_2stage(
10581  lapack_int const* itype, char const* jobz, char const* uplo,
10582  lapack_int const* n,
10583  float* A, lapack_int const* lda,
10584  float* B, lapack_int const* ldb,
10585  float* W,
10586  float* work, lapack_int const* lwork,
10587  lapack_int* info );
10588 
10589 #define LAPACK_dsygvd LAPACK_GLOBAL(dsygvd,DSYGVD)
10590 void LAPACK_dsygvd(
10591  lapack_int const* itype, char const* jobz, char const* uplo,
10592  lapack_int const* n,
10593  double* A, lapack_int const* lda,
10594  double* B, lapack_int const* ldb,
10595  double* W,
10596  double* work, lapack_int const* lwork,
10597  lapack_int* iwork, lapack_int const* liwork,
10598  lapack_int* info );
10599 
10600 #define LAPACK_ssygvd LAPACK_GLOBAL(ssygvd,SSYGVD)
10601 void LAPACK_ssygvd(
10602  lapack_int const* itype, char const* jobz, char const* uplo,
10603  lapack_int const* n,
10604  float* A, lapack_int const* lda,
10605  float* B, lapack_int const* ldb,
10606  float* W,
10607  float* work, lapack_int const* lwork,
10608  lapack_int* iwork, lapack_int const* liwork,
10609  lapack_int* info );
10610 
10611 #define LAPACK_dsygvx LAPACK_GLOBAL(dsygvx,DSYGVX)
10612 void LAPACK_dsygvx(
10613  lapack_int const* itype, char const* jobz, char const* range, char const* uplo,
10614  lapack_int const* n,
10615  double* A, lapack_int const* lda,
10616  double* B, lapack_int const* ldb,
10617  double const* vl,
10618  double const* vu, lapack_int const* il, lapack_int const* iu,
10619  double const* abstol, lapack_int* m,
10620  double* W,
10621  double* Z, lapack_int const* ldz,
10622  double* work, lapack_int const* lwork,
10623  lapack_int* iwork, lapack_int* IFAIL,
10624  lapack_int* info );
10625 
10626 #define LAPACK_ssygvx LAPACK_GLOBAL(ssygvx,SSYGVX)
10627 void LAPACK_ssygvx(
10628  lapack_int const* itype, char const* jobz, char const* range, char const* uplo,
10629  lapack_int const* n,
10630  float* A, lapack_int const* lda,
10631  float* B, lapack_int const* ldb,
10632  float const* vl,
10633  float const* vu, lapack_int const* il, lapack_int const* iu,
10634  float const* abstol, lapack_int* m,
10635  float* W,
10636  float* Z, lapack_int const* ldz,
10637  float* work, lapack_int const* lwork,
10638  lapack_int* iwork, lapack_int* IFAIL,
10639  lapack_int* info );
10640 
10641 #define LAPACK_csyr LAPACK_GLOBAL(csyr,CSYR)
10642 void LAPACK_csyr(
10643  char const* uplo,
10644  lapack_int const* n,
10645  lapack_complex_float const* alpha,
10646  lapack_complex_float const* X, lapack_int const* incx,
10647  lapack_complex_float* A, lapack_int const* lda );
10648 
10649 #define LAPACK_zsyr LAPACK_GLOBAL(zsyr,ZSYR)
10650 void LAPACK_zsyr(
10651  char const* uplo,
10652  lapack_int const* n,
10653  lapack_complex_double const* alpha,
10654  lapack_complex_double const* X, lapack_int const* incx,
10655  lapack_complex_double* A, lapack_int const* lda );
10656 
10657 #define LAPACK_csyrfs LAPACK_GLOBAL(csyrfs,CSYRFS)
10658 void LAPACK_csyrfs(
10659  char const* uplo,
10660  lapack_int const* n, lapack_int const* nrhs,
10661  lapack_complex_float const* A, lapack_int const* lda,
10662  lapack_complex_float const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
10663  lapack_complex_float const* B, lapack_int const* ldb,
10664  lapack_complex_float* X, lapack_int const* ldx,
10665  float* ferr,
10666  float* berr,
10667  lapack_complex_float* work,
10668  float* rwork,
10669  lapack_int* info );
10670 
10671 #define LAPACK_dsyrfs LAPACK_GLOBAL(dsyrfs,DSYRFS)
10672 void LAPACK_dsyrfs(
10673  char const* uplo,
10674  lapack_int const* n, lapack_int const* nrhs,
10675  double const* A, lapack_int const* lda,
10676  double const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
10677  double const* B, lapack_int const* ldb,
10678  double* X, lapack_int const* ldx,
10679  double* ferr,
10680  double* berr,
10681  double* work,
10682  lapack_int* iwork,
10683  lapack_int* info );
10684 
10685 #define LAPACK_ssyrfs LAPACK_GLOBAL(ssyrfs,SSYRFS)
10686 void LAPACK_ssyrfs(
10687  char const* uplo,
10688  lapack_int const* n, lapack_int const* nrhs,
10689  float const* A, lapack_int const* lda,
10690  float const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
10691  float const* B, lapack_int const* ldb,
10692  float* X, lapack_int const* ldx,
10693  float* ferr,
10694  float* berr,
10695  float* work,
10696  lapack_int* iwork,
10697  lapack_int* info );
10698 
10699 #define LAPACK_zsyrfs LAPACK_GLOBAL(zsyrfs,ZSYRFS)
10700 void LAPACK_zsyrfs(
10701  char const* uplo,
10702  lapack_int const* n, lapack_int const* nrhs,
10703  lapack_complex_double const* A, lapack_int const* lda,
10704  lapack_complex_double const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
10705  lapack_complex_double const* B, lapack_int const* ldb,
10706  lapack_complex_double* X, lapack_int const* ldx,
10707  double* ferr,
10708  double* berr,
10709  lapack_complex_double* work,
10710  double* rwork,
10711  lapack_int* info );
10712 
10713 #define LAPACK_csyrfsx LAPACK_GLOBAL(csyrfsx,CSYRFSX)
10714 void LAPACK_csyrfsx(
10715  char const* uplo, char const* equed,
10716  lapack_int const* n, lapack_int const* nrhs,
10717  lapack_complex_float const* A, lapack_int const* lda,
10718  lapack_complex_float const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
10719  float* S,
10720  lapack_complex_float const* B, lapack_int const* ldb,
10721  lapack_complex_float* X, lapack_int const* ldx,
10722  float* rcond,
10723  float* berr, lapack_int const* n_err_bnds,
10724  float* err_bnds_norm,
10725  float* err_bnds_comp, lapack_int const* nparams,
10726  float* params,
10727  lapack_complex_float* work,
10728  float* rwork,
10729  lapack_int* info );
10730 
10731 #define LAPACK_dsyrfsx LAPACK_GLOBAL(dsyrfsx,DSYRFSX)
10732 void LAPACK_dsyrfsx(
10733  char const* uplo, char const* equed,
10734  lapack_int const* n, lapack_int const* nrhs,
10735  double const* A, lapack_int const* lda,
10736  double const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
10737  double* S,
10738  double const* B, lapack_int const* ldb,
10739  double* X, lapack_int const* ldx,
10740  double* rcond,
10741  double* berr, lapack_int const* n_err_bnds,
10742  double* err_bnds_norm,
10743  double* err_bnds_comp, lapack_int const* nparams,
10744  double* params,
10745  double* work,
10746  lapack_int* iwork,
10747  lapack_int* info );
10748 
10749 #define LAPACK_ssyrfsx LAPACK_GLOBAL(ssyrfsx,SSYRFSX)
10750 void LAPACK_ssyrfsx(
10751  char const* uplo, char const* equed,
10752  lapack_int const* n, lapack_int const* nrhs,
10753  float const* A, lapack_int const* lda,
10754  float const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
10755  float* S,
10756  float const* B, lapack_int const* ldb,
10757  float* X, lapack_int const* ldx,
10758  float* rcond,
10759  float* berr, lapack_int const* n_err_bnds,
10760  float* err_bnds_norm,
10761  float* err_bnds_comp, lapack_int const* nparams,
10762  float* params,
10763  float* work,
10764  lapack_int* iwork,
10765  lapack_int* info );
10766 
10767 #define LAPACK_zsyrfsx LAPACK_GLOBAL(zsyrfsx,ZSYRFSX)
10768 void LAPACK_zsyrfsx(
10769  char const* uplo, char const* equed,
10770  lapack_int const* n, lapack_int const* nrhs,
10771  lapack_complex_double const* A, lapack_int const* lda,
10772  lapack_complex_double const* AF, lapack_int const* ldaf, lapack_int const* ipiv,
10773  double* S,
10774  lapack_complex_double const* B, lapack_int const* ldb,
10775  lapack_complex_double* X, lapack_int const* ldx,
10776  double* rcond,
10777  double* berr, lapack_int const* n_err_bnds,
10778  double* err_bnds_norm,
10779  double* err_bnds_comp, lapack_int const* nparams,
10780  double* params,
10781  lapack_complex_double* work,
10782  double* rwork,
10783  lapack_int* info );
10784 
10785 #define LAPACK_csysv LAPACK_GLOBAL(csysv,CSYSV)
10786 void LAPACK_csysv(
10787  char const* uplo,
10788  lapack_int const* n, lapack_int const* nrhs,
10789  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
10790  lapack_complex_float* B, lapack_int const* ldb,
10791  lapack_complex_float* work, lapack_int const* lwork,
10792  lapack_int* info );
10793 
10794 #define LAPACK_dsysv LAPACK_GLOBAL(dsysv,DSYSV)
10795 void LAPACK_dsysv(
10796  char const* uplo,
10797  lapack_int const* n, lapack_int const* nrhs,
10798  double* A, lapack_int const* lda, lapack_int* ipiv,
10799  double* B, lapack_int const* ldb,
10800  double* work, lapack_int const* lwork,
10801  lapack_int* info );
10802 
10803 #define LAPACK_ssysv LAPACK_GLOBAL(ssysv,SSYSV)
10804 void LAPACK_ssysv(
10805  char const* uplo,
10806  lapack_int const* n, lapack_int const* nrhs,
10807  float* A, lapack_int const* lda, lapack_int* ipiv,
10808  float* B, lapack_int const* ldb,
10809  float* work, lapack_int const* lwork,
10810  lapack_int* info );
10811 
10812 #define LAPACK_zsysv LAPACK_GLOBAL(zsysv,ZSYSV)
10813 void LAPACK_zsysv(
10814  char const* uplo,
10815  lapack_int const* n, lapack_int const* nrhs,
10816  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
10817  lapack_complex_double* B, lapack_int const* ldb,
10818  lapack_complex_double* work, lapack_int const* lwork,
10819  lapack_int* info );
10820 
10821 #define LAPACK_csysv_aa LAPACK_GLOBAL(csysv_aa,CSYSV_AA)
10822 void LAPACK_csysv_aa(
10823  char const* uplo,
10824  lapack_int const* n, lapack_int const* nrhs,
10825  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
10826  lapack_complex_float* B, lapack_int const* ldb,
10827  lapack_complex_float* work, lapack_int const* lwork,
10828  lapack_int* info );
10829 
10830 #define LAPACK_dsysv_aa LAPACK_GLOBAL(dsysv_aa,DSYSV_AA)
10831 void LAPACK_dsysv_aa(
10832  char const* uplo,
10833  lapack_int const* n, lapack_int const* nrhs,
10834  double* A, lapack_int const* lda, lapack_int* ipiv,
10835  double* B, lapack_int const* ldb,
10836  double* work, lapack_int const* lwork,
10837  lapack_int* info );
10838 
10839 #define LAPACK_ssysv_aa LAPACK_GLOBAL(ssysv_aa,SSYSV_AA)
10840 void LAPACK_ssysv_aa(
10841  char const* uplo,
10842  lapack_int const* n, lapack_int const* nrhs,
10843  float* A, lapack_int const* lda, lapack_int* ipiv,
10844  float* B, lapack_int const* ldb,
10845  float* work, lapack_int const* lwork,
10846  lapack_int* info );
10847 
10848 #define LAPACK_zsysv_aa LAPACK_GLOBAL(zsysv_aa,ZSYSV_AA)
10849 void LAPACK_zsysv_aa(
10850  char const* uplo,
10851  lapack_int const* n, lapack_int const* nrhs,
10852  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
10853  lapack_complex_double* B, lapack_int const* ldb,
10854  lapack_complex_double* work, lapack_int const* lwork,
10855  lapack_int* info );
10856 
10857 #define LAPACK_csysv_aa_2stage LAPACK_GLOBAL(csysv_aa_2stage,CSYSV_AA_2STAGE)
10858 void LAPACK_csysv_aa_2stage(
10859  char const* uplo,
10860  lapack_int const* n, lapack_int const* nrhs,
10861  lapack_complex_float* A, lapack_int const* lda,
10862  lapack_complex_float* TB, lapack_int const* ltb, lapack_int* ipiv, lapack_int* ipiv2,
10863  lapack_complex_float* B, lapack_int const* ldb,
10864  lapack_complex_float* work, lapack_int const* lwork,
10865  lapack_int* info );
10866 
10867 #define LAPACK_dsysv_aa_2stage LAPACK_GLOBAL(dsysv_aa_2stage,DSYSV_AA_2STAGE)
10868 void LAPACK_dsysv_aa_2stage(
10869  char const* uplo,
10870  lapack_int const* n, lapack_int const* nrhs,
10871  double* A, lapack_int const* lda,
10872  double* TB, lapack_int const* ltb, lapack_int* ipiv, lapack_int* ipiv2,
10873  double* B, lapack_int const* ldb,
10874  double* work, lapack_int const* lwork,
10875  lapack_int* info );
10876 
10877 #define LAPACK_ssysv_aa_2stage LAPACK_GLOBAL(ssysv_aa_2stage,SSYSV_AA_2STAGE)
10878 void LAPACK_ssysv_aa_2stage(
10879  char const* uplo,
10880  lapack_int const* n, lapack_int const* nrhs,
10881  float* A, lapack_int const* lda,
10882  float* TB, lapack_int const* ltb, lapack_int* ipiv, lapack_int* ipiv2,
10883  float* B, lapack_int const* ldb,
10884  float* work, lapack_int const* lwork,
10885  lapack_int* info );
10886 
10887 #define LAPACK_zsysv_aa_2stage LAPACK_GLOBAL(zsysv_aa_2stage,ZSYSV_AA_2STAGE)
10888 void LAPACK_zsysv_aa_2stage(
10889  char const* uplo,
10890  lapack_int const* n, lapack_int const* nrhs,
10891  lapack_complex_double* A, lapack_int const* lda,
10892  lapack_complex_double* TB, lapack_int const* ltb, lapack_int* ipiv, lapack_int* ipiv2,
10893  lapack_complex_double* B, lapack_int const* ldb,
10894  lapack_complex_double* work, lapack_int const* lwork,
10895  lapack_int* info );
10896 
10897 #define LAPACK_csysv_rk LAPACK_GLOBAL(csysv_rk,CSYSV_RK)
10898 void LAPACK_csysv_rk(
10899  char const* uplo,
10900  lapack_int const* n, lapack_int const* nrhs,
10901  lapack_complex_float* A, lapack_int const* lda,
10902  lapack_complex_float* E, lapack_int* ipiv,
10903  lapack_complex_float* B, lapack_int const* ldb,
10904  lapack_complex_float* work, lapack_int const* lwork,
10905  lapack_int* info );
10906 
10907 #define LAPACK_dsysv_rk LAPACK_GLOBAL(dsysv_rk,DSYSV_RK)
10908 void LAPACK_dsysv_rk(
10909  char const* uplo,
10910  lapack_int const* n, lapack_int const* nrhs,
10911  double* A, lapack_int const* lda,
10912  double* E, lapack_int* ipiv,
10913  double* B, lapack_int const* ldb,
10914  double* work, lapack_int const* lwork,
10915  lapack_int* info );
10916 
10917 #define LAPACK_ssysv_rk LAPACK_GLOBAL(ssysv_rk,SSYSV_RK)
10918 void LAPACK_ssysv_rk(
10919  char const* uplo,
10920  lapack_int const* n, lapack_int const* nrhs,
10921  float* A, lapack_int const* lda,
10922  float* E, lapack_int* ipiv,
10923  float* B, lapack_int const* ldb,
10924  float* work, lapack_int const* lwork,
10925  lapack_int* info );
10926 
10927 #define LAPACK_zsysv_rk LAPACK_GLOBAL(zsysv_rk,ZSYSV_RK)
10928 void LAPACK_zsysv_rk(
10929  char const* uplo,
10930  lapack_int const* n, lapack_int const* nrhs,
10931  lapack_complex_double* A, lapack_int const* lda,
10932  lapack_complex_double* E, lapack_int* ipiv,
10933  lapack_complex_double* B, lapack_int const* ldb,
10934  lapack_complex_double* work, lapack_int const* lwork,
10935  lapack_int* info );
10936 
10937 #define LAPACK_csysv_rook LAPACK_GLOBAL(csysv_rook,CSYSV_ROOK)
10938 void LAPACK_csysv_rook(
10939  char const* uplo,
10940  lapack_int const* n, lapack_int const* nrhs,
10941  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
10942  lapack_complex_float* B, lapack_int const* ldb,
10943  lapack_complex_float* work, lapack_int const* lwork,
10944  lapack_int* info );
10945 
10946 #define LAPACK_dsysv_rook LAPACK_GLOBAL(dsysv_rook,DSYSV_ROOK)
10947 void LAPACK_dsysv_rook(
10948  char const* uplo,
10949  lapack_int const* n, lapack_int const* nrhs,
10950  double* A, lapack_int const* lda, lapack_int* ipiv,
10951  double* B, lapack_int const* ldb,
10952  double* work, lapack_int const* lwork,
10953  lapack_int* info );
10954 
10955 #define LAPACK_ssysv_rook LAPACK_GLOBAL(ssysv_rook,SSYSV_ROOK)
10956 void LAPACK_ssysv_rook(
10957  char const* uplo,
10958  lapack_int const* n, lapack_int const* nrhs,
10959  float* A, lapack_int const* lda, lapack_int* ipiv,
10960  float* B, lapack_int const* ldb,
10961  float* work, lapack_int const* lwork,
10962  lapack_int* info );
10963 
10964 #define LAPACK_zsysv_rook LAPACK_GLOBAL(zsysv_rook,ZSYSV_ROOK)
10965 void LAPACK_zsysv_rook(
10966  char const* uplo,
10967  lapack_int const* n, lapack_int const* nrhs,
10968  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
10969  lapack_complex_double* B, lapack_int const* ldb,
10970  lapack_complex_double* work, lapack_int const* lwork,
10971  lapack_int* info );
10972 
10973 #define LAPACK_csysvx LAPACK_GLOBAL(csysvx,CSYSVX)
10974 void LAPACK_csysvx(
10975  char const* fact, char const* uplo,
10976  lapack_int const* n, lapack_int const* nrhs,
10977  lapack_complex_float const* A, lapack_int const* lda,
10978  lapack_complex_float* AF, lapack_int const* ldaf, lapack_int* ipiv,
10979  lapack_complex_float const* B, lapack_int const* ldb,
10980  lapack_complex_float* X, lapack_int const* ldx,
10981  float* rcond,
10982  float* ferr,
10983  float* berr,
10984  lapack_complex_float* work, lapack_int const* lwork,
10985  float* rwork,
10986  lapack_int* info );
10987 
10988 #define LAPACK_dsysvx LAPACK_GLOBAL(dsysvx,DSYSVX)
10989 void LAPACK_dsysvx(
10990  char const* fact, char const* uplo,
10991  lapack_int const* n, lapack_int const* nrhs,
10992  double const* A, lapack_int const* lda,
10993  double* AF, lapack_int const* ldaf, lapack_int* ipiv,
10994  double const* B, lapack_int const* ldb,
10995  double* X, lapack_int const* ldx,
10996  double* rcond,
10997  double* ferr,
10998  double* berr,
10999  double* work, lapack_int const* lwork,
11000  lapack_int* iwork,
11001  lapack_int* info );
11002 
11003 #define LAPACK_ssysvx LAPACK_GLOBAL(ssysvx,SSYSVX)
11004 void LAPACK_ssysvx(
11005  char const* fact, char const* uplo,
11006  lapack_int const* n, lapack_int const* nrhs,
11007  float const* A, lapack_int const* lda,
11008  float* AF, lapack_int const* ldaf, lapack_int* ipiv,
11009  float const* B, lapack_int const* ldb,
11010  float* X, lapack_int const* ldx,
11011  float* rcond,
11012  float* ferr,
11013  float* berr,
11014  float* work, lapack_int const* lwork,
11015  lapack_int* iwork,
11016  lapack_int* info );
11017 
11018 #define LAPACK_zsysvx LAPACK_GLOBAL(zsysvx,ZSYSVX)
11019 void LAPACK_zsysvx(
11020  char const* fact, char const* uplo,
11021  lapack_int const* n, lapack_int const* nrhs,
11022  lapack_complex_double const* A, lapack_int const* lda,
11023  lapack_complex_double* AF, lapack_int const* ldaf, lapack_int* ipiv,
11024  lapack_complex_double const* B, lapack_int const* ldb,
11025  lapack_complex_double* X, lapack_int const* ldx,
11026  double* rcond,
11027  double* ferr,
11028  double* berr,
11029  lapack_complex_double* work, lapack_int const* lwork,
11030  double* rwork,
11031  lapack_int* info );
11032 
11033 #define LAPACK_csysvxx LAPACK_GLOBAL(csysvxx,CSYSVXX)
11034 void LAPACK_csysvxx(
11035  char const* fact, char const* uplo,
11036  lapack_int const* n, lapack_int const* nrhs,
11037  lapack_complex_float* A, lapack_int const* lda,
11038  lapack_complex_float* AF, lapack_int const* ldaf, lapack_int* ipiv, char* equed,
11039  float* S,
11040  lapack_complex_float* B,
11041  lapack_int const* ldb,
11042  lapack_complex_float* X, lapack_int const* ldx,
11043  float* rcond,
11044  float* rpvgrw,
11045  float* berr, lapack_int const* n_err_bnds,
11046  float* err_bnds_norm,
11047  float* err_bnds_comp, lapack_int const* nparams,
11048  float* params,
11049  lapack_complex_float* work,
11050  float* rwork,
11051  lapack_int* info );
11052 
11053 #define LAPACK_dsysvxx LAPACK_GLOBAL(dsysvxx,DSYSVXX)
11054 void LAPACK_dsysvxx(
11055  char const* fact, char const* uplo,
11056  lapack_int const* n, lapack_int const* nrhs,
11057  double* A, lapack_int const* lda,
11058  double* AF, lapack_int const* ldaf, lapack_int* ipiv, char* equed,
11059  double* S,
11060  double* B,
11061  lapack_int const* ldb,
11062  double* X, lapack_int const* ldx,
11063  double* rcond,
11064  double* rpvgrw,
11065  double* berr, lapack_int const* n_err_bnds,
11066  double* err_bnds_norm,
11067  double* err_bnds_comp, lapack_int const* nparams,
11068  double* params,
11069  double* work,
11070  lapack_int* iwork,
11071  lapack_int* info );
11072 
11073 #define LAPACK_ssysvxx LAPACK_GLOBAL(ssysvxx,SSYSVXX)
11074 void LAPACK_ssysvxx(
11075  char const* fact, char const* uplo,
11076  lapack_int const* n, lapack_int const* nrhs,
11077  float* A, lapack_int const* lda,
11078  float* AF, lapack_int const* ldaf, lapack_int* ipiv, char* equed,
11079  float* S,
11080  float* B,
11081  lapack_int const* ldb,
11082  float* X, lapack_int const* ldx,
11083  float* rcond,
11084  float* rpvgrw,
11085  float* berr, lapack_int const* n_err_bnds,
11086  float* err_bnds_norm,
11087  float* err_bnds_comp, lapack_int const* nparams,
11088  float* params,
11089  float* work,
11090  lapack_int* iwork,
11091  lapack_int* info );
11092 
11093 #define LAPACK_zsysvxx LAPACK_GLOBAL(zsysvxx,ZSYSVXX)
11094 void LAPACK_zsysvxx(
11095  char const* fact, char const* uplo,
11096  lapack_int const* n, lapack_int const* nrhs,
11097  lapack_complex_double* A, lapack_int const* lda,
11098  lapack_complex_double* AF, lapack_int const* ldaf, lapack_int* ipiv, char* equed,
11099  double* S,
11100  lapack_complex_double* B,
11101  lapack_int const* ldb,
11102  lapack_complex_double* X, lapack_int const* ldx,
11103  double* rcond,
11104  double* rpvgrw,
11105  double* berr, lapack_int const* n_err_bnds,
11106  double* err_bnds_norm,
11107  double* err_bnds_comp, lapack_int const* nparams,
11108  double* params,
11109  lapack_complex_double* work,
11110  double* rwork,
11111  lapack_int* info );
11112 
11113 #define LAPACK_csyswapr LAPACK_GLOBAL(csyswapr,CSYSWAPR)
11114 void LAPACK_csyswapr(
11115  char const* uplo,
11116  lapack_int const* n,
11117  lapack_complex_float* A, lapack_int const* lda, lapack_int const* i1, lapack_int const* i2 );
11118 
11119 #define LAPACK_dsyswapr LAPACK_GLOBAL(dsyswapr,DSYSWAPR)
11120 void LAPACK_dsyswapr(
11121  char const* uplo,
11122  lapack_int const* n,
11123  double* A, lapack_int const* lda, lapack_int const* i1, lapack_int const* i2 );
11124 
11125 #define LAPACK_ssyswapr LAPACK_GLOBAL(ssyswapr,SSYSWAPR)
11126 void LAPACK_ssyswapr(
11127  char const* uplo,
11128  lapack_int const* n,
11129  float* A, lapack_int const* lda, lapack_int const* i1, lapack_int const* i2 );
11130 
11131 #define LAPACK_zsyswapr LAPACK_GLOBAL(zsyswapr,ZSYSWAPR)
11132 void LAPACK_zsyswapr(
11133  char const* uplo,
11134  lapack_int const* n,
11135  lapack_complex_double* A, lapack_int const* lda, lapack_int const* i1, lapack_int const* i2 );
11136 
11137 #define LAPACK_dsytrd LAPACK_GLOBAL(dsytrd,DSYTRD)
11138 void LAPACK_dsytrd(
11139  char const* uplo,
11140  lapack_int const* n,
11141  double* A, lapack_int const* lda,
11142  double* D,
11143  double* E,
11144  double* tau,
11145  double* work, lapack_int const* lwork,
11146  lapack_int* info );
11147 
11148 #define LAPACK_ssytrd LAPACK_GLOBAL(ssytrd,SSYTRD)
11149 void LAPACK_ssytrd(
11150  char const* uplo,
11151  lapack_int const* n,
11152  float* A, lapack_int const* lda,
11153  float* D,
11154  float* E,
11155  float* tau,
11156  float* work, lapack_int const* lwork,
11157  lapack_int* info );
11158 
11159 #define LAPACK_dsytrd_2stage LAPACK_GLOBAL(dsytrd_2stage,DSYTRD_2STAGE)
11160 void LAPACK_dsytrd_2stage(
11161  char const* vect, char const* uplo,
11162  lapack_int const* n,
11163  double* A, lapack_int const* lda,
11164  double* D,
11165  double* E,
11166  double* tau,
11167  double* HOUS2, lapack_int const* lhous2,
11168  double* work, lapack_int const* lwork,
11169  lapack_int* info );
11170 
11171 #define LAPACK_ssytrd_2stage LAPACK_GLOBAL(ssytrd_2stage,SSYTRD_2STAGE)
11172 void LAPACK_ssytrd_2stage(
11173  char const* vect, char const* uplo,
11174  lapack_int const* n,
11175  float* A, lapack_int const* lda,
11176  float* D,
11177  float* E,
11178  float* tau,
11179  float* HOUS2, lapack_int const* lhous2,
11180  float* work, lapack_int const* lwork,
11181  lapack_int* info );
11182 
11183 #define LAPACK_csytrf LAPACK_GLOBAL(csytrf,CSYTRF)
11184 void LAPACK_csytrf(
11185  char const* uplo,
11186  lapack_int const* n,
11187  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
11188  lapack_complex_float* work, lapack_int const* lwork,
11189  lapack_int* info );
11190 
11191 #define LAPACK_dsytrf LAPACK_GLOBAL(dsytrf,DSYTRF)
11192 void LAPACK_dsytrf(
11193  char const* uplo,
11194  lapack_int const* n,
11195  double* A, lapack_int const* lda, lapack_int* ipiv,
11196  double* work, lapack_int const* lwork,
11197  lapack_int* info );
11198 
11199 #define LAPACK_ssytrf LAPACK_GLOBAL(ssytrf,SSYTRF)
11200 void LAPACK_ssytrf(
11201  char const* uplo,
11202  lapack_int const* n,
11203  float* A, lapack_int const* lda, lapack_int* ipiv,
11204  float* work, lapack_int const* lwork,
11205  lapack_int* info );
11206 
11207 #define LAPACK_zsytrf LAPACK_GLOBAL(zsytrf,ZSYTRF)
11208 void LAPACK_zsytrf(
11209  char const* uplo,
11210  lapack_int const* n,
11211  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
11212  lapack_complex_double* work, lapack_int const* lwork,
11213  lapack_int* info );
11214 
11215 #define LAPACK_csytrf_aa LAPACK_GLOBAL(csytrf_aa,CSYTRF_AA)
11216 void LAPACK_csytrf_aa(
11217  char const* uplo,
11218  lapack_int const* n,
11219  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
11220  lapack_complex_float* work, lapack_int const* lwork,
11221  lapack_int* info );
11222 
11223 #define LAPACK_dsytrf_aa LAPACK_GLOBAL(dsytrf_aa,DSYTRF_AA)
11224 void LAPACK_dsytrf_aa(
11225  char const* uplo,
11226  lapack_int const* n,
11227  double* A, lapack_int const* lda, lapack_int* ipiv,
11228  double* work, lapack_int const* lwork,
11229  lapack_int* info );
11230 
11231 #define LAPACK_ssytrf_aa LAPACK_GLOBAL(ssytrf_aa,SSYTRF_AA)
11232 void LAPACK_ssytrf_aa(
11233  char const* uplo,
11234  lapack_int const* n,
11235  float* A, lapack_int const* lda, lapack_int* ipiv,
11236  float* work, lapack_int const* lwork,
11237  lapack_int* info );
11238 
11239 #define LAPACK_zsytrf_aa LAPACK_GLOBAL(zsytrf_aa,ZSYTRF_AA)
11240 void LAPACK_zsytrf_aa(
11241  char const* uplo,
11242  lapack_int const* n,
11243  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
11244  lapack_complex_double* work, lapack_int const* lwork,
11245  lapack_int* info );
11246 
11247 #define LAPACK_csytrf_aa_2stage LAPACK_GLOBAL(csytrf_aa_2stage,CSYTRF_AA_2STAGE)
11248 void LAPACK_csytrf_aa_2stage(
11249  char const* uplo,
11250  lapack_int const* n,
11251  lapack_complex_float* A, lapack_int const* lda,
11252  lapack_complex_float* TB, lapack_int const* ltb, lapack_int* ipiv, lapack_int* ipiv2,
11253  lapack_complex_float* work, lapack_int const* lwork,
11254  lapack_int* info );
11255 
11256 #define LAPACK_dsytrf_aa_2stage LAPACK_GLOBAL(dsytrf_aa_2stage,DSYTRF_AA_2STAGE)
11257 void LAPACK_dsytrf_aa_2stage(
11258  char const* uplo,
11259  lapack_int const* n,
11260  double* A, lapack_int const* lda,
11261  double* TB, lapack_int const* ltb, lapack_int* ipiv, lapack_int* ipiv2,
11262  double* work, lapack_int const* lwork,
11263  lapack_int* info );
11264 
11265 #define LAPACK_ssytrf_aa_2stage LAPACK_GLOBAL(ssytrf_aa_2stage,SSYTRF_AA_2STAGE)
11266 void LAPACK_ssytrf_aa_2stage(
11267  char const* uplo,
11268  lapack_int const* n,
11269  float* A, lapack_int const* lda,
11270  float* TB, lapack_int const* ltb, lapack_int* ipiv, lapack_int* ipiv2,
11271  float* work, lapack_int const* lwork,
11272  lapack_int* info );
11273 
11274 #define LAPACK_zsytrf_aa_2stage LAPACK_GLOBAL(zsytrf_aa_2stage,ZSYTRF_AA_2STAGE)
11275 void LAPACK_zsytrf_aa_2stage(
11276  char const* uplo,
11277  lapack_int const* n,
11278  lapack_complex_double* A, lapack_int const* lda,
11279  lapack_complex_double* TB, lapack_int const* ltb, lapack_int* ipiv, lapack_int* ipiv2,
11280  lapack_complex_double* work, lapack_int const* lwork,
11281  lapack_int* info );
11282 
11283 #define LAPACK_csytrf_rk LAPACK_GLOBAL(csytrf_rk,CSYTRF_RK)
11284 void LAPACK_csytrf_rk(
11285  char const* uplo,
11286  lapack_int const* n,
11287  lapack_complex_float* A, lapack_int const* lda,
11288  lapack_complex_float* E, lapack_int* ipiv,
11289  lapack_complex_float* work, lapack_int const* lwork,
11290  lapack_int* info );
11291 
11292 #define LAPACK_dsytrf_rk LAPACK_GLOBAL(dsytrf_rk,DSYTRF_RK)
11293 void LAPACK_dsytrf_rk(
11294  char const* uplo,
11295  lapack_int const* n,
11296  double* A, lapack_int const* lda,
11297  double* E, lapack_int* ipiv,
11298  double* work, lapack_int const* lwork,
11299  lapack_int* info );
11300 
11301 #define LAPACK_ssytrf_rk LAPACK_GLOBAL(ssytrf_rk,SSYTRF_RK)
11302 void LAPACK_ssytrf_rk(
11303  char const* uplo,
11304  lapack_int const* n,
11305  float* A, lapack_int const* lda,
11306  float* E, lapack_int* ipiv,
11307  float* work, lapack_int const* lwork,
11308  lapack_int* info );
11309 
11310 #define LAPACK_zsytrf_rk LAPACK_GLOBAL(zsytrf_rk,ZSYTRF_RK)
11311 void LAPACK_zsytrf_rk(
11312  char const* uplo,
11313  lapack_int const* n,
11314  lapack_complex_double* A, lapack_int const* lda,
11315  lapack_complex_double* E, lapack_int* ipiv,
11316  lapack_complex_double* work, lapack_int const* lwork,
11317  lapack_int* info );
11318 
11319 #define LAPACK_csytrf_rook LAPACK_GLOBAL(csytrf_rook,CSYTRF_ROOK)
11320 void LAPACK_csytrf_rook(
11321  char const* uplo,
11322  lapack_int const* n,
11323  lapack_complex_float* A, lapack_int const* lda, lapack_int* ipiv,
11324  lapack_complex_float* work, lapack_int const* lwork,
11325  lapack_int* info );
11326 
11327 #define LAPACK_dsytrf_rook LAPACK_GLOBAL(dsytrf_rook,DSYTRF_ROOK)
11328 void LAPACK_dsytrf_rook(
11329  char const* uplo,
11330  lapack_int const* n,
11331  double* A, lapack_int const* lda, lapack_int* ipiv,
11332  double* work, lapack_int const* lwork,
11333  lapack_int* info );
11334 
11335 #define LAPACK_ssytrf_rook LAPACK_GLOBAL(ssytrf_rook,SSYTRF_ROOK)
11336 void LAPACK_ssytrf_rook(
11337  char const* uplo,
11338  lapack_int const* n,
11339  float* A, lapack_int const* lda, lapack_int* ipiv,
11340  float* work, lapack_int const* lwork,
11341  lapack_int* info );
11342 
11343 #define LAPACK_zsytrf_rook LAPACK_GLOBAL(zsytrf_rook,ZSYTRF_ROOK)
11344 void LAPACK_zsytrf_rook(
11345  char const* uplo,
11346  lapack_int const* n,
11347  lapack_complex_double* A, lapack_int const* lda, lapack_int* ipiv,
11348  lapack_complex_double* work, lapack_int const* lwork,
11349  lapack_int* info );
11350 
11351 #define LAPACK_csytri LAPACK_GLOBAL(csytri,CSYTRI)
11352 void LAPACK_csytri(
11353  char const* uplo,
11354  lapack_int const* n,
11355  lapack_complex_float* A, lapack_int const* lda, lapack_int const* ipiv,
11356  lapack_complex_float* work,
11357  lapack_int* info );
11358 
11359 #define LAPACK_dsytri LAPACK_GLOBAL(dsytri,DSYTRI)
11360 void LAPACK_dsytri(
11361  char const* uplo,
11362  lapack_int const* n,
11363  double* A, lapack_int const* lda, lapack_int const* ipiv,
11364  double* work,
11365  lapack_int* info );
11366 
11367 #define LAPACK_ssytri LAPACK_GLOBAL(ssytri,SSYTRI)
11368 void LAPACK_ssytri(
11369  char const* uplo,
11370  lapack_int const* n,
11371  float* A, lapack_int const* lda, lapack_int const* ipiv,
11372  float* work,
11373  lapack_int* info );
11374 
11375 #define LAPACK_zsytri LAPACK_GLOBAL(zsytri,ZSYTRI)
11376 void LAPACK_zsytri(
11377  char const* uplo,
11378  lapack_int const* n,
11379  lapack_complex_double* A, lapack_int const* lda, lapack_int const* ipiv,
11380  lapack_complex_double* work,
11381  lapack_int* info );
11382 
11383 #define LAPACK_csytri2 LAPACK_GLOBAL(csytri2,CSYTRI2)
11384 void LAPACK_csytri2(
11385  char const* uplo,
11386  lapack_int const* n,
11387  lapack_complex_float* A, lapack_int const* lda, lapack_int const* ipiv,
11388  lapack_complex_float* work, lapack_int const* lwork,
11389  lapack_int* info );
11390 
11391 #define LAPACK_dsytri2 LAPACK_GLOBAL(dsytri2,DSYTRI2)
11392 void LAPACK_dsytri2(
11393  char const* uplo,
11394  lapack_int const* n,
11395  double* A, lapack_int const* lda, lapack_int const* ipiv,
11396  double* work, lapack_int const* lwork,
11397  lapack_int* info );
11398 
11399 #define LAPACK_ssytri2 LAPACK_GLOBAL(ssytri2,SSYTRI2)
11400 void LAPACK_ssytri2(
11401  char const* uplo,
11402  lapack_int const* n,
11403  float* A, lapack_int const* lda, lapack_int const* ipiv,
11404  float* work, lapack_int const* lwork,
11405  lapack_int* info );
11406 
11407 #define LAPACK_zsytri2 LAPACK_GLOBAL(zsytri2,ZSYTRI2)
11408 void LAPACK_zsytri2(
11409  char const* uplo,
11410  lapack_int const* n,
11411  lapack_complex_double* A, lapack_int const* lda, lapack_int const* ipiv,
11412  lapack_complex_double* work, lapack_int const* lwork,
11413  lapack_int* info );
11414 
11415 #define LAPACK_csytri2x LAPACK_GLOBAL(csytri2x,CSYTRI2X)
11416 void LAPACK_csytri2x(
11417  char const* uplo,
11418  lapack_int const* n,
11419  lapack_complex_float* A, lapack_int const* lda, lapack_int const* ipiv,
11420  lapack_complex_float* work, lapack_int const* nb,
11421  lapack_int* info );
11422 
11423 #define LAPACK_dsytri2x LAPACK_GLOBAL(dsytri2x,DSYTRI2X)
11424 void LAPACK_dsytri2x(
11425  char const* uplo,
11426  lapack_int const* n,
11427  double* A, lapack_int const* lda, lapack_int const* ipiv,
11428  double* work, lapack_int const* nb,
11429  lapack_int* info );
11430 
11431 #define LAPACK_ssytri2x LAPACK_GLOBAL(ssytri2x,SSYTRI2X)
11432 void LAPACK_ssytri2x(
11433  char const* uplo,
11434  lapack_int const* n,
11435  float* A, lapack_int const* lda, lapack_int const* ipiv,
11436  float* work, lapack_int const* nb,
11437  lapack_int* info );
11438 
11439 #define LAPACK_zsytri2x LAPACK_GLOBAL(zsytri2x,ZSYTRI2X)
11440 void LAPACK_zsytri2x(
11441  char const* uplo,
11442  lapack_int const* n,
11443  lapack_complex_double* A, lapack_int const* lda, lapack_int const* ipiv,
11444  lapack_complex_double* work, lapack_int const* nb,
11445  lapack_int* info );
11446 
11447 #define LAPACK_csytri_3 LAPACK_GLOBAL(csytri_3,CSYTRI_3)
11448 void LAPACK_csytri_3(
11449  char const* uplo,
11450  lapack_int const* n,
11451  lapack_complex_float* A, lapack_int const* lda,
11452  lapack_complex_float const* E, lapack_int const* ipiv,
11453  lapack_complex_float* work, lapack_int const* lwork,
11454  lapack_int* info );
11455 
11456 #define LAPACK_dsytri_3 LAPACK_GLOBAL(dsytri_3,DSYTRI_3)
11457 void LAPACK_dsytri_3(
11458  char const* uplo,
11459  lapack_int const* n,
11460  double* A, lapack_int const* lda,
11461  double const* E, lapack_int const* ipiv,
11462  double* work, lapack_int const* lwork,
11463  lapack_int* info );
11464 
11465 #define LAPACK_ssytri_3 LAPACK_GLOBAL(ssytri_3,SSYTRI_3)
11466 void LAPACK_ssytri_3(
11467  char const* uplo,
11468  lapack_int const* n,
11469  float* A, lapack_int const* lda,
11470  float const* E, lapack_int const* ipiv,
11471  float* work, lapack_int const* lwork,
11472  lapack_int* info );
11473 
11474 #define LAPACK_zsytri_3 LAPACK_GLOBAL(zsytri_3,ZSYTRI_3)
11475 void LAPACK_zsytri_3(
11476  char const* uplo,
11477  lapack_int const* n,
11478  lapack_complex_double* A, lapack_int const* lda,
11479  lapack_complex_double const* E, lapack_int const* ipiv,
11480  lapack_complex_double* work, lapack_int const* lwork,
11481  lapack_int* info );
11482 
11483 #define LAPACK_csytrs LAPACK_GLOBAL(csytrs,CSYTRS)
11484 void LAPACK_csytrs(
11485  char const* uplo,
11486  lapack_int const* n, lapack_int const* nrhs,
11487  lapack_complex_float const* A, lapack_int const* lda, lapack_int const* ipiv,
11488  lapack_complex_float* B, lapack_int const* ldb,
11489  lapack_int* info );
11490 
11491 #define LAPACK_dsytrs LAPACK_GLOBAL(dsytrs,DSYTRS)
11492 void LAPACK_dsytrs(
11493  char const* uplo,
11494  lapack_int const* n, lapack_int const* nrhs,
11495  double const* A, lapack_int const* lda, lapack_int const* ipiv,
11496  double* B, lapack_int const* ldb,
11497  lapack_int* info );
11498 
11499 #define LAPACK_ssytrs LAPACK_GLOBAL(ssytrs,SSYTRS)
11500 void LAPACK_ssytrs(
11501  char const* uplo,
11502  lapack_int const* n, lapack_int const* nrhs,
11503  float const* A, lapack_int const* lda, lapack_int const* ipiv,
11504  float* B, lapack_int const* ldb,
11505  lapack_int* info );
11506 
11507 #define LAPACK_zsytrs LAPACK_GLOBAL(zsytrs,ZSYTRS)
11508 void LAPACK_zsytrs(
11509  char const* uplo,
11510  lapack_int const* n, lapack_int const* nrhs,
11511  lapack_complex_double const* A, lapack_int const* lda, lapack_int const* ipiv,
11512  lapack_complex_double* B, lapack_int const* ldb,
11513  lapack_int* info );
11514 
11515 #define LAPACK_csytrs2 LAPACK_GLOBAL(csytrs2,CSYTRS2)
11516 void LAPACK_csytrs2(
11517  char const* uplo,
11518  lapack_int const* n, lapack_int const* nrhs,
11519  lapack_complex_float* A, lapack_int const* lda, lapack_int const* ipiv,
11520  lapack_complex_float* B, lapack_int const* ldb,
11521  lapack_complex_float* work,
11522  lapack_int* info );
11523 
11524 #define LAPACK_dsytrs2 LAPACK_GLOBAL(dsytrs2,DSYTRS2)
11525 void LAPACK_dsytrs2(
11526  char const* uplo,
11527  lapack_int const* n, lapack_int const* nrhs,
11528  double* A, lapack_int const* lda, lapack_int const* ipiv,
11529  double* B, lapack_int const* ldb,
11530  double* work,
11531  lapack_int* info );
11532 
11533 #define LAPACK_ssytrs2 LAPACK_GLOBAL(ssytrs2,SSYTRS2)
11534 void LAPACK_ssytrs2(
11535  char const* uplo,
11536  lapack_int const* n, lapack_int const* nrhs,
11537  float* A, lapack_int const* lda, lapack_int const* ipiv,
11538  float* B, lapack_int const* ldb,
11539  float* work,
11540  lapack_int* info );
11541 
11542 #define LAPACK_zsytrs2 LAPACK_GLOBAL(zsytrs2,ZSYTRS2)
11543 void LAPACK_zsytrs2(
11544  char const* uplo,
11545  lapack_int const* n, lapack_int const* nrhs,
11546  lapack_complex_double* A, lapack_int const* lda, lapack_int const* ipiv,
11547  lapack_complex_double* B, lapack_int const* ldb,
11548  lapack_complex_double* work,
11549  lapack_int* info );
11550 
11551 #define LAPACK_csytrs_3 LAPACK_GLOBAL(csytrs_3,CSYTRS_3)
11552 void LAPACK_csytrs_3(
11553  char const* uplo,
11554  lapack_int const* n, lapack_int const* nrhs,
11555  lapack_complex_float const* A, lapack_int const* lda,
11556  lapack_complex_float const* E, lapack_int const* ipiv,
11557  lapack_complex_float* B, lapack_int const* ldb,
11558  lapack_int* info );
11559 
11560 #define LAPACK_dsytrs_3 LAPACK_GLOBAL(dsytrs_3,DSYTRS_3)
11561 void LAPACK_dsytrs_3(
11562  char const* uplo,
11563  lapack_int const* n, lapack_int const* nrhs,
11564  double const* A, lapack_int const* lda,
11565  double const* E, lapack_int const* ipiv,
11566  double* B, lapack_int const* ldb,
11567  lapack_int* info );
11568 
11569 #define LAPACK_ssytrs_3 LAPACK_GLOBAL(ssytrs_3,SSYTRS_3)
11570 void LAPACK_ssytrs_3(
11571  char const* uplo,
11572  lapack_int const* n, lapack_int const* nrhs,
11573  float const* A, lapack_int const* lda,
11574  float const* E, lapack_int const* ipiv,
11575  float* B, lapack_int const* ldb,
11576  lapack_int* info );
11577 
11578 #define LAPACK_zsytrs_3 LAPACK_GLOBAL(zsytrs_3,ZSYTRS_3)
11579 void LAPACK_zsytrs_3(
11580  char const* uplo,
11581  lapack_int const* n, lapack_int const* nrhs,
11582  lapack_complex_double const* A, lapack_int const* lda,
11583  lapack_complex_double const* E, lapack_int const* ipiv,
11584  lapack_complex_double* B, lapack_int const* ldb,
11585  lapack_int* info );
11586 
11587 #define LAPACK_csytrs_aa LAPACK_GLOBAL(csytrs_aa,CSYTRS_AA)
11588 void LAPACK_csytrs_aa(
11589  char const* uplo,
11590  lapack_int const* n, lapack_int const* nrhs,
11591  lapack_complex_float const* A, lapack_int const* lda, lapack_int const* ipiv,
11592  lapack_complex_float* B, lapack_int const* ldb,
11593  lapack_complex_float* work, lapack_int const* lwork,
11594  lapack_int* info );
11595 
11596 #define LAPACK_dsytrs_aa LAPACK_GLOBAL(dsytrs_aa,DSYTRS_AA)
11597 void LAPACK_dsytrs_aa(
11598  char const* uplo,
11599  lapack_int const* n, lapack_int const* nrhs,
11600  double const* A, lapack_int const* lda, lapack_int const* ipiv,
11601  double* B, lapack_int const* ldb,
11602  double* work, lapack_int const* lwork,
11603  lapack_int* info );
11604 
11605 #define LAPACK_ssytrs_aa LAPACK_GLOBAL(ssytrs_aa,SSYTRS_AA)
11606 void LAPACK_ssytrs_aa(
11607  char const* uplo,
11608  lapack_int const* n, lapack_int const* nrhs,
11609  float const* A, lapack_int const* lda, lapack_int const* ipiv,
11610  float* B, lapack_int const* ldb,
11611  float* work, lapack_int const* lwork,
11612  lapack_int* info );
11613 
11614 #define LAPACK_zsytrs_aa LAPACK_GLOBAL(zsytrs_aa,ZSYTRS_AA)
11615 void LAPACK_zsytrs_aa(
11616  char const* uplo,
11617  lapack_int const* n, lapack_int const* nrhs,
11618  lapack_complex_double const* A, lapack_int const* lda, lapack_int const* ipiv,
11619  lapack_complex_double* B, lapack_int const* ldb,
11620  lapack_complex_double* work, lapack_int const* lwork,
11621  lapack_int* info );
11622 
11623 #define LAPACK_csytrs_aa_2stage LAPACK_GLOBAL(csytrs_aa_2stage,CSYTRS_AA_2STAGE)
11624 void LAPACK_csytrs_aa_2stage(
11625  char const* uplo,
11626  lapack_int const* n, lapack_int const* nrhs,
11627  lapack_complex_float const* A, lapack_int const* lda,
11628  lapack_complex_float* TB, lapack_int const* ltb, lapack_int const* ipiv, lapack_int const* ipiv2,
11629  lapack_complex_float* B, lapack_int const* ldb,
11630  lapack_int* info );
11631 
11632 #define LAPACK_dsytrs_aa_2stage LAPACK_GLOBAL(dsytrs_aa_2stage,DSYTRS_AA_2STAGE)
11633 void LAPACK_dsytrs_aa_2stage(
11634  char const* uplo,
11635  lapack_int const* n, lapack_int const* nrhs,
11636  double const* A, lapack_int const* lda,
11637  double* TB, lapack_int const* ltb, lapack_int const* ipiv, lapack_int const* ipiv2,
11638  double* B, lapack_int const* ldb,
11639  lapack_int* info );
11640 
11641 #define LAPACK_ssytrs_aa_2stage LAPACK_GLOBAL(ssytrs_aa_2stage,SSYTRS_AA_2STAGE)
11642 void LAPACK_ssytrs_aa_2stage(
11643  char const* uplo,
11644  lapack_int const* n, lapack_int const* nrhs,
11645  float const* A, lapack_int const* lda,
11646  float* TB, lapack_int const* ltb, lapack_int const* ipiv, lapack_int const* ipiv2,
11647  float* B, lapack_int const* ldb,
11648  lapack_int* info );
11649 
11650 #define LAPACK_zsytrs_aa_2stage LAPACK_GLOBAL(zsytrs_aa_2stage,ZSYTRS_AA_2STAGE)
11651 void LAPACK_zsytrs_aa_2stage(
11652  char const* uplo,
11653  lapack_int const* n, lapack_int const* nrhs,
11654  lapack_complex_double const* A, lapack_int const* lda,
11655  lapack_complex_double* TB, lapack_int const* ltb, lapack_int const* ipiv, lapack_int const* ipiv2,
11656  lapack_complex_double* B, lapack_int const* ldb,
11657  lapack_int* info );
11658 
11659 #define LAPACK_csytrs_rook LAPACK_GLOBAL(csytrs_rook,CSYTRS_ROOK)
11660 void LAPACK_csytrs_rook(
11661  char const* uplo,
11662  lapack_int const* n, lapack_int const* nrhs,
11663  lapack_complex_float const* A, lapack_int const* lda, lapack_int const* ipiv,
11664  lapack_complex_float* B, lapack_int const* ldb,
11665  lapack_int* info );
11666 
11667 #define LAPACK_dsytrs_rook LAPACK_GLOBAL(dsytrs_rook,DSYTRS_ROOK)
11668 void LAPACK_dsytrs_rook(
11669  char const* uplo,
11670  lapack_int const* n, lapack_int const* nrhs,
11671  double const* A, lapack_int const* lda, lapack_int const* ipiv,
11672  double* B, lapack_int const* ldb,
11673  lapack_int* info );
11674 
11675 #define LAPACK_ssytrs_rook LAPACK_GLOBAL(ssytrs_rook,SSYTRS_ROOK)
11676 void LAPACK_ssytrs_rook(
11677  char const* uplo,
11678  lapack_int const* n, lapack_int const* nrhs,
11679  float const* A, lapack_int const* lda, lapack_int const* ipiv,
11680  float* B, lapack_int const* ldb,
11681  lapack_int* info );
11682 
11683 #define LAPACK_zsytrs_rook LAPACK_GLOBAL(zsytrs_rook,ZSYTRS_ROOK)
11684 void LAPACK_zsytrs_rook(
11685  char const* uplo,
11686  lapack_int const* n, lapack_int const* nrhs,
11687  lapack_complex_double const* A, lapack_int const* lda, lapack_int const* ipiv,
11688  lapack_complex_double* B, lapack_int const* ldb,
11689  lapack_int* info );
11690 
11691 #define LAPACK_ctbcon LAPACK_GLOBAL(ctbcon,CTBCON)
11692 void LAPACK_ctbcon(
11693  char const* norm, char const* uplo, char const* diag,
11694  lapack_int const* n, lapack_int const* kd,
11695  lapack_complex_float const* AB, lapack_int const* ldab,
11696  float* rcond,
11697  lapack_complex_float* work,
11698  float* rwork,
11699  lapack_int* info );
11700 
11701 #define LAPACK_dtbcon LAPACK_GLOBAL(dtbcon,DTBCON)
11702 void LAPACK_dtbcon(
11703  char const* norm, char const* uplo, char const* diag,
11704  lapack_int const* n, lapack_int const* kd,
11705  double const* AB, lapack_int const* ldab,
11706  double* rcond,
11707  double* work,
11708  lapack_int* iwork,
11709  lapack_int* info );
11710 
11711 #define LAPACK_stbcon LAPACK_GLOBAL(stbcon,STBCON)
11712 void LAPACK_stbcon(
11713  char const* norm, char const* uplo, char const* diag,
11714  lapack_int const* n, lapack_int const* kd,
11715  float const* AB, lapack_int const* ldab,
11716  float* rcond,
11717  float* work,
11718  lapack_int* iwork,
11719  lapack_int* info );
11720 
11721 #define LAPACK_ztbcon LAPACK_GLOBAL(ztbcon,ZTBCON)
11722 void LAPACK_ztbcon(
11723  char const* norm, char const* uplo, char const* diag,
11724  lapack_int const* n, lapack_int const* kd,
11725  lapack_complex_double const* AB, lapack_int const* ldab,
11726  double* rcond,
11727  lapack_complex_double* work,
11728  double* rwork,
11729  lapack_int* info );
11730 
11731 #define LAPACK_ctbrfs LAPACK_GLOBAL(ctbrfs,CTBRFS)
11732 void LAPACK_ctbrfs(
11733  char const* uplo, char const* trans, char const* diag,
11734  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
11735  lapack_complex_float const* AB, lapack_int const* ldab,
11736  lapack_complex_float const* B, lapack_int const* ldb,
11737  lapack_complex_float const* X, lapack_int const* ldx,
11738  float* ferr,
11739  float* berr,
11740  lapack_complex_float* work,
11741  float* rwork,
11742  lapack_int* info );
11743 
11744 #define LAPACK_dtbrfs LAPACK_GLOBAL(dtbrfs,DTBRFS)
11745 void LAPACK_dtbrfs(
11746  char const* uplo, char const* trans, char const* diag,
11747  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
11748  double const* AB, lapack_int const* ldab,
11749  double const* B, lapack_int const* ldb,
11750  double const* X, lapack_int const* ldx,
11751  double* ferr,
11752  double* berr,
11753  double* work,
11754  lapack_int* iwork,
11755  lapack_int* info );
11756 
11757 #define LAPACK_stbrfs LAPACK_GLOBAL(stbrfs,STBRFS)
11758 void LAPACK_stbrfs(
11759  char const* uplo, char const* trans, char const* diag,
11760  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
11761  float const* AB, lapack_int const* ldab,
11762  float const* B, lapack_int const* ldb,
11763  float const* X, lapack_int const* ldx,
11764  float* ferr,
11765  float* berr,
11766  float* work,
11767  lapack_int* iwork,
11768  lapack_int* info );
11769 
11770 #define LAPACK_ztbrfs LAPACK_GLOBAL(ztbrfs,ZTBRFS)
11771 void LAPACK_ztbrfs(
11772  char const* uplo, char const* trans, char const* diag,
11773  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
11774  lapack_complex_double const* AB, lapack_int const* ldab,
11775  lapack_complex_double const* B, lapack_int const* ldb,
11776  lapack_complex_double const* X, lapack_int const* ldx,
11777  double* ferr,
11778  double* berr,
11779  lapack_complex_double* work,
11780  double* rwork,
11781  lapack_int* info );
11782 
11783 #define LAPACK_ctbtrs LAPACK_GLOBAL(ctbtrs,CTBTRS)
11784 void LAPACK_ctbtrs(
11785  char const* uplo, char const* trans, char const* diag,
11786  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
11787  lapack_complex_float const* AB, lapack_int const* ldab,
11788  lapack_complex_float* B, lapack_int const* ldb,
11789  lapack_int* info );
11790 
11791 #define LAPACK_dtbtrs LAPACK_GLOBAL(dtbtrs,DTBTRS)
11792 void LAPACK_dtbtrs(
11793  char const* uplo, char const* trans, char const* diag,
11794  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
11795  double const* AB, lapack_int const* ldab,
11796  double* B, lapack_int const* ldb,
11797  lapack_int* info );
11798 
11799 #define LAPACK_stbtrs LAPACK_GLOBAL(stbtrs,STBTRS)
11800 void LAPACK_stbtrs(
11801  char const* uplo, char const* trans, char const* diag,
11802  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
11803  float const* AB, lapack_int const* ldab,
11804  float* B, lapack_int const* ldb,
11805  lapack_int* info );
11806 
11807 #define LAPACK_ztbtrs LAPACK_GLOBAL(ztbtrs,ZTBTRS)
11808 void LAPACK_ztbtrs(
11809  char const* uplo, char const* trans, char const* diag,
11810  lapack_int const* n, lapack_int const* kd, lapack_int const* nrhs,
11811  lapack_complex_double const* AB, lapack_int const* ldab,
11812  lapack_complex_double* B, lapack_int const* ldb,
11813  lapack_int* info );
11814 
11815 #define LAPACK_ctfsm LAPACK_GLOBAL(ctfsm,CTFSM)
11816 void LAPACK_ctfsm(
11817  char const* transr, char const* side, char const* uplo, char const* trans, char const* diag,
11818  lapack_int const* m, lapack_int const* n,
11819  lapack_complex_float const* alpha,
11820  lapack_complex_float const* A,
11821  lapack_complex_float* B, lapack_int const* ldb );
11822 
11823 #define LAPACK_dtfsm LAPACK_GLOBAL(dtfsm,DTFSM)
11824 void LAPACK_dtfsm(
11825  char const* transr, char const* side, char const* uplo, char const* trans, char const* diag,
11826  lapack_int const* m, lapack_int const* n,
11827  double const* alpha,
11828  double const* A,
11829  double* B, lapack_int const* ldb );
11830 
11831 #define LAPACK_stfsm LAPACK_GLOBAL(stfsm,STFSM)
11832 void LAPACK_stfsm(
11833  char const* transr, char const* side, char const* uplo, char const* trans, char const* diag,
11834  lapack_int const* m, lapack_int const* n,
11835  float const* alpha,
11836  float const* A,
11837  float* B, lapack_int const* ldb );
11838 
11839 #define LAPACK_ztfsm LAPACK_GLOBAL(ztfsm,ZTFSM)
11840 void LAPACK_ztfsm(
11841  char const* transr, char const* side, char const* uplo, char const* trans, char const* diag,
11842  lapack_int const* m, lapack_int const* n,
11843  lapack_complex_double const* alpha,
11844  lapack_complex_double const* A,
11845  lapack_complex_double* B, lapack_int const* ldb );
11846 
11847 #define LAPACK_ctftri LAPACK_GLOBAL(ctftri,CTFTRI)
11848 void LAPACK_ctftri(
11849  char const* transr, char const* uplo, char const* diag,
11850  lapack_int const* n,
11851  lapack_complex_float* A,
11852  lapack_int* info );
11853 
11854 #define LAPACK_dtftri LAPACK_GLOBAL(dtftri,DTFTRI)
11855 void LAPACK_dtftri(
11856  char const* transr, char const* uplo, char const* diag,
11857  lapack_int const* n,
11858  double* A,
11859  lapack_int* info );
11860 
11861 #define LAPACK_stftri LAPACK_GLOBAL(stftri,STFTRI)
11862 void LAPACK_stftri(
11863  char const* transr, char const* uplo, char const* diag,
11864  lapack_int const* n,
11865  float* A,
11866  lapack_int* info );
11867 
11868 #define LAPACK_ztftri LAPACK_GLOBAL(ztftri,ZTFTRI)
11869 void LAPACK_ztftri(
11870  char const* transr, char const* uplo, char const* diag,
11871  lapack_int const* n,
11872  lapack_complex_double* A,
11873  lapack_int* info );
11874 
11875 #define LAPACK_ctfttp LAPACK_GLOBAL(ctfttp,CTFTTP)
11876 void LAPACK_ctfttp(
11877  char const* transr, char const* uplo,
11878  lapack_int const* n,
11879  lapack_complex_float const* ARF,
11880  lapack_complex_float* AP,
11881  lapack_int* info );
11882 
11883 #define LAPACK_dtfttp LAPACK_GLOBAL(dtfttp,DTFTTP)
11884 void LAPACK_dtfttp(
11885  char const* transr, char const* uplo,
11886  lapack_int const* n,
11887  double const* ARF,
11888  double* AP,
11889  lapack_int* info );
11890 
11891 #define LAPACK_stfttp LAPACK_GLOBAL(stfttp,STFTTP)
11892 void LAPACK_stfttp(
11893  char const* transr, char const* uplo,
11894  lapack_int const* n,
11895  float const* ARF,
11896  float* AP,
11897  lapack_int* info );
11898 
11899 #define LAPACK_ztfttp LAPACK_GLOBAL(ztfttp,ZTFTTP)
11900 void LAPACK_ztfttp(
11901  char const* transr, char const* uplo,
11902  lapack_int const* n,
11903  lapack_complex_double const* ARF,
11904  lapack_complex_double* AP,
11905  lapack_int* info );
11906 
11907 #define LAPACK_ctfttr LAPACK_GLOBAL(ctfttr,CTFTTR)
11908 void LAPACK_ctfttr(
11909  char const* transr, char const* uplo,
11910  lapack_int const* n,
11911  lapack_complex_float const* ARF,
11912  lapack_complex_float* A, lapack_int const* lda,
11913  lapack_int* info );
11914 
11915 #define LAPACK_dtfttr LAPACK_GLOBAL(dtfttr,DTFTTR)
11916 void LAPACK_dtfttr(
11917  char const* transr, char const* uplo,
11918  lapack_int const* n,
11919  double const* ARF,
11920  double* A, lapack_int const* lda,
11921  lapack_int* info );
11922 
11923 #define LAPACK_stfttr LAPACK_GLOBAL(stfttr,STFTTR)
11924 void LAPACK_stfttr(
11925  char const* transr, char const* uplo,
11926  lapack_int const* n,
11927  float const* ARF,
11928  float* A, lapack_int const* lda,
11929  lapack_int* info );
11930 
11931 #define LAPACK_ztfttr LAPACK_GLOBAL(ztfttr,ZTFTTR)
11932 void LAPACK_ztfttr(
11933  char const* transr, char const* uplo,
11934  lapack_int const* n,
11935  lapack_complex_double const* ARF,
11936  lapack_complex_double* A, lapack_int const* lda,
11937  lapack_int* info );
11938 
11939 #define LAPACK_ctgevc LAPACK_GLOBAL(ctgevc,CTGEVC)
11940 void LAPACK_ctgevc(
11941  char const* side, char const* howmny,
11942  lapack_logical const* select,
11943  lapack_int const* n,
11944  lapack_complex_float const* S, lapack_int const* lds,
11945  lapack_complex_float const* P, lapack_int const* ldp,
11946  lapack_complex_float* VL, lapack_int const* ldvl,
11947  lapack_complex_float* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
11948  lapack_complex_float* work,
11949  float* rwork,
11950  lapack_int* info );
11951 
11952 #define LAPACK_dtgevc LAPACK_GLOBAL(dtgevc,DTGEVC)
11953 void LAPACK_dtgevc(
11954  char const* side, char const* howmny,
11955  lapack_logical const* select,
11956  lapack_int const* n,
11957  double const* S, lapack_int const* lds,
11958  double const* P, lapack_int const* ldp,
11959  double* VL, lapack_int const* ldvl,
11960  double* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
11961  double* work,
11962  lapack_int* info );
11963 
11964 #define LAPACK_stgevc LAPACK_GLOBAL(stgevc,STGEVC)
11965 void LAPACK_stgevc(
11966  char const* side, char const* howmny,
11967  lapack_logical const* select,
11968  lapack_int const* n,
11969  float const* S, lapack_int const* lds,
11970  float const* P, lapack_int const* ldp,
11971  float* VL, lapack_int const* ldvl,
11972  float* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
11973  float* work,
11974  lapack_int* info );
11975 
11976 #define LAPACK_ztgevc LAPACK_GLOBAL(ztgevc,ZTGEVC)
11977 void LAPACK_ztgevc(
11978  char const* side, char const* howmny,
11979  lapack_logical const* select,
11980  lapack_int const* n,
11981  lapack_complex_double const* S, lapack_int const* lds,
11982  lapack_complex_double const* P, lapack_int const* ldp,
11983  lapack_complex_double* VL, lapack_int const* ldvl,
11984  lapack_complex_double* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
11985  lapack_complex_double* work,
11986  double* rwork,
11987  lapack_int* info );
11988 
11989 #define LAPACK_ctgexc LAPACK_GLOBAL(ctgexc,CTGEXC)
11990 void LAPACK_ctgexc(
11991  lapack_logical const* wantq, lapack_logical const* wantz, lapack_int const* n,
11992  lapack_complex_float* A, lapack_int const* lda,
11993  lapack_complex_float* B, lapack_int const* ldb,
11994  lapack_complex_float* Q, lapack_int const* ldq,
11995  lapack_complex_float* Z, lapack_int const* ldz, lapack_int const* ifst, lapack_int* ilst,
11996  lapack_int* info );
11997 
11998 #define LAPACK_dtgexc LAPACK_GLOBAL(dtgexc,DTGEXC)
11999 void LAPACK_dtgexc(
12000  lapack_logical const* wantq, lapack_logical const* wantz, lapack_int const* n,
12001  double* A, lapack_int const* lda,
12002  double* B, lapack_int const* ldb,
12003  double* Q, lapack_int const* ldq,
12004  double* Z, lapack_int const* ldz, lapack_int* ifst, lapack_int* ilst,
12005  double* work, lapack_int const* lwork,
12006  lapack_int* info );
12007 
12008 #define LAPACK_stgexc LAPACK_GLOBAL(stgexc,STGEXC)
12009 void LAPACK_stgexc(
12010  lapack_logical const* wantq, lapack_logical const* wantz, lapack_int const* n,
12011  float* A, lapack_int const* lda,
12012  float* B, lapack_int const* ldb,
12013  float* Q, lapack_int const* ldq,
12014  float* Z, lapack_int const* ldz, lapack_int* ifst, lapack_int* ilst,
12015  float* work, lapack_int const* lwork,
12016  lapack_int* info );
12017 
12018 #define LAPACK_ztgexc LAPACK_GLOBAL(ztgexc,ZTGEXC)
12019 void LAPACK_ztgexc(
12020  lapack_logical const* wantq, lapack_logical const* wantz, lapack_int const* n,
12021  lapack_complex_double* A, lapack_int const* lda,
12022  lapack_complex_double* B, lapack_int const* ldb,
12023  lapack_complex_double* Q, lapack_int const* ldq,
12024  lapack_complex_double* Z, lapack_int const* ldz, lapack_int const* ifst, lapack_int* ilst,
12025  lapack_int* info );
12026 
12027 #define LAPACK_ctgsen LAPACK_GLOBAL(ctgsen,CTGSEN)
12028 void LAPACK_ctgsen(
12029  lapack_int const* ijob, lapack_logical const* wantq, lapack_logical const* wantz, lapack_logical const* select, lapack_int const* n,
12030  lapack_complex_float* A, lapack_int const* lda,
12031  lapack_complex_float* B, lapack_int const* ldb,
12032  lapack_complex_float* alpha,
12033  lapack_complex_float* beta,
12034  lapack_complex_float* Q, lapack_int const* ldq,
12035  lapack_complex_float* Z, lapack_int const* ldz, lapack_int* m,
12036  float* pl,
12037  float* pr,
12038  float* DIF,
12039  lapack_complex_float* work, lapack_int const* lwork,
12040  lapack_int* iwork, lapack_int const* liwork,
12041  lapack_int* info );
12042 
12043 #define LAPACK_dtgsen LAPACK_GLOBAL(dtgsen,DTGSEN)
12044 void LAPACK_dtgsen(
12045  lapack_int const* ijob, lapack_logical const* wantq, lapack_logical const* wantz, lapack_logical const* select, lapack_int const* n,
12046  double* A, lapack_int const* lda,
12047  double* B, lapack_int const* ldb,
12048  double* alphar,
12049  double* alphai,
12050  double* beta,
12051  double* Q, lapack_int const* ldq,
12052  double* Z, lapack_int const* ldz, lapack_int* m,
12053  double* pl,
12054  double* pr,
12055  double* DIF,
12056  double* work, lapack_int const* lwork,
12057  lapack_int* iwork, lapack_int const* liwork,
12058  lapack_int* info );
12059 
12060 #define LAPACK_stgsen LAPACK_GLOBAL(stgsen,STGSEN)
12061 void LAPACK_stgsen(
12062  lapack_int const* ijob, lapack_logical const* wantq, lapack_logical const* wantz, lapack_logical const* select, lapack_int const* n,
12063  float* A, lapack_int const* lda,
12064  float* B, lapack_int const* ldb,
12065  float* alphar,
12066  float* alphai,
12067  float* beta,
12068  float* Q, lapack_int const* ldq,
12069  float* Z, lapack_int const* ldz, lapack_int* m,
12070  float* pl,
12071  float* pr,
12072  float* DIF,
12073  float* work, lapack_int const* lwork,
12074  lapack_int* iwork, lapack_int const* liwork,
12075  lapack_int* info );
12076 
12077 #define LAPACK_ztgsen LAPACK_GLOBAL(ztgsen,ZTGSEN)
12078 void LAPACK_ztgsen(
12079  lapack_int const* ijob, lapack_logical const* wantq, lapack_logical const* wantz, lapack_logical const* select, lapack_int const* n,
12080  lapack_complex_double* A, lapack_int const* lda,
12081  lapack_complex_double* B, lapack_int const* ldb,
12082  lapack_complex_double* alpha,
12083  lapack_complex_double* beta,
12084  lapack_complex_double* Q, lapack_int const* ldq,
12085  lapack_complex_double* Z, lapack_int const* ldz, lapack_int* m,
12086  double* pl,
12087  double* pr,
12088  double* DIF,
12089  lapack_complex_double* work, lapack_int const* lwork,
12090  lapack_int* iwork, lapack_int const* liwork,
12091  lapack_int* info );
12092 
12093 #define LAPACK_ctgsja LAPACK_GLOBAL(ctgsja,CTGSJA)
12094 void LAPACK_ctgsja(
12095  char const* jobu, char const* jobv, char const* jobq,
12096  lapack_int const* m, lapack_int const* p, lapack_int const* n, lapack_int const* k, lapack_int const* l,
12097  lapack_complex_float* A, lapack_int const* lda,
12098  lapack_complex_float* B, lapack_int const* ldb,
12099  float const* tola,
12100  float const* tolb,
12101  float* alpha,
12102  float* beta,
12103  lapack_complex_float* U, lapack_int const* ldu,
12104  lapack_complex_float* V, lapack_int const* ldv,
12105  lapack_complex_float* Q, lapack_int const* ldq,
12106  lapack_complex_float* work, lapack_int* ncycle,
12107  lapack_int* info );
12108 
12109 #define LAPACK_dtgsja LAPACK_GLOBAL(dtgsja,DTGSJA)
12110 void LAPACK_dtgsja(
12111  char const* jobu, char const* jobv, char const* jobq,
12112  lapack_int const* m, lapack_int const* p, lapack_int const* n, lapack_int const* k, lapack_int const* l,
12113  double* A, lapack_int const* lda,
12114  double* B, lapack_int const* ldb,
12115  double const* tola,
12116  double const* tolb,
12117  double* alpha,
12118  double* beta,
12119  double* U, lapack_int const* ldu,
12120  double* V, lapack_int const* ldv,
12121  double* Q, lapack_int const* ldq,
12122  double* work, lapack_int* ncycle,
12123  lapack_int* info );
12124 
12125 #define LAPACK_stgsja LAPACK_GLOBAL(stgsja,STGSJA)
12126 void LAPACK_stgsja(
12127  char const* jobu, char const* jobv, char const* jobq,
12128  lapack_int const* m, lapack_int const* p, lapack_int const* n, lapack_int const* k, lapack_int const* l,
12129  float* A, lapack_int const* lda,
12130  float* B, lapack_int const* ldb,
12131  float const* tola,
12132  float const* tolb,
12133  float* alpha,
12134  float* beta,
12135  float* U, lapack_int const* ldu,
12136  float* V, lapack_int const* ldv,
12137  float* Q, lapack_int const* ldq,
12138  float* work, lapack_int* ncycle,
12139  lapack_int* info );
12140 
12141 #define LAPACK_ztgsja LAPACK_GLOBAL(ztgsja,ZTGSJA)
12142 void LAPACK_ztgsja(
12143  char const* jobu, char const* jobv, char const* jobq,
12144  lapack_int const* m, lapack_int const* p, lapack_int const* n, lapack_int const* k, lapack_int const* l,
12145  lapack_complex_double* A, lapack_int const* lda,
12146  lapack_complex_double* B, lapack_int const* ldb,
12147  double const* tola,
12148  double const* tolb,
12149  double* alpha,
12150  double* beta,
12151  lapack_complex_double* U, lapack_int const* ldu,
12152  lapack_complex_double* V, lapack_int const* ldv,
12153  lapack_complex_double* Q, lapack_int const* ldq,
12154  lapack_complex_double* work, lapack_int* ncycle,
12155  lapack_int* info );
12156 
12157 #define LAPACK_ctgsna LAPACK_GLOBAL(ctgsna,CTGSNA)
12158 void LAPACK_ctgsna(
12159  char const* job, char const* howmny,
12160  lapack_logical const* select,
12161  lapack_int const* n,
12162  lapack_complex_float const* A, lapack_int const* lda,
12163  lapack_complex_float const* B, lapack_int const* ldb,
12164  lapack_complex_float const* VL, lapack_int const* ldvl,
12165  lapack_complex_float const* VR, lapack_int const* ldvr,
12166  float* S,
12167  float* DIF, lapack_int const* mm, lapack_int* m,
12168  lapack_complex_float* work, lapack_int const* lwork,
12169  lapack_int* iwork,
12170  lapack_int* info );
12171 
12172 #define LAPACK_dtgsna LAPACK_GLOBAL(dtgsna,DTGSNA)
12173 void LAPACK_dtgsna(
12174  char const* job, char const* howmny,
12175  lapack_logical const* select,
12176  lapack_int const* n,
12177  double const* A, lapack_int const* lda,
12178  double const* B, lapack_int const* ldb,
12179  double const* VL, lapack_int const* ldvl,
12180  double const* VR, lapack_int const* ldvr,
12181  double* S,
12182  double* DIF, lapack_int const* mm, lapack_int* m,
12183  double* work, lapack_int const* lwork,
12184  lapack_int* iwork,
12185  lapack_int* info );
12186 
12187 #define LAPACK_stgsna LAPACK_GLOBAL(stgsna,STGSNA)
12188 void LAPACK_stgsna(
12189  char const* job, char const* howmny,
12190  lapack_logical const* select,
12191  lapack_int const* n,
12192  float const* A, lapack_int const* lda,
12193  float const* B, lapack_int const* ldb,
12194  float const* VL, lapack_int const* ldvl,
12195  float const* VR, lapack_int const* ldvr,
12196  float* S,
12197  float* DIF, lapack_int const* mm, lapack_int* m,
12198  float* work, lapack_int const* lwork,
12199  lapack_int* iwork,
12200  lapack_int* info );
12201 
12202 #define LAPACK_ztgsna LAPACK_GLOBAL(ztgsna,ZTGSNA)
12203 void LAPACK_ztgsna(
12204  char const* job, char const* howmny,
12205  lapack_logical const* select,
12206  lapack_int const* n,
12207  lapack_complex_double const* A, lapack_int const* lda,
12208  lapack_complex_double const* B, lapack_int const* ldb,
12209  lapack_complex_double const* VL, lapack_int const* ldvl,
12210  lapack_complex_double const* VR, lapack_int const* ldvr,
12211  double* S,
12212  double* DIF, lapack_int const* mm, lapack_int* m,
12213  lapack_complex_double* work, lapack_int const* lwork,
12214  lapack_int* iwork,
12215  lapack_int* info );
12216 
12217 #define LAPACK_ctgsyl LAPACK_GLOBAL(ctgsyl,CTGSYL)
12218 void LAPACK_ctgsyl(
12219  char const* trans,
12220  lapack_int const* ijob, lapack_int const* m, lapack_int const* n,
12221  lapack_complex_float const* A, lapack_int const* lda,
12222  lapack_complex_float const* B, lapack_int const* ldb,
12223  lapack_complex_float* C, lapack_int const* ldc,
12224  lapack_complex_float const* D, lapack_int const* ldd,
12225  lapack_complex_float const* E, lapack_int const* lde,
12226  lapack_complex_float* F, lapack_int const* ldf,
12227  float* dif,
12228  float* scale,
12229  lapack_complex_float* work, lapack_int const* lwork,
12230  lapack_int* iwork,
12231  lapack_int* info );
12232 
12233 #define LAPACK_dtgsyl LAPACK_GLOBAL(dtgsyl,DTGSYL)
12234 void LAPACK_dtgsyl(
12235  char const* trans,
12236  lapack_int const* ijob, lapack_int const* m, lapack_int const* n,
12237  double const* A, lapack_int const* lda,
12238  double const* B, lapack_int const* ldb,
12239  double* C, lapack_int const* ldc,
12240  double const* D, lapack_int const* ldd,
12241  double const* E, lapack_int const* lde,
12242  double* F, lapack_int const* ldf,
12243  double* dif,
12244  double* scale,
12245  double* work, lapack_int const* lwork,
12246  lapack_int* iwork,
12247  lapack_int* info );
12248 
12249 #define LAPACK_stgsyl LAPACK_GLOBAL(stgsyl,STGSYL)
12250 void LAPACK_stgsyl(
12251  char const* trans,
12252  lapack_int const* ijob, lapack_int const* m, lapack_int const* n,
12253  float const* A, lapack_int const* lda,
12254  float const* B, lapack_int const* ldb,
12255  float* C, lapack_int const* ldc,
12256  float const* D, lapack_int const* ldd,
12257  float const* E, lapack_int const* lde,
12258  float* F, lapack_int const* ldf,
12259  float* dif,
12260  float* scale,
12261  float* work, lapack_int const* lwork,
12262  lapack_int* iwork,
12263  lapack_int* info );
12264 
12265 #define LAPACK_ztgsyl LAPACK_GLOBAL(ztgsyl,ZTGSYL)
12266 void LAPACK_ztgsyl(
12267  char const* trans,
12268  lapack_int const* ijob, lapack_int const* m, lapack_int const* n,
12269  lapack_complex_double const* A, lapack_int const* lda,
12270  lapack_complex_double const* B, lapack_int const* ldb,
12271  lapack_complex_double* C, lapack_int const* ldc,
12272  lapack_complex_double const* D, lapack_int const* ldd,
12273  lapack_complex_double const* E, lapack_int const* lde,
12274  lapack_complex_double* F, lapack_int const* ldf,
12275  double* dif,
12276  double* scale,
12277  lapack_complex_double* work, lapack_int const* lwork,
12278  lapack_int* iwork,
12279  lapack_int* info );
12280 
12281 #define LAPACK_ctpcon LAPACK_GLOBAL(ctpcon,CTPCON)
12282 void LAPACK_ctpcon(
12283  char const* norm, char const* uplo, char const* diag,
12284  lapack_int const* n,
12285  lapack_complex_float const* AP,
12286  float* rcond,
12287  lapack_complex_float* work,
12288  float* rwork,
12289  lapack_int* info );
12290 
12291 #define LAPACK_dtpcon LAPACK_GLOBAL(dtpcon,DTPCON)
12292 void LAPACK_dtpcon(
12293  char const* norm, char const* uplo, char const* diag,
12294  lapack_int const* n,
12295  double const* AP,
12296  double* rcond,
12297  double* work,
12298  lapack_int* iwork,
12299  lapack_int* info );
12300 
12301 #define LAPACK_stpcon LAPACK_GLOBAL(stpcon,STPCON)
12302 void LAPACK_stpcon(
12303  char const* norm, char const* uplo, char const* diag,
12304  lapack_int const* n,
12305  float const* AP,
12306  float* rcond,
12307  float* work,
12308  lapack_int* iwork,
12309  lapack_int* info );
12310 
12311 #define LAPACK_ztpcon LAPACK_GLOBAL(ztpcon,ZTPCON)
12312 void LAPACK_ztpcon(
12313  char const* norm, char const* uplo, char const* diag,
12314  lapack_int const* n,
12315  lapack_complex_double const* AP,
12316  double* rcond,
12317  lapack_complex_double* work,
12318  double* rwork,
12319  lapack_int* info );
12320 
12321 #define LAPACK_ctplqt LAPACK_GLOBAL(ctplqt,CTPLQT)
12322 void LAPACK_ctplqt(
12323  lapack_int const* m, lapack_int const* n, lapack_int const* l, lapack_int const* mb,
12324  lapack_complex_float* A, lapack_int const* lda,
12325  lapack_complex_float* B, lapack_int const* ldb,
12326  lapack_complex_float* T, lapack_int const* ldt,
12327  lapack_complex_float* work,
12328  lapack_int* info );
12329 
12330 #define LAPACK_dtplqt LAPACK_GLOBAL(dtplqt,DTPLQT)
12331 void LAPACK_dtplqt(
12332  lapack_int const* m, lapack_int const* n, lapack_int const* l, lapack_int const* mb,
12333  double* A, lapack_int const* lda,
12334  double* B, lapack_int const* ldb,
12335  double* T, lapack_int const* ldt,
12336  double* work,
12337  lapack_int* info );
12338 
12339 #define LAPACK_stplqt LAPACK_GLOBAL(stplqt,STPLQT)
12340 void LAPACK_stplqt(
12341  lapack_int const* m, lapack_int const* n, lapack_int const* l, lapack_int const* mb,
12342  float* A, lapack_int const* lda,
12343  float* B, lapack_int const* ldb,
12344  float* T, lapack_int const* ldt,
12345  float* work,
12346  lapack_int* info );
12347 
12348 #define LAPACK_ztplqt LAPACK_GLOBAL(ztplqt,ZTPLQT)
12349 void LAPACK_ztplqt(
12350  lapack_int const* m, lapack_int const* n, lapack_int const* l, lapack_int const* mb,
12351  lapack_complex_double* A, lapack_int const* lda,
12352  lapack_complex_double* B, lapack_int const* ldb,
12353  lapack_complex_double* T, lapack_int const* ldt,
12354  lapack_complex_double* work,
12355  lapack_int* info );
12356 
12357 #define LAPACK_ctplqt2 LAPACK_GLOBAL(ctplqt2,CTPLQT2)
12358 void LAPACK_ctplqt2(
12359  lapack_int const* m, lapack_int const* n, lapack_int const* l,
12360  lapack_complex_float* A, lapack_int const* lda,
12361  lapack_complex_float* B, lapack_int const* ldb,
12362  lapack_complex_float* T, lapack_int const* ldt,
12363  lapack_int* info );
12364 
12365 #define LAPACK_dtplqt2 LAPACK_GLOBAL(dtplqt2,DTPLQT2)
12366 void LAPACK_dtplqt2(
12367  lapack_int const* m, lapack_int const* n, lapack_int const* l,
12368  double* A, lapack_int const* lda,
12369  double* B, lapack_int const* ldb,
12370  double* T, lapack_int const* ldt,
12371  lapack_int* info );
12372 
12373 #define LAPACK_stplqt2 LAPACK_GLOBAL(stplqt2,STPLQT2)
12374 void LAPACK_stplqt2(
12375  lapack_int const* m, lapack_int const* n, lapack_int const* l,
12376  float* A, lapack_int const* lda,
12377  float* B, lapack_int const* ldb,
12378  float* T, lapack_int const* ldt,
12379  lapack_int* info );
12380 
12381 #define LAPACK_ztplqt2 LAPACK_GLOBAL(ztplqt2,ZTPLQT2)
12382 void LAPACK_ztplqt2(
12383  lapack_int const* m, lapack_int const* n, lapack_int const* l,
12384  lapack_complex_double* A, lapack_int const* lda,
12385  lapack_complex_double* B, lapack_int const* ldb,
12386  lapack_complex_double* T, lapack_int const* ldt,
12387  lapack_int* info );
12388 
12389 #define LAPACK_ctpmlqt LAPACK_GLOBAL(ctpmlqt,CTPMLQT)
12390 void LAPACK_ctpmlqt(
12391  char const* side, char const* trans,
12392  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l, lapack_int const* mb,
12393  lapack_complex_float const* V, lapack_int const* ldv,
12394  lapack_complex_float const* T, lapack_int const* ldt,
12395  lapack_complex_float* A, lapack_int const* lda,
12396  lapack_complex_float* B, lapack_int const* ldb,
12397  lapack_complex_float* work,
12398  lapack_int* info );
12399 
12400 #define LAPACK_dtpmlqt LAPACK_GLOBAL(dtpmlqt,DTPMLQT)
12401 void LAPACK_dtpmlqt(
12402  char const* side, char const* trans,
12403  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l, lapack_int const* mb,
12404  double const* V, lapack_int const* ldv,
12405  double const* T, lapack_int const* ldt,
12406  double* A, lapack_int const* lda,
12407  double* B, lapack_int const* ldb,
12408  double* work,
12409  lapack_int* info );
12410 
12411 #define LAPACK_stpmlqt LAPACK_GLOBAL(stpmlqt,STPMLQT)
12412 void LAPACK_stpmlqt(
12413  char const* side, char const* trans,
12414  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l, lapack_int const* mb,
12415  float const* V, lapack_int const* ldv,
12416  float const* T, lapack_int const* ldt,
12417  float* A, lapack_int const* lda,
12418  float* B, lapack_int const* ldb,
12419  float* work,
12420  lapack_int* info );
12421 
12422 #define LAPACK_ztpmlqt LAPACK_GLOBAL(ztpmlqt,ZTPMLQT)
12423 void LAPACK_ztpmlqt(
12424  char const* side, char const* trans,
12425  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l, lapack_int const* mb,
12426  lapack_complex_double const* V, lapack_int const* ldv,
12427  lapack_complex_double const* T, lapack_int const* ldt,
12428  lapack_complex_double* A, lapack_int const* lda,
12429  lapack_complex_double* B, lapack_int const* ldb,
12430  lapack_complex_double* work,
12431  lapack_int* info );
12432 
12433 #define LAPACK_ctpmqrt LAPACK_GLOBAL(ctpmqrt,CTPMQRT)
12434 void LAPACK_ctpmqrt(
12435  char const* side, char const* trans,
12436  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l, lapack_int const* nb,
12437  lapack_complex_float const* V, lapack_int const* ldv,
12438  lapack_complex_float const* T, lapack_int const* ldt,
12439  lapack_complex_float* A, lapack_int const* lda,
12440  lapack_complex_float* B, lapack_int const* ldb,
12441  lapack_complex_float* work,
12442  lapack_int* info );
12443 
12444 #define LAPACK_dtpmqrt LAPACK_GLOBAL(dtpmqrt,DTPMQRT)
12445 void LAPACK_dtpmqrt(
12446  char const* side, char const* trans,
12447  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l, lapack_int const* nb,
12448  double const* V, lapack_int const* ldv,
12449  double const* T, lapack_int const* ldt,
12450  double* A, lapack_int const* lda,
12451  double* B, lapack_int const* ldb,
12452  double* work,
12453  lapack_int* info );
12454 
12455 #define LAPACK_stpmqrt LAPACK_GLOBAL(stpmqrt,STPMQRT)
12456 void LAPACK_stpmqrt(
12457  char const* side, char const* trans,
12458  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l, lapack_int const* nb,
12459  float const* V, lapack_int const* ldv,
12460  float const* T, lapack_int const* ldt,
12461  float* A, lapack_int const* lda,
12462  float* B, lapack_int const* ldb,
12463  float* work,
12464  lapack_int* info );
12465 
12466 #define LAPACK_ztpmqrt LAPACK_GLOBAL(ztpmqrt,ZTPMQRT)
12467 void LAPACK_ztpmqrt(
12468  char const* side, char const* trans,
12469  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l, lapack_int const* nb,
12470  lapack_complex_double const* V, lapack_int const* ldv,
12471  lapack_complex_double const* T, lapack_int const* ldt,
12472  lapack_complex_double* A, lapack_int const* lda,
12473  lapack_complex_double* B, lapack_int const* ldb,
12474  lapack_complex_double* work,
12475  lapack_int* info );
12476 
12477 #define LAPACK_ctpqrt LAPACK_GLOBAL(ctpqrt,CTPQRT)
12478 void LAPACK_ctpqrt(
12479  lapack_int const* m, lapack_int const* n, lapack_int const* l, lapack_int const* nb,
12480  lapack_complex_float* A, lapack_int const* lda,
12481  lapack_complex_float* B, lapack_int const* ldb,
12482  lapack_complex_float* T, lapack_int const* ldt,
12483  lapack_complex_float* work,
12484  lapack_int* info );
12485 
12486 #define LAPACK_dtpqrt LAPACK_GLOBAL(dtpqrt,DTPQRT)
12487 void LAPACK_dtpqrt(
12488  lapack_int const* m, lapack_int const* n, lapack_int const* l, lapack_int const* nb,
12489  double* A, lapack_int const* lda,
12490  double* B, lapack_int const* ldb,
12491  double* T, lapack_int const* ldt,
12492  double* work,
12493  lapack_int* info );
12494 
12495 #define LAPACK_stpqrt LAPACK_GLOBAL(stpqrt,STPQRT)
12496 void LAPACK_stpqrt(
12497  lapack_int const* m, lapack_int const* n, lapack_int const* l, lapack_int const* nb,
12498  float* A, lapack_int const* lda,
12499  float* B, lapack_int const* ldb,
12500  float* T, lapack_int const* ldt,
12501  float* work,
12502  lapack_int* info );
12503 
12504 #define LAPACK_ztpqrt LAPACK_GLOBAL(ztpqrt,ZTPQRT)
12505 void LAPACK_ztpqrt(
12506  lapack_int const* m, lapack_int const* n, lapack_int const* l, lapack_int const* nb,
12507  lapack_complex_double* A, lapack_int const* lda,
12508  lapack_complex_double* B, lapack_int const* ldb,
12509  lapack_complex_double* T, lapack_int const* ldt,
12510  lapack_complex_double* work,
12511  lapack_int* info );
12512 
12513 #define LAPACK_ctpqrt2 LAPACK_GLOBAL(ctpqrt2,CTPQRT2)
12514 void LAPACK_ctpqrt2(
12515  lapack_int const* m, lapack_int const* n, lapack_int const* l,
12516  lapack_complex_float* A, lapack_int const* lda,
12517  lapack_complex_float* B, lapack_int const* ldb,
12518  lapack_complex_float* T, lapack_int const* ldt,
12519  lapack_int* info );
12520 
12521 #define LAPACK_dtpqrt2 LAPACK_GLOBAL(dtpqrt2,DTPQRT2)
12522 void LAPACK_dtpqrt2(
12523  lapack_int const* m, lapack_int const* n, lapack_int const* l,
12524  double* A, lapack_int const* lda,
12525  double* B, lapack_int const* ldb,
12526  double* T, lapack_int const* ldt,
12527  lapack_int* info );
12528 
12529 #define LAPACK_stpqrt2 LAPACK_GLOBAL(stpqrt2,STPQRT2)
12530 void LAPACK_stpqrt2(
12531  lapack_int const* m, lapack_int const* n, lapack_int const* l,
12532  float* A, lapack_int const* lda,
12533  float* B, lapack_int const* ldb,
12534  float* T, lapack_int const* ldt,
12535  lapack_int* info );
12536 
12537 #define LAPACK_ztpqrt2 LAPACK_GLOBAL(ztpqrt2,ZTPQRT2)
12538 void LAPACK_ztpqrt2(
12539  lapack_int const* m, lapack_int const* n, lapack_int const* l,
12540  lapack_complex_double* A, lapack_int const* lda,
12541  lapack_complex_double* B, lapack_int const* ldb,
12542  lapack_complex_double* T, lapack_int const* ldt,
12543  lapack_int* info );
12544 
12545 #define LAPACK_ctprfb LAPACK_GLOBAL(ctprfb,CTPRFB)
12546 void LAPACK_ctprfb(
12547  char const* side, char const* trans, char const* direct, char const* storev,
12548  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l,
12549  lapack_complex_float const* V, lapack_int const* ldv,
12550  lapack_complex_float const* T, lapack_int const* ldt,
12551  lapack_complex_float* A, lapack_int const* lda,
12552  lapack_complex_float* B, lapack_int const* ldb,
12553  lapack_complex_float* work, lapack_int const* ldwork );
12554 
12555 #define LAPACK_dtprfb LAPACK_GLOBAL(dtprfb,DTPRFB)
12556 void LAPACK_dtprfb(
12557  char const* side, char const* trans, char const* direct, char const* storev,
12558  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l,
12559  double const* V, lapack_int const* ldv,
12560  double const* T, lapack_int const* ldt,
12561  double* A, lapack_int const* lda,
12562  double* B, lapack_int const* ldb,
12563  double* work, lapack_int const* ldwork );
12564 
12565 #define LAPACK_stprfb LAPACK_GLOBAL(stprfb,STPRFB)
12566 void LAPACK_stprfb(
12567  char const* side, char const* trans, char const* direct, char const* storev,
12568  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l,
12569  float const* V, lapack_int const* ldv,
12570  float const* T, lapack_int const* ldt,
12571  float* A, lapack_int const* lda,
12572  float* B, lapack_int const* ldb,
12573  float* work, lapack_int const* ldwork );
12574 
12575 #define LAPACK_ztprfb LAPACK_GLOBAL(ztprfb,ZTPRFB)
12576 void LAPACK_ztprfb(
12577  char const* side, char const* trans, char const* direct, char const* storev,
12578  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l,
12579  lapack_complex_double const* V, lapack_int const* ldv,
12580  lapack_complex_double const* T, lapack_int const* ldt,
12581  lapack_complex_double* A, lapack_int const* lda,
12582  lapack_complex_double* B, lapack_int const* ldb,
12583  lapack_complex_double* work, lapack_int const* ldwork );
12584 
12585 #define LAPACK_ctprfs LAPACK_GLOBAL(ctprfs,CTPRFS)
12586 void LAPACK_ctprfs(
12587  char const* uplo, char const* trans, char const* diag,
12588  lapack_int const* n, lapack_int const* nrhs,
12589  lapack_complex_float const* AP,
12590  lapack_complex_float const* B, lapack_int const* ldb,
12591  lapack_complex_float const* X, lapack_int const* ldx,
12592  float* ferr,
12593  float* berr,
12594  lapack_complex_float* work,
12595  float* rwork,
12596  lapack_int* info );
12597 
12598 #define LAPACK_dtprfs LAPACK_GLOBAL(dtprfs,DTPRFS)
12599 void LAPACK_dtprfs(
12600  char const* uplo, char const* trans, char const* diag,
12601  lapack_int const* n, lapack_int const* nrhs,
12602  double const* AP,
12603  double const* B, lapack_int const* ldb,
12604  double const* X, lapack_int const* ldx,
12605  double* ferr,
12606  double* berr,
12607  double* work,
12608  lapack_int* iwork,
12609  lapack_int* info );
12610 
12611 #define LAPACK_stprfs LAPACK_GLOBAL(stprfs,STPRFS)
12612 void LAPACK_stprfs(
12613  char const* uplo, char const* trans, char const* diag,
12614  lapack_int const* n, lapack_int const* nrhs,
12615  float const* AP,
12616  float const* B, lapack_int const* ldb,
12617  float const* X, lapack_int const* ldx,
12618  float* ferr,
12619  float* berr,
12620  float* work,
12621  lapack_int* iwork,
12622  lapack_int* info );
12623 
12624 #define LAPACK_ztprfs LAPACK_GLOBAL(ztprfs,ZTPRFS)
12625 void LAPACK_ztprfs(
12626  char const* uplo, char const* trans, char const* diag,
12627  lapack_int const* n, lapack_int const* nrhs,
12628  lapack_complex_double const* AP,
12629  lapack_complex_double const* B, lapack_int const* ldb,
12630  lapack_complex_double const* X, lapack_int const* ldx,
12631  double* ferr,
12632  double* berr,
12633  lapack_complex_double* work,
12634  double* rwork,
12635  lapack_int* info );
12636 
12637 #define LAPACK_ctptri LAPACK_GLOBAL(ctptri,CTPTRI)
12638 void LAPACK_ctptri(
12639  char const* uplo, char const* diag,
12640  lapack_int const* n,
12641  lapack_complex_float* AP,
12642  lapack_int* info );
12643 
12644 #define LAPACK_dtptri LAPACK_GLOBAL(dtptri,DTPTRI)
12645 void LAPACK_dtptri(
12646  char const* uplo, char const* diag,
12647  lapack_int const* n,
12648  double* AP,
12649  lapack_int* info );
12650 
12651 #define LAPACK_stptri LAPACK_GLOBAL(stptri,STPTRI)
12652 void LAPACK_stptri(
12653  char const* uplo, char const* diag,
12654  lapack_int const* n,
12655  float* AP,
12656  lapack_int* info );
12657 
12658 #define LAPACK_ztptri LAPACK_GLOBAL(ztptri,ZTPTRI)
12659 void LAPACK_ztptri(
12660  char const* uplo, char const* diag,
12661  lapack_int const* n,
12662  lapack_complex_double* AP,
12663  lapack_int* info );
12664 
12665 #define LAPACK_ctptrs LAPACK_GLOBAL(ctptrs,CTPTRS)
12666 void LAPACK_ctptrs(
12667  char const* uplo, char const* trans, char const* diag,
12668  lapack_int const* n, lapack_int const* nrhs,
12669  lapack_complex_float const* AP,
12670  lapack_complex_float* B, lapack_int const* ldb,
12671  lapack_int* info );
12672 
12673 #define LAPACK_dtptrs LAPACK_GLOBAL(dtptrs,DTPTRS)
12674 void LAPACK_dtptrs(
12675  char const* uplo, char const* trans, char const* diag,
12676  lapack_int const* n, lapack_int const* nrhs,
12677  double const* AP,
12678  double* B, lapack_int const* ldb,
12679  lapack_int* info );
12680 
12681 #define LAPACK_stptrs LAPACK_GLOBAL(stptrs,STPTRS)
12682 void LAPACK_stptrs(
12683  char const* uplo, char const* trans, char const* diag,
12684  lapack_int const* n, lapack_int const* nrhs,
12685  float const* AP,
12686  float* B, lapack_int const* ldb,
12687  lapack_int* info );
12688 
12689 #define LAPACK_ztptrs LAPACK_GLOBAL(ztptrs,ZTPTRS)
12690 void LAPACK_ztptrs(
12691  char const* uplo, char const* trans, char const* diag,
12692  lapack_int const* n, lapack_int const* nrhs,
12693  lapack_complex_double const* AP,
12694  lapack_complex_double* B, lapack_int const* ldb,
12695  lapack_int* info );
12696 
12697 #define LAPACK_ctpttf LAPACK_GLOBAL(ctpttf,CTPTTF)
12698 void LAPACK_ctpttf(
12699  char const* transr, char const* uplo,
12700  lapack_int const* n,
12701  lapack_complex_float const* AP,
12702  lapack_complex_float* ARF,
12703  lapack_int* info );
12704 
12705 #define LAPACK_dtpttf LAPACK_GLOBAL(dtpttf,DTPTTF)
12706 void LAPACK_dtpttf(
12707  char const* transr, char const* uplo,
12708  lapack_int const* n,
12709  double const* AP,
12710  double* ARF,
12711  lapack_int* info );
12712 
12713 #define LAPACK_stpttf LAPACK_GLOBAL(stpttf,STPTTF)
12714 void LAPACK_stpttf(
12715  char const* transr, char const* uplo,
12716  lapack_int const* n,
12717  float const* AP,
12718  float* ARF,
12719  lapack_int* info );
12720 
12721 #define LAPACK_ztpttf LAPACK_GLOBAL(ztpttf,ZTPTTF)
12722 void LAPACK_ztpttf(
12723  char const* transr, char const* uplo,
12724  lapack_int const* n,
12725  lapack_complex_double const* AP,
12726  lapack_complex_double* ARF,
12727  lapack_int* info );
12728 
12729 #define LAPACK_ctpttr LAPACK_GLOBAL(ctpttr,CTPTTR)
12730 void LAPACK_ctpttr(
12731  char const* uplo,
12732  lapack_int const* n,
12733  lapack_complex_float const* AP,
12734  lapack_complex_float* A, lapack_int const* lda,
12735  lapack_int* info );
12736 
12737 #define LAPACK_dtpttr LAPACK_GLOBAL(dtpttr,DTPTTR)
12738 void LAPACK_dtpttr(
12739  char const* uplo,
12740  lapack_int const* n,
12741  double const* AP,
12742  double* A, lapack_int const* lda,
12743  lapack_int* info );
12744 
12745 #define LAPACK_stpttr LAPACK_GLOBAL(stpttr,STPTTR)
12746 void LAPACK_stpttr(
12747  char const* uplo,
12748  lapack_int const* n,
12749  float const* AP,
12750  float* A, lapack_int const* lda,
12751  lapack_int* info );
12752 
12753 #define LAPACK_ztpttr LAPACK_GLOBAL(ztpttr,ZTPTTR)
12754 void LAPACK_ztpttr(
12755  char const* uplo,
12756  lapack_int const* n,
12757  lapack_complex_double const* AP,
12758  lapack_complex_double* A, lapack_int const* lda,
12759  lapack_int* info );
12760 
12761 #define LAPACK_ctrcon LAPACK_GLOBAL(ctrcon,CTRCON)
12762 void LAPACK_ctrcon(
12763  char const* norm, char const* uplo, char const* diag,
12764  lapack_int const* n,
12765  lapack_complex_float const* A, lapack_int const* lda,
12766  float* rcond,
12767  lapack_complex_float* work,
12768  float* rwork,
12769  lapack_int* info );
12770 
12771 #define LAPACK_dtrcon LAPACK_GLOBAL(dtrcon,DTRCON)
12772 void LAPACK_dtrcon(
12773  char const* norm, char const* uplo, char const* diag,
12774  lapack_int const* n,
12775  double const* A, lapack_int const* lda,
12776  double* rcond,
12777  double* work,
12778  lapack_int* iwork,
12779  lapack_int* info );
12780 
12781 #define LAPACK_strcon LAPACK_GLOBAL(strcon,STRCON)
12782 void LAPACK_strcon(
12783  char const* norm, char const* uplo, char const* diag,
12784  lapack_int const* n,
12785  float const* A, lapack_int const* lda,
12786  float* rcond,
12787  float* work,
12788  lapack_int* iwork,
12789  lapack_int* info );
12790 
12791 #define LAPACK_ztrcon LAPACK_GLOBAL(ztrcon,ZTRCON)
12792 void LAPACK_ztrcon(
12793  char const* norm, char const* uplo, char const* diag,
12794  lapack_int const* n,
12795  lapack_complex_double const* A, lapack_int const* lda,
12796  double* rcond,
12797  lapack_complex_double* work,
12798  double* rwork,
12799  lapack_int* info );
12800 
12801 #define LAPACK_ctrevc LAPACK_GLOBAL(ctrevc,CTREVC)
12802 void LAPACK_ctrevc(
12803  char const* side, char const* howmny,
12804  lapack_logical const* select,
12805  lapack_int const* n,
12806  lapack_complex_float* T, lapack_int const* ldt,
12807  lapack_complex_float* VL, lapack_int const* ldvl,
12808  lapack_complex_float* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
12809  lapack_complex_float* work,
12810  float* rwork,
12811  lapack_int* info );
12812 
12813 #define LAPACK_dtrevc LAPACK_GLOBAL(dtrevc,DTREVC)
12814 void LAPACK_dtrevc(
12815  char const* side, char const* howmny,
12816  lapack_logical* select,
12817  lapack_int const* n,
12818  double const* T, lapack_int const* ldt,
12819  double* VL, lapack_int const* ldvl,
12820  double* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
12821  double* work,
12822  lapack_int* info );
12823 
12824 #define LAPACK_strevc LAPACK_GLOBAL(strevc,STREVC)
12825 void LAPACK_strevc(
12826  char const* side, char const* howmny,
12827  lapack_logical* select,
12828  lapack_int const* n,
12829  float const* T, lapack_int const* ldt,
12830  float* VL, lapack_int const* ldvl,
12831  float* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
12832  float* work,
12833  lapack_int* info );
12834 
12835 #define LAPACK_ztrevc LAPACK_GLOBAL(ztrevc,ZTREVC)
12836 void LAPACK_ztrevc(
12837  char const* side, char const* howmny,
12838  lapack_logical const* select,
12839  lapack_int const* n,
12840  lapack_complex_double* T, lapack_int const* ldt,
12841  lapack_complex_double* VL, lapack_int const* ldvl,
12842  lapack_complex_double* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
12843  lapack_complex_double* work,
12844  double* rwork,
12845  lapack_int* info );
12846 
12847 #define LAPACK_ctrevc3 LAPACK_GLOBAL(ctrevc3,CTREVC3)
12848 void LAPACK_ctrevc3(
12849  char const* side, char const* howmny,
12850  lapack_logical const* select,
12851  lapack_int const* n,
12852  lapack_complex_float* T, lapack_int const* ldt,
12853  lapack_complex_float* VL, lapack_int const* ldvl,
12854  lapack_complex_float* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
12855  lapack_complex_float* work, lapack_int const* lwork,
12856  float* rwork, lapack_int const* lrwork,
12857  lapack_int* info );
12858 
12859 #define LAPACK_dtrevc3 LAPACK_GLOBAL(dtrevc3,DTREVC3)
12860 void LAPACK_dtrevc3(
12861  char const* side, char const* howmny,
12862  lapack_logical* select,
12863  lapack_int const* n,
12864  double const* T, lapack_int const* ldt,
12865  double* VL, lapack_int const* ldvl,
12866  double* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
12867  double* work, lapack_int const* lwork,
12868  lapack_int* info );
12869 
12870 #define LAPACK_strevc3 LAPACK_GLOBAL(strevc3,STREVC3)
12871 void LAPACK_strevc3(
12872  char const* side, char const* howmny,
12873  lapack_logical* select,
12874  lapack_int const* n,
12875  float const* T, lapack_int const* ldt,
12876  float* VL, lapack_int const* ldvl,
12877  float* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
12878  float* work, lapack_int const* lwork,
12879  lapack_int* info );
12880 
12881 #define LAPACK_ztrevc3 LAPACK_GLOBAL(ztrevc3,ZTREVC3)
12882 void LAPACK_ztrevc3(
12883  char const* side, char const* howmny,
12884  lapack_logical const* select,
12885  lapack_int const* n,
12886  lapack_complex_double* T, lapack_int const* ldt,
12887  lapack_complex_double* VL, lapack_int const* ldvl,
12888  lapack_complex_double* VR, lapack_int const* ldvr, lapack_int const* mm, lapack_int* m,
12889  lapack_complex_double* work, lapack_int const* lwork,
12890  double* rwork, lapack_int const* lrwork,
12891  lapack_int* info );
12892 
12893 #define LAPACK_ctrexc LAPACK_GLOBAL(ctrexc,CTREXC)
12894 void LAPACK_ctrexc(
12895  char const* compq,
12896  lapack_int const* n,
12897  lapack_complex_float* T, lapack_int const* ldt,
12898  lapack_complex_float* Q, lapack_int const* ldq, lapack_int const* ifst, lapack_int const* ilst,
12899  lapack_int* info );
12900 
12901 #define LAPACK_dtrexc LAPACK_GLOBAL(dtrexc,DTREXC)
12902 void LAPACK_dtrexc(
12903  char const* compq,
12904  lapack_int const* n,
12905  double* T, lapack_int const* ldt,
12906  double* Q, lapack_int const* ldq, lapack_int* ifst, lapack_int* ilst,
12907  double* work,
12908  lapack_int* info );
12909 
12910 #define LAPACK_strexc LAPACK_GLOBAL(strexc,STREXC)
12911 void LAPACK_strexc(
12912  char const* compq,
12913  lapack_int const* n,
12914  float* T, lapack_int const* ldt,
12915  float* Q, lapack_int const* ldq, lapack_int* ifst, lapack_int* ilst,
12916  float* work,
12917  lapack_int* info );
12918 
12919 #define LAPACK_ztrexc LAPACK_GLOBAL(ztrexc,ZTREXC)
12920 void LAPACK_ztrexc(
12921  char const* compq,
12922  lapack_int const* n,
12923  lapack_complex_double* T, lapack_int const* ldt,
12924  lapack_complex_double* Q, lapack_int const* ldq, lapack_int const* ifst, lapack_int const* ilst,
12925  lapack_int* info );
12926 
12927 #define LAPACK_ctrrfs LAPACK_GLOBAL(ctrrfs,CTRRFS)
12928 void LAPACK_ctrrfs(
12929  char const* uplo, char const* trans, char const* diag,
12930  lapack_int const* n, lapack_int const* nrhs,
12931  lapack_complex_float const* A, lapack_int const* lda,
12932  lapack_complex_float const* B, lapack_int const* ldb,
12933  lapack_complex_float const* X, lapack_int const* ldx,
12934  float* ferr,
12935  float* berr,
12936  lapack_complex_float* work,
12937  float* rwork,
12938  lapack_int* info );
12939 
12940 #define LAPACK_dtrrfs LAPACK_GLOBAL(dtrrfs,DTRRFS)
12941 void LAPACK_dtrrfs(
12942  char const* uplo, char const* trans, char const* diag,
12943  lapack_int const* n, lapack_int const* nrhs,
12944  double const* A, lapack_int const* lda,
12945  double const* B, lapack_int const* ldb,
12946  double const* X, lapack_int const* ldx,
12947  double* ferr,
12948  double* berr,
12949  double* work,
12950  lapack_int* iwork,
12951  lapack_int* info );
12952 
12953 #define LAPACK_strrfs LAPACK_GLOBAL(strrfs,STRRFS)
12954 void LAPACK_strrfs(
12955  char const* uplo, char const* trans, char const* diag,
12956  lapack_int const* n, lapack_int const* nrhs,
12957  float const* A, lapack_int const* lda,
12958  float const* B, lapack_int const* ldb,
12959  float const* X, lapack_int const* ldx,
12960  float* ferr,
12961  float* berr,
12962  float* work,
12963  lapack_int* iwork,
12964  lapack_int* info );
12965 
12966 #define LAPACK_ztrrfs LAPACK_GLOBAL(ztrrfs,ZTRRFS)
12967 void LAPACK_ztrrfs(
12968  char const* uplo, char const* trans, char const* diag,
12969  lapack_int const* n, lapack_int const* nrhs,
12970  lapack_complex_double const* A, lapack_int const* lda,
12971  lapack_complex_double const* B, lapack_int const* ldb,
12972  lapack_complex_double const* X, lapack_int const* ldx,
12973  double* ferr,
12974  double* berr,
12975  lapack_complex_double* work,
12976  double* rwork,
12977  lapack_int* info );
12978 
12979 #define LAPACK_ctrsen LAPACK_GLOBAL(ctrsen,CTRSEN)
12980 void LAPACK_ctrsen(
12981  char const* job, char const* compq,
12982  lapack_logical const* select,
12983  lapack_int const* n,
12984  lapack_complex_float* T, lapack_int const* ldt,
12985  lapack_complex_float* Q, lapack_int const* ldq,
12986  lapack_complex_float* W, lapack_int* m,
12987  float* s,
12988  float* sep,
12989  lapack_complex_float* work, lapack_int const* lwork,
12990  lapack_int* info );
12991 
12992 #define LAPACK_dtrsen LAPACK_GLOBAL(dtrsen,DTRSEN)
12993 void LAPACK_dtrsen(
12994  char const* job, char const* compq,
12995  lapack_logical const* select,
12996  lapack_int const* n,
12997  double* T, lapack_int const* ldt,
12998  double* Q, lapack_int const* ldq,
12999  double* WR,
13000  double* WI, lapack_int* m,
13001  double* s,
13002  double* sep,
13003  double* work, lapack_int const* lwork,
13004  lapack_int* iwork, lapack_int const* liwork,
13005  lapack_int* info );
13006 
13007 #define LAPACK_strsen LAPACK_GLOBAL(strsen,STRSEN)
13008 void LAPACK_strsen(
13009  char const* job, char const* compq,
13010  lapack_logical const* select,
13011  lapack_int const* n,
13012  float* T, lapack_int const* ldt,
13013  float* Q, lapack_int const* ldq,
13014  float* WR,
13015  float* WI, lapack_int* m,
13016  float* s,
13017  float* sep,
13018  float* work, lapack_int const* lwork,
13019  lapack_int* iwork, lapack_int const* liwork,
13020  lapack_int* info );
13021 
13022 #define LAPACK_ztrsen LAPACK_GLOBAL(ztrsen,ZTRSEN)
13023 void LAPACK_ztrsen(
13024  char const* job, char const* compq,
13025  lapack_logical const* select,
13026  lapack_int const* n,
13027  lapack_complex_double* T, lapack_int const* ldt,
13028  lapack_complex_double* Q, lapack_int const* ldq,
13029  lapack_complex_double* W, lapack_int* m,
13030  double* s,
13031  double* sep,
13032  lapack_complex_double* work, lapack_int const* lwork,
13033  lapack_int* info );
13034 
13035 #define LAPACK_ctrsna LAPACK_GLOBAL(ctrsna,CTRSNA)
13036 void LAPACK_ctrsna(
13037  char const* job, char const* howmny,
13038  lapack_logical const* select,
13039  lapack_int const* n,
13040  lapack_complex_float const* T, lapack_int const* ldt,
13041  lapack_complex_float const* VL, lapack_int const* ldvl,
13042  lapack_complex_float const* VR, lapack_int const* ldvr,
13043  float* S,
13044  float* SEP, lapack_int const* mm, lapack_int* m,
13045  lapack_complex_float* work, lapack_int const* ldwork,
13046  float* rwork,
13047  lapack_int* info );
13048 
13049 #define LAPACK_dtrsna LAPACK_GLOBAL(dtrsna,DTRSNA)
13050 void LAPACK_dtrsna(
13051  char const* job, char const* howmny,
13052  lapack_logical const* select,
13053  lapack_int const* n,
13054  double const* T, lapack_int const* ldt,
13055  double const* VL, lapack_int const* ldvl,
13056  double const* VR, lapack_int const* ldvr,
13057  double* S,
13058  double* SEP, lapack_int const* mm, lapack_int* m,
13059  double* work, lapack_int const* ldwork,
13060  lapack_int* iwork,
13061  lapack_int* info );
13062 
13063 #define LAPACK_strsna LAPACK_GLOBAL(strsna,STRSNA)
13064 void LAPACK_strsna(
13065  char const* job, char const* howmny,
13066  lapack_logical const* select,
13067  lapack_int const* n,
13068  float const* T, lapack_int const* ldt,
13069  float const* VL, lapack_int const* ldvl,
13070  float const* VR, lapack_int const* ldvr,
13071  float* S,
13072  float* SEP, lapack_int const* mm, lapack_int* m,
13073  float* work, lapack_int const* ldwork,
13074  lapack_int* iwork,
13075  lapack_int* info );
13076 
13077 #define LAPACK_ztrsna LAPACK_GLOBAL(ztrsna,ZTRSNA)
13078 void LAPACK_ztrsna(
13079  char const* job, char const* howmny,
13080  lapack_logical const* select,
13081  lapack_int const* n,
13082  lapack_complex_double const* T, lapack_int const* ldt,
13083  lapack_complex_double const* VL, lapack_int const* ldvl,
13084  lapack_complex_double const* VR, lapack_int const* ldvr,
13085  double* S,
13086  double* SEP, lapack_int const* mm, lapack_int* m,
13087  lapack_complex_double* work, lapack_int const* ldwork,
13088  double* rwork,
13089  lapack_int* info );
13090 
13091 #define LAPACK_ctrsyl LAPACK_GLOBAL(ctrsyl,CTRSYL)
13092 void LAPACK_ctrsyl(
13093  char const* trana, char const* tranb,
13094  lapack_int const* isgn, lapack_int const* m, lapack_int const* n,
13095  lapack_complex_float const* A, lapack_int const* lda,
13096  lapack_complex_float const* B, lapack_int const* ldb,
13097  lapack_complex_float* C, lapack_int const* ldc,
13098  float* scale,
13099  lapack_int* info );
13100 
13101 #define LAPACK_dtrsyl LAPACK_GLOBAL(dtrsyl,DTRSYL)
13102 void LAPACK_dtrsyl(
13103  char const* trana, char const* tranb,
13104  lapack_int const* isgn, lapack_int const* m, lapack_int const* n,
13105  double const* A, lapack_int const* lda,
13106  double const* B, lapack_int const* ldb,
13107  double* C, lapack_int const* ldc,
13108  double* scale,
13109  lapack_int* info );
13110 
13111 #define LAPACK_strsyl LAPACK_GLOBAL(strsyl,STRSYL)
13112 void LAPACK_strsyl(
13113  char const* trana, char const* tranb,
13114  lapack_int const* isgn, lapack_int const* m, lapack_int const* n,
13115  float const* A, lapack_int const* lda,
13116  float const* B, lapack_int const* ldb,
13117  float* C, lapack_int const* ldc,
13118  float* scale,
13119  lapack_int* info );
13120 
13121 #define LAPACK_ztrsyl LAPACK_GLOBAL(ztrsyl,ZTRSYL)
13122 void LAPACK_ztrsyl(
13123  char const* trana, char const* tranb,
13124  lapack_int const* isgn, lapack_int const* m, lapack_int const* n,
13125  lapack_complex_double const* A, lapack_int const* lda,
13126  lapack_complex_double const* B, lapack_int const* ldb,
13127  lapack_complex_double* C, lapack_int const* ldc,
13128  double* scale,
13129  lapack_int* info );
13130 
13131 #define LAPACK_ctrtri LAPACK_GLOBAL(ctrtri,CTRTRI)
13132 void LAPACK_ctrtri(
13133  char const* uplo, char const* diag,
13134  lapack_int const* n,
13135  lapack_complex_float* A, lapack_int const* lda,
13136  lapack_int* info );
13137 
13138 #define LAPACK_dtrtri LAPACK_GLOBAL(dtrtri,DTRTRI)
13139 void LAPACK_dtrtri(
13140  char const* uplo, char const* diag,
13141  lapack_int const* n,
13142  double* A, lapack_int const* lda,
13143  lapack_int* info );
13144 
13145 #define LAPACK_strtri LAPACK_GLOBAL(strtri,STRTRI)
13146 void LAPACK_strtri(
13147  char const* uplo, char const* diag,
13148  lapack_int const* n,
13149  float* A, lapack_int const* lda,
13150  lapack_int* info );
13151 
13152 #define LAPACK_ztrtri LAPACK_GLOBAL(ztrtri,ZTRTRI)
13153 void LAPACK_ztrtri(
13154  char const* uplo, char const* diag,
13155  lapack_int const* n,
13156  lapack_complex_double* A, lapack_int const* lda,
13157  lapack_int* info );
13158 
13159 #define LAPACK_ctrtrs LAPACK_GLOBAL(ctrtrs,CTRTRS)
13160 void LAPACK_ctrtrs(
13161  char const* uplo, char const* trans, char const* diag,
13162  lapack_int const* n, lapack_int const* nrhs,
13163  lapack_complex_float const* A, lapack_int const* lda,
13164  lapack_complex_float* B, lapack_int const* ldb,
13165  lapack_int* info );
13166 
13167 #define LAPACK_dtrtrs LAPACK_GLOBAL(dtrtrs,DTRTRS)
13168 void LAPACK_dtrtrs(
13169  char const* uplo, char const* trans, char const* diag,
13170  lapack_int const* n, lapack_int const* nrhs,
13171  double const* A, lapack_int const* lda,
13172  double* B, lapack_int const* ldb,
13173  lapack_int* info );
13174 
13175 #define LAPACK_strtrs LAPACK_GLOBAL(strtrs,STRTRS)
13176 void LAPACK_strtrs(
13177  char const* uplo, char const* trans, char const* diag,
13178  lapack_int const* n, lapack_int const* nrhs,
13179  float const* A, lapack_int const* lda,
13180  float* B, lapack_int const* ldb,
13181  lapack_int* info );
13182 
13183 #define LAPACK_ztrtrs LAPACK_GLOBAL(ztrtrs,ZTRTRS)
13184 void LAPACK_ztrtrs(
13185  char const* uplo, char const* trans, char const* diag,
13186  lapack_int const* n, lapack_int const* nrhs,
13187  lapack_complex_double const* A, lapack_int const* lda,
13188  lapack_complex_double* B, lapack_int const* ldb,
13189  lapack_int* info );
13190 
13191 #define LAPACK_ctrttf LAPACK_GLOBAL(ctrttf,CTRTTF)
13192 void LAPACK_ctrttf(
13193  char const* transr, char const* uplo,
13194  lapack_int const* n,
13195  lapack_complex_float const* A, lapack_int const* lda,
13196  lapack_complex_float* ARF,
13197  lapack_int* info );
13198 
13199 #define LAPACK_dtrttf LAPACK_GLOBAL(dtrttf,DTRTTF)
13200 void LAPACK_dtrttf(
13201  char const* transr, char const* uplo,
13202  lapack_int const* n,
13203  double const* A, lapack_int const* lda,
13204  double* ARF,
13205  lapack_int* info );
13206 
13207 #define LAPACK_strttf LAPACK_GLOBAL(strttf,STRTTF)
13208 void LAPACK_strttf(
13209  char const* transr, char const* uplo,
13210  lapack_int const* n,
13211  float const* A, lapack_int const* lda,
13212  float* ARF,
13213  lapack_int* info );
13214 
13215 #define LAPACK_ztrttf LAPACK_GLOBAL(ztrttf,ZTRTTF)
13216 void LAPACK_ztrttf(
13217  char const* transr, char const* uplo,
13218  lapack_int const* n,
13219  lapack_complex_double const* A, lapack_int const* lda,
13220  lapack_complex_double* ARF,
13221  lapack_int* info );
13222 
13223 #define LAPACK_ctrttp LAPACK_GLOBAL(ctrttp,CTRTTP)
13224 void LAPACK_ctrttp(
13225  char const* uplo,
13226  lapack_int const* n,
13227  lapack_complex_float const* A, lapack_int const* lda,
13228  lapack_complex_float* AP,
13229  lapack_int* info );
13230 
13231 #define LAPACK_dtrttp LAPACK_GLOBAL(dtrttp,DTRTTP)
13232 void LAPACK_dtrttp(
13233  char const* uplo,
13234  lapack_int const* n,
13235  double const* A, lapack_int const* lda,
13236  double* AP,
13237  lapack_int* info );
13238 
13239 #define LAPACK_strttp LAPACK_GLOBAL(strttp,STRTTP)
13240 void LAPACK_strttp(
13241  char const* uplo,
13242  lapack_int const* n,
13243  float const* A, lapack_int const* lda,
13244  float* AP,
13245  lapack_int* info );
13246 
13247 #define LAPACK_ztrttp LAPACK_GLOBAL(ztrttp,ZTRTTP)
13248 void LAPACK_ztrttp(
13249  char const* uplo,
13250  lapack_int const* n,
13251  lapack_complex_double const* A, lapack_int const* lda,
13252  lapack_complex_double* AP,
13253  lapack_int* info );
13254 
13255 #define LAPACK_ctzrzf LAPACK_GLOBAL(ctzrzf,CTZRZF)
13256 void LAPACK_ctzrzf(
13257  lapack_int const* m, lapack_int const* n,
13258  lapack_complex_float* A, lapack_int const* lda,
13259  lapack_complex_float* tau,
13260  lapack_complex_float* work, lapack_int const* lwork,
13261  lapack_int* info );
13262 
13263 #define LAPACK_dtzrzf LAPACK_GLOBAL(dtzrzf,DTZRZF)
13264 void LAPACK_dtzrzf(
13265  lapack_int const* m, lapack_int const* n,
13266  double* A, lapack_int const* lda,
13267  double* tau,
13268  double* work, lapack_int const* lwork,
13269  lapack_int* info );
13270 
13271 #define LAPACK_stzrzf LAPACK_GLOBAL(stzrzf,STZRZF)
13272 void LAPACK_stzrzf(
13273  lapack_int const* m, lapack_int const* n,
13274  float* A, lapack_int const* lda,
13275  float* tau,
13276  float* work, lapack_int const* lwork,
13277  lapack_int* info );
13278 
13279 #define LAPACK_ztzrzf LAPACK_GLOBAL(ztzrzf,ZTZRZF)
13280 void LAPACK_ztzrzf(
13281  lapack_int const* m, lapack_int const* n,
13282  lapack_complex_double* A, lapack_int const* lda,
13283  lapack_complex_double* tau,
13284  lapack_complex_double* work, lapack_int const* lwork,
13285  lapack_int* info );
13286 
13287 #define LAPACK_cunbdb LAPACK_GLOBAL(cunbdb,CUNBDB)
13288 void LAPACK_cunbdb(
13289  char const* trans, char const* signs,
13290  lapack_int const* m, lapack_int const* p, lapack_int const* q,
13291  lapack_complex_float* X11, lapack_int const* ldx11,
13292  lapack_complex_float* X12, lapack_int const* ldx12,
13293  lapack_complex_float* X21, lapack_int const* ldx21,
13294  lapack_complex_float* X22, lapack_int const* ldx22,
13295  float* theta,
13296  float* phi,
13297  lapack_complex_float* TAUP1,
13298  lapack_complex_float* TAUP2,
13299  lapack_complex_float* TAUQ1,
13300  lapack_complex_float* TAUQ2,
13301  lapack_complex_float* work, lapack_int const* lwork,
13302  lapack_int* info );
13303 
13304 #define LAPACK_zunbdb LAPACK_GLOBAL(zunbdb,ZUNBDB)
13305 void LAPACK_zunbdb(
13306  char const* trans, char const* signs,
13307  lapack_int const* m, lapack_int const* p, lapack_int const* q,
13308  lapack_complex_double* X11, lapack_int const* ldx11,
13309  lapack_complex_double* X12, lapack_int const* ldx12,
13310  lapack_complex_double* X21, lapack_int const* ldx21,
13311  lapack_complex_double* X22, lapack_int const* ldx22,
13312  double* theta,
13313  double* phi,
13314  lapack_complex_double* TAUP1,
13315  lapack_complex_double* TAUP2,
13316  lapack_complex_double* TAUQ1,
13317  lapack_complex_double* TAUQ2,
13318  lapack_complex_double* work, lapack_int const* lwork,
13319  lapack_int* info );
13320 
13321 #define LAPACK_cuncsd LAPACK_GLOBAL(cuncsd,CUNCSD)
13322 void LAPACK_cuncsd(
13323  char const* jobu1, char const* jobu2, char const* jobv1t, char const* jobv2t, char const* trans, char const* signs,
13324  lapack_int const* m, lapack_int const* p, lapack_int const* q,
13325  lapack_complex_float* X11, lapack_int const* ldx11,
13326  lapack_complex_float* X12, lapack_int const* ldx12,
13327  lapack_complex_float* X21, lapack_int const* ldx21,
13328  lapack_complex_float* X22, lapack_int const* ldx22,
13329  float* theta,
13330  lapack_complex_float* U1, lapack_int const* ldu1,
13331  lapack_complex_float* U2, lapack_int const* ldu2,
13332  lapack_complex_float* V1T, lapack_int const* ldv1t,
13333  lapack_complex_float* V2T, lapack_int const* ldv2t,
13334  lapack_complex_float* work, lapack_int const* lwork,
13335  float* rwork, lapack_int const* lrwork,
13336  lapack_int* iwork,
13337  lapack_int* info );
13338 
13339 #define LAPACK_zuncsd LAPACK_GLOBAL(zuncsd,ZUNCSD)
13340 void LAPACK_zuncsd(
13341  char const* jobu1, char const* jobu2, char const* jobv1t, char const* jobv2t, char const* trans, char const* signs,
13342  lapack_int const* m, lapack_int const* p, lapack_int const* q,
13343  lapack_complex_double* X11, lapack_int const* ldx11,
13344  lapack_complex_double* X12, lapack_int const* ldx12,
13345  lapack_complex_double* X21, lapack_int const* ldx21,
13346  lapack_complex_double* X22, lapack_int const* ldx22,
13347  double* theta,
13348  lapack_complex_double* U1, lapack_int const* ldu1,
13349  lapack_complex_double* U2, lapack_int const* ldu2,
13350  lapack_complex_double* V1T, lapack_int const* ldv1t,
13351  lapack_complex_double* V2T, lapack_int const* ldv2t,
13352  lapack_complex_double* work, lapack_int const* lwork,
13353  double* rwork, lapack_int const* lrwork,
13354  lapack_int* iwork,
13355  lapack_int* info );
13356 
13357 #define LAPACK_cuncsd2by1 LAPACK_GLOBAL(cuncsd2by1,CUNCSD2BY1)
13358 void LAPACK_cuncsd2by1(
13359  char const* jobu1, char const* jobu2, char const* jobv1t,
13360  lapack_int const* m, lapack_int const* p, lapack_int const* q,
13361  lapack_complex_float* X11, lapack_int const* ldx11,
13362  lapack_complex_float* X21, lapack_int const* ldx21,
13363  float* theta,
13364  lapack_complex_float* U1, lapack_int const* ldu1,
13365  lapack_complex_float* U2, lapack_int const* ldu2,
13366  lapack_complex_float* V1T, lapack_int const* ldv1t,
13367  lapack_complex_float* work, lapack_int const* lwork,
13368  float* rwork, lapack_int const* lrwork,
13369  lapack_int* iwork,
13370  lapack_int* info );
13371 
13372 #define LAPACK_zuncsd2by1 LAPACK_GLOBAL(zuncsd2by1,ZUNCSD2BY1)
13373 void LAPACK_zuncsd2by1(
13374  char const* jobu1, char const* jobu2, char const* jobv1t,
13375  lapack_int const* m, lapack_int const* p, lapack_int const* q,
13376  lapack_complex_double* X11, lapack_int const* ldx11,
13377  lapack_complex_double* X21, lapack_int const* ldx21,
13378  double* theta,
13379  lapack_complex_double* U1, lapack_int const* ldu1,
13380  lapack_complex_double* U2, lapack_int const* ldu2,
13381  lapack_complex_double* V1T, lapack_int const* ldv1t,
13382  lapack_complex_double* work, lapack_int const* lwork,
13383  double* rwork, lapack_int const* lrwork,
13384  lapack_int* iwork,
13385  lapack_int* info );
13386 
13387 #define LAPACK_cungbr LAPACK_GLOBAL(cungbr,CUNGBR)
13388 void LAPACK_cungbr(
13389  char const* vect,
13390  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13391  lapack_complex_float* A, lapack_int const* lda,
13392  lapack_complex_float const* tau,
13393  lapack_complex_float* work, lapack_int const* lwork,
13394  lapack_int* info );
13395 
13396 #define LAPACK_zungbr LAPACK_GLOBAL(zungbr,ZUNGBR)
13397 void LAPACK_zungbr(
13398  char const* vect,
13399  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13400  lapack_complex_double* A, lapack_int const* lda,
13401  lapack_complex_double const* tau,
13402  lapack_complex_double* work, lapack_int const* lwork,
13403  lapack_int* info );
13404 
13405 #define LAPACK_cunghr LAPACK_GLOBAL(cunghr,CUNGHR)
13406 void LAPACK_cunghr(
13407  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
13408  lapack_complex_float* A, lapack_int const* lda,
13409  lapack_complex_float const* tau,
13410  lapack_complex_float* work, lapack_int const* lwork,
13411  lapack_int* info );
13412 
13413 #define LAPACK_zunghr LAPACK_GLOBAL(zunghr,ZUNGHR)
13414 void LAPACK_zunghr(
13415  lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
13416  lapack_complex_double* A, lapack_int const* lda,
13417  lapack_complex_double const* tau,
13418  lapack_complex_double* work, lapack_int const* lwork,
13419  lapack_int* info );
13420 
13421 #define LAPACK_cunglq LAPACK_GLOBAL(cunglq,CUNGLQ)
13422 void LAPACK_cunglq(
13423  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13424  lapack_complex_float* A, lapack_int const* lda,
13425  lapack_complex_float const* tau,
13426  lapack_complex_float* work, lapack_int const* lwork,
13427  lapack_int* info );
13428 
13429 #define LAPACK_zunglq LAPACK_GLOBAL(zunglq,ZUNGLQ)
13430 void LAPACK_zunglq(
13431  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13432  lapack_complex_double* A, lapack_int const* lda,
13433  lapack_complex_double const* tau,
13434  lapack_complex_double* work, lapack_int const* lwork,
13435  lapack_int* info );
13436 
13437 #define LAPACK_cungql LAPACK_GLOBAL(cungql,CUNGQL)
13438 void LAPACK_cungql(
13439  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13440  lapack_complex_float* A, lapack_int const* lda,
13441  lapack_complex_float const* tau,
13442  lapack_complex_float* work, lapack_int const* lwork,
13443  lapack_int* info );
13444 
13445 #define LAPACK_zungql LAPACK_GLOBAL(zungql,ZUNGQL)
13446 void LAPACK_zungql(
13447  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13448  lapack_complex_double* A, lapack_int const* lda,
13449  lapack_complex_double const* tau,
13450  lapack_complex_double* work, lapack_int const* lwork,
13451  lapack_int* info );
13452 
13453 #define LAPACK_cungqr LAPACK_GLOBAL(cungqr,CUNGQR)
13454 void LAPACK_cungqr(
13455  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13456  lapack_complex_float* A, lapack_int const* lda,
13457  lapack_complex_float const* tau,
13458  lapack_complex_float* work, lapack_int const* lwork,
13459  lapack_int* info );
13460 
13461 #define LAPACK_zungqr LAPACK_GLOBAL(zungqr,ZUNGQR)
13462 void LAPACK_zungqr(
13463  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13464  lapack_complex_double* A, lapack_int const* lda,
13465  lapack_complex_double const* tau,
13466  lapack_complex_double* work, lapack_int const* lwork,
13467  lapack_int* info );
13468 
13469 #define LAPACK_cungrq LAPACK_GLOBAL(cungrq,CUNGRQ)
13470 void LAPACK_cungrq(
13471  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13472  lapack_complex_float* A, lapack_int const* lda,
13473  lapack_complex_float const* tau,
13474  lapack_complex_float* work, lapack_int const* lwork,
13475  lapack_int* info );
13476 
13477 #define LAPACK_zungrq LAPACK_GLOBAL(zungrq,ZUNGRQ)
13478 void LAPACK_zungrq(
13479  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13480  lapack_complex_double* A, lapack_int const* lda,
13481  lapack_complex_double const* tau,
13482  lapack_complex_double* work, lapack_int const* lwork,
13483  lapack_int* info );
13484 
13485 #define LAPACK_cungtr LAPACK_GLOBAL(cungtr,CUNGTR)
13486 void LAPACK_cungtr(
13487  char const* uplo,
13488  lapack_int const* n,
13489  lapack_complex_float* A, lapack_int const* lda,
13490  lapack_complex_float const* tau,
13491  lapack_complex_float* work, lapack_int const* lwork,
13492  lapack_int* info );
13493 
13494 #define LAPACK_zungtr LAPACK_GLOBAL(zungtr,ZUNGTR)
13495 void LAPACK_zungtr(
13496  char const* uplo,
13497  lapack_int const* n,
13498  lapack_complex_double* A, lapack_int const* lda,
13499  lapack_complex_double const* tau,
13500  lapack_complex_double* work, lapack_int const* lwork,
13501  lapack_int* info );
13502 
13503 #define LAPACK_cunmbr LAPACK_GLOBAL(cunmbr,CUNMBR)
13504 void LAPACK_cunmbr(
13505  char const* vect, char const* side, char const* trans,
13506  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13507  lapack_complex_float const* A, lapack_int const* lda,
13508  lapack_complex_float const* tau,
13509  lapack_complex_float* C, lapack_int const* ldc,
13510  lapack_complex_float* work, lapack_int const* lwork,
13511  lapack_int* info );
13512 
13513 #define LAPACK_zunmbr LAPACK_GLOBAL(zunmbr,ZUNMBR)
13514 void LAPACK_zunmbr(
13515  char const* vect, char const* side, char const* trans,
13516  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13517  lapack_complex_double const* A, lapack_int const* lda,
13518  lapack_complex_double const* tau,
13519  lapack_complex_double* C, lapack_int const* ldc,
13520  lapack_complex_double* work, lapack_int const* lwork,
13521  lapack_int* info );
13522 
13523 #define LAPACK_cunmhr LAPACK_GLOBAL(cunmhr,CUNMHR)
13524 void LAPACK_cunmhr(
13525  char const* side, char const* trans,
13526  lapack_int const* m, lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
13527  lapack_complex_float const* A, lapack_int const* lda,
13528  lapack_complex_float const* tau,
13529  lapack_complex_float* C, lapack_int const* ldc,
13530  lapack_complex_float* work, lapack_int const* lwork,
13531  lapack_int* info );
13532 
13533 #define LAPACK_zunmhr LAPACK_GLOBAL(zunmhr,ZUNMHR)
13534 void LAPACK_zunmhr(
13535  char const* side, char const* trans,
13536  lapack_int const* m, lapack_int const* n, lapack_int const* ilo, lapack_int const* ihi,
13537  lapack_complex_double const* A, lapack_int const* lda,
13538  lapack_complex_double const* tau,
13539  lapack_complex_double* C, lapack_int const* ldc,
13540  lapack_complex_double* work, lapack_int const* lwork,
13541  lapack_int* info );
13542 
13543 #define LAPACK_cunmlq LAPACK_GLOBAL(cunmlq,CUNMLQ)
13544 void LAPACK_cunmlq(
13545  char const* side, char const* trans,
13546  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13547  lapack_complex_float const* A, lapack_int const* lda,
13548  lapack_complex_float const* tau,
13549  lapack_complex_float* C, lapack_int const* ldc,
13550  lapack_complex_float* work, lapack_int const* lwork,
13551  lapack_int* info );
13552 
13553 #define LAPACK_zunmlq LAPACK_GLOBAL(zunmlq,ZUNMLQ)
13554 void LAPACK_zunmlq(
13555  char const* side, char const* trans,
13556  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13557  lapack_complex_double const* A, lapack_int const* lda,
13558  lapack_complex_double const* tau,
13559  lapack_complex_double* C, lapack_int const* ldc,
13560  lapack_complex_double* work, lapack_int const* lwork,
13561  lapack_int* info );
13562 
13563 #define LAPACK_cunmql LAPACK_GLOBAL(cunmql,CUNMQL)
13564 void LAPACK_cunmql(
13565  char const* side, char const* trans,
13566  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13567  lapack_complex_float const* A, lapack_int const* lda,
13568  lapack_complex_float const* tau,
13569  lapack_complex_float* C, lapack_int const* ldc,
13570  lapack_complex_float* work, lapack_int const* lwork,
13571  lapack_int* info );
13572 
13573 #define LAPACK_zunmql LAPACK_GLOBAL(zunmql,ZUNMQL)
13574 void LAPACK_zunmql(
13575  char const* side, char const* trans,
13576  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13577  lapack_complex_double const* A, lapack_int const* lda,
13578  lapack_complex_double const* tau,
13579  lapack_complex_double* C, lapack_int const* ldc,
13580  lapack_complex_double* work, lapack_int const* lwork,
13581  lapack_int* info );
13582 
13583 #define LAPACK_cunmqr LAPACK_GLOBAL(cunmqr,CUNMQR)
13584 void LAPACK_cunmqr(
13585  char const* side, char const* trans,
13586  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13587  lapack_complex_float const* A, lapack_int const* lda,
13588  lapack_complex_float const* tau,
13589  lapack_complex_float* C, lapack_int const* ldc,
13590  lapack_complex_float* work, lapack_int const* lwork,
13591  lapack_int* info );
13592 
13593 #define LAPACK_zunmqr LAPACK_GLOBAL(zunmqr,ZUNMQR)
13594 void LAPACK_zunmqr(
13595  char const* side, char const* trans,
13596  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13597  lapack_complex_double const* A, lapack_int const* lda,
13598  lapack_complex_double const* tau,
13599  lapack_complex_double* C, lapack_int const* ldc,
13600  lapack_complex_double* work, lapack_int const* lwork,
13601  lapack_int* info );
13602 
13603 #define LAPACK_cunmrq LAPACK_GLOBAL(cunmrq,CUNMRQ)
13604 void LAPACK_cunmrq(
13605  char const* side, char const* trans,
13606  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13607  lapack_complex_float const* A, lapack_int const* lda,
13608  lapack_complex_float const* tau,
13609  lapack_complex_float* C, lapack_int const* ldc,
13610  lapack_complex_float* work, lapack_int const* lwork,
13611  lapack_int* info );
13612 
13613 #define LAPACK_zunmrq LAPACK_GLOBAL(zunmrq,ZUNMRQ)
13614 void LAPACK_zunmrq(
13615  char const* side, char const* trans,
13616  lapack_int const* m, lapack_int const* n, lapack_int const* k,
13617  lapack_complex_double const* A, lapack_int const* lda,
13618  lapack_complex_double const* tau,
13619  lapack_complex_double* C, lapack_int const* ldc,
13620  lapack_complex_double* work, lapack_int const* lwork,
13621  lapack_int* info );
13622 
13623 #define LAPACK_cunmrz LAPACK_GLOBAL(cunmrz,CUNMRZ)
13624 void LAPACK_cunmrz(
13625  char const* side, char const* trans,
13626  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l,
13627  lapack_complex_float const* A, lapack_int const* lda,
13628  lapack_complex_float const* tau,
13629  lapack_complex_float* C, lapack_int const* ldc,
13630  lapack_complex_float* work, lapack_int const* lwork,
13631  lapack_int* info );
13632 
13633 #define LAPACK_zunmrz LAPACK_GLOBAL(zunmrz,ZUNMRZ)
13634 void LAPACK_zunmrz(
13635  char const* side, char const* trans,
13636  lapack_int const* m, lapack_int const* n, lapack_int const* k, lapack_int const* l,
13637  lapack_complex_double const* A, lapack_int const* lda,
13638  lapack_complex_double const* tau,
13639  lapack_complex_double* C, lapack_int const* ldc,
13640  lapack_complex_double* work, lapack_int const* lwork,
13641  lapack_int* info );
13642 
13643 #define LAPACK_cunmtr LAPACK_GLOBAL(cunmtr,CUNMTR)
13644 void LAPACK_cunmtr(
13645  char const* side, char const* uplo, char const* trans,
13646  lapack_int const* m, lapack_int const* n,
13647  lapack_complex_float const* A, lapack_int const* lda,
13648  lapack_complex_float const* tau,
13649  lapack_complex_float* C, lapack_int const* ldc,
13650  lapack_complex_float* work, lapack_int const* lwork,
13651  lapack_int* info );
13652 
13653 #define LAPACK_zunmtr LAPACK_GLOBAL(zunmtr,ZUNMTR)
13654 void LAPACK_zunmtr(
13655  char const* side, char const* uplo, char const* trans,
13656  lapack_int const* m, lapack_int const* n,
13657  lapack_complex_double const* A, lapack_int const* lda,
13658  lapack_complex_double const* tau,
13659  lapack_complex_double* C, lapack_int const* ldc,
13660  lapack_complex_double* work, lapack_int const* lwork,
13661  lapack_int* info );
13662 
13663 #define LAPACK_cupgtr LAPACK_GLOBAL(cupgtr,CUPGTR)
13664 void LAPACK_cupgtr(
13665  char const* uplo,
13666  lapack_int const* n,
13667  lapack_complex_float const* AP,
13668  lapack_complex_float const* tau,
13669  lapack_complex_float* Q, lapack_int const* ldq,
13670  lapack_complex_float* work,
13671  lapack_int* info );
13672 
13673 #define LAPACK_zupgtr LAPACK_GLOBAL(zupgtr,ZUPGTR)
13674 void LAPACK_zupgtr(
13675  char const* uplo,
13676  lapack_int const* n,
13677  lapack_complex_double const* AP,
13678  lapack_complex_double const* tau,
13679  lapack_complex_double* Q, lapack_int const* ldq,
13680  lapack_complex_double* work,
13681  lapack_int* info );
13682 
13683 #define LAPACK_cupmtr LAPACK_GLOBAL(cupmtr,CUPMTR)
13684 void LAPACK_cupmtr(
13685  char const* side, char const* uplo, char const* trans,
13686  lapack_int const* m, lapack_int const* n,
13687  lapack_complex_float const* AP,
13688  lapack_complex_float const* tau,
13689  lapack_complex_float* C, lapack_int const* ldc,
13690  lapack_complex_float* work,
13691  lapack_int* info );
13692 
13693 #define LAPACK_zupmtr LAPACK_GLOBAL(zupmtr,ZUPMTR)
13694 void LAPACK_zupmtr(
13695  char const* side, char const* uplo, char const* trans,
13696  lapack_int const* m, lapack_int const* n,
13697  lapack_complex_double const* AP,
13698  lapack_complex_double const* tau,
13699  lapack_complex_double* C, lapack_int const* ldc,
13700  lapack_complex_double* work,
13701  lapack_int* info );
13702 
13703 #ifdef __cplusplus
13704 } /* extern "C" */
13705 #endif
13706 
13707 #endif /* LAPACK_H */